Modularise item data, change tesla arc from projectile to particle

2021-06-06 16:08:56 +02:00
parent c2f7c6e245
commit 0b8ac97fe9
25 changed files with 141 additions and 85 deletions
@@ -0,0 +1,47 @@
+{-# LANGUAGE StrictData #-}
+module Dodge.Item.Data
+    where
+data HammerPosition 
+    = HammerDown
+    | HammerReleased
+    | HammerUp
+    | NoHammer
+  deriving
+    (Eq, Ord, Show)
+data ItemIdentity 
+    = Pistol
+    | SpreadGun
+    | MultGun
+    | HvAutoGun
+    | AutoGun
+    | LtAutoGun
+    | MiniGun
+    | Medkit25
+    | MagShield
+    | FrontArmour
+    | JetPack
+    | FlameShield
+    | Generic
+    | SparkGun
+    | ShatterGun
+    | LongGun
+    | Flamethrower
+    | Blinker
+    | Grenade
+    | RemoteBomb
+    | TeslaGun
+    | LasGun
+    | ForceFieldGun
+    | GrapGun
+    | TractorGun 
+    | Launcher
+    | RemoteLauncher
+    | LightningGun
+    | PoisonSprayer
+  deriving 
+    (Eq,Show,Ord,Enum)
+data AimStance
+    = TwoHandTwist
+    | TwoHand
+    | OneHand
+    | LeaveHolstered