ROOM	
	ID 149
	NOPAINTING
	NAME "FuNkY SpEaKer"
	PICT "lsascriptt.gif"
	ARTIST "Jester-   mojo1@airmail.net"
	PICTURE ID 1 NAME "arrowl.gif" TRANSCOLOR 56 ENDPICTURE
	PICTURE ID 2 NAME "arrowr.gif" TRANSCOLOR 56 ENDPICTURE
	DOOR
		ID 1
		OUTLINE 75,107  267,107  267,131  75,131
		LOC 203,203
		SCRIPT
ON OUTCHAT {
"x" CHATSTR LOWERCASE & source =
"" CHATSTR =
"" target =
{ target "$1" GREPSUB &
"$2" GREPSUB UPPERCASE & target =
"$3" GREPSUB source =
} { source "^([^a-z]*[a-z][^a-z]*)([a-z])(.*)$" GREPSTR } WHILE
{ "$1" GREPSUB
}{ ""
} target "^x(.*)$" GREPSTR IFELSE source & SAY
}
;ABOVE
ON SELECT { "palace://apartments.toto.net:9998" NETGOTO } }
		ENDSCRIPT
		ENDDOOR
	DOOR
		ID 2
		DONTMOVEHERE
		OUTLINE 199,327  256,327  256,350  199,350
		LOC 327,254
		SCRIPT
ON SELECT { "~Look in your log~" STATUSMSG
"===Script By Jester/ICQ-15143049===
Whenever you talk in any way It CoMeS oUt LiKe ThIs, freakish huh? Pretty neat just for something fun though!" LOGMSG
" " LOGMSG }
		ENDSCRIPT
		ENDDOOR
	DOOR
		ID 3
		DONTMOVEHERE
		OUTLINE 190,353  236,353  236,375  190,375
		LOC 318,279
		SCRIPT
ON SELECT { "~Look in your log~" STATUSMSG
"===Script By Jester/ICQ-15143049===
Nothing special, you just type in what you want to say and it comes out in caps and lowercase switching off everyother letter." LOGMSG
" " LOGMSG }
ON LEAVE {
{ CLEARLOOSEPROPS PAINTCLEAR } NBRROOMUSERS 2 < IF
}
		ENDSCRIPT
		ENDDOOR
	DOOR
		ID 4
		DEST 144
		OUTLINE 5,4  58,4  58,33  5,33
		LOC 31,18
		PICTS 1,0,0 ENDPICTS
		ENDDOOR
	DOOR
		ID 5
		DEST 146
		OUTLINE 455,4  508,4  508,28  455,28
		LOC 481,16
		PICTS 2,0,0 ENDPICTS
		ENDDOOR
	ENDROOM