module Dodge.Creature.SpreadGunCrit ( spreadGunCrit, ) where --import Control.Lens import Dodge.Data.Creature import Dodge.Default import Dodge.Item.Held.Stick import qualified IntMapHelp as IM --import Picture spreadGunCrit :: Creature spreadGunCrit = defaultCreature { _crInv = IM.fromList [(0, bangStick 6)] , _crRad = 10 , _crHP = 500 } -- & crType . humanoidAI .~ SpreadGunAI -- & crType . skinUpper .~ lightx4 red