From 5537efe584627a3b5609f3100bc9c348b16fe07c Mon Sep 17 00:00:00 2001 From: justin Date: Tue, 24 Jun 2025 08:28:22 +0100 Subject: [PATCH] Increase explosive damage to walls (still problems with hitboxes) --- src/Dodge/Update.hs | 5 +- src/Dodge/Update/WallDamage.hs | 2 +- src/Dodge/Wall/Damage.hs | 4 +- tags | 116 ++++++++++++++++----------------- 4 files changed, 66 insertions(+), 61 deletions(-) diff --git a/src/Dodge/Update.hs b/src/Dodge/Update.hs index 3aab2e5eb..bccac89d9 100644 --- a/src/Dodge/Update.hs +++ b/src/Dodge/Update.hs @@ -258,7 +258,7 @@ functionalUpdate u = . over uvWorld ppEvents . colCrsWalls . over uvWorld simpleCrSprings - . over uvWorld (updateIMl (_doors . _lWorld . _cWorld) (doDrWdWd . _drMech)) + . over uvWorld (updateIMl' (_doors . _lWorld . _cWorld) updateDoor) . over uvWorld doWorldEvents . over uvWorld updateDelayedEvents . over uvWorld (updateIMl (_modifications . _lWorld . _cWorld) @@ -306,6 +306,9 @@ updateAimPos :: Universe -> Universe updateAimPos u = u & uvWorld . cWorld . lWorld . lAimPos .~ mouseWorldPos' (u ^. uvWorld . input) (u ^. uvWorld . wCam) +updateDoor :: Door -> World -> World +updateDoor dr = doDrWdWd (_drMech dr) dr + updateMagnets :: LWorld -> LWorld updateMagnets lw = lw & oldMagnets .~ (lw ^. magnets) diff --git a/src/Dodge/Update/WallDamage.hs b/src/Dodge/Update/WallDamage.hs index 6e8e7a317..a94b8dbc2 100644 --- a/src/Dodge/Update/WallDamage.hs +++ b/src/Dodge/Update/WallDamage.hs @@ -1,4 +1,4 @@ -module Dodge.Update.WallDamage where +module Dodge.Update.WallDamage (updateWallDamages) where import Control.Lens import Data.Maybe diff --git a/src/Dodge/Wall/Damage.hs b/src/Dodge/Wall/Damage.hs index 37061460f..86c8a3e7a 100644 --- a/src/Dodge/Wall/Damage.hs +++ b/src/Dodge/Wall/Damage.hs @@ -23,7 +23,9 @@ damageWall dt wl w = case _wlStructure wl of & maybeDestroyDoor drid _ -> w' where - x = dt ^. dmAmount + x = case dt of + Explosive y _ -> y * 100 + _ -> dt ^. dmAmount w' = damMatSideEffect dt (_wlMaterial wl) (Right wl) w -- block destruction is convoluted... diff --git a/tags b/tags index 68b28df26..32de43609 100644 --- a/tags +++ b/tags @@ -3350,7 +3350,7 @@ addToTrunk src/TreeHelp.hs 156;" f addWarningTerminal src/Dodge/Room/Warning.hs 36;" f addZ src/Geometry/Vector3D.hs 89;" f adjustIMZone src/Dodge/Base.hs 81;" f -advanceScrollAmount src/Dodge/Update.hs 416;" f +advanceScrollAmount src/Dodge/Update.hs 419;" f advanceSmoothScroll src/Dodge/SmoothScroll.hs 33;" f advanceStepCounter src/Dodge/Creature/Impulse/Movement.hs 44;" f aimDelaySweep src/Dodge/Render/Picture.hs 264;" f @@ -3601,13 +3601,13 @@ chaseCritVocalization src/Dodge/Creature/ChaseCrit.hs 37;" f checkCombineSelectionExists src/Dodge/DisplayInventory.hs 100;" f checkConnection src/Dodge/Inventory/Swap.hs 64;" f checkDeath src/Dodge/Creature/State.hs 76;" f -checkEndGame src/Dodge/Update.hs 705;" f +checkEndGame src/Dodge/Update.hs 708;" f checkErrorGL src/Shader/Compile.hs 255;" f checkFBO src/Framebuffer/Check.hs 6;" f checkGLError src/GLHelp.hs 17;" f checkInvSlotsYou src/Dodge/Inventory/CheckSlots.hs 17;" f checkInventorySelectionExists src/Dodge/DisplayInventory.hs 93;" f -checkTermDist src/Dodge/Update.hs 314;" f +checkTermDist src/Dodge/Update.hs 317;" f checkWallLeft src/Dodge/LevelGen/StaticWalls/Deprecated.hs 29;" f checkWallRight src/Dodge/LevelGen/StaticWalls.hs 54;" f checkWallRight src/Dodge/LevelGen/StaticWalls/Deprecated.hs 59;" f @@ -3630,7 +3630,7 @@ circle src/Picture/Base.hs 180;" f circleDecoration src/Dodge/Placement/TopDecoration.hs 56;" f circleSolid src/Picture/Base.hs 164;" f circleSolidCol src/Picture/Base.hs 168;" f -clClSpringVel src/Dodge/Update.hs 759;" f +clClSpringVel src/Dodge/Update.hs 762;" f clZoneSize src/Dodge/Zone/Size.hs 3;" f clZoneSize src/Dodge/Zoning/Cloud.hs 21;" f clampPath src/Dodge/Room/Procedural.hs 166;" f @@ -3659,7 +3659,7 @@ closestCreatureID src/Dodge/Debug.hs 116;" f closestPointOnLine src/Geometry/Intersect.hs 251;" f closestPointOnLineParam src/Geometry/Intersect.hs 267;" f closestPointOnSeg src/Geometry/Intersect.hs 282;" f -cloudEffect src/Dodge/Update.hs 726;" f +cloudEffect src/Dodge/Update.hs 729;" f cloudPoisonDamage src/Dodge/Update/Cloud.hs 10;" f clsNearCirc src/Dodge/Zoning/Cloud.hs 18;" f clsNearPoint src/Dodge/Zoning/Cloud.hs 9;" f @@ -3731,7 +3731,7 @@ crAwayFromPost src/Dodge/Creature/Test.hs 81;" f crBlips src/Dodge/RadarSweep.hs 87;" f crCamouflage src/Dodge/Creature/Picture.hs 31;" f crCanSeeCr src/Dodge/Creature/Test.hs 50;" f -crCrSpring src/Dodge/Update.hs 777;" f +crCrSpring src/Dodge/Update.hs 780;" f crCurrentEquipment src/Dodge/Creature/Statistics.hs 57;" f crDexterity src/Dodge/Creature/Statistics.hs 14;" f crDisplayAwareness src/Dodge/Creature/Picture/Awareness.hs 38;" f @@ -3759,7 +3759,7 @@ crRad src/Dodge/Creature/Radius.hs 7;" f crSafeDistFromTarg src/Dodge/Creature/Test.hs 71;" f crSetRoots src/Dodge/Inventory/Location.hs 48;" f crShape src/Dodge/Creature/Shape.hs 8;" f -crSpring src/Dodge/Update.hs 772;" f +crSpring src/Dodge/Update.hs 775;" f crStratConMatches src/Dodge/Creature/Test.hs 76;" f crStrength src/Dodge/Creature/Statistics.hs 24;" f crUpdate src/Dodge/Creature/State.hs 62;" f @@ -3834,7 +3834,6 @@ dShadCol src/Dodge/Render/List.hs 215;" f damMatSideEffect src/Dodge/Material/Damage.hs 14;" f damThingHitWith src/Dodge/Damage.hs 72;" f damToExpBarrel src/Dodge/Barreloid.hs 49;" f -damageBlocksBy src/Dodge/Wall/Damage.hs 40;" f damageCircle src/Dodge/DamageCircle.hs 12;" f damageCodeCommand src/Dodge/Terminal.hs 232;" f damageCrCircle src/Dodge/DamageCircle.hs 33;" f @@ -3997,7 +3996,7 @@ displayFrameTicks src/Dodge/Render/Picture.hs 45;" f displayFreeSlots src/Dodge/DisplayInventory.hs 198;" f displayIndents src/Dodge/DisplayInventory.hs 110;" f displayPulse src/Dodge/Inventory/SelectionList.hs 175;" f -displayTerminalLineString src/Dodge/Update.hs 443;" f +displayTerminalLineString src/Dodge/Update.hs 446;" f dist src/Geometry/Vector.hs 190;" f dist3 src/Geometry/Vector3D.hs 101;" f divTo src/Geometry/Zone.hs 6;" f @@ -4093,7 +4092,7 @@ doWdCrBl src/Dodge/CreatureEffect.hs 37;" f doWdCrCr src/Dodge/CreatureEffect.hs 12;" f doWdP2f src/Dodge/WdP2f.hs 12;" f doWdWd src/Dodge/WorldEffect.hs 29;" f -doWorldEvents src/Dodge/Update.hs 426;" f +doWorldEvents src/Dodge/Update.hs 429;" f doWorldPos src/Dodge/WorldPos.hs 7;" f door src/Dodge/Room/Door.hs 13;" f doorBetween src/Dodge/Placement/Instance/Door.hs 39;" f @@ -4163,7 +4162,7 @@ drawJumpDown src/Dodge/Render/Picture.hs 175;" f drawLabCrossCol src/Dodge/Render/Label.hs 8;" f drawLampCover src/Dodge/Prop/Draw.hs 47;" f drawLaser src/Dodge/Laser/Draw.hs 6;" f -drawLaser src/Dodge/Laser/Update.hs 31;" f +drawLaser src/Dodge/Laser/Update.hs 29;" f drawLightSource src/Dodge/LightSource/Draw.hs 7;" f drawLinearShockwave src/Dodge/LinearShockwave/Draw.hs 10;" f drawList src/Dodge/Render/List.hs 209;" f @@ -4454,7 +4453,7 @@ getLaserDamage src/Dodge/HeldUse.hs 702;" f getLaserPhaseV src/Dodge/HeldUse.hs 699;" f getLinksOfType src/Dodge/RoomLink.hs 39;" f getMaxLinesTM src/Dodge/Terminal/Type.hs 11;" f -getMenuMouseContext src/Dodge/Update.hs 386;" f +getMenuMouseContext src/Dodge/Update.hs 389;" f getNodePos src/Dodge/Path.hs 31;" f getPJStabiliser src/Dodge/HeldUse.hs 1260;" f getPretty src/AesonHelp.hs 8;" f @@ -4691,7 +4690,7 @@ isLeftOfA src/Geometry.hs 192;" f isNothing' src/MaybeHelp.hs 33;" f isOnSeg src/Geometry.hs 236;" f isOutLnk src/Dodge/PlacementSpot.hs 164;" f -isOverTerminalScreen src/Dodge/Update.hs 397;" f +isOverTerminalScreen src/Dodge/Update.hs 400;" f isPutID src/Dodge/Placement/Instance/Wall.hs 129;" f isRHS src/Geometry/LHS.hs 24;" f isUnusedLnk src/Dodge/PlacementSpot.hs 61;" f @@ -4836,12 +4835,12 @@ lnkBothAnd src/Dodge/Room/Procedural.hs 121;" f lnkMidPosInvSelsCol src/Dodge/Render/HUD.hs 394;" f lnkPosDir src/Dodge/RoomLink.hs 97;" f loadDodgeConfig src/Dodge/Config/Load.hs 9;" f -loadMusic src/Dodge/SoundLogic/LoadSound.hs 27;" f +loadMusic src/Dodge/SoundLogic/LoadSound.hs 30;" f loadMuzzle src/Dodge/HeldUse.hs 626;" f loadSaveSlot src/Dodge/Save.hs 74;" f loadSeed src/Dodge/LoadSeed.hs 7;" f loadSound src/Dodge/SoundLogic/LoadSound.hs 11;" f -loadSounds src/Dodge/SoundLogic/LoadSound.hs 17;" f +loadSounds src/Dodge/SoundLogic/LoadSound.hs 18;" f loadingScreen src/Dodge/Concurrent.hs 56;" f loadingScreen src/Dodge/Menu/Loading.hs 8;" f loadme src/Dodge/Debug/Terminal.hs 139;" f @@ -4964,8 +4963,8 @@ maybeClearDoorPath src/Dodge/Placement/PlaceSpot/TriggerDoor.hs 71;" f maybeClearDoorPaths src/Dodge/Placement/PlaceSpot/TriggerDoor.hs 68;" f maybeClearPath src/Dodge/Block.hs 75;" f maybeClearPaths src/Dodge/Block.hs 72;" f -maybeDestroyBlock src/Dodge/Wall/Damage.hs 30;" f -maybeDestroyDoor src/Dodge/Wall/Damage.hs 35;" f +maybeDestroyBlock src/Dodge/Wall/Damage.hs 32;" f +maybeDestroyDoor src/Dodge/Wall/Damage.hs 37;" f maybeExitCombine src/Dodge/Update/Input/InGame.hs 536;" f maybeOpenConsole src/Dodge/Update.hs 125;" f maybeReadFile src/Dodge/LoadSeed.hs 10;" f @@ -5056,12 +5055,12 @@ mouseWorldPos' src/Dodge/Base/Coordinate.hs 48;" f moveBullet src/Dodge/Bullet.hs 195;" f moveCombineSel src/Dodge/Update/Scroll.hs 115;" f moveHammerUp src/Dodge/Hammer.hs 5;" f -moveInverseShockwave src/Dodge/Shockwave/Update.hs 46;" f +moveInverseShockwave src/Dodge/Shockwave/Update.hs 44;" f moveLSThen src/Dodge/Placement/Instance/LightSource.hs 30;" f -movePenBullet src/Dodge/Bullet.hs 205;" f +movePenBullet src/Dodge/Bullet.hs 201;" f moveProjectile src/Dodge/Projectile/Update.hs 221;" f moveRoomBy src/Dodge/Room/Link.hs 53;" f -moveShockwave src/Dodge/Shockwave/Update.hs 18;" f +moveShockwave src/Dodge/Shockwave/Update.hs 15;" f moveToSideFirstOutLink src/Dodge/Room/Warning.hs 55;" f moveWall src/Dodge/Wall/Move.hs 29;" f moveWallID src/Dodge/Wall/Move.hs 24;" f @@ -5081,7 +5080,7 @@ muzFlareAt src/Dodge/HeldUse.hs 675;" f mvButton src/Dodge/Placement/PlaceSpot.hs 176;" f mvCr src/Dodge/Placement/PlaceSpot.hs 186;" f mvFS src/Dodge/Placement/PlaceSpot.hs 189;" f -mvGust src/Dodge/Update.hs 717;" f +mvGust src/Dodge/Update.hs 720;" f mvLS src/Dodge/Placement/PlaceSpot.hs 217;" f mvP src/Dodge/Wall/Move.hs 54;" f mvPP src/Dodge/Placement/PlaceSpot.hs 183;" f @@ -5196,7 +5195,7 @@ pauseSound src/Dodge/SoundLogic.hs 42;" f pauseTime src/Dodge/Update.hs 184;" f peZoneSize src/Dodge/Zoning/Pathing.hs 46;" f pedestalRoom src/Dodge/Room/Containing.hs 50;" f -penThing src/Dodge/Bullet.hs 213;" f +penThing src/Dodge/Bullet.hs 209;" f perMat src/MatrixHelper.hs 49;" f perceptionUpdate src/Dodge/Creature/Perception.hs 23;" f performAction src/Dodge/Creature/Action.hs 91;" f @@ -5344,7 +5343,7 @@ powlistUpToN src/Multiset.hs 23;" f powlistUpToN' src/Multiset.hs 12;" f powlistUpToN'' src/Multiset.hs 31;" f ppDraw src/Dodge/Render/ShapePicture.hs 96;" f -ppEvents src/Dodge/Update.hs 684;" f +ppEvents src/Dodge/Update.hs 687;" f ppLevelReset src/Dodge/PressPlate.hs 13;" f preCritStart src/Dodge/Room/Start.hs 82;" f preloadRender src/Preload/Render.hs 30;" f @@ -5448,7 +5447,7 @@ randProb src/RandomHelp.hs 68;" f randSpark src/Dodge/Spark.hs 69;" f randSparkExtraVel src/Dodge/Spark.hs 92;" f randWallReflect src/Dodge/Tesla/Arc.hs 57;" f -randWallReflect src/Dodge/Update.hs 579;" f +randWallReflect src/Dodge/Update.hs 582;" f randomChallenges src/Dodge/Room/Start.hs 62;" f randomCompass src/Dodge/Layout.hs 59;" f randomFourCornerRoom src/Dodge/Room/Procedural.hs 266;" f @@ -5700,7 +5699,7 @@ setLinkType src/Dodge/RoomLink.hs 60;" f setLinkTypePD src/Dodge/RoomLink.hs 67;" f setMusicVolume src/Sound.hs 162;" f setMvPos src/Dodge/Creature/ReaderUpdate.hs 53;" f -setOldPos src/Dodge/Update.hs 466;" f +setOldPos src/Dodge/Update.hs 469;" f setOutLinks src/Dodge/RoomLink.hs 48;" f setOutLinksByType src/Dodge/RoomLink.hs 57;" f setOutLinksPD src/Dodge/RoomLink.hs 77;" f @@ -5807,7 +5806,7 @@ shuffleLinks src/Dodge/Room/Link.hs 30;" f shuffleRoomPos src/Dodge/Layout.hs 78;" f shuffleTail src/RandomHelp.hs 59;" f sigmoid src/Dodge/Base.hs 151;" f -simpleCrSprings src/Dodge/Update.hs 768;" f +simpleCrSprings src/Dodge/Update.hs 771;" f simpleTermMessage src/Dodge/Terminal.hs 253;" f sineRaisePitchOneSecS src/Dodge/SoundLogic/ExternallyGeneratedSounds.hs 610;" f sineRaisePitchTwoSecS src/Dodge/SoundLogic/ExternallyGeneratedSounds.hs 420;" f @@ -6052,7 +6051,7 @@ tingS src/Dodge/SoundLogic/ExternallyGeneratedSounds.hs 506;" f tinitusS src/Dodge/SoundLogic/ExternallyGeneratedSounds.hs 498;" f titleOptionsMenu src/Dodge/Menu.hs 102;" f titleOptionsNoWrite src/Dodge/Menu.hs 105;" f -tmUpdate src/Dodge/Update.hs 446;" f +tmUpdate src/Dodge/Update.hs 449;" f toBinary src/Dodge/Inventory/SelectionList.hs 137;" f toBothLnk src/Dodge/RoomLink.hs 121;" f toClosestMultiple src/HelpNum.hs 3;" f @@ -6207,37 +6206,38 @@ updateBaseWheelEvent src/Dodge/Update/Scroll.hs 29;" f updateBounds src/Dodge/Update/Camera.hs 250;" f updateBulVel src/Dodge/Bullet.hs 54;" f updateBullet src/Dodge/Bullet.hs 19;" f -updateBullets src/Dodge/Update.hs 539;" f +updateBullets src/Dodge/Update.hs 542;" f updateCamera src/Dodge/Update/Camera.hs 29;" f updateCloseObjects src/Dodge/Inventory.hs 116;" f -updateCloud src/Dodge/Update.hs 734;" f -updateClouds src/Dodge/Update.hs 606;" f +updateCloud src/Dodge/Update.hs 737;" f +updateClouds src/Dodge/Update.hs 609;" f updateCombinePositioning src/Dodge/DisplayInventory.hs 37;" f updateCombineSections src/Dodge/DisplayInventory.hs 44;" f updateCreature src/Dodge/Creature/Update.hs 13;" f -updateCreatureGroups src/Dodge/Update.hs 511;" f -updateCreatureSoundPositions src/Dodge/Update.hs 487;" f +updateCreatureGroups src/Dodge/Update.hs 514;" f +updateCreatureSoundPositions src/Dodge/Update.hs 490;" f updateDebugMessageOffset src/Dodge/Update.hs 94;" f -updateDelayedEvents src/Dodge/Update.hs 797;" f +updateDelayedEvents src/Dodge/Update.hs 800;" f updateDisplaySections src/Dodge/DisplayInventory.hs 116;" f updateDistortion src/Dodge/Distortion.hs 5;" f -updateDistortions src/Dodge/Update.hs 532;" f +updateDistortions src/Dodge/Update.hs 535;" f +updateDoor src/Dodge/Update.hs 309;" f updateEnergyBall src/Dodge/EnergyBall.hs 35;" f -updateEnergyBalls src/Dodge/Update.hs 597;" f +updateEnergyBalls src/Dodge/Update.hs 600;" f updateEnterRegex src/Dodge/Update/Input/InGame.hs 480;" f updateExpBarrel src/Dodge/Barreloid.hs 20;" f updateFBOTO src/Framebuffer/Update.hs 97;" f updateFBOTO3 src/Framebuffer/Update.hs 131;" f updateFlame src/Dodge/Flame.hs 19;" f -updateFlames src/Dodge/Update.hs 594;" f +updateFlames src/Dodge/Update.hs 597;" f updateFloatingCamera src/Dodge/Update/Camera.hs 34;" f updateFunctionKey src/Dodge/Update/Input/InGame.hs 364;" f updateFunctionKeys src/Dodge/Update/Input/InGame.hs 357;" f -updateGusts src/Dodge/Update.hs 714;" f +updateGusts src/Dodge/Update.hs 717;" f updateHeldRootItem src/Dodge/Creature/State.hs 245;" f updateHumanoid src/Dodge/Humanoid.hs 13;" f -updateIMl src/Dodge/Update.hs 501;" f -updateIMl' src/Dodge/Update.hs 506;" f +updateIMl src/Dodge/Update.hs 504;" f +updateIMl' src/Dodge/Update.hs 509;" f updateInGameCamera src/Dodge/Update/Camera.hs 78;" f updateInitialPressInGame src/Dodge/Update/Input/InGame.hs 400;" f updateInt2Map src/Dodge/Zoning/Base.hs 92;" f @@ -6247,21 +6247,21 @@ updateItemWithOrientation src/Dodge/Creature/State.hs 271;" f updateKeyInGame src/Dodge/Update/Input/InGame.hs 394;" f updateKeysInTerminal src/Dodge/Update/Input/InGame.hs 382;" f updateLampoid src/Dodge/Lampoid.hs 12;" f -updateLaser src/Dodge/Laser/Update.hs 13;" f -updateLasers src/Dodge/Update.hs 433;" f +updateLaser src/Dodge/Laser/Update.hs 11;" f +updateLasers src/Dodge/Update.hs 436;" f updateLinearShockwave src/Dodge/LinearShockwave/Update.hs 8;" f updateLongPressInGame src/Dodge/Update/Input/InGame.hs 413;" f updateMachine src/Dodge/Machine/Update.hs 20;" f -updateMagnets src/Dodge/Update.hs 309;" f +updateMagnets src/Dodge/Update.hs 312;" f updateMouseClickInGame src/Dodge/Update/Input/InGame.hs 197;" f -updateMouseContext src/Dodge/Update.hs 322;" f -updateMouseContextGame src/Dodge/Update.hs 327;" f +updateMouseContext src/Dodge/Update.hs 325;" f +updateMouseContextGame src/Dodge/Update.hs 330;" f updateMouseHeldInGame src/Dodge/Update/Input/InGame.hs 95;" f updateMouseInGame src/Dodge/Update/Input/InGame.hs 85;" f updateMouseReleaseInGame src/Dodge/Update/Input/InGame.hs 158;" f -updateObjCatMaybes src/Dodge/Update.hs 523;" f -updateObjMapMaybe src/Dodge/Update.hs 516;" f -updatePastWorlds src/Dodge/Update.hs 421;" f +updateObjCatMaybes src/Dodge/Update.hs 526;" f +updateObjMapMaybe src/Dodge/Update.hs 519;" f +updatePastWorlds src/Dodge/Update.hs 424;" f updatePosEvent src/Dodge/PosEvent.hs 10;" f updatePreload src/Preload/Update.hs 20;" f updateProjectile src/Dodge/Projectile/Update.hs 27;" f @@ -6269,9 +6269,9 @@ updateProp src/Dodge/Prop/Update.hs 11;" f updatePulse src/Dodge/Creature/Update.hs 22;" f updateRBList src/Dodge/Inventory/RBList.hs 18;" f updateRadarBlip src/Dodge/RadarBlip.hs 11;" f -updateRadarBlips src/Dodge/Update.hs 535;" f +updateRadarBlips src/Dodge/Update.hs 538;" f updateRadarSweep src/Dodge/RadarSweep.hs 39;" f -updateRadarSweeps src/Dodge/Update.hs 600;" f +updateRadarSweeps src/Dodge/Update.hs 603;" f updateRandNode src/TreeHelp.hs 108;" f updateRenderSplit appDodge/Main.hs 108;" f updateRootItemID src/Dodge/Inventory/Location.hs 35;" f @@ -6279,19 +6279,19 @@ updateScopeZoom src/Dodge/Update/Scroll.hs 73;" f updateScrollTestValue src/Dodge/ScrollValue.hs 6;" f updateSection src/Dodge/DisplayInventory.hs 264;" f updateSectionsPositioning src/Dodge/DisplayInventory.hs 243;" f -updateShockwave src/Dodge/Shockwave/Update.hs 13;" f -updateShockwaves src/Dodge/Update.hs 591;" f +updateShockwave src/Dodge/Shockwave/Update.hs 10;" f +updateShockwaves src/Dodge/Update.hs 594;" f updateSingleNodes src/TreeHelp.hs 97;" f updateSound src/Sound.hs 72;" f updateSounds src/Sound.hs 67;" f updateSpark src/Dodge/Spark.hs 19;" f -updateSparks src/Dodge/Update.hs 603;" f +updateSparks src/Dodge/Update.hs 606;" f updateTempLightSource src/Dodge/LightSource/Update.hs 7;" f updateTeslaArc src/Dodge/Tesla/Arc.hs 23;" f -updateTeslaArc src/Dodge/Update.hs 549;" f -updateTeslaArcs src/Dodge/Update.hs 546;" f +updateTeslaArc src/Dodge/Update.hs 552;" f +updateTeslaArcs src/Dodge/Update.hs 549;" f updateTractorBeam src/Dodge/TractorBeam/Update.hs 9;" f -updateTractorBeams src/Dodge/Update.hs 588;" f +updateTractorBeams src/Dodge/Update.hs 591;" f updateTurret src/Dodge/Machine/Update.hs 50;" f updateUniverse src/Dodge/Update.hs 73;" f updateUniverseFirst src/Dodge/Update.hs 84;" f @@ -6302,7 +6302,7 @@ updateUseInputOnScreen src/Dodge/Update/Input/ScreenLayer.hs 23;" f updateWalkCycle src/Dodge/Creature/State/WalkCycle.hs 12;" f updateWallDamages src/Dodge/Update/WallDamage.hs 10;" f updateWheelEvent src/Dodge/Update/Scroll.hs 20;" f -updateWheelEvents src/Dodge/Update.hs 411;" f +updateWheelEvents src/Dodge/Update.hs 414;" f updateWorldEventFlag src/Dodge/Update.hs 119;" f updateWorldEventFlags src/Dodge/Update.hs 107;" f upperBody src/Dodge/Creature/Picture.hs 129;" f @@ -6475,9 +6475,9 @@ zipArcs src/Dodge/Tesla/Arc.hs 110;" f zipCount src/Dodge/Tree/Shift.hs 129;" f zipCountDown src/Dodge/Room/Procedural.hs 118;" f zoneCloud src/Dodge/Zoning/Cloud.hs 27;" f -zoneClouds src/Dodge/Update.hs 440;" f +zoneClouds src/Dodge/Update.hs 443;" f zoneCreature src/Dodge/Zoning/Creature.hs 54;" f -zoneCreatures src/Dodge/Update.hs 482;" f +zoneCreatures src/Dodge/Update.hs 485;" f zoneExtract src/Dodge/Zoning/Base.hs 52;" f zoneMonoid src/Dodge/Zoning/Base.hs 83;" f zoneOfCirc src/Dodge/Zoning/Base.hs 24;" f