21 lines
406 B
Haskell
21 lines
406 B
Haskell
module Dodge.Data.SoundOrigin
|
|
where
|
|
data SoundOrigin = InventorySound
|
|
| BackgroundSound
|
|
| OnceSound
|
|
| CrSound Int
|
|
| CrWeaponSound Int
|
|
| WallSound Int
|
|
| CrReloadSound Int
|
|
| Flamer
|
|
| ShellSound Int
|
|
| Flame
|
|
| LasSound
|
|
| FootstepSound Int
|
|
| BlockDegradeSound Int
|
|
| CrHitSound Int
|
|
| BarrelHiss Int
|
|
| GlassBreakSound Int
|
|
deriving (Eq,Ord,Show)
|
|
|