module Dodge.Creature.LtAutoCrit ( ltAutoCrit, ) where --import Control.Lens import Dodge.Data.Creature import Dodge.Default --import Dodge.Item.Held.Stick --import qualified IntMapHelp as IM --import Picture ltAutoCrit :: Creature ltAutoCrit = defaultCreature { --_crInv = IM.fromList [(0, autoPistol)] _crHP = HP 500 } -- & crType .~ LtAutoCrit -- & crType . humanoidAI .~ LtAutoAI -- & crType . skinUpper .~ lightx4 red