##sings:runsub saytime;

##saytime:
var $tim to today -10 hour format %H:%i on %a;
say 'say',"[$actor] checks his watch and notices that it's $tim";