##use:runsub whattodo;
##whattodo:if $actor eq $target then blah else end;
##blah:
say 'msg',"[$actor] starts playing some corny music and an unclear picture shows up on the screen";
say 'msg',"[$init_obj] takes a controller and begins to have ecstatic fun playing Super Mario Bros. 3";