Refactor world events

2022-07-22 14:30:53 +01:00
parent 7fdb70dd1c
commit 43e7d20b21
14 changed files with 95 additions and 40 deletions
@@ -1,8 +1,16 @@
 module Dodge.Data.WorldEffect where
+import Sound.Data
 import Geometry.Data
+import Dodge.Data.SoundOrigin

 data WorldEffect = NoWorldEffect
    | SetTrigger Bool Int 
    | WorldEffects [WorldEffect]
    | SetLSCol Point3 Int
    | AccessTerminal (Maybe Int)
+    | UnlockInv Int
+    | SoundStart SoundOrigin Point2 SoundID (Maybe Int)
+    | MakeStartCloudAt Point3
+    | TorqueCr Float Int
+data WdP2 = WdP2Const Point2
+    | WdYouPos