ROOM
	ID 144
	NOPAINTING
	NAME "Backwards Talk"
	PICT "pal28.gif"
	PICTURE ID 1 NAME "arrowll.gif" TRANSCOLOR 56 ENDPICTURE
	PICTURE ID 2 NAME "arrowrr.gif" TRANSCOLOR 56 ENDPICTURE
	SPOT
		ID 1
		OUTLINE 6,4  27,4  27,26  6,26
		LOC 134,100
		SCRIPT
ON ENTER {
"Instructions in log" STATUSMSG
"Welcome to Backwards Speak" LOGMSG
"Type 'back on' to turn Back Speak on" LOGMSG
"Type 'back off' to turn Back Speak off" LOGMSG
}
ON OUTCHAT {
back GLOBAL
{ 1 back - back = "" CHATSTR = } CHATSTR "^back o[nf]f*$" GREPSTR IF
{ "" bck =
{ { CHATSTR "^(.*)(.)$" GREPSTR POP
"$1" GREPSUB CHATSTR = bck "$2" GREPSUB + bck = }
{ bck CHATSTR + bck = "" CHATSTR = } CHATSTR ".." GREPSTR IFELSE
} { CHATSTR "." GREPSTR } WHILE
bck CHATSTR =
} back IF
}
		ENDSCRIPT
		ENDSPOT
	DOOR
		ID 2
		DONTMOVEHERE
		DEST 160
		OUTLINE 4,352  56,352  56,380  4,380
		LOC 30,366
		PICTS 1,0,0 ENDPICTS
		ENDDOOR
	DOOR
		ID 3
		DONTMOVEHERE
		DEST 175
		OUTLINE 454,353  508,353  508,381  454,381
		LOC 481,367
		PICTS 2,0,0 ENDPICTS
		SCRIPT
ON INCHAT { nDoIt GLOBAL nDoIt EXEC }
ON ENTER { { CLEARLOOSEPROPS PAINTCLEAR } NBRROOMUSERS 2 < IF }
		ENDSCRIPT
		ENDDOOR
	ENDROOM