module Dodge.Creature.AutoCrit ( autoCrit, ) where import Dodge.Item.Held.Cane import Control.Lens import Dodge.Data.Creature import Dodge.Default import Dodge.Item.Consumable import qualified IntMapHelp as IM import Picture autoCrit :: Creature autoCrit = defaultCreature { _crInv = IM.fromList [(0, autoRifle), (1, medkit 100)] , _crRad = 10 , _crHP = 300 , _crMvType = defaultAimMvType } & crType . skinUpper .~ lightx4 red & crType . humanoidAI .~ AutoAI