get $target,$rel,$second in $loc;
if $target > 0 then checkit else fail;
##checkit:
if $second > 0 then doit else doit2;
##doit:
say 'swing',"[$init_obj] swings [$target] $rel [$second].";
##doit2:
print "[$init_obj] swings [$target] around wildly.";
##fail:
print "[$init_obj] swings at nothing.";