@prog dirdesc.muf
1 9999 d
1 i
(
  In an area using this program, there are four types of objects of interest:

	1> Rooms with changing descs.
	2> Exits that enter the area.
	3> Fixed-name exits between such rooms.
	4> Exits that leave the area.
  This code also supports
	5> Exits whose meaning varies depending on direction,
		such as "left" or "ahead"
  though you will probably have to do [Obvious exits: ] lists by hand in
  varying descs if you want both direction-dependent exits and
  obvious-exits lists.

  When setting up, you will need to do the following:

  Every room of type 1 must use this program as its desc.  Every such room
    must also have, either on itself or on one of its ancestor rooms,
    properties describing what desc program and argument string to use for
    each possible direction property.

  You will also need some auxiliary exits.  It doesn't matter what they're
    attached to; they must be linked to this program, and must have properties
    as described below.

  Every exit of type 2 must be linked to two things, in this order:
	- The destination room
	- An auxiliary exit, with a property
		_action:enter <dir>
	  where <dir> is the direction the player arrives facing [eg,
	  "enter n" if the exit enters the south side of a room and the setup
	  chooses to use n to indicate the player is facing north].

  Every exit of type 3 must be linked to three things, in this order:
	- An auxiliary exit, with a property
		_action:xleave
	  Note, "xleave", not "leave".
	- The destination room
	- An auxiliary exit, with a property
		_action:enter <dir>
	  where <dir> is the direction the player arrives facing, as for the
	  auxiliary exit used by an exit of type 2.

  Every exit of type 4 must be linked to two things, in this order:
	- An auxiliary exit, with a property
		_action:leave
	  Note, "leave", not "xleave".
	- The destination room

  Every exit of type 5
)
: main
;
.
c
q