Partial fix to jetPack

This commit is contained in:
2021-04-24 19:35:49 +02:00
parent 9af7dbda56
commit e23e076184
6 changed files with 18 additions and 262 deletions
+4 -4
View File
@@ -3,10 +3,8 @@ module Dodge.Creature
, module Dodge.Creature.Inanimate
)
where
-- imports {{{
import Dodge.Data
import Dodge.AIs
import Dodge.CreatureState
import Dodge.Default
import Dodge.Base
import Dodge.Item.Weapon
@@ -14,6 +12,7 @@ import Dodge.Item.Consumable
import Dodge.WorldEvent.Cloud
import Dodge.Creature.YourControl
import Dodge.Creature.Inanimate
import Dodge.Creature.State
import Dodge.Item
import Picture
@@ -257,6 +256,7 @@ startCr = defaultCreature
startInventory = IM.fromList (zip [0..20]
(
[ --jetPack
--[pistol
--,blinkGun
--,spawnGun lamp
@@ -273,8 +273,8 @@ startInventory = IM.fromList (zip [0..20]
--,miniGun
--,medkit 50
--,bezierGun
--]
-- ++
]
++
repeat NoItem))
smokeGenGun = effectGun "smoke" $ \_ -> spawnSmokeAtCursor