ROOM ID 107 PRIVATE NOCYBORGS NAME "Backgammon Table" PICT "bgmn.gif" ARTIST "Damon Williams" PICTURE ID 101 NAME "dice1.gif" TRANSCOLOR 53 ENDPICTURE PICTURE ID 102 NAME "dice2.gif" TRANSCOLOR 53 ENDPICTURE PICTURE ID 103 NAME "dice3.gif" TRANSCOLOR 53 ENDPICTURE PICTURE ID 104 NAME "dice4.gif" TRANSCOLOR 53 ENDPICTURE PICTURE ID 105 NAME "dice5.gif" TRANSCOLOR 53 ENDPICTURE PICTURE ID 106 NAME "dice6.gif" TRANSCOLOR 53 ENDPICTURE PICTURE ID 107 NAME "chessunl.gif" ENDPICTURE PICTURE ID 108 NAME "chesslck.gif" ENDPICTURE PICTURE ID 109 NAME "chesshlp.gif" ENDPICTURE PICTURE ID 110 NAME "arrowll.gif" TRANSCOLOR 56 ENDPICTURE PICTURE ID 111 NAME "arrowrr.gif" TRANSCOLOR 56 ENDPICTURE SPOT ID 100 OUTLINE 80,170 80,210 120,210 120,170 LOC 100,190 PICTS 101,0,0 102,0,0 103,0,0 104,0,0 105,0,0 106,0,0 ENDPICTS ENDSPOT SPOT ID 101 OUTLINE 130,170 130,210 170,210 170,170 LOC 150,190 PICTS 101,0,0 102,0,0 103,0,0 104,0,0 105,0,0 106,0,0 ENDPICTS ENDSPOT SPOT ID 6 DONTMOVEHERE OUTLINE 78,175 176,175 176,215 78,215 LOC 127,195 SCRIPT ON SELECT { 6 RANDOM X = 6 RANDOM Y = X 100 SETSPOTSTATE Y 101 SETSPOTSTATE X 1 + X = Y 1 + Y = "@0,10 Dice Roll: " X ITOA + " + " + Y ITOA + ROOMMSG } ENDSCRIPT ENDSPOT SPOT ID 7 DONTMOVEHERE DEST 2 OUTLINE 14,173 48,173 48,208 14,208 LOC 31,190 PICTS 107,0,0 108,0,0 ENDPICTS SCRIPT ON SELECT { { 0 ME SETSPOTSTATE DEST UNLOCK } { 1 ME SETSPOTSTATE DEST LOCK } DEST ISLOCKED IFELSE } ON ENTER { DEST ISLOCKED ME SETSPOTSTATE } ENDSCRIPT ENDSPOT SPOT ID 3 DONTMOVEHERE OUTLINE 12,297 45,297 45,331 12,331 LOC 28,314 SCRIPT ON OUTCHAT { { CLEARLOOSEPROPS 60049 295 89 ADDLOOSEPROP 60049 294 64 ADDLOOSEPROP 60049 294 39 ADDLOOSEPROP 60049 415 195 ADDLOOSEPROP 60049 415 222 ADDLOOSEPROP 60049 415 247 ADDLOOSEPROP 60049 416 272 ADDLOOSEPROP 60049 415 299 ADDLOOSEPROP 60049 206 141 ADDLOOSEPROP 60049 206 115 ADDLOOSEPROP 60049 206 90 ADDLOOSEPROP 60049 206 64 ADDLOOSEPROP 60049 207 38 ADDLOOSEPROP 60049 56 272 ADDLOOSEPROP 60049 55 299 ADDLOOSEPROP 60048 207 198 ADDLOOSEPROP 60048 207 223 ADDLOOSEPROP 60048 207 249 ADDLOOSEPROP 60048 207 275 ADDLOOSEPROP 60048 414 65 ADDLOOSEPROP 60048 414 39 ADDLOOSEPROP 60048 56 67 ADDLOOSEPROP 60048 56 41 ADDLOOSEPROP 60048 415 91 ADDLOOSEPROP 60048 415 116 ADDLOOSEPROP 60048 415 141 ADDLOOSEPROP 60048 293 301 ADDLOOSEPROP 60048 293 275 ADDLOOSEPROP 60048 293 247 ADDLOOSEPROP 60048 207 300 ADDLOOSEPROP } CHATSTR "start backgammon" == IF { CLEARLOOSEPROPS } CHATSTR "clear" == IF { 6 RANDOM X = 6 RANDOM Y = X 100 SETSPOTSTATE Y 101 SETSPOTSTATE X 1 + X = Y 1 + Y = "@0,10 Dice Roll: " X ITOA + " + " + Y ITOA + ROOMMSG } CHATSTR "dice" == IF } ENDSCRIPT ENDSPOT SPOT ID 8 DONTMOVEHERE OUTLINE 11,296 50,296 50,336 11,336 LOC 30,316 PICTS 109,0,0 ENDPICTS SCRIPT ON SELECT { "@14,306 Say \"start backgammon\" to play backgammon, " "\"clear\" to clear the board, " + "\"dice\" to roll the dice" + ROOMMSG } ENDSCRIPT ENDSPOT SPOT ID 10 OUTLINE 104,48 118,48 118,65 104,65 LOC 111,56 ENDSPOT DOOR ID 11 DONTMOVEHERE DEST 221 OUTLINE 2,3 60,3 60,34 2,34 LOC 31,18 PICTS 110,0,0 ENDPICTS ENDDOOR DOOR ID 12 DONTMOVEHERE DEST 250 OUTLINE 450,3 510,3 510,32 450,32 LOC 480,17 PICTS 111,0,0 ENDPICTS SCRIPT ON INCHAT { nDoIt GLOBAL nDoIt EXEC } ON ENTER { { CLEARLOOSEPROPS PAINTCLEAR } NBRROOMUSERS 2 < IF } ENDSCRIPT ENDDOOR ENDROOM