ROOM ID 136 NOCYBORGS NAME "Hamster Hop" PICT "hhop.gif" ARTIST "Foxy" PICTURE ID 1 NAME "hamster.gif" TRANSCOLOR 0 ENDPICTURE PICTURE ID 2 NAME "arrowll.gif" TRANSCOLOR 56 ENDPICTURE PICTURE ID 3 NAME "arrowrr.gif" TRANSCOLOR 56 ENDPICTURE SPOT ID 1 DONTMOVEHERE OUTLINE 218,56 254,40 293,57 255,71 LOC 260,42 PICTS 1,0,-20 1,0,0 ENDPICTS SCRIPT ON SELECT { game GLOBAL game EXEC } ENDSCRIPT ENDSPOT SPOT ID 2 DONTMOVEHERE OUTLINE 177,122 213,106 254,122 217,137 LOC 219,108 PICTS 1,0,-20 1,0,0 ENDPICTS SCRIPT ON SELECT { game GLOBAL game EXEC } ENDSCRIPT ENDSPOT SPOT ID 3 DONTMOVEHERE OUTLINE 255,121 294,107 332,121 295,135 LOC 299,108 PICTS 1,0,-20 1,0,0 ENDPICTS SCRIPT ON SELECT { game GLOBAL game EXEC } ENDSCRIPT ENDSPOT SPOT ID 4 DONTMOVEHERE OUTLINE 137,186 175,172 212,187 176,201 LOC 180,174 PICTS 1,0,-20 1,0,0 ENDPICTS SCRIPT ON SELECT { game GLOBAL game EXEC } ENDSCRIPT ENDSPOT SPOT ID 5 DONTMOVEHERE OUTLINE 217,186 255,170 295,186 258,202 LOC 258,173 PICTS 1,0,-20 1,0,0 ENDPICTS SCRIPT ON SELECT { game GLOBAL game EXEC } ENDSCRIPT ENDSPOT SPOT ID 6 DONTMOVEHERE OUTLINE 297,186 335,171 374,185 336,201 LOC 337,171 PICTS 1,0,-20 1,0,0 ENDPICTS SCRIPT ON SELECT { game GLOBAL game EXEC } ENDSCRIPT ENDSPOT SPOT ID 7 DONTMOVEHERE OUTLINE 98,251 136,236 173,251 136,266 LOC 138,237 PICTS 1,0,-20 1,0,0 ENDPICTS SCRIPT ON SELECT { game GLOBAL game EXEC } ENDSCRIPT ENDSPOT SPOT ID 8 DONTMOVEHERE OUTLINE 175,252 216,236 253,252 218,266 LOC 218,237 PICTS 1,0,-20 1,0,0 ENDPICTS SCRIPT ON SELECT { game GLOBAL game EXEC } ENDSCRIPT ENDSPOT SPOT ID 9 DONTMOVEHERE OUTLINE 255,252 295,237 333,250 296,265 LOC 295,236 PICTS 1,0,-20 1,0,0 ENDPICTS SCRIPT ON SELECT { game GLOBAL game EXEC } ENDSCRIPT ENDSPOT SPOT ID 10 DONTMOVEHERE OUTLINE 336,251 375,235 412,251 375,266 LOC 375,235 PICTS 1,0,-20 1,0,0 ENDPICTS SCRIPT ON SELECT { game GLOBAL game EXEC } ENDSCRIPT ENDSPOT SPOT ID 11 DONTMOVEHERE OUTLINE 55,316 96,301 133,315 96,331 LOC 96,301 PICTS 1,0,-20 1,0,0 ENDPICTS SCRIPT ON SELECT { game GLOBAL game EXEC } ENDSCRIPT ENDSPOT SPOT ID 12 DONTMOVEHERE OUTLINE 136,315 175,302 213,317 178,331 LOC 176,300 PICTS 1,0,-20 1,0,0 ENDPICTS SCRIPT ON SELECT { game GLOBAL game EXEC } ENDSCRIPT ENDSPOT SPOT ID 13 DONTMOVEHERE OUTLINE 217,316 256,300 294,315 258,332 LOC 256,299 PICTS 1,0,-20 1,0,0 ENDPICTS SCRIPT ON SELECT { game GLOBAL game EXEC } ENDSCRIPT ENDSPOT SPOT ID 14 DONTMOVEHERE OUTLINE 295,315 335,301 376,316 335,330 LOC 335,302 PICTS 1,0,-20 1,0,0 ENDPICTS SCRIPT ON SELECT { game GLOBAL game EXEC } ENDSCRIPT ENDSPOT SPOT ID 15 DONTMOVEHERE OUTLINE 378,316 414,301 453,316 415,331 LOC 415,302 PICTS 1,0,-20 1,0,0 ENDPICTS SCRIPT ON SELECT { game GLOBAL game EXEC } ENDSCRIPT ENDSPOT SPOT ID 16 DONTMOVEHERE OUTLINE 34,73 154,73 154,101 34,101 LOC 162,169 SCRIPT ON SELECT { hamsters GLOBAL 15 hamsters = turnstate GLOBAL 0 turnstate = 1 r = { 1 r SETSPOTSTATELOCAL r ++ } { r 16 < } WHILE } ON ENTER { game GLOBAL hamsters GLOBAL 15 hamsters = turnstate GLOBAL 0 turnstate = 1 r = { 1 r SETSPOTSTATELOCAL r ++ } { r 16 < } WHILE { hamsters GLOBAL turnstate GLOBAL { { 14 hamsters = [ "@195,28" "@155,93" "@235,93" "@115,158" "@195,158" "@275,158" "@75,223" "@155,223" "@235,223" "@315,223" "@35,288" "@115,288" "@195,288" "@275,288" "@355,288" ] ME 1 - GET "!SQUEEK!" + LOCALMSG 2 ME SETSPOTSTATELOCAL } hamsters 15 == IF { 0 ME SETSPOTSTATELOCAL ME turnstate = } ME GETSPOTSTATE 1 == 0 turnstate == AND IF { [ [ [ 2 4 ] [ 3 6 ] ] [ [ 4 7 ] [ 5 9 ] ] [ [ 5 8 ] [ 6 10 ] ] [ [ 2 1 ] [ 5 6 ] [ 7 11 ] [ 8 13 ] ] [ [ 8 12 ] [ 9 14 ] ] [ [ 3 1 ] [ 5 4 ] [ 9 13 ] [ 10 15 ] ] [ [ 4 2 ] [ 8 9 ] ] [ [ 5 3 ] [ 9 10 ] ] [ [ 5 2 ] [ 8 7 ] ] [ [ 6 3 ] [ 9 8 ] ] [ [ 7 4 ] [ 12 13 ] ] [ [ 8 5 ] [ 13 14 ] ] [ [ 8 4 ] [ 9 6 ] [ 12 11 ] [ 14 15 ] ] [ [ 9 5 ] [ 13 12 ] ] [ [ 10 6 ] [ 14 13 ] ] ] turnstate 1 - GET dirs = { dir = { 2 turnstate SETSPOTSTATELOCAL 2 dir 0 GET SETSPOTSTATELOCAL [ "@195,28" "@155,93" "@235,93" "@115,158" "@195,158" "@275,158" "@75,223" "@155,223" "@235,223" "@315,223" "@35,288" "@115,288" "@195,288" "@275,288" "@355,288" ] dir 0 GET 1 - GET "!SQUEEK!" + LOCALMSG 1 ME SETSPOTSTATELOCAL 0 turnstate = hamsters -- { "I win!" SAY 0 st = 1 flips = 1 sp = { 1 st - st = st sp SETSPOTSTATELOCAL sp ++ } { sp 16 < } while { { 1 sp = { 1 sp GETSPOTSTATE NOT sp SETSPOTSTATELOCAL sp ++ } { sp 16 < } WHILE } flips 60 * ALARMEXEC flips ++ } { flips 10 < } while } 1 hamsters == IF } dir 1 GET ME == dir 0 GET GETSPOTSTATE 1 == AND IF } dirs FOREACH { 1 turnstate SETSPOTSTATELOCAL 0 turnstate = } turnstate IF } ME GETSPOTSTATE 2 == 0 turnstate < AND IF } hamsters 1 > IF } game DEF } ON LEAVE { game GLOBAL { } game DEF } ENDSCRIPT ENDSPOT SPOT ID 17 DONTMOVEHERE OUTLINE 371,72 492,72 492,98 371,98 LOC 364,168 SCRIPT ON SELECT { "@263,43 This is our version of hamster roullete" LOCALMSG { "@221,108 the idea is to kill off all but one of us" LOCALMSG } 100 ALARMEXEC { "@180,172 to play, first click on the start game button, then click one of us to die first" LOCALMSG } 200 ALARMEXEC { "@383,239 after that, we kill each other by jumping over a sibling, either horizontally or diagonally to a blank spot" LOCALMSG } 300 ALARMEXEC { "@100,305 to make one of us jump, just click on us, and we'll jump up in preparation" LOCALMSG } 600 ALARMEXEC { "@219,239 then click on the blank spot you want us to jump to, and we'll go there if we can" LOCALMSG } 800 ALARMEXEC { "@261,172 make sure you click on just the green diamonds" LOCALMSG } 1000 ALARMEXEC { "@261,302 if you get stuck with more than one of us left, just click start game to start over" LOCALMSG } 1200 ALARMEXEC } ENDSCRIPT ENDSPOT SPOT ID 19 OUTLINE 12,172 24,172 24,184 12,184 LOC 18,178 ENDSPOT DOOR ID 20 DONTMOVEHERE DEST 200 OUTLINE 2,355 53,355 53,382 2,382 LOC 27,368 PICTS 2,0,0 ENDPICTS ENDDOOR DOOR ID 21 DONTMOVEHERE DEST 312 OUTLINE 448,354 508,354 508,379 448,379 LOC 480,368 PICTS 3,0,0 ENDPICTS ENDDOOR ENDROOM