Add bee random movement

src/Dodge/Data/ActionPlan.hs

@@ -49,6 +49,7 @@ data Impulse
     | ImpulseUseTarget { _impulseUseTarget :: CrImp }
     | ImpulseNothing
     | UpdateRandGen
+    | SetBeeRandomMovement
     deriving (Eq, Ord, Show) --Generic, Flat)
 
 data RandImpulse
@@ -121,8 +122,8 @@ data Action
     | LeadTarget { _leadTargetBy :: Point2 }
     | NoAction
     | StartSentinelPost
-    | UseSelf { _useSelf :: CrAc }
-    | ArbitraryAction {_arbitraryAction :: CrWdAc}
+--    | UseSelf { _useSelf :: CrAc }
+--    | ArbitraryAction {_arbitraryAction :: CrWdAc}
 -- | Repeatedly perform impulses alongside a main action until the main action terminates
     | DoImpulsesAlongside
         { _sideImpulses :: [Impulse]