Delete cruft, add Reader monad to some internal ai
This commit is contained in:
@@ -6,7 +6,6 @@ module Dodge.Creature.Inanimate
|
||||
import Dodge.Data
|
||||
import Dodge.Creature.Stance.Data
|
||||
import Dodge.Creature.State.Data
|
||||
import Dodge.Creature.Impulse.Data
|
||||
import Dodge.Base
|
||||
import Dodge.Picture.Layer
|
||||
import Dodge.Default
|
||||
@@ -59,8 +58,7 @@ barrel = defaultInanimate
|
||||
, color (greyN 0.5) $ circleSolid 8
|
||||
]
|
||||
, _crState = defaultState
|
||||
{_goals = [[Wait]]
|
||||
,_crSpState = Barrel []
|
||||
{_crSpState = Barrel []
|
||||
}
|
||||
, _crInv = IM.empty -- IM.fromList [(0,frontArmour)]
|
||||
}
|
||||
@@ -74,8 +72,7 @@ explosiveBarrel = defaultInanimate
|
||||
, color orange $ circleSolid 10
|
||||
]
|
||||
, _crState = defaultState
|
||||
{_goals = [[Wait]]
|
||||
,_crSpState = Barrel []
|
||||
{_crSpState = Barrel []
|
||||
}
|
||||
, _crInv = IM.empty -- IM.fromList [(0,frontArmour)]
|
||||
,_crApplyDamage = \_ c -> (id, c)
|
||||
|
||||
Reference in New Issue
Block a user