get $text;
if $text ne "" then whistleit else showloc;

##showloc:
var $loc to $init_obj's loc;
msg 0,$actor,0,0,'shout',"You can hear [$actor] whistling from [$loc]!";

##whistleit:
msg 0,$actor,0,0,'shout',"You hear [$actor] whistling '$text!' from [$loc]!";