91 lines
1.5 KiB
Haskell
91 lines
1.5 KiB
Haskell
module Dodge.Combine.Data
|
|
(CombineType (..)
|
|
) where
|
|
-- TODO make this an enum somehow...?
|
|
data CombineType
|
|
= NOTDEFINED
|
|
-- Weapons
|
|
| BANGSTICK Int
|
|
| PISTOL
|
|
| REVOLVER
|
|
| REVOLVERX Int
|
|
| HVAUTOGUN
|
|
| LTAUTOGUN
|
|
| MACHINEPISTOL
|
|
| AUTOPISTOL
|
|
| SMG
|
|
| BANGCONE
|
|
| BLUNDERBUSS
|
|
| GRAPESHOTCANNON
|
|
| GRENADELAUNCHER Int -- number of chambers that can be reloaded
|
|
-- | MORTARCONE / HANDMORTAR
|
|
| BANGCANE
|
|
| MINIGUN
|
|
| BANGCANEX Int
|
|
| RIFLE
|
|
| REPEATER
|
|
| AUTORIFLE
|
|
| ASSAULTRIFLE
|
|
| BANGROD
|
|
| ELEPHANTGUN
|
|
| AMR
|
|
| SNIPERRIFLE
|
|
| MACHINEGUN
|
|
| FLAMESTICK
|
|
| BLOWTORCH
|
|
| FLAMETHROWER
|
|
| AUTOGUN
|
|
| SPREADGUN
|
|
| MULTGUN
|
|
| LONGGUN
|
|
| TESLAGUN
|
|
| LASGUN
|
|
| TRACTORGUN
|
|
| LAUNCHER
|
|
| SPRAYER
|
|
| SQUIRTER
|
|
| DRONELAUNCHER
|
|
| GRENADE
|
|
| REMOTEBOMB
|
|
-- Utility items
|
|
| BOOSTER
|
|
| REWINDER
|
|
| BLINKER
|
|
| FORCEFIELD
|
|
| SHRINKER
|
|
-- Equipment
|
|
| RADAR
|
|
| MAGSHIELD
|
|
| FLAMESHIELD
|
|
| FRONTARMOUR
|
|
| FLATSHIELD
|
|
| JETPACK
|
|
-- Crafting
|
|
| PIPE
|
|
| TUBE
|
|
| HARDWARE
|
|
| SPRING
|
|
| CAN
|
|
| TIN
|
|
| DRUM
|
|
| PLANK
|
|
| SHARDGLASS
|
|
| PUMP
|
|
| MOTOR
|
|
| PRISM
|
|
| LIGHTER
|
|
| MAGNET
|
|
| PLATE
|
|
| MCHIP
|
|
| LED
|
|
| NAILBOX
|
|
| IRONBAR
|
|
| LIGHTSENSOR
|
|
| SOUNDSENSOR
|
|
| COPPERWIRE
|
|
| BATTERY
|
|
| FUELCELL
|
|
| PORTABLEFUSION
|
|
| NoCombineType
|
|
deriving (Eq,Ord,Show)
|