module Dodge.Creature.LauncherCrit ( launcherCrit ) where import Dodge.Data import Dodge.Default import Dodge.Item.Weapon.Launcher import Picture import qualified IntMapHelp as IM import Control.Lens launcherCrit :: Creature launcherCrit = defaultCreature { _crInv = IM.fromList [(0,launcher)] , _crRad = 10 , _crState = defaultState , _crHP = 300 } & crType . skinUpper .~ light4 red & crType . humanoidAI .~ LauncherAI