;Alan't room list script.
;Place this entire script in your gate.
;In addition, place the last section, only, in rooms where you want this function.
ON SIGNON
{
;Roomlist - say a room name and be taken to the room
;Say "roomlist" to get a list of the rooms you can go to
;This is an OUTCHAT script.
	roomlist GLOBAL
	{ [
;**********room definitions**********
;place room names and numbers here in form: [ roomname roomnumber ] [ roomname roomnumber ]
	[ "gate" 86 ]
;**********end of room definitions**********
	] roomarray =
		{ temparray =
			{ "" CHATSTR =
			temparray 1 GET GOTOROOM
			} CHATSTR temparray 0 GET == IF
		} roomarray FOREACH

		{ "\x0dType the name of the room you want to go to:\x0d"
			{ temparray =
			temparray 0 GET & "\x0d" & 
			} roomarray FOREACH LOGMSG
		"" CHATSTR =
		} CHATSTR "roomlist" == IF
	 } roomlist DEF
}



;The following is part of the this gate script.
;In addition, place the following section, only, in rooms where you want this function.
;Enable gate functions.
ON OUTCHAT { roomlist GLOBAL roomlist EXEC }