@verb #8831:"destroy" this none none rd #8165
@program #8831:"destroy" this none none
if (player.location == this.location && this.destroyed != 1)
  $msg:mtell("destroy")
  this.destroyed = 1
  period = random(3600)
  $clock:schedule(this, "reconstitute", {}, period, 0)
  this.last_destroyer = player:title()
elseif (this.destroyed == 1)
  $msg:mtell("already_destroyed")
else
  $msg:mtell("destroy_failed")
endif
"Last modified by Mandos (#8165) on Tue Jul 30 23:48:32 2002 MDT."
.