ROOM ID 111 NOPAINTING NAME "Prop Repository" PICT "guide.gif" PICTURE ID 1 NAME "copyprp1.gif" TRANSCOLOR 176 ENDPICTURE PICTURE ID 2 NAME "hnext.gif" TRANSCOLOR 57 ENDPICTURE PICTURE ID 3 NAME "hprev.gif" TRANSCOLOR 57 ENDPICTURE PICTURE ID 4 NAME "leavprp1.gif" TRANSCOLOR 181 ENDPICTURE PICTURE ID 5 NAME "arrowl.gif" TRANSCOLOR 56 ENDPICTURE PICTURE ID 6 NAME "arrowr.gif" TRANSCOLOR 56 ENDPICTURE SPOT ID 1 NAME "Reset" DONTMOVEHERE SHOWNAME SHOWFRAME OUTLINE 225,65 280,64 280,94 225,94 LOC 253,74 SCRIPT ON ENTER { CurRec GLOBAL 0 CurRec = bname GLOBAL "Props1" bname = AlarmId GLOBAL 3 AlarmId = } ON SELECT { CurRec GLOBAL 0 CurRec = "Resetting buttons to start" LOGMSG naked } ON OUTCHAT { CurRec GLOBAL AlarmId GLOBAL { "" CHATSTR = CurRec -- 1 AlarmId SETALARM } "-" CHATSTR == IF { "" CHATSTR = CurRec ++ 1 AlarmId SETALARM } "+" CHATSTR == IF { "" CHATSTR = "$1" GREPSUB ATOI CurRec = 1 AlarmId SETALARM } CHATSTR "^=(.*)$" GREPSTR IF } ON LEAVE { { CLEARLOOSEPROPS PAINTCLEAR } NBRROOMUSERS 2 < IF } ENDSCRIPT ENDSPOT SPOT ID 2 NAME "Previous" DONTMOVEHERE SHOWFRAME OUTLINE 152,68 211,68 211,92 152,92 143,80 LOC 173,80 PICTS 3,0,0 ENDPICTS SCRIPT ON SELECT { CurRec GLOBAL CurRec -- AlarmId GLOBAL 1 AlarmId SETALARM } ENDSCRIPT ENDSPOT SPOT ID 3 NAME "Next" DONTMOVEHERE SHOWFRAME OUTLINE 290,66 349,66 359,78 349,90 290,90 LOC 327,78 PICTS 2,0,0 ENDPICTS SCRIPT ON ALARM { [ "958703651 958703668 958703674" "958958815" "958958805" "958958773" "958958837" "957247021" "958703651 958703668 958703674" "958958815" "958958805" "958958773" ] TheArray = TheArray LENGTH NoArray = bname GLOBAL CurRec GLOBAL { 1 CurRec = } CurRec NoArray > IF { NoArray CurRec = } CurRec 1 < IF bname ": row " + CurRec itoa + "/" + NoArray itoa + logmsg "[" TheArray CurRec 1 - get + "] SETPROPS" + STRTOATOM EXEC } ON SELECT { CurRec GLOBAL CurRec ++ AlarmId GLOBAL 1 AlarmId SETALARM } ENDSCRIPT ENDSPOT SPOT ID 4 OUTLINE 91,357 428,358 428,382 91,381 LOC 259,369 PICTS 1,0,0 4,0,0 ENDPICTS SCRIPT ON ENTER { 280 ME SETALARM } ON ALARM { { 0 ME SETSPOTSTATELOCAL } { ME GETSPOTSTATE 1 + ME SETSPOTSTATELOCAL } ME GETSPOTSTATE 1 > IFELSE 280 ME SETALARM } ENDSCRIPT ENDSPOT DOOR ID 7 DONTMOVEHERE DEST 263 OUTLINE 7,5 60,5 60,26 7,26 LOC 32,16 PICTS 5,0,0 ENDPICTS ENDDOOR DOOR ID 8 DONTMOVEHERE DEST 193 OUTLINE 447,6 506,6 506,31 447,31 LOC 476,18 PICTS 6,0,0 ENDPICTS ENDDOOR ENDROOM