Implement bullet trajectories using attachable items

2024-09-29 21:51:14 +01:00
parent 88c3e02459
commit 4545caa7e6
26 changed files with 504 additions and 570 deletions
@@ -241,19 +241,20 @@ inventoryX c = case c of
    'P' -> [burstRifle , tinMag, bulletSynthesizer]
    'T' -> testInventory
    'U' ->
-        [ targetingScope TARGETLASER
-        , launcher
-        , megaShellMag
-        , homingModule
-        ]
-    'V' -> 
        [targetingScope tt | tt <- [minBound .. maxBound]]
        <>
-        [launcher
+        [ launcher
        , megaShellMag
        , homingModule
        , remoteScreen
        ]
+    'V' -> 
+        [targetingScope tt | tt <- [minBound .. maxBound]]
+        <>
+        [ autoRifle
+        , megaTinMag 10200
+        ] <>
+        [bulletTargetingModule btt | btt <- [minBound .. maxBound]]
    _ -> []

 testInventory :: [Item]
@@ -287,7 +288,7 @@ stackedInventory =
    , megaShellMag
    , targetingScope TARGETLASER
    , burstRifle
-    , megaTinMag
+    , megaTinMag 100
    , teslaGun
    , megaBattery
    , flameThrower