C64S tape image fileMAZE MANIA       ‚;-žANDROID NIM Ÿ"MAZE            'STORY PROB -‰òÿÿUNIT3QUIZ A‰òÿÿUNIT4DRILL 4‰òÿÿUNIT5QUIZ ,‰òÿÿSENTENCES G‰òÿÿUNIT7QUIZ  � *** MAZE ***@ � TO THE BEST OF OUR KNOWLEDGEa � THIS PROGRAM IS IN THE} � PUBLIC DOMAIN�� AUTHOR: JIM BUTTERFIELD£�Â� PLUS/4 C16 VERSIONÈ:ç— 2025,64: � NO EOL INSERTï×23ù‰1000ÿÖ:0#¡ùUR$:�K9²1¤Ã(US$):‹UR$²Ê(US$,K9,1)§37<$‚K9:‰35M%‹UR$²UX$§145X&™UR$:Ž^':˜‘™"“"Ç(142)"DO YOU WANT TO RESTART THE GAME ?":—KB,0²’¡ùUI$:‹UI$²"Y"§�150:ŠÄ“‹UI$³±"N"§146à”�150:—2025,0:™Ç(9)"“":€æ•:–�I²0¤7:—1375ªI,FK(I):‚:Ž :� RESTORE FUNCTION KEYS"—:(�:4�™Ç(142)f•UT$²" MAZE":UH²1:UP²0:UG$²"INSTRUCTIONS":�850�š™" THIS PROGRAM CREATES A MAZE»œ™" AND LETS YOU TRY TO GO THROUGH IT.åž™" TO MOVE, PRESS THE FOLLOWING ™" KEYS FOR THE APPROPRIATE DIRECTIONS:-¢™" ^G¤™" Ýd¦™"  I ’…¨™" <-J’ L’->¢ª™"  K ’¼¬™" !Ö®™" Vßå�835åïŽëó:  ç0,2:ç4,15,1:™"“š"Ç(142);#%™"š© ’:&™" ’  ’©f'™" ’ £ßš’ C O M M O D O R Ey(™"ß ’™*™"šSOFTWAREº4™"":R9$²"Ï5™R9$"‚********„è6™R9$"‚*„š MAZE ‚*„þ7™R9$"‚********„š9UI²0.:¡UI$:‹UI$³±" "§UI²UIª1:‹UI³150§826G;™"“"Ç(14);:ç4,15,4:ŽM=:‚C™È(UD$,24);"PRESS SPACE BAR TO CONTINUE’"™H¡UI$:‹UI$³±" "§840ŸMŽÑRUP²UPª1:™"“"È(UT$ªUP$,21);É(UP$ªUG$ªÄ(UP),18)W™" --------------------------------------"8\‹UH²0§™È(UD$,24);È(UP$,7);" QUIT - PRESS Q "IaUH²0:™"":Ž�k™È(UD$,24);" ONE MOMENT PLEASE... ":އƒ:½„UX$²"Q":UC$²Ç(154):US²12¬256:U3²202:U4²205:KB²239ýˆ�I²0¤7:FK(I)²Â(1375ªI):—1375ªI,0:‚: � DISABLE FUNCTION KEYSN‰UD$²"":UP$²" "jІW(19,11),V(19,11),D(4)„‹UT$²" MAZE":UH²1:UP²0Š�Ž�ç:©è™Ç(8):�800:�900:�400¾é™"“"UC$Ç(142);:ŒÚíUT$²" MAZE":UP²0:UG$²""ãîFF²0öü� MAZE PROGRAM� PET VERSION BY JIM BUTTERFIELD@� IDEA AND BASIC ALGORITHM FROM:h� 'WHAT TO DO AFTER YOU HIT RETURN'u.X²»(«TI)›8�850:™ " MAZE!"´BH²8:V²6:TT$²"000100"ºL�M™" WANT A S’MALL,":™" M’EDIUM, OR B’IG MAZE? ";:US$²"SBMQ":UL²1Q�35:A$²UR$)VX²Æ(A$):‹X²83‰ 1140O`H²12:V²9:TT$²"000300":‹X²77‰ 1140jH²18:V²10:TT$²"000500":‹ X³±66 §™"‘‘":‰1100œtX²200:�I²1¤H:W(I,0)²X:‚I¾~�I²1¤V:W(0,I)²X:W(Hª1,I)²X:‚I∙" WANT TO WATCH ME CONSTRUCT�™" THE MAZE (Y OR N)? ";:US$²"YNQ":� 35:A$²UR$/’F²0:‹Æ(A$)³±89§F²1AœZ²µ(»(1)¬Hª1)W¦™"“":™" ";:�I²1¤Hq°:A$²"¯¯":‹I²Z§A$²" "~º:™A$;:‚I„Ä™–Î:�J²1¤V:™"§";­Ø: �I²1¤H:™" §";:‚Iºâ:™:™"§";Ùì�I²1¤H:™"¯º";:‚I:™:‚J:�875ùöW(Z,1)²1:C²2:R²Z:S²1:‰ 1320‹R³±H§R²Rª1:‰ 1310+ R²1:‹S³±V§S²Sª1:‰ 1310:S²1:‰ 1310N‹W(R,S)²0‰ 1280c(�J²1¤4:D(J)²0:‚Jw2D(1)²W(R«1,S)²0‹<D(2)²W(R,S«1)²0ŸFD(3)²W(Rª1,S)²0ÁPD(4)²W(R,Sª1)²0¯(C±V¬H­2°S³V)ÜZD²0:�J²1¤4:D²DªD(J):‚Jëd‹D²0‰ 1280ønX²»(1)¬Dx�D²1¤4:X²X«D(D):‹X³0§‚D3‚‘D‰ 1430, 1450, 1520, 14709Œ�L–R²R«1:V(R,S)²2V ‰1460iªS²S«1:V(R,S)²1z´�1870:‰ 1540‰¾‹S³V‰ 1490¨ÈX²200:�J²1¤H:W(J,Vª1)²X:‚J¼ÒV(R,S)²V(R,S)°1æÜ�1870:S²Sª1:‹S±V¯C³H¬Vª1§C²Cª1:‰ 1300ñæ‰ 1540ðV(R,S)²V(R,S)°2ú�1870:R²Rª1(W(R,S)²C:C²Cª1;‹C³H¬Vª2‰ 1320J‹F³±1‰1580z"™"";:�S²1¤V:™"";:�R²1¤H:�1900:‚R:™:™:‚S’,R²Z:S²1:¡A$:¡A$:¡A$Ã1™È(UD$,24)" "Í2�3000Ö5�860ê6TI$²"000000":Û6@R1²R:S1²S:A$²"¬":�18403JT$²TI$:™""È(T$,2)":"Ê(T$,3,2)":"É(T$,2)DL‹T$²TT$§2000YT¡A$:‹A$²""‰ 1610uVÚ1,200ª(12¬(»(0)¬40)),2…Y‹A$²"Q"§145‘^D²Æ(A$)¦h‹D²50°D²75‰ 1710»r‹D²52°D²74‰ 1730Ð|‹D²54°D²76‰ 1760熋D³±56¯D³±73‰ 1610ö�‹S²1‰ 1610š‹¶(V(R,S«1)«1)²1‰ 1610"¤S²S«1:‰ 1780;®‹¶(V(R,S)«1)²1‰ 1610L¸S²Sª1:‰ 1780[‹R²1‰ 1610qÌ‹V(R«1,S)³2‰ 1610‚ÖR²R«1:‰ 1780–à‹V(R,S)³2‰ 1610 êR²Rª1±ôA$²" ":�1840Áþ‹S³²V‰ 1600è™" CONGRATULATIONS! " Û7:�J²2¤800©20:Ú1,J,3:‚ �835:™"“";( ¡Z$:‹Z$³±""‰1820C &™""Y +�150:œ:�900:‰1001_ ,:h 0™""| :�J²1¤S1¬2«1:™:‚� D�J²1¤R1:™"";:‚J:™"�";A$;:ލ N‹F²1§ŽÁ X™"":�J²1¤S¬2«1:™:‚JÜ b�J²1¤R:™"";:‚J:™"�";þ lA$²" ":X²V(R,S):‹X³2§A$²" §""!v™A$;"��";:A$²" ":‹X²2§A$²"¯¯"3!€‹X²0§A$²"¯º"D!Š‹X²1§A$²" §"S!”™A$;"‘";:Žc!ÐÛ7:Ú1,200,5 !Ú™È(UD$,23)" TIME IS UP. PLEASE TRY AGAIN":™" ":�835±!äA$²" ":�1840ç!é™È(UD$,23)" ""ê™È(UD$,24)" ";("ë‰1580H"¸ ™È(UD$,24)" READY";b"º �I²1¤400:‚:™" SET";"¼ �I²1¤400:‚:™" GO !";�"¾ �I²7¤2©«1:ÛI:Ú1,600,3:‚:Ž" � *** ANDROID NIM ***F � TO THE BEST OF OUR KNOWLEDGEg � THIS PROGRAM IS IN THEƒ � PUBLIC DOMAIN¡� AUTHOR: DON DENIS§�Ç� PLUS/4 C16 VERSIONÍ�ì— 2025,64: � NO EOL INSERTô×23þ‰1000Ö :D‘™"“"Ç(142)"DO YOU WANT TO RESTART THE GAME ?":—KB,0^’¡ùUI$:‹UI$²"Y"§�150:Šp“‹UI$³±"N"§146Œ”�150:—2025,0:™Ç(9)"“":€’•:Ç–�I²0¤7:—1375ªI,FK(I):‚:Ž:� RESTORE FUNCTION KEYSÕ�™"“"Ç(14)•UT$²" ÁNDROID ÎIM":UH²1:UP²0:UG$²"ÉNSTRUCTIONS":�850–:Dš™" ×E ARE AT YOUR COMMAND. ÃHOOSE ANY ONEqœ™" OF US(Á  OR Ã) AND WE WILL HELP YOU"�¤™" ELIMINATE THE ÄROIDS. ÔAKE AS MANY̦™" ÄROIDS AS YOU WANT FROM ANY ROW. ÐLAYø®™" AGAINST THE COMPUTER TO SEE WHO CAN'¸™" REMOVE THE LAST ÄROID FROM THE SCREEN.TÛ™"ÉF AT ANY TIME YOU WISH TO QUIT"sà™" PRESS Ñ."|å�835‚ó:¨ ç0,2:ç4,15,1:™"“š"Ç(142);À%™"š© ’×&™" ’  ’©'™" ’ £ßš’ C O M M O D O R E(™"ß ’6*™"šSOFTWARET4™"":R9$²"p5™R9$"‚***************„�6™R9$"‚*„š ANDROID NIM ‚*„­7™R9$"‚***************„š¶9UI²0Ý:¡UI$:‹UI$³±" "§UI²UIª1:‹UI³150§826ö;™"“"Ç(14);:ç4,15,4:Žü=:1C™È(UD$,24);"PRESS SPACE BAR TO CONTINUE’"IH¡ùUI$:‹UI$³±" "§840OMŽ�RUP²UPª1:™"“"È(UT$ªUP$,21);É(UP$ªUG$ªÄ(UP),18)°W™" --------------------------------------"ê\‹UH²0§™È(UD$,24);È(UP$,7);"HELP - PRESS H "ûaUH²0:™"":Ž3k™È(UD$,24);" ONE MOMENT PLEASE... ":Ž9ƒ:o„UX$²"Q":US²12¬256:U3²202:U4²205:UC$²Ç(154):KB²239À‰UD$²"":UP$²" "ІUQ%(1000),B$(18),PX(17),PY(17),R(17),CM$(5),A(2),B(2),M$(15))‹�I²0¤7:FK(I)²Â(1375ªI):—1375ªI,0:‚/�Ž5ç:Nè™Ç(8):�800:�900:�400cé™"“"UC$Ç(142);:Œl÷UG²1‘ü™"“"£9)"*** ANDROID NIM ’***"¤� BY DON DENIS¼ ¡IS$:‹IS$²UX$§‰ 145ÆLSF²64úVCL$²" "[¡IS$:‹IS$²UX$§‰ 145"jLN²U4:CN²U3I~– ¥E(X)²(A(P)°E)¯(¨(A(P)¯E)):IQ².7aƒ¡IS$:‹IS$²UX$§‰ 145o’: �I²0¤17|œ: ‡B$(I)…¦: ‚IÖ°B$(18)²"� ’¡¡ ����� ¼’¬  ����� ¼’¾¬ ����� ’¡ ¬»����� ’¡ ¡¡�����"'ºB$(18)²B$(18)ª" ¾¡’¬ ����� ¡¡ ����� ¼¾’¢ �����‘‘‘‘‘‘‘’ ����� "sÄB$(18)²B$(18)ª"����� ����� ����� ����� ����� "”ÎB$(18)²B$(18)ª"����� ‘" â�I²0¤17´ì: ‡ PX(I),PY(I)Áö: R(I)²IÊ: ‚IÖ�I²0¤15ä: ‡ M$(I)í(: ‚Iø2�I²0¤5<: ‡CM$(I)F: ‚IP�2750#ZIQ².9DdRR²3:B(0)²10:B(1)²15:B(2)²18knQ$²"ARE YOU READY TO PLAY? ":�2150|s‹A$²UX$‰ 145Œx‹A$²"N"‰145ž}‹A$³±"Y"‰1390¶ ™"“":�2750:� N²3¤17ª: �2500Ï´: R(N)²Nؾ: ‚N÷ÈRR²18:A(0)²7:A(1)²5:A(2)²3'ÒTR²0:Q$²"DO YOU WANT TO PLAY FIRST? ":�2150/ÜM²0Aá‹A$²UX$§‰ 145Ræ‹A$²"N"‰1540dð‹A$³±"Y"‰1490núM²1«M}‹RR²3‰1810‹‹M²0‰1690½TR²0:Q$²"IT IS YOUR TURN. \WHICH ROW? ":�2150Å"Z²1×'‹A$²UX$§‰ 145æ,P²Æ(A$)«65ÿ6‹P³0°P±2§�1880:‰1560;¡IS$:‹IS$²UX$§‰ 145/@‹A(P)²0§�1950:‰1560WJTR²P:Q$²"HOW MANY ANDROIDS? ":�2150iO‹A$²UX$§‰ 145xTZ²Æ(A$)«48‘^‹Z³1°Z±9§�1880:‰1560©c¡IS$:‹IS$²UX$§‰ 145Éh—LN,PY(P):—CN,PX(P):™"‘‘"Zþr‹Z±A(P)§�1950:—LN,PY(P):—CN,PX(P):™"‘‘ ":‰1610|SL²25:�2020/†—LN,PY(P):—CN,PX(P):™"‘‘ "9�‰1530EšE²0:F²0P¤�P²0¤2h©¡IS$:‹IS$²UX$§‰ 145Š®: E²¥E(0):‹A(P)±F§F²A(P):I1²P“¸: ‚PžÂ�P²0¤2ºÌ: R²¥E(0):‹R³²A(P)‰1760ËÖ‚P:UW²0:‰955ãÛ¡IS$:‹IS$²UX$§‰ 145à‹R²A(P)°IQ±»(1)§P²I1:R²A(P)«µ(»(1)¬(A(P)«1)ª1)(åTR²P:Z²A(P)«REæ‹Z²1§AN$²"ANDROID":‰1770XçAN$²"ANDROIDS"“êQ$²"WE CHOOSE"ªÄ(Z)ª" "ªAN$ª" FROM ROW "ªÇ(Pª65)ª". \"�ô�2550µù¡IS$:‹IS$²UX$§‰ 145ÄþSL²5:�2020Ή1530ñQ$²"WIN. \":‹M³±0§Q$²"LOSE. \"Q$²"YOU "ªQ$@&‹M²0§Q$²Q$ª"WE WILL PLAY BETTER NEXT TIME. \":IQ²IQ¬IQ¬IQO0TR²0:�2550|:Q$²"WOULD YOU LIKE ANOTHER GAME? ":�2150Ž?‹A$²UX$§‰ 145ŸB‹A$²"Y"‰1440±D‹A$³±"N"‰1850äNQ$²"THANK YOU FOR PLAYING. \\":�2550:UG²0:‰145 XTR²0:R1²0:R2²0:R3²0:SL²17& bM1$²M$(9):M2$²M$(10):M3$²M$(11)0 l�2280\ vQ$²"YOUR ANSWER DOES NOT MAKE SENSE. \"‰ €‹Z²0§Q$²"CAN'T YOU MAKE UP YOUR MIND? \"“ Š�2550™ ”޲ žR1²P:R2²P:R3²P:SL²25Ô ¨M1$²M$(7):M2$²M$(8):M3$²M$(8)Þ ²�2280!¼TR²P:Q$²"SORRY, ONLY"ªÄ(A(P))ª" ANDROIDS LEFT. \"H!Æ‹A(P)²0§Q$²"I CAN'T DO IT. I HAVE NONE LEFT. \"R!Ð�2550X!ÚŽk!äR1²P:R2²P:R3²P�!îM1$²M$(6):M2$²M$(8):M3$²M$(8)—!ø�2280¨!II²B(P)«A(P)¹! �I²II¤IIªZ«1Þ!: —LN,PY(I):—CN,PX(I):™"‘"B$(6)ç! : ‚Ií!):"*Û5:�JJ²30¤255© 10:Ú3,3¬JJ,3:‚JJ"5:"">�I²1¤Z."H: �23407"R: ‚I="\ŽT"f—KB,0:QU$²Q$:�2550a"pT²TIª800u"zM1$²M$(»(1)¬16)‰"„M2$²M$(»(1)¬16)�"ŽM3$²M$(»(1)¬16)¯"˜R1²R(»(1)¬RR)Í"¢R2²R(»(1)¬RR):‹R2²R1‰2210ñ"¬R3²R(»(1)¬RR):‹R3²R2°R3²R1‰2220#¶SL²µ(25¬»(1)ª1)#À�2280&#Ê¡A$:‹A$³±""§™CL$:ŽU#Ô‹TI±T§ Q$²CM$(»(1)¬6)ª"\ "ªQU$:�2550:‰2160_#Þ‰2170o#è�C²SL ¤1©«1£#ò: —LN,PY(R1):—CN,PX(R1):™"‘"B$(Æ(É(M1$,C))«SF)×#ü: —LN,PY(R2):—CN,PX(R2):™"‘"B$(Æ(É(M2$,C))«SF) $ : —LN,PY(R3):—CN,PX(R3):™"‘"B$(Æ(É(M3$,C))«SF)$ : ‚C$ Ž $ :E$$ —LN,PY(R1):—CN,PX(R1):™"‘";K$- :o$. Û7:�JJ²200¤300©10:Ú3,3¬JJ,4:‚JJu$/ :–$8 SP²PX(R1):EP²PX(B(P)«A(P))«5·$B SP²PX(R1):EP²PX(B(P)«A(P))«5Ö$L �J²SP¤EP©2:™" -=*���";:‚Jö$V ‹µ((EP«SP)­2)¬2²EP«SP§™"�";%` ™"‘"B$(18)+%e Û7:�JJ²300¤200©«20:Ú3,3¬JJ,2:‚JJC%j RR²RR«1:A(P)²A(P)«1K%t A²3c%~ ‘Pª1‰2460,2450,2440p%ˆ A²AªA(1)}%’ A²AªA(0)‰%œ �J²A¤16›%¦ : R(J)²R(Jª1)¤%° : ‚Jª%º ŽÕ%Ä —LN,PY(N):—CN,PX(N):™"‘"B$(1ª7¬»(1));ù%Î —LN,PY(N):—CN,PX(N):™"‘"B$(0);$&Ø —LN,PY(N):—CN,PX(N):™"‘"B$(9ª5¬»(1));P&â —LN,PY(N):—CN,PX(N):™"‘"B$(14ª4¬»(1));V&ì Ž_&ö ™CL$t& II²0:� GOSUB2650ƒ& �I²1¤Ã(Q$)—& : CH$²Ê(Q$,I,1)¡& N²Nª1¶&( : ‹CH$²" "§�2650Õ&2 : ‹CH$²"\"§II²I:™CL$:‰2630ó&< : —LN,1:—CN,I«II:™"‘�"CH$ü&F : ‚I'P Ž('Z —LN,PY(TR):—CN,PX(TR):™"‘"B$(1);.'c :K'd Û7:Ú3,50¬(TRª1),1ªÃ(CH$)Q'e :e'n ™"���¡�";:�2730w'x ™"¼�";:�2730ˆ'‚ ™" �";:�2730—'Œ ™"¼":�2730Ÿ'– N²0¥'  Ž«'© :É'ª Û7:Ú3,200¬(TRª1),1ªÃ(CH$)Ï'« :Õ'´ Žá'¾ � N²0¤2í'È : �2500(Ò : ™"‘‘���*�"Ç(Nª65)(Ü : ‚N:ŽF(æ ƒ" � ‘¬’�¡��¡¡��¡¡���¼¾¢’���‘‘‘‘‘‘‘"f(ð ƒ" ¡¡���¾»»’»����¼¼¬’ "†(ú ƒ" »»���¡¿¾’ ����¢ ¬’¾"¦( ƒ" »»���¾ ’»����¡¿¾’ "Ç( ƒ" ¡¡���¡¬¬’ ����’¼ ¿’ "ç( ƒ" ¡���¡ ’¾ ����¼ ¬’ " )" ƒ"¡¡’ ���¼¬ ’ ����¼¾¬’ "+), ƒ" ¡ ���� » ’ ����¼ ¬’ ";)6 ƒ" ’"S)@ ƒ"¿��’¼»�� ¼"k)J ƒ"¿��’ ¡�� ¼"ƒ)T ƒ"¿��’ ¡�� ¾"›)^ ƒ"¿��’ ¡��¼ "³)h ƒ"¡�¡��’ � ¾"Ì)r ƒ"»�¿��¬’ "å)| ƒ"»�¡��¬’ "ü)† ƒ"»�¡��¡¾"*� ƒ"»�¡��¡¼"]*š ƒ0,2,3,10,0,18,5,2,10,2,15,2,20,2,25,2,30,2,35,2,13,10,18,10,23,10,28}*¤ ƒ10,33,10,21,18,26,18,31,18�*® ƒ AHDEEDABACABACABACAADHDAB½*¸ ƒ AHDAFADAFADEDHDAHAFFHFFAAÝ* ƒ AHANCAAABKPLQAKPINHACCAFGý*Ì ƒ JOKPLQKPJOKPLQKPJOINFJHFM+Ö ƒ FGNKLJLJLJLJLFHFFADEQNJNID>+à ƒ AHAFADAFAHADFDFDFDHDAFGKN^+ê ƒ AHBBBAHADEEEDABACABACADEI~+ô ƒ ABBBAHADEEEDAFADAFADAFAHAž+þ ƒ OJJJPPPPQPQPKKKKKKKKKKKKK¾+ ƒ AAAAAAAAHABBBAAACCAHAAAHAÞ+ ƒ AAAAAAAAIIIIIJKLLLIIIIIIIþ+ ƒ AAAAAAAANIIIIOPQQQNNNNNNN,& ƒ AHABADACAFABADACFBDCFBDHD>,0 ƒ ADEDADEDADEDHAFGFAFGFAFGF^,: ƒ BDBDBDBDBACFMNCACACACAHCA~,D ƒ AFGGNQPQPQFAHDEPQNDAFGLIGª,N ƒ"COME ON. ","WE HAVEN'T GOT ALL DAY! "Ï,X ƒ"WE HAVE BETTER THINGS TO DO. " -b ƒ"JUST ANSWER THE QUESTION. ","IT ISN'T THAT DIFFICULT! "7-l ƒ"THERE IS A LIMIT TO OUR PATIENCE! "(`