ROOM
	ID 320
	NAME "   Grave Yard"
	PICT "hwgrave.gif"
	ARTIST "Alissa"
	PICTURE ID 1 NAME "lghtngl1.gif" TRANSCOLOR 56 ENDPICTURE
	PICTURE ID 2 NAME "lghtngl2.gif" TRANSCOLOR 56 ENDPICTURE
	PICTURE ID 3 NAME "lghtngr1.gif" TRANSCOLOR 56 ENDPICTURE
	PICTURE ID 4 NAME "lghtngr2.gif" TRANSCOLOR 56 ENDPICTURE
	PICTURE ID 5 NAME "hwitch1.gif" TRANSCOLOR 56 ENDPICTURE
	PICTURE ID 6 NAME "hwitch2.gif" TRANSCOLOR 56 ENDPICTURE
	PICTURE ID 7 NAME "hwitch3.gif" TRANSCOLOR 56 ENDPICTURE
	PICTURE ID 8 NAME "hwitch4.gif" TRANSCOLOR 56 ENDPICTURE
	PICTURE ID 9 NAME "hwitch5.gif" TRANSCOLOR 56 ENDPICTURE
	PICTURE ID 10 NAME "hwitch6.gif" TRANSCOLOR 56 ENDPICTURE
	PICTURE ID 11 NAME "hwitch7.gif" TRANSCOLOR 56 ENDPICTURE
	PICTURE ID 12 NAME "hwitch8.gif" TRANSCOLOR 56 ENDPICTURE
	DOOR
		ID 1
		DONTMOVEHERE
		OUTLINE 323,9  463,9  463,82  323,58
		LOC 393,39
		PICTS 0,0,0 1,0,0 2,0,0 ENDPICTS
		SCRIPT
ON SELECT { light GLOBAL
{ light GLOBAL "off" light = "lightning is off" STATUSMSG }
{ light GLOBAL "on" light = 15 ME SETALARM 16 2 SETALARM "lightning is on" STATUSMSG } light "on" == IFELSE
}
;ON ENTER { light GLOBAL "on" light = 30 RANDOM ME SETALARM }
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
0 i =
10 RANDOM nfr =
nfr ++
{
{ 2 ME SETSPOTSTATELOCAL }
{ 1 ME SETSPOTSTATELOCAL } ME GETSPOTSTATE 1 == IFELSE
i ++
} { i nfr < } WHILE
0 ME SETSPOTSTATELOCAL 2400 RANDOM ME SETALARM } light GLOBAL "on" light == IF
}
		ENDSCRIPT
		ENDDOOR
	SPOT
		ID 2
		OUTLINE 98,96  126,96  126,117  98,117
		LOC 112,106
		PICTS 0,0,0 3,0,0 4,0,0 ENDPICTS
		SCRIPT
;ON ENTER { light GLOBAL "on" light = 30 RANDOM ME SETALARM }
ON OUTCHAT { { 0 ME SETSPOTSTATELOCAL light GLOBAL "off" light = } CHATSTR "lightningoff" == IF
{ 0 ME SETSPOTSTATELOCAL light GLOBAL "on" light = 100 ME SETALARM } CHATSTR "lightningon" == IF
}
ON ALARM { { [ "thund1" "thund2" "thund3" "thund4" ] 4 RANDOM GET SOUND
0 i =
10 RANDOM nfr =
nfr ++
{
{ 2 ME SETSPOTSTATELOCAL }
{ 1 ME SETSPOTSTATELOCAL } ME GETSPOTSTATE 1 == IFELSE
i ++
} { i nfr < } WHILE
0 ME SETSPOTSTATELOCAL 2400 RANDOM ME SETALARM } light GLOBAL "on" light == IF
}
		ENDSCRIPT
		ENDSPOT
	DOOR
		ID 3
		DONTMOVEHERE
		OUTLINE 438,186  505,186  505,257  438,257
		LOC 471,221
		PICTS 5,0,0 6,0,0 7,0,0 8,0,0 9,0,0 10,0,0 11,0,0 12,0,0 ENDPICTS
		SCRIPT
ON SELECT { witch GLOBAL
{ witch GLOBAL "off" witch = "witch is off" STATUSMSG }
{ witch GLOBAL "on" witch = 15 ME SETALARM "witch is on" STATUSMSG } witch "on" == IFELSE
}
;ON ENTER { witch GLOBAL "on" witch = 15 ME SETALARM }
ON OUTCHAT { { witch GLOBAL "off" witch = } CHATSTR "witchoff" == IF
{ witch GLOBAL "on" witch = 50 ME SETALARM } CHATSTR "witchon" == IF }
ON ALARM
{ { { 0 ME SETSPOTSTATELOCAL }
{ ME GETSPOTSTATE 1 + ME SETSPOTSTATELOCAL }
ME GETSPOTSTATE 6 > IFELSE
15 ME SETALARM
} witch GLOBAL witch "on" == IF }
		ENDSCRIPT
		ENDDOOR
	SPOT
		ID 4
		NAME "Global Controls"
		OUTLINE 489,8  502,8  502,18  489,18
		LOC 495,13
		SCRIPT
ON ENTER { light GLOBAL "on" light = 30 1 SETALARM 100 2 SETALARM }
ON LEAVE { witch GLOBAL "off" witch = light GLOBAL "off" light = }
		ENDSCRIPT
		ENDSPOT
	DOOR
		ID 5
		DEST 316
		OUTLINE 327,112  343,112  343,143  327,143
		LOC 335,127
		SCRIPT
ON INCHAT { nDoIt GLOBAL nDoIt EXEC }
ON ENTER { { CLEARLOOSEPROPS PAINTCLEAR } NBRROOMUSERS 2 < IF }
		ENDSCRIPT
		ENDDOOR
	DOOR
		ID 6
		DEST 315
		OUTLINE 386,180  388,190  388,211  356,211  356,188  360,178  369,173  378,173
		LOC 371,186
		ENDDOOR
	DOOR
		ID 7
		DEST 319
		OUTLINE 219,177  243,177  243,207  219,207
		LOC 231,192
		ENDDOOR
	ENDROOM