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)]
        , _crRad = 10
        , _crHP = 500
        }
        & crType . humanoidAI .~ LtAutoAI
        & crType . skinUpper .~ lightx4 red