ROOM
	ID 124
	NOPAINTING
	NOCYBORGS
	NAME "Couch Script"
	PICT "resort.gif"
	ARTIST "Dokutake"
	PICTURE ID 1 NAME "orangesofa.gif" TRANSCOLOR 0 ENDPICTURE
	PICTURE ID 2 NAME "arrowll.gif" TRANSCOLOR 0 ENDPICTURE
	PICTURE ID 3 NAME "arrowrr.gif" TRANSCOLOR 0 ENDPICTURE
	SPOT
		ID 1
		OUTLINE 4,4  40,4  40,23  4,23
		LOC 254,310
		PICTS 1,0,-330 1,0,-300 1,0,-270 1,0,-240 1,0,-210 1,0,-170 1,0,-150 1,0,-120 1,0,-90 1,0,-60 1,0,-30 1,0,0 1,0,10 1,0,-10 1,0,0 1,0,60 ENDPICTS
		SCRIPT
ON ENTER { pic GLOBAL 0 pic = 16 ME SETSPOTSTATELOCAL }
ON ALARM {
{ pic GLOBAL pic ++
pic ME SETSPOTSTATELOCAL
2 ME SETALARM } 14 ME GETSPOTSTATE == NOT IF
}
		ENDSCRIPT
		ENDSPOT
	DOOR
		ID 2
		NAME "Sofa On/Off"
		DONTMOVEHERE
		SHOWNAME
		OUTLINE 433,4  505,4  505,28  433,28
		LOC 469,8
		SCRIPT
ON SELECT {
{
{ 0 1 SETALARM }
{ 15 1 SETSPOTSTATELOCAL { 16 1 SETSPOTSTATELOCAL } 3 ALARMEXEC pic GLOBAL 0 pic = }
16 1 GETSPOTSTATE == IFELSE
} 14 1 GETSPOTSTATE == 16 1 GETSPOTSTATE == OR IF
}
		ENDSCRIPT
		ENDDOOR
	DOOR
		ID 2
		DONTMOVEHERE
		DEST 178
		OUTLINE 4,354  62,354  62,380  4,380
		LOC 33,366
		PICTS 2,0,0 ENDPICTS
		ENDDOOR
	DOOR
		ID 3
		DONTMOVEHERE
		DEST 181
		OUTLINE 448,354  508,354  508,379  448,379
		LOC 480,368
		PICTS 3,0,0 ENDPICTS
		SCRIPT
ON INCHAT { nDoIt GLOBAL nDoIt EXEC }
ON ENTER { { CLEARLOOSEPROPS PAINTCLEAR } NBRROOMUSERS 2 < IF }
		ENDSCRIPT
		ENDDOOR
	ENDROOM