Add clicker items that use other items with a one frame delay

src/Dodge/WorldEffect.hs

@@ -5,6 +5,7 @@ module Dodge.WorldEffect (
     lineOutputTerminal,
 ) where
 
+import Dodge.Creature.Impulse.UseItem
 import Dodge.BlBl
 import Dodge.Data.Input
 import Dodge.HeldUse
@@ -42,6 +43,7 @@ doWdWd we = case we of
     MakeTempLight _ 0 -> id
     MakeTempLight x t -> (cWorld . lWorld . lights .:~ x)
         . (cWorld . lWorld . worldEvents .:~ MakeTempLight x (t-1))
+    UseInvItem invid pt -> \w -> fromMaybe w (useItem invid pt w)
 
 doItCrWdWd :: ItCrWdWd -> LabelDoubleTree ComposeLinkType Item -> Creature -> World -> World
 doItCrWdWd icww = case icww of