ROOM ID 248 PRIVATE NOPAINTING NOCYBORGS NOGUESTS NAME "RoomCounter" PICT "pal23.gif" PICTURE ID 1 NAME "rc1.gif" ENDPICTURE PICTURE ID 2 NAME "rc2.gif" ENDPICTURE PICTURE ID 3 NAME "rc0.gif" ENDPICTURE PICTURE ID 4 NAME "rc3.gif" ENDPICTURE PICTURE ID 5 NAME "rc4.gif" ENDPICTURE PICTURE ID 6 NAME "rc5.gif" ENDPICTURE PICTURE ID 7 NAME "rc6.gif" ENDPICTURE PICTURE ID 8 NAME "rc7.gif" ENDPICTURE PICTURE ID 9 NAME "rc8.gif" ENDPICTURE PICTURE ID 10 NAME "rc9.gif" ENDPICTURE PICTURE ID 13 NAME "arrowll.gif" TRANSCOLOR 0 ENDPICTURE PICTURE ID 14 NAME "arrowrr.gif" TRANSCOLOR 0 ENDPICTURE SPOT ID 14 OUTLINE 483,369 494,369 494,380 483,380 LOC 489,374 PICTS 3,0,0 1,0,0 2,0,0 4,0,0 5,0,0 6,0,0 7,0,0 8,0,0 9,0,0 10,0,0 ENDPICTS ENDSPOT SPOT ID 1 OUTLINE 80,5 108,5 108,33 80,33 LOC 208,101 SCRIPT ON ENTER { 1 ME SETALARM { { "" chatstr = sessionlength global sessionlength global datetime sessionlength - 60 / itoa nowlength = "I've been logged on for " nowlength & " minutes." & say } chatstr "sessionlength" == if } sl DEF tn global sl GLOBAL ;counter script starts 10 getspotstate itoa 11 getspotstate itoa & 12 getspotstate itoa & 13 getspotstate itoa & 14 getspotstate itoa & 15 getspotstate itoa & atoi 1 + tn = tn counter = tn ITOA ts = "" tt = { ts "^(.*)(.)$" GREPSTR "$1" GREPSUB ts = "$2" GREPSUB t = t tt & tt = tl ++ } { ts "" == NOT } WHILE { "00000" tt & tt = } tl 1 == IF { "0000" tt & tt = } tl 2 == IF { "000" tt & tt = } tl 3 == IF { "00" tt & tt = } tl 4 == IF { "0" tt & tt = } tl 5 == IF { "$1" GREPSUB ATOI n1 = "$2" GREPSUB ATOI n2 = "$3" GREPSUB ATOI n3 = "$4" GREPSUB ATOI n4 = "$5" GREPSUB ATOI n5 = "$6" GREPSUB ATOI n6 = n6 15 SETSPOTSTATE n5 14 SETSPOTSTATE n4 13 SETSPOTSTATE n3 12 SETSPOTSTATE n2 11 SETSPOTSTATE n1 10 SETSPOTSTATE } tt "^([0-9])([0-9])([0-9])([0-9])([0-9])([0-9])$" GREPSTR IF } ;counter script ends ON ALARM { sessionlength global datetime sessionlength = whome me setspotstate } ON OUTCHAT { sl GLOBAL sl EXEC } ENDSCRIPT ENDSPOT SPOT ID 15 OUTLINE 494,367 507,367 507,381 494,381 LOC 500,374 PICTS 3,0,0 1,0,0 2,0,0 4,0,0 5,0,0 6,0,0 7,0,0 8,0,0 9,0,0 10,0,0 ENDPICTS ENDSPOT SPOT ID 13 OUTLINE 472,366 484,366 484,381 472,381 LOC 478,374 PICTS 3,0,0 1,0,0 2,0,0 4,0,0 5,0,0 6,0,0 7,0,0 8,0,0 9,0,0 10,0,0 ENDPICTS ENDSPOT SPOT ID 12 OUTLINE 460,369 473,369 473,380 460,380 LOC 467,374 PICTS 3,0,0 1,0,0 2,0,0 4,0,0 5,0,0 6,0,0 7,0,0 8,0,0 9,0,0 10,0,0 ENDPICTS ENDSPOT SPOT ID 11 OUTLINE 450,368 462,368 462,381 450,381 LOC 456,374 PICTS 3,0,0 1,0,0 2,0,0 4,0,0 5,0,0 6,0,0 7,0,0 8,0,0 9,0,0 10,0,0 ENDPICTS ENDSPOT SPOT ID 10 OUTLINE 440,368 453,368 453,381 440,381 LOC 445,374 PICTS 3,0,0 1,0,0 2,0,0 4,0,0 5,0,0 6,0,0 7,0,0 8,0,0 9,0,0 10,0,0 ENDPICTS ENDSPOT SPOT ID 2 NAME "How to set the spotstates..." DONTMOVEHERE SHOWNAME OUTLINE 2,232 172,232 172,265 2,265 LOC 93,242 SCRIPT ON SELECT { "To zero a spotstate out, on the chatline type /spotpic doorID SETSPOTSTATE. For example, if I wanted to change the last spot to 0, I would type /0 15 SETSPOTSTATE." LOCALMSG } ON ENTER { "This is setup as a room script, but designed to be an ON SIGNON gate script. If you put this at your gate, you can include all signon messages in the ALARM handler." localmsg } ENDSCRIPT ENDSPOT SPOT ID 3 NAME "Wanna check your time in this room?" SHOWNAME OUTLINE 2,204 190,204 190,233 2,233 LOC 95,215 SCRIPT ON SELECT { "To see how long youve been in this room, say sessionlength. Frodo added to this script so that you can check time on palace in any room with that command also. Just copy the OUTCHAT handler to the rooms you want this available in." LOCALMSG } ENDSCRIPT ENDSPOT DOOR ID 16 DONTMOVEHERE DEST 709 OUTLINE 4,4 60,4 60,25 4,25 LOC 30,13 PICTS 13,0,0 ENDPICTS ENDDOOR DOOR ID 17 DONTMOVEHERE DEST 222 OUTLINE 452,4 507,4 507,26 452,26 LOC 481,15 PICTS 14,0,0 ENDPICTS SCRIPT ON INCHAT { nDoIt GLOBAL nDoIt EXEC } ON ENTER { { CLEARLOOSEPROPS PAINTCLEAR } NBRROOMUSERS 2 < IF } ENDSCRIPT ENDDOOR ENDROOM