##use:runsub isitme;

##isitme:
if $actor eq $target then tshootit;

##shootit:
var $abc to (click BANG!!!,click WHOOSH!!,click click BANG BANG BANG BANG!!!,The gun does nothing);
say 'sound',"$abc";

say 'sound',"[$init_obj] drops [$actor] quickly out of fright";