2a5
@verb #3100:"kick" this none none rd #987
@program #3100:"kick" this none none
"Harasses the owner and ejects the bug, if the bug is caught trespassing."
if (player.location != this.location || this.location == #2463)
  $msg:mtell("not_here", this)
elseif (this.location.owner == this.owner || this in this.location.residents || this.owner in this.location.residents)
  $msg:mtell("nokick")
else
  $msg:mtell("kick", this.owner)
  this.owner:tell(player:title(), " found your bug in ", this.location:title(), ".")
  fork (0)
    this:moveto(#2463)
  endfork
  this:spiced_ham_productify()
endif
"Last modified by Dax (#789) on Mon May 10 08:45:45 1999 MDT."
.

0