Allow a spring and hardware to make weapons automatic

src/Dodge/HeldUse.hs

@@ -49,10 +49,13 @@ type ChainEffect =
 
 hammerCheck :: ChainEffect
 hammerCheck f it cr w = case it ^? ldtValue . itUse . heldTriggerType of
-    Just HammerTrigger -> case w ^? input . mouseButtons . ix SDL.ButtonLeft of
+    Just HammerTrigger | nomakeauto 
+      -> case w ^? input . mouseButtons . ix SDL.ButtonLeft of
         Just 0 -> f it cr w
         _ -> w
     _ -> f it cr w
+  where
+    nomakeauto = not . isJust $ lookup MakeAutoLink (it ^. ldtRight)
 
 -- | Applies a world effect after an item use cooldown check.
 useTimeCheck :: ChainEffect