0 IFJP=0THENJP=1:LOAD"CON.TITL",8,1 1 V=53248:POKEV+33,0:POKEV+32,0:D$="":PRINT"[147]"D$ 2 PRINTCHR$(8)CHR$(142)SPC(7)"[158][198][162][162][162][162][162][162][162][162][162][162][162][162][146][184][184][184][184][184][184][183][183][183][183][163][163] 3 [153][166]7)" GETRNDRNDGETNEWRNDGETNEWNEWGETNEWRNDGETNEWRNDWAITLOGRNDNEWGETNEWRNDGETNEWRND 4 PRINTSPC(7)" [161][161][161][161][162][162][161][162][146][190][161][187][162][161][162][187][161][161][161][161][187][162] 5 [153][166]7)" WAITLOGLOGLOGLOG LOGNEWNEWWAITLOGLOGNEWWAITLOG LOG LOGNEWWAITLOGNEWNEWWAITLOGLOGRND 6 PRINTSPC(7)"[175][146] S O F T W A R E[158][161] 7 [153][166]7)"NEWNEWNEWNEWNEWNEWNEWNEWNEWNEWNEWNEWNEWNEWNEWNEWNEWNEWNEWNEWNEWNEWNEWNEWNEW 8 FORI=0TO17:PRINT:FORK=0TO9:NEXTK,I:PRINT" 9 U$[178]"NEWNEWNEWNEWNEWNEWNEWNEWNEWNEWNEWNEWNEWPOSANDTO TOANDPOSNEW" 10 J$[178]"WAIT WAIT WAIT WAIT WAIT WAIT WAIT WAIT WAIT WAIT WAIT WAIT WAIT WAIT WAIT WAIT WAIT WAITTAB(WAITUSRWAITFRENEWPOSANDTO TOANDPOSNEWWAITFREWAITUSRWAITTAB(" 11 [129]I[178]1[164]13:[153]""[166]7)[202](U$,I,13)[202](U$,32[171]I) 12 [153][166]7)[202](J$,I[170]I,26)[202](J$,77[171]I[171]I):[130] 13 U$[178]" P R E S E N T S":[129]I[178]1[164]8 14 [153]""[166]11)[202](U$,I,9)[202](U$,25[171]I):[129]J[178]0[164]99:[130]J,I 20 [129]I[178]49154[164]49317:[135]J:[151]I,J:[130] 100 N[178]54:[134]L(N),H(N),SA(72),SB(72),SL(72):[129]I[178]1[164]N:[135]H(I),L(I):[130] 102 [129]I[178]0[164]72:[135]SA(I),SB(I),SL(I):[130] 110 S[178]54272:[129]I[178]0[164]23:[151]S[170]I,0:[130]:[151]S[170]24,15:[158]49154:[151]198,0 120 [151]S[170]5,64[170]12:[151]S[170]12,64[170]9:[151]S[170]2,79:[151]S[170]9,22:[151]S[170]3,133:[151]S[170]10,213 200 [129]I[178]0[164]72:[151]S[170]11,64:[151]S[170]4,64 210 [151]S,L(SA(I)):[151]S[170]1,H(SA(I)):[151]S[170]7,L(SB(I)):[151]S[170]8,H(SB(I)) 220 [151]S[170]11,65:[151]S[170]4,65:[129]J[178]1[164]42[172]SL(I):[130]:[161]U$:[139]U$[178]""[167][130]:[137]200 500 [151]S[170]24,0:[151]53265,27:[151]53272,21 510 [151]S[170]4,0:[153]"LOAD":[151]V[170]21,0:[151]V[170]33,0:[151]V[170]32,0:[151]646,14:[151]53270,200 520 [153]"LOAD";:[151]53281,0 530 [153][166]9)"PLEASE SELECT...":[153][166]9)"DEF F1 WAIT CONT- SYSINSTRUCTIONS 540 PRINTSPC(9)"[150] F7 [146] [154]- [158]PLAY THE GAME 550 [161]U$:[139]U$[178]"INPUT"[137]600 560 [139]U$[178]"LET"[167][153]"LOADSTOPP(null)43,97:P(null)44,17:P(null)4448,0:L(null)"[199](34); 562 [139]U$[178]"LET"[167][153]"CON.BOOT"[199](34)",8":[137]605 570 [137]550 600 [153]"LOADSTOPL(null)"[199](34)"CON.INST"[199](34)",8 605 FORI=1TO9:PRINT"R[213]":NEXT 620 POKE631,19:POKE632,13:POKE633,13:POKE198,3:POKE43,1:NEW 800 DATA173,17,208,41,239,141,17,208,162,127,160,64,32,156,192,162 810 DATA4,160,0,32,161,192,162,131,160,39,32,114,192,162,131,160 820 DATA40,32,156,192,162,216,160,0,32,161,192,162,135,160,15,32 830 DATA114,192,173,16,135,141,33,208,173,17,208,9,34,141,17,208 840 DATA173,22,208,41,223,9,16,141,22,208,173,24,208,9,8,141 850 DATA24,208,162,96,160,0,32,156,192,162,32,160,0,32,161,192 860 DATA162,127,160,63,32,114,192,173,17,208,9,16,141,17,208,96 870 DATA142,1,192,140,0,192,160,0,177,251,145,253,165,252,205,1 880 DATA192,208,8,165,251,205,0,192,208,1,96,230,251,208,2,230,252,230,253,208 890 DATA227,230,254,76,122,192,134,252,132,251,96,134,254,132,253,96 1000 DATA3,169,3,224,4,27,4,90,4,156,4,226,5,45,5,123,5,207,6,39,6,133,6,232 1010 DATA7,81,7,193,8,55,8,180,9,56,9,196,10,89,10,247,11,158,12,78,13,10 1020 DATA13,208,14,162,15,129,16,109,17,103,18,112,19,137,20,178,21,237,23,59 1030 DATA24,157,26,20,27,160,29,69,31,3,32,219,34,207,36,225,39,18,41,101 1040 DATA43,219,46,118,49,58,52,39,55,65,58,138,62,5,65,181,69,157,73,193,78,36 2000 DATA16,11,6,23,20,10,25,21,4,21,18,2,23,20,8,21,18,6,20,16,6,21,18,2 2010 DATA16,11,2,21,18,2,18,13,16 2030 DATA16,11,6,23,20,10,25,21,4,21,18,2,23,20,6,25,21,4,21,18,2,23,20,6 2040 DATA25,21,4,21,18,2,25,21,2,23,20,2,21,18,2,25,21,2,23,20,2,21,18,2 2050 DATA25,21,2,23,20,2,21,18,2,21,18,2,20,16,2,18,13,2,12,7,6,19,15,16 2060 DATA16,11,6,23,20,10,25,21,4,21,18,2,23,20,6,25,21,4,21,18,2,23,20,6 2070 DATA25,21,4,21,18,2,25,21,2,23,20,2,21,18,2,25,21,2,23,20,2,21,18,2 2080 DATA25,21,2,23,20,2,21,18,2,21,18,2,20,16,2,18,13,2,12,7,6,19,15,16 2100 DATA16,11,6,23,20,10,21,18,2,22,19,2,23,20,2,24,19,4 2110 DATA21,18,2,22,19,2,23,20,2,24,19,4 2120 DATA21,18,2,22,19,2,23,20,2,24,19,18