{-# 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
    | TwoHandFlat
    | OneHand
    | LeaveHolstered
  deriving 
    (Eq,Show,Ord,Enum)