! LXXXXXXXXXXq ^ THAT CRAZY LOOKING REM IS A PRINT AT ROUTINE USING SYSZ,ROW, COL. ::::: ::::: 40 ::::: ::::: ::::: ::::: ::::: ::::: " """""""""""""""""""""""""" " """"""""""""""""""""""""""K " """" """"| " """" THIS IS AN OLD COMMODORE """" " """" """" " """" EDUCATIONAL PROGRAM THAT """" " """" """"< " """" WAS MADE TO RUN ON MANY """"k " """" """" " """" TYPES OF COMMODORE """" " """" """" " """" COMPUTERS. EVERYTHING """"+ " """" """"\ " """" NOT NEEDED WAS REMOVED """" " """" """" " """" AND IMPROVEMENTS MADE. """" " """" """" " """"""""""""""""""""""""""K " """""""""""""""""""""""""".t #[ BLAME IT JIM GREEN ]. (F(4),PL$(4),G(4),E$(8),B(8):L53280:H53281 2L,15:H,15:"";: 580:Z2054 7" ----------------------------------" <" 1. BEGIN SCOOTERS"X A" 2. INSTRUCTIONS":" 3. QUIT" F" ----------------------------------":C3: 595 K" PRESS A NUMBER KEY (1-3) "; PG$:G$"1"G$"3" 80 U(G$)140, 95, 90:50 Z"":H,6:L,14:*_"":H,15:L,15:130:3655d105:ji198,0:Z,23,6:" RESS <> TO CONTINUE nG$:G$" "110sx" SCOOTERS ...."}" --------------------------------------":"":" COOTERS"26)"NSTRUCTIONS"1" --------------------------------------":"":I""::H,15:L,15}I14:P(I)0:I::J14:G(J):J:35,36,37,42J18:E$(J),B(J):JN,-80,NE,-78,E,2,SE,82,S,80,SW,78,W,-2,NW,-82WW1:" WELCOME TO GAME"W"";: 580:C1: 595N" HOW MANY PLAYERS? (1 TO 4) ";iG$:G$"1"G$"4"175uN(G$)120:" NAMES ARE LIMITED TO 7 LETTERS."PL$(1)"CRANKY":PL$(2)"LANKY":PL$(3)"PETE":PL$(4)"REPETE":J1N" PLAYER"J": YOUR NAME";:C1: 595L646,154:198,1:"";PL$(J):(PL$(J))7185`:::295:355pJ1N:525(F(D9)B)127(F(D9)B)255235F(D9),32:F(D9)F(D9)BF(D9),G(D9):F(D9)54272,1T1551:54296,T:54296,10::P(J)P(J)1290:215#245::210/J:210AI14:K18r(F(I)B(K))127(F(I)B(K))255I10:K10K,I:I9 Z,22,0:"GAME OVER..THE SCORES TELLS WINNER."PLAY AGAIN Y/N ";G$:G$"Y"G$"N"275*G$"Y"1450H"Z,93J,32:P(J):'" GAME"W:J110,"ݦݦݦݦݦݦݦݦݦݦݦݦݦݦݦ":J103101""6:"";3;J15:""Z@""E""J""::J14OX(1064)((1)800):(X)127(X)255335TF(J)X:X,G(J):X54272,7::""32);GY" NNW NEWE";r^"SW SES":c32)" SCORES:":J1NhZ,83J,32:32)PL$(J):290::mC2: 595:" ELL YA' SEE THERE'S THESE ROIDS WHO"-r" HUNT FOR MINERALS ON PLANET ERCURY..."\w" W COME ON! HIS IS JUST A WIMPY GAME"|" PLAYED ON A GRID WHERE YOU TRY TO SCOOT"" SOME CHARACTERS (HERE-IN-AFTER CALLED""'SCOOTERS') ACROSS THE BOARD, ERASING"" OTHER CHARACTERS AS YOU GO.">" OUR SCOOTERS ARE # $ % *. HE BOARD"r" CHARACTERS ARE  AND AND THE BOARD"" LOOKS LIKE THIS....":105:130" "" ݞݞݞݞݞ"'" *f" ݞ*ݞݞݞ"" ""RESS TO SEE WHAT HAPPENS..."G$:G$(13) 445"":T9232:T)"*";:D1100::" ";::4"IN'T THAT SIMPLE!! ACH PLAYER"^"(UP TO FOUR PLAYERS) MAY, IN TURN,"MOVE A SCOOTER TO COLLECT THE  .""OU GET ONE POINT FOR EACH AND""THE PLAYER WITH THE MOST POINTS WINS.":105:130"COOTERS GO NORTH,SOUTH,EAST,WEST,OR"M"DIAGONALLY, BUT ONLY IN A STRAIGHT LINE"z"AND ONLY ONTO SQUARES WITH  .""NY PLAYER MAY MOVE ANY SCOOTER.""HE GAME ENDS WHEN ALL SCOOTERS ERASE""ALL OR WHEN NO MOVES ARE POSSIBLE."*"HE PLAYS ARE ENTERED LIKE THIS %"O"HAT MEANS MOVE % ."|" APPY COOTERING!":105:50 Z,22,0:""PL$(J);", TYPE A SCOOTER'S SYMBOL "" AND A DIRECTION ";: 595646,150:198,1:"";A$:(A$)2 525AA((A$,1)):D90:K14:AG(K)D9KS!K:D90 525&A$(A$,(A$)1):E0:K18:A$E$(K)EK+K:E0 5250BB(E):(F(D9)B)127(F(D9)B)255:Z,22,0:"SORRY, ";PL$(J);", BUT ";(G(D9));" CAN'T GO "0?"THAT WAY. TRY ANOTHER MOVE: ";: 535mD"         "I"  ߒ        ߒ"N"         ": SS54272:S24,15:T1C8XS5,1:S6,248:S1,25:S,244:S4,17d]D1130::S4,16::TSS23:T,0::