##tickloc:runsub do;
##thinks:runsub do;
##do: runsub whattodo/4;

##whattodo:
var $how to (says,shouts,says to the microphone);
var $what to ('Hello everyone!','YO!','Let the party begin!','Put your hands in the air!','Everybody come on!','Lets dance!');
say 'msg',"[$actor] $how $what";