297
@verb #4457:"@roomstuff" any any any rxdo #4457
@program #4457:"@roomstuff" any any any
caller != this && raise(E_PERM)
if (!valid(room = toobj(argstr)))
  return player:tell("You smell.")
endif
if (!(room in this.knocked))
  this.knocked = {@this.knocked, room}
  force_input(this, tostr("@knock ", argstr))
  fork (600)
    if (room in this.knocked)
      this.knocked = setremove(this.knocked, room)
      player:tell("Your knocking on ", room:title(), " has expired.")
    endif
  endfork
else
  this.knocked = setremove(this.knocked, room)
  player:moveto(room)
endif
"Last modified by Rubbie (#4457) on Tue Aug 15 02:03:35 2000 MDT."
.

0