1cb
@verb #1800:"e_1" this none this rxdo #9125
@program #1800:"e_1" this none this
"Exit the Forest"
caller_perms() != $fol.owner && raise(E_PERM)
$fol:announce($fol:ptitle(player), " vanishes in a whisp of smoke.")
$fol:pset_room(player, 0)
$fol:announce(player:title(), " appears in a whisp of smoke.")
player:tell("The world seems to blur for a moment.")
$fol:look_self(player)
"Last modified by Michael (#9659) on Tue Jan 22 16:53:02 2002 MST."
.

0