This commit is contained in:
2024-12-21 12:10:21 +00:00
parent e35e056fcb
commit 5b6699767a
2 changed files with 0 additions and 16 deletions
-11
View File
@@ -71,15 +71,6 @@ data Creature = Creature
, _crStatistics :: CreatureStatistics , _crStatistics :: CreatureStatistics
} }
--deriving (Eq, Show, Read) --Generic, Flat)
--
--data CreatureTargeting = CreatureTargeting
-- { _ctPos :: Maybe Point2
-- , _ctType :: Maybe TargetingType
-- , _ctID :: Maybe Int
-- , _ctActive :: Bool
-- }
data CreatureCorpse = MakeDefaultCorpse data CreatureCorpse = MakeDefaultCorpse
--deriving (Eq, Ord, Show, Read) --Generic, Flat) --deriving (Eq, Ord, Show, Read) --Generic, Flat)
@@ -93,7 +84,6 @@ data Intention = Intention
--deriving (Eq, Show, Read) --Generic, Flat) --deriving (Eq, Show, Read) --Generic, Flat)
makeLenses ''Creature makeLenses ''Creature
--makeLenses ''CreatureTargeting
makeLenses ''Intention makeLenses ''Intention
concat concat
@@ -102,5 +92,4 @@ concat
[ ''CreatureCorpse [ ''CreatureCorpse
, ''Creature , ''Creature
, ''Intention , ''Intention
-- , ''CreatureTargeting
] ]
-5
View File
@@ -55,13 +55,8 @@ defaultCreature =
, _crHammerPosition = HammerUp , _crHammerPosition = HammerUp
, _crName = "DEFAULTCRNAME" , _crName = "DEFAULTCRNAME"
, _crStatistics = CreatureStatistics 50 50 50 , _crStatistics = CreatureStatistics 50 50 50
-- , _crCamouflage = FullyVisible
-- , _crTargeting = defaultCreatureTargeting
} }
--defaultCreatureTargeting :: CreatureTargeting
--defaultCreatureTargeting = CreatureTargeting Nothing Nothing Nothing False
defaultCreatureSkin :: CreatureType defaultCreatureSkin :: CreatureType
defaultCreatureSkin = Humanoid (greyN 0.9) (lightx4 green) (greyN 0.3) InanimateAI defaultCreatureSkin = Humanoid (greyN 0.9) (lightx4 green) (greyN 0.3) InanimateAI