ROOM
	ID 315
	NAME "   The Haunted Foyer"
	PICT "hwfoyer.gif"
	ARTIST "lisa"
	PICTURE ID 1 NAME "hwgho1.gif" TRANSCOLOR 56 ENDPICTURE
	PICTURE ID 3 NAME "hwgho3.gif" TRANSCOLOR 56 ENDPICTURE
	PICTURE ID 5 NAME "hwgho5.gif" TRANSCOLOR 56 ENDPICTURE
	PICTURE ID 7 NAME "hwgho7.gif" TRANSCOLOR 56 ENDPICTURE
	PICTURE ID 9 NAME "hwgho9.gif" TRANSCOLOR 56 ENDPICTURE
	PICTURE ID 11 NAME "hwgho11.gif" TRANSCOLOR 56 ENDPICTURE
	DOOR
		ID 1
		DEST 316
		OUTLINE 0,4  41,4  41,118  0,118
		LOC 20,61
		ENDDOOR
	DOOR
		ID 2
		DEST 317
		OUTLINE 1,342  18,367  46,381  1,381
		LOC 26,349
		SCRIPT
ON INCHAT { nDoIt GLOBAL nDoIt EXEC }
ON ENTER { { CLEARLOOSEPROPS PAINTCLEAR } NBRROOMUSERS 2 < IF }
		ENDSCRIPT
		ENDDOOR
	DOOR
		ID 3
		DONTMOVEHERE
		OUTLINE 469,8  504,8  504,28  469,28
		LOC 486,18
		SCRIPT
;ON ENTER { light GLOBAL "on" light = 500 ME SETALARM }
ON SELECT { light GLOBAL
{ light GLOBAL "off" light = "lightning is off" STATUSMSG }
{ light GLOBAL "on" light = 15 ME SETALARM "lightning is on" STATUSMSG } light "on" == IFELSE
}
ON OUTCHAT { { 0 ME SETSPOTSTATELOCAL light GLOBAL "off" light = } CHATSTR "lightningoff" == IF
{ 0 ME SETSPOTSTATELOCAL light GLOBAL "on" light = 15 ME SETALARM } CHATSTR "lightningon" == IF
}
;~MediaList~;thund1,thund2,thund3,thund4
ON ALARM { { [ "thund1" "thund2" "thund3" "thund4" ] 4 RANDOM GET SOUND 50 DIMROOM
        0 i =
        0 RANDOM nfr =
        nfr ++
         {
                        { 2 ME SETSPOTSTATELOCAL }
    { 1 ME SETSPOTSTATELOCAL } ME GETSPOTSTATE 1 == IFELSE
            i ++
        } { i nfr < } WHILE
    0 ME SETSPOTSTATELOCAL 3500 RANDOM ME SETALARM 100 DIMROOM } light GLOBAL "on" light == IF
}
ON LEAVE { light GLOBAL "off" light = }
		ENDSCRIPT
		ENDDOOR
	DOOR
		ID 4
		DEST 320
		OUTLINE 237,67  237,92  237,216  179,216  179,69  191,50  208,46  226,50
		LOC 210,102
		ENDDOOR
	SPOT
		ID 5
		OUTLINE 243,183  270,183  270,203  243,203
		LOC 256,193
		PICTS 0,0,0 1,0,0 3,0,0 5,0,0 7,0,0 9,0,0 11,0,0 ENDPICTS
		SCRIPT
ON ENTER { run GLOBAL "stop" run = }
ON OUTCHAT { run GLOBAL
{ { "start" run = 10 5 SETALARM "" CHATSTR = "welcome" SOUND }
"stop" run == IF } CHATSTR "ghost" == IF }
ON ALARM { run GLOBAL
{ 0 5 SETSPOTSTATELOCAL run GLOBAL "stop" run =  }
{ 5 GETSPOTSTATE 1 + 5 SETSPOTSTATELOCAL }
5 GETSPOTSTATE 6 > IFELSE
{ 15 5 SETALARM } "start" run == IF
{ 0 5 SETSPOTSTATELOCAL } "stop" run == IF }
		ENDSCRIPT
		ENDSPOT
	SPOT
		ID 6
		OUTLINE 431,12  445,12  445,23  431,23
		LOC 438,17
		SCRIPT
ON ENTER { light GLOBAL "on" light = 500 3 SETALARM  }
		ENDSCRIPT
		ENDSPOT
	DOOR
		ID 7
		DONTMOVEHERE
		OUTLINE 83,47  130,47  130,120  83,120
		LOC 106,83
		SCRIPT
ON SELECT { "Say Ghost for a surprise !" STATUSMSG }
		ENDSCRIPT
		ENDDOOR
	ENDROOM