ROOM
	ID 317
	NAME "   The Dungeon"
	PICT "dungeon.gif"
	ARTIST "Pepe"
	SPOT
		ID 1
		DONTMOVEHERE
		OUTLINE 212,52  228,63  226,91  247,125  240,177  189,181  183,123  198,91  198,63
		LOC 213,107
		SCRIPT
;~MediaList~;thund1,thund2,thund3,thund4,cry4help,chopchop,drama	
ON SELECT { "cry4help"SOUND }
		ENDSCRIPT
		ENDSPOT
	SPOT
		ID 2
		DONTMOVEHERE
		OUTLINE 352,178  427,198  422,214  393,217  379,210  382,193  350,184
		LOC 386,199
		SCRIPT
ON SELECT("chopchop"SOUND)
		ENDSCRIPT
		ENDSPOT
	SPOT
		ID 3
		DONTMOVEHERE
		OUTLINE 43,93  56,104  58,120  74,120  68,207  46,232  19,206  15,116  30,104
		LOC 45,144
		SCRIPT
ON SELECT { "drama"SOUND }
		ENDSCRIPT
		ENDSPOT
	DOOR
		ID 4
		DONTMOVEHERE
		OUTLINE 470,4  507,4  507,30  470,30
		LOC 488,17
		SCRIPT
ON SELECT { { talk GLOBAL "off" talk = "talk is off" STATUSMSG }
{ talk GLOBAL "on" talk = "talk is on" STATUSMSG 50 ME SETALARM } talk GLOBAL "on" talk == IFELSE
}
ON ALARM {
[ "@473 224 " "@213 92 " "@42 133 " ] 3 RANDOM GET where =
[ "Lemme out of here !" "Help meeeee " "Geeez this hurts !" ] 3 RANDOM GET what =
where what & LOCALMSG
{ 4500 RANDOM ME SETALARM } talk GLOBAL talk "on" == IF }}
OM LEAVE { talk GLOBAL "off" talk = }
		ENDSCRIPT
		ENDDOOR
	DOOR
		ID 5
		DONTMOVEHERE
		OUTLINE 470,36  508,36  508,60  470,60
		LOC 489,48
		SCRIPT
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
}
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 2500 RANDOM ME SETALARM 100 DIMROOM } light GLOBAL "on" light == IF
}
ON LEAVE { light GLOBAL "off" light = }
		ENDSCRIPT
		ENDDOOR
	SPOT
		ID 6
		OUTLINE 452,4  465,4  465,18  452,18
		LOC 458,11
		SCRIPT
ON ENTER {
talk GLOBAL "on" talk = 50 4 SETALARM
light GLOBAL "on" light = 200 RANDOM 5 SETALARM }
		ENDSCRIPT
		ENDSPOT
	DOOR
		ID 7
		DEST 315
		OUTLINE 356,4  374,22  362,22  376,55  338,55  351,21  339,21
		LOC 356,28
		ENDDOOR
	DOOR
		ID 8
		DEST 318
		OUTLINE 488,341  488,330  503,345  489,360  489,349  456,359  456,332
		LOC 481,345
		ENDDOOR
	ENDROOM