##tickloc:runsub whattodo;
##whattodo:runsub actit/5;
##actit:
var $actn to (in urnest,noisly,like soup,for your pleasure,slowly);
say 'acts',"[$actor] bubbles $actn";