##tickloc:runsub whattodo;
##whattodo:runsub actit/6;
##actit:
var $actn to (bounce around,hop near your feet,bounce up the walls,ribbit,blink in unison);
say 'acts',"[$actor] $actn";