Improve item use hammer, improve wide laser

src/Dodge/Item/Weapon/Utility.hs

@@ -117,12 +117,13 @@ autoEffectGun name eff = defaultWeapon
 forceFieldGun :: Item
 forceFieldGun = defaultWeapon 
     { _itConsumption = defaultLoadable & laAmmoType .~ ForceFieldAmmo forceField
-    , _itUse = ruseInstant useForceFieldGun
-        [ hammerCheckI , ammoCheckI , useAmmoAmount 1]
---    , _itFloorPict = \_ -> (,) emptySH $ onLayer FlItLayer $ polygon $ map toV2 [(-4,-4),(-4,4),(4,4),(4,0),(0,0),(0,-4)]
     , _itTargeting = targetRBPress & tgDraw .~ targetDistanceDraw
     , _itParams = ParamMID Nothing
     }
+    & itUse . rUse .~ useForceFieldGun
+    & itUse . useDelay .~ NoDelay
+    & itUse . useMods .~
+        [ hammerCheckI , ammoCheckI , useAmmoAmount 1]
     & itType . iyBase .~ FORCEFIELDGUN
 -- I believe because the targeting returns to nothing straight after you release
 -- the rmb, it is possible for this to do nothing