FILE INFORMATION
FILENAME(S):
FILE TYPE(S): PRG
FILE SIZE: 9.9K
FIRST SEEN: 2025-10-19 22:49:06
APPEARS ON: 1 disk(s)
FILE HASH
2129e9a1ee093138ab0c06a94bfbe8168caf454f756f3f0ad7aa333d7de6659f
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| MICRO MANIAC | | PRG | Radd Maxx | 6 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1D 08 0A 00 97 35 33 32 38 30 2C 30 3A 97 |.......53280,0:.|
00000010: 35 33 32 38 31 2C 30 3A 99 22 93 05 22 00 39 08 |53281,0:."..".9.|
00000020: 0B 00 97 35 33 32 38 30 2C 30 3A 97 35 33 32 38 |...53280,0:.5328|
00000030: 31 2C 30 3A 99 22 93 05 22 00 45 08 0F 00 99 20 |1,0:."..".E.... |
00000040: C7 28 31 34 29 00 6A 08 10 00 45 52 24 B2 22 20 |.(14).j...ER$." |
00000050: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000060: 20 20 20 20 20 20 20 20 20 22 00 8B 08 14 00 86 | "......|
00000070: 53 28 31 31 29 2C 53 24 28 31 31 29 2C 53 45 24 |S(11),S$(11),SE$|
00000080: 28 31 31 29 2C 53 31 28 32 30 29 00 95 08 64 00 |(11),S1(20)...d.|
00000090: 8D 34 30 30 30 00 A1 08 69 00 8D 20 31 30 30 30 |.4000...i.. 1000|
000000A0: 30 00 AB 08 6E 00 8D 33 36 30 30 00 D5 08 78 00 |0...n..3600...x.|
000000B0: 48 B2 30 3A 56 B2 31 30 3A 54 58 24 B2 22 C4 4F |H.0:V.10:TX$.".O|
000000C0: 20 59 4F 55 20 4E 45 45 44 20 41 20 4C 45 53 53 | YOU NEED A LESS|
000000D0: 4F 4E 3F 20 22 00 DF 08 82 00 8D 33 32 30 30 00 |ON? "......3200.|
000000E0: F2 08 8C 00 4C 4F B2 30 3A 8D 32 31 30 30 3A 99 |....LO.0:.2100:.|
000000F0: 41 24 00 12 09 96 00 8B 41 24 B2 22 59 22 B0 41 |A$......A$."Y".A|
00000100: 24 B2 22 D9 22 A7 8D 32 30 30 30 30 3A 89 20 31 |$."."..20000:. 1|
00000110: 36 30 00 2E 09 97 00 8B 20 41 24 B2 22 4E 22 20 |60...... A$."N" |
00000120: B0 20 41 24 B2 22 CE 22 20 A7 20 31 36 30 00 38 |. A$."." . 160.8|
00000130: 09 98 00 89 20 31 32 30 00 42 09 A0 00 8D 35 30 |.... 120.B....50|
00000140: 30 30 00 4B 09 A5 00 52 55 B2 31 00 55 09 AA 00 |00.K...RU.1.U...|
00000150: 8D 31 30 30 30 00 64 09 AC 00 8B 4F 50 B3 B1 33 |.1000.d....OP..3|
00000160: A7 31 38 30 00 6E 09 AE 00 8D 33 36 30 30 00 77 |.180.n....3600.w|
00000170: 09 B0 00 8D 35 30 30 00 81 09 B4 00 8D 33 36 30 |....500......360|
00000180: 30 00 B0 09 BE 00 48 B2 30 3A 56 B2 31 30 3A 54 |0.....H.0:V.10:T|
00000190: 58 24 B2 22 C4 4F 20 59 4F 55 20 57 41 4E 54 20 |X$.".O YOU WANT |
000001A0: 54 4F 20 50 4C 41 59 20 41 47 41 49 4E 3F 20 22 |TO PLAY AGAIN? "|
000001B0: 00 BA 09 C8 00 8D 33 32 30 30 00 CD 09 D2 00 4C |......3200.....L|
000001C0: 4F B2 30 3A 8D 32 31 30 30 3A 99 41 24 00 E4 09 |O.0:.2100:.A$...|
000001D0: DC 00 8B 41 24 B2 22 59 22 B0 41 24 B2 22 D9 22 |...A$."Y".A$."."|
000001E0: A7 31 36 30 00 00 0A DD 00 8B 20 41 24 B2 22 4E |.160...... A$."N|
000001F0: 22 20 B0 20 41 24 B2 22 CE 22 20 A7 20 32 33 30 |" . A$."." . 230|
00000200: 00 0A 0A DE 00 89 20 31 39 30 00 1B 0A E6 00 9C |...... 190......|
00000210: 3A 20 93 22 4D 45 4E 55 22 2C 38 00 21 0A F0 00 |: ."MENU",8.!...|
00000220: 90 00 68 0A F4 01 56 B2 31 30 3A 48 B2 30 3A 54 |..h...V.10:H.0:T|
00000230: 58 24 B2 22 D9 4F 55 20 47 4F 54 22 AA C4 28 4E |X$.".OU GOT"..(N|
00000240: 50 AB 4D 49 29 AA 22 20 52 49 47 48 54 20 4F 55 |P.MI)." RIGHT OU|
00000250: 54 20 4F 46 22 AA C4 28 4E 50 29 20 AA 22 20 50 |T OF"..(NP) ." P|
00000260: 52 4F 42 4C 45 4D 53 22 00 72 0A FE 01 8D 33 32 |ROBLEMS".r....32|
00000270: 30 30 00 A1 0A 1C 02 56 B2 31 32 3A 54 58 24 B2 |00.....V.12:TX$.|
00000280: 22 46 4F 52 22 AA C4 28 B5 28 28 28 4E 50 AB 4D |"FOR"..(.(((NP.M|
00000290: 49 29 AD 4E 50 29 AC 31 30 30 29 29 AA 22 25 2E |I).NP).100))."%.|
000002A0: 22 00 AB 0A 21 02 8D 33 32 30 30 00 BD 0A 26 02 |"...!..3200...&.|
000002B0: 44 45 4C 41 59 B2 35 3A 8D 32 30 30 30 00 C3 0A |DELAY.5:.2000...|
000002C0: 30 02 8E 00 E1 0A E8 03 8F 20 2A 2A 2A 20 43 45 |0........ *** CE|
000002D0: 4E 54 52 41 4C 20 52 4F 55 54 49 4E 45 20 2A 2A |NTRAL ROUTINE **|
000002E0: 2A 00 EF 0A ED 03 48 50 B2 30 3A 4D 49 B2 30 00 |*.....HP.0:MI.0.|
000002F0: FB 0A F2 03 81 49 B2 31 A4 4E 50 00 07 0B FC 03 |.....I.1.NP.....|
00000300: 3A 8D 31 39 30 30 30 00 12 0B 01 04 3A 8D 33 36 |:.19000.....:.36|
00000310: 30 30 00 37 0B 06 04 3A 48 B2 30 3A 56 B2 36 3A |00.7...:H.0:V.6:|
00000320: 54 58 24 B2 22 C6 49 4E 44 20 54 48 45 20 22 AA |TX$.".IND THE ".|
00000330: 4D 44 24 AA 22 3A 22 00 52 0B 0B 04 3A 8D 33 32 |MD$.":".R...:.32|
00000340: 30 30 20 3A 8B 20 4D 44 B3 B1 31 20 A7 20 31 30 |00 :. MD..1 . 10|
00000350: 36 35 00 5D 0B 10 04 8D 20 37 30 30 30 00 68 0B |65.].... 7000.h.|
00000360: 1A 04 89 20 31 30 36 36 00 83 0B 29 04 3A 91 4F |... 1066...).:.O|
00000370: 50 8D 31 31 30 30 30 2C 31 31 30 30 30 2C 31 37 |P.11000,11000,17|
00000380: 30 30 30 00 BB 0B 2A 04 56 B2 32 34 3A 54 58 24 |000...*.V.24:TX$|
00000390: B2 22 20 20 20 1F 12 3C D2 C5 D4 D5 D2 CE 3E 20 |." ..<......> |
000003A0: 54 4F 20 43 4F 4E 54 49 4E 55 45 2C 20 3C 5F 3E |TO CONTINUE, <_>|
000003B0: 20 54 4F 20 45 58 49 54 92 05 22 00 CB 0B 2B 04 | TO EXIT.."...+.|
000003C0: 8D 33 30 30 30 3A 8D 33 32 30 30 00 DA 0B 2C 04 |.3000:.3200...,.|
000003D0: 4C 4F B2 30 3A 8D 32 31 30 30 00 F1 0B 2D 04 8B |LO.0:.2100...-..|
000003E0: 41 24 B2 22 5F 22 A7 20 53 41 B2 49 3A 49 B2 4E |A$."_". SA.I:I.N|
000003F0: 50 00 07 0C 32 04 82 49 3A 8B 20 53 41 B3 B1 30 |P...2..I:. SA..0|
00000400: 20 A7 4E 50 B2 53 41 00 0D 0C 33 04 8E 00 21 0C | .NP.SA...3...!.|
00000410: D0 07 8F 20 2A 2A 2A 20 54 49 4D 45 52 20 2A 2A |... *** TIMER **|
00000420: 2A 00 32 0C DA 07 54 49 24 B2 22 30 30 30 30 30 |*.2...TI$."00000|
00000430: 30 22 00 47 0C DF 07 A1 41 24 3A 8B 41 24 B3 B1 |0".G....A$:.A$..|
00000440: 22 22 A7 32 30 33 30 00 5D 0C E4 07 8B 54 49 AD |"".2030.]....TI.|
00000450: 36 30 B3 44 45 4C 41 59 A7 32 30 31 35 00 63 0C |60.DELAY.2015.c.|
00000460: EE 07 8E 00 7F 0C 34 08 8F 20 2A 2A 2A 20 47 45 |......4.. *** GE|
00000470: 54 20 43 48 41 52 41 43 54 45 52 20 2A 2A 2A 00 |T CHARACTER ***.|
00000480: 93 0C 3E 08 A1 41 24 3A 8B 41 24 B2 22 22 A7 32 |..>..A$:.A$."".2|
00000490: 31 31 30 00 AF 0C 48 08 41 B2 C5 28 41 24 29 3A |110...H.A..(A$):|
000004A0: 8B 41 B3 4C 4F B0 41 B1 48 49 A7 32 31 31 30 00 |.A.LO.A.HI.2110.|
000004B0: B5 0C 52 08 8E 00 CF 0C B8 0B 8F 20 2A 2A 2A 20 |..R........ *** |
000004C0: 43 45 4E 54 45 52 20 54 45 58 54 20 2A 2A 2A 00 |CENTER TEXT ***.|
000004D0: DD 0C C2 0B 58 31 B2 C3 28 54 58 24 29 00 ED 0C |....X1..(TX$)...|
000004E0: CC 0B 48 B2 28 34 30 AB 58 31 29 AD 32 00 F3 0C |..H.(40.X1).2...|
000004F0: D6 0B 8E 00 1E 0D 1C 0C 56 B2 32 34 3A 54 58 24 |........V.24:TX$|
00000500: B2 22 20 20 20 1F 12 3C D2 C5 D4 D5 D2 CE 3E 20 |." ..<......> |
00000510: 54 4F 20 43 4F 4E 54 49 4E 55 45 92 05 22 00 2E |TO CONTINUE.."..|
00000520: 0D 26 0C 8D 33 30 30 30 3A 8D 33 32 30 30 00 3D |.&..3000:.3200.=|
00000530: 0D 30 0C 4C 4F B2 30 3A 8D 32 31 30 30 00 53 0D |.0.LO.0:.2100.S.|
00000540: 3A 0C 8B 41 24 B3 B1 C7 28 31 33 29 20 A7 20 33 |:..A$...(13) . 3|
00000550: 31 30 30 00 59 0D 44 0C 8E 00 73 0D 80 0C 8F 20 |100.Y.D...s.... |
00000560: 2A 2A 2A 20 48 4F 52 2F 56 45 52 20 54 41 42 20 |*** HOR/VER TAB |
00000570: 2A 2A 2A 00 85 0D 8A 0C 56 54 24 B2 22 22 3A 81 |***.....VT$."":.|
00000580: 51 B2 31 A4 56 00 96 0D 94 0C 3A 56 54 24 B2 56 |Q.1.V.....:VT$.V|
00000590: 54 24 AA 22 11 22 00 9D 0D 9E 0C 82 51 00 AB 0D |T$."."......Q...|
000005A0: A8 0C 99 22 13 22 3B 56 54 24 3B 00 B9 0D B2 0C |...".";VT$;.....|
000005B0: 99 A3 48 29 3B 54 58 24 3B 00 BF 0D BC 0C 8E 00 |..H);TX$;.......|
000005C0: E0 0D AC 0D 8F 20 2A 2A 2A 20 4C 49 4E 45 20 41 |..... *** LINE A|
000005D0: 43 52 4F 53 53 20 53 43 52 45 45 4E 20 2A 2A 2A |CROSS SCREEN ***|
000005E0: 00 EA 0D B6 0D 99 22 1F 22 3B 00 F6 0D C0 0D 81 |......".";......|
000005F0: 51 B2 31 A4 34 30 00 01 0E CA 0D 3A 99 22 B2 22 |Q.1.40.....:."."|
00000600: 3B 00 08 0E D4 0D 82 51 00 14 0E DE 0D 81 51 B2 |;......Q......Q.|
00000610: 31 A4 34 30 00 1F 0E E8 0D 3A 99 22 B1 22 3B 00 |1.40.....:.".";.|
00000620: 26 0E F2 0D 82 51 00 30 0E F7 0D 99 22 05 22 3B |&....Q.0....".";|
00000630: 00 36 0E FC 0D 8E 00 58 0E 10 0E 8F 20 2A 2A 2A |.6.....X.... ***|
00000640: 20 50 52 49 4E 54 20 53 43 52 45 45 4E 20 48 45 | PRINT SCREEN HE|
00000650: 41 44 45 52 20 2A 2A 2A 00 61 0E 1A 0E 99 22 93 |ADER ***.a....".|
00000660: 22 00 85 0E 2E 0E 54 58 24 B2 22 D6 C9 D3 C9 CF |".....TX$.".....|
00000670: CE 20 D3 CF C6 D4 D7 C1 D2 C5 A0 D0 D2 C5 D3 C5 |. ..............|
00000680: CE D4 D3 3A 22 00 8E 0E 38 0E 48 B2 31 30 00 9C |...:"...8.H.10..|
00000690: 0E 42 0E 56 B2 31 3A 8D 33 32 30 30 00 A7 0E 4C |.B.V.1:.3200...L|
000006A0: 0E 54 58 24 B2 54 24 00 B1 0E 51 0E 99 22 1C 22 |.TX$.T$...Q.."."|
000006B0: 3B 00 BA 0E 56 0E 48 B2 31 30 00 C8 0E 60 0E 56 |;...V.H.10...`.V|
000006C0: B2 33 3A 8D 33 32 30 30 00 D2 0E 65 0E 99 22 05 |.3:.3200...e..".|
000006D0: 22 3B 00 E0 0E 6A 0E 99 3A 8D 33 35 30 30 3A 8E |";...j..:.3500:.|
000006E0: 00 F8 0E A0 0F 8F 20 2A 2A 2A 20 52 45 41 44 20 |...... *** READ |
000006F0: 44 41 54 41 20 2A 2A 2A 00 00 0F A5 0F 87 54 24 |DATA ***......T$|
00000700: 00 0B 0F AA 0F 81 49 B2 31 A4 36 00 18 0F B4 0F |......I.1.6.....|
00000710: 3A 87 52 57 24 28 49 29 00 1F 0F BE 0F 82 49 00 |:.RW$(I)......I.|
00000720: 2A 0F C8 0F 81 49 B2 31 A4 33 00 37 0F D2 0F 3A |*....I.1.3.7...:|
00000730: 87 4F 50 24 28 49 29 00 3E 0F DC 0F 82 49 00 49 |.OP$(I).>....I.I|
00000740: 0F E6 0F 81 49 B2 31 A4 34 00 5C 0F F0 0F 3A 87 |....I.1.4.\...:.|
00000750: 4D 55 24 28 49 29 2C 43 4F 28 49 29 00 65 0F FA |MU$(I),CO(I).e..|
00000760: 0F 82 49 3A 8E 00 80 0F 04 10 8F 20 2A 2A 2A 20 |..I:....... *** |
00000770: 50 52 4F 47 52 41 4D 20 44 41 54 41 20 2A 2A 2A |PROGRAM DATA ***|
00000780: 00 9F 0F 0E 10 83 22 CD 55 4C 54 49 50 4C 49 43 |......".ULTIPLIC|
00000790: 41 54 49 4F 4E 20 D0 52 41 43 54 49 43 45 22 00 |ATION .RACTICE".|
000007A0: C3 0F 18 10 83 22 C7 52 45 41 54 21 22 2C 22 C6 |.....".REAT!",".|
000007B0: 41 4E 54 41 53 54 49 43 21 22 2C 22 D3 55 50 45 |ANTASTIC!",".UPE|
000007C0: 52 21 22 00 06 10 22 10 83 22 D9 4F 55 27 52 45 |R!"..."..".OU'RE|
000007D0: 20 52 45 41 4C 4C 59 20 47 4F 49 4E 47 20 4E 4F | REALLY GOING NO|
000007E0: 57 21 22 2C 22 D9 45 53 21 20 20 D9 45 53 21 20 |W!",".ES! .ES! |
000007F0: 20 D9 45 53 21 22 2C 22 D4 48 41 54 27 53 20 47 | .ES!",".HAT'S G|
00000800: 52 45 41 54 21 22 00 20 10 2C 10 83 22 D3 45 45 |REAT!". .,..".EE|
00000810: 20 45 58 41 4D 50 4C 45 53 20 44 4F 4E 45 2E 22 | EXAMPLES DONE."|
00000820: 00 3E 10 36 10 83 22 C4 4F 20 50 52 4F 42 4C 45 |.>.6..".O PROBLE|
00000830: 4D 53 20 57 49 54 48 20 48 45 4C 50 2E 22 00 5B |MS WITH HELP.".[|
00000840: 10 40 10 83 22 C4 4F 20 50 52 4F 42 4C 45 4D 53 |.@..".O PROBLEMS|
00000850: 20 59 4F 55 52 53 45 4C 46 2E 22 00 93 10 4A 10 | YOURSELF."...J.|
00000860: 83 22 55 4E 49 54 53 22 2C 32 38 2C 22 54 45 4E |."UNITS",28,"TEN|
00000870: 53 22 2C 33 30 2C 22 48 55 4E 44 52 45 44 53 22 |S",30,"HUNDREDS"|
00000880: 2C 33 31 2C 22 54 48 4F 55 53 41 4E 44 53 22 2C |,31,"THOUSANDS",|
00000890: 31 35 38 00 B0 10 88 13 8F 20 2A 2A 2A 20 53 45 |158...... *** SE|
000008A0: 54 55 50 20 46 4F 52 20 4D 41 54 48 20 2A 2A 2A |TUP FOR MATH ***|
000008B0: 00 BF 10 89 13 8B 52 55 B2 31 A7 35 30 33 37 00 |......RU.1.5037.|
000008C0: E9 10 92 13 48 B2 30 3A 56 B2 31 30 3A 54 58 24 |....H.0:V.10:TX$|
000008D0: B2 22 D7 48 41 54 27 53 20 59 4F 55 52 20 46 49 |.".HAT'S YOUR FI|
000008E0: 52 53 54 20 4E 41 4D 45 22 00 F3 10 9C 13 8D 33 |RST NAME"......3|
000008F0: 32 30 30 00 FC 10 A6 13 85 4E 4D 24 00 37 11 AD |200......NM$.7..|
00000900: 13 56 B2 31 30 3A 48 B2 30 3A 54 58 24 B2 22 D7 |.V.10:H.0:TX$.".|
00000910: 4F 55 4C 44 20 59 4F 55 20 4C 49 4B 45 20 54 4F |OULD YOU LIKE TO|
00000920: 3A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |: |
00000930: 20 20 20 20 20 20 22 00 41 11 AE 13 8D 33 32 30 | ".A....320|
00000940: 30 00 55 11 B0 13 48 B2 37 3A 56 B2 31 32 3A 81 |0.U...H.7:V.12:.|
00000950: 49 B2 31 A4 33 00 6F 11 BA 13 3A 54 58 24 B2 C4 |I.1.3.o...:TX$..|
00000960: 28 49 29 AA 22 2E 20 22 AA 4F 50 24 28 49 29 00 |(I).". ".OP$(I).|
00000970: 7A 11 C4 13 3A 8D 33 32 30 30 00 85 11 CE 13 3A |z...:.3200.....:|
00000980: 56 B2 56 AA 32 00 8C 11 D8 13 82 49 00 AE 11 E2 |V.V.2......I....|
00000990: 13 48 B2 30 3A 54 58 24 B2 22 D9 4F 55 52 20 43 |.H.0:TX$.".OUR C|
000009A0: 48 4F 49 43 45 3F 20 28 31 2D 33 29 20 22 00 B8 |HOICE? (1-3) "..|
000009B0: 11 EC 13 8D 33 32 30 30 00 D0 11 F6 13 4C 4F B2 |....3200.....LO.|
000009C0: 31 3A 48 49 B2 33 3A 8D 32 31 30 30 3A 99 41 24 |1:HI.3:.2100:.A$|
000009D0: 00 DF 11 00 14 4F 50 B2 41 3A 48 49 B2 32 30 00 |.....OP.A:HI.20.|
000009E0: EE 11 0A 14 8B 4F 50 B2 31 A7 48 49 B2 35 00 F9 |.....OP.1.HI.5..|
000009F0: 11 14 14 8D 20 33 36 30 30 00 2A 12 1E 14 56 B2 |.... 3600.*...V.|
00000A00: 31 30 3A 48 B2 30 3A 54 58 24 B2 22 C8 4F 57 20 |10:H.0:TX$.".OW |
00000A10: 4D 41 4E 59 20 50 52 4F 42 4C 45 4D 53 20 44 4F |MANY PROBLEMS DO|
00000A20: 20 59 4F 55 20 57 41 4E 54 22 00 34 12 28 14 8D | YOU WANT".4.(..|
00000A30: 33 32 30 30 00 5A 12 32 14 56 B2 31 31 3A 54 58 |3200.Z.2.V.11:TX|
00000A40: 24 B2 22 54 4F 20 44 4F 3F 20 28 32 20 2D 22 AA |$."TO DO? (2 -".|
00000A50: C4 28 48 49 29 AA 22 29 20 22 00 68 12 3C 14 48 |.(HI).") ".h.<.H|
00000A60: B2 35 3A 8D 33 32 30 30 00 70 12 46 14 85 4E 50 |.5:.3200.p.F..NP|
00000A70: 00 8D 12 50 14 8B 4E 50 B3 4C 4F B0 4E 50 B1 48 |...P..NP.LO.NP.H|
00000A80: 49 A7 20 4E 50 B2 30 3A 89 35 31 37 30 00 C6 12 |I. NP.0:.5170...|
00000A90: 5A 14 56 B2 31 33 3A 54 58 24 B2 22 C8 4F 57 20 |Z.V.13:TX$.".OW |
00000AA0: 4D 41 4E 59 20 44 49 47 49 54 53 20 49 4E 20 54 |MANY DIGITS IN T|
00000AB0: 48 45 20 4C 41 52 47 45 53 54 22 3A 48 B2 30 3A |HE LARGEST":H.0:|
00000AC0: 8D 20 33 32 30 30 00 F0 12 64 14 56 B2 31 34 3A |. 3200...d.V.14:|
00000AD0: 48 B2 35 3A 54 58 24 B2 22 4E 55 4D 42 45 52 3F |H.5:TX$."NUMBER?|
00000AE0: 20 20 28 34 2D 35 29 20 22 3A 8D 20 33 32 30 30 | (4-5) ":. 3200|
00000AF0: 00 08 13 82 14 4C 4F B2 34 3A 48 49 B2 35 3A 8D |.....LO.4:HI.5:.|
00000B00: 32 31 30 30 3A 99 41 24 00 13 13 8C 14 4E 31 B2 |2100:.A$.....N1.|
00000B10: 41 AA 31 00 1C 13 BE 14 4E 32 B2 32 00 22 13 0E |A.1.....N2.2."..|
00000B20: 15 8E 00 3C 13 58 1B 8F 20 4F 50 54 49 4F 4E 20 |...<.X.. OPTION |
00000B30: 31 20 2D 20 4D 55 4C 54 49 50 4C 59 00 65 13 62 |1 - MULTIPLY.e.b|
00000B40: 1B 56 B2 39 3A 48 B2 33 38 AB C3 28 53 45 24 28 |.V.9:H.38..(SE$(|
00000B50: 31 29 29 3A 54 58 24 B2 53 45 24 28 31 29 3A 8D |1)):TX$.SE$(1):.|
00000B60: 20 33 32 30 30 00 8F 13 6C 1B 56 B2 31 30 3A 48 | 3200...l.V.10:H|
00000B70: B2 33 38 AB C3 28 53 45 24 28 32 29 29 3A 54 58 |.38..(SE$(2)):TX|
00000B80: 24 B2 53 45 24 28 32 29 3A 8D 20 33 32 30 30 00 |$.SE$(2):. 3200.|
00000B90: CE 13 71 1B 56 B2 31 31 3A 48 B2 33 37 AB C3 28 |..q.V.11:H.37..(|
00000BA0: 53 45 24 28 31 29 29 3A 54 58 24 B2 22 C0 C0 C0 |SE$(1)):TX$."...|
00000BB0: C0 C0 C0 C0 C0 C0 C0 22 3A 8B 20 4E 31 B2 33 20 |.......":. N1.3 |
00000BC0: A7 20 54 58 24 B2 C8 28 54 58 24 2C 38 29 00 E9 |. TX$..(TX$,8)..|
00000BD0: 13 76 1B 8D 20 33 32 30 30 20 3A 20 8B 20 4F 50 |.v.. 3200 : . OP|
00000BE0: B2 33 20 A7 20 39 30 30 30 00 0F 14 80 1B 56 56 |.3 . 9000.....VV|
00000BF0: B2 30 3A 81 20 49 49 B2 33 20 A4 20 31 20 A9 20 |.0:. II.3 . 1 . |
00000C00: AB 32 20 3A 56 B2 31 32 AA 56 56 3A 48 B2 30 00 |.2 :V.12.VV:H.0.|
00000C10: 2E 14 83 1B 4D 55 B2 C5 28 CA 28 53 45 24 28 32 |....MU..(.(SE$(2|
00000C20: 29 2C 49 49 2C 31 29 29 3A 20 4A 4B B2 31 00 72 |),II,1)): JK.1.r|
00000C30: 14 85 1B 56 B2 31 32 AA 56 56 3A 48 B2 30 3A 54 |...V.12.VV:H.0:T|
00000C40: 58 24 B2 22 CD 55 4C 54 49 50 4C 59 22 AA 53 24 |X$.".ULTIPLY".S$|
00000C50: 28 31 29 AA 22 1D 42 59 22 AA C4 28 4D 55 AC 28 |(1).".BY"..(MU.(|
00000C60: 31 30 AE 56 56 29 29 AA 22 2E 22 3A 8D 20 33 32 |10.VV)).".":. 32|
00000C70: 30 30 00 85 14 86 1B 44 45 4C 41 59 B2 33 3A 8D |00.....DELAY.3:.|
00000C80: 20 32 30 30 30 00 C0 14 87 1B 81 20 4A 4A B2 4E | 2000...... JJ.N|
00000C90: 28 31 29 A4 20 31 20 A9 AB 31 20 3A 20 56 B2 31 |(1). 1 ..1 : V.1|
00000CA0: 38 3A 48 B2 30 3A 54 58 24 B2 45 52 24 3A 8D 20 |8:H.0:TX$.ER$:. |
00000CB0: 33 32 30 30 3A 56 B2 31 36 3A 8D 20 33 32 30 30 |3200:V.16:. 3200|
00000CC0: 00 D0 14 88 1B 56 B2 32 30 3A 8D 20 33 32 30 30 |.....V.20:. 3200|
00000CD0: 00 FE 14 89 1B 56 B2 31 36 3A 48 B2 30 3A 54 58 |.....V.16:H.0:TX|
00000CE0: 24 B2 22 05 CD 55 4C 54 49 50 4C 59 20 54 48 45 |$."..ULTIPLY THE|
00000CF0: 20 22 AA 4D 55 24 28 4A 4B 29 AA 22 2E 22 00 21 | ".MU$(JK).".".!|
00000D00: 15 8A 1B 8D 20 33 32 30 30 3A 8B 20 4F 50 B2 31 |.... 3200:. OP.1|
00000D10: 20 A7 20 44 45 4C 41 59 B2 31 3A 8D 20 32 30 30 | . DELAY.1:. 200|
00000D20: 30 00 61 15 8E 1B 56 B2 31 38 3A 48 B2 30 3A 54 |0.a...V.18:H.0:T|
00000D30: 58 24 B2 C4 28 4D 55 29 AA 22 20 58 22 AA C4 28 |X$..(MU)." X"..(|
00000D40: 44 28 4A 4A 29 29 3A 8B 20 43 41 B3 B1 30 20 A7 |D(JJ)):. CA..0 .|
00000D50: 20 54 58 24 B2 54 58 24 AA 22 20 2B 22 AA 43 41 | TX$.TX$." +".CA|
00000D60: 24 00 95 15 8F 1B 41 4E B2 4D 55 AC 44 28 4A 4A |$.....AN.MU.D(JJ|
00000D70: 29 AA 43 41 3A 43 41 B2 B5 28 41 4E AD 31 30 29 |).CA:CA..(AN.10)|
00000D80: 20 3A 43 41 24 B2 C4 28 43 41 29 3A 41 4E 24 B2 | :CA$..(CA):AN$.|
00000D90: C4 28 41 4E 29 00 C5 15 90 1B 56 B2 31 38 3A 48 |.(AN).....V.18:H|
00000DA0: B2 30 3A 54 58 24 B2 54 58 24 AA 22 20 3D 22 3A |.0:TX$.TX$." =":|
00000DB0: 8B 20 4F 50 B2 31 20 A7 20 54 58 24 B2 54 58 24 |. OP.1 . TX$.TX$|
00000DC0: AA 20 41 4E 24 00 DF 15 92 1B 8D 20 33 32 30 30 |. AN$...... 3200|
00000DD0: 3A 8B 20 4F 50 B2 31 20 A7 8D 20 32 30 30 30 00 |:. OP.1 .. 2000.|
00000DE0: 11 16 94 1B 56 4A B2 31 32 AA 56 56 3A 48 4A B2 |....VJ.12.VV:HJ.|
00000DF0: 33 36 AB 28 56 56 AC 32 29 AB 28 4A 4B AC 32 29 |36.(VV.2).(JK.2)|
00000E00: 3A 8B 20 43 41 B2 30 20 A7 20 48 4A B2 48 4A AA |:. CA.0 . HJ.HJ.|
00000E10: 31 00 23 16 95 1B 8B 20 4F 50 B2 31 20 A7 20 37 |1.#.... OP.1 . 7|
00000E20: 30 38 30 00 2C 16 99 1B 85 20 54 54 00 41 16 9E |080.,.... TT.A..|
00000E30: 1B 8B 20 54 54 B2 41 4E 20 A7 20 8D 20 38 30 30 |.. TT.AN . . 800|
00000E40: 30 00 5D 16 A8 1B 54 58 24 B2 41 4E 24 3A 48 48 |0.]...TX$.AN$:HH|
00000E50: B2 48 4A 3A 48 B2 48 4A 3A 56 B2 56 4A 00 70 16 |.HJ:H.HJ:V.VJ.p.|
00000E60: B2 1B 8D 20 33 32 30 30 20 3A 8D 20 32 30 30 30 |... 3200 :. 2000|
00000E70: 00 82 16 B3 1B 8B 20 43 41 B2 30 20 A7 20 37 31 |...... CA.0 . 71|
00000E80: 35 30 00 AE 16 B7 1B 54 58 24 B2 22 C3 41 52 52 |50.....TX$.".ARR|
00000E90: 59 20 54 48 45 22 AA 43 41 24 AA 22 2E 22 3A 56 |Y THE".CA$.".":V|
00000EA0: B2 32 30 3A 48 B2 30 3A 8D 20 33 32 30 30 00 D9 |.20:H.0:. 3200..|
00000EB0: 16 BC 1B 54 58 24 B2 22 1E 22 AA 20 20 43 41 24 |...TX$.".". CA$|
00000EC0: 3A 56 B2 38 3A 48 B2 48 48 AB 31 AA 28 56 56 AC |:V.8:H.HH.1.(VV.|
00000ED0: 32 29 3A 8D 20 33 32 30 30 00 FB 16 C6 1B 54 58 |2):. 3200.....TX|
00000EE0: 24 B2 22 05 20 20 22 3A 56 B2 31 32 AA 56 56 3A |$.". ":V.12.VV:|
00000EF0: 48 B2 48 48 3A 8D 20 33 32 30 30 00 17 17 EE 1B |H.HH:. 3200.....|
00000F00: 4A 4B B2 4A 4B AA 31 3A 44 45 4C 41 59 B2 33 3A |JK.JK.1:DELAY.3:|
00000F10: 20 8D 20 32 30 30 30 00 47 17 F3 1B 82 20 4A 4A | . 2000.G.... JJ|
00000F20: 3A 8B 20 43 41 B3 B1 30 20 A7 56 B2 31 32 AA 56 |:. CA..0 .V.12.V|
00000F30: 56 3A 48 B2 48 48 AB 31 3A 54 58 24 B2 43 41 24 |V:H.HH.1:TX$.CA$|
00000F40: 3A 8D 20 33 32 30 30 00 84 17 F8 1B 56 56 B2 56 |:. 3200.....VV.V|
00000F50: 56 AA 31 3A 54 58 24 B2 45 52 24 3A 56 B2 38 3A |V.1:TX$.ER$:V.8:|
00000F60: 48 B2 31 30 3A 8D 20 33 32 30 30 3A 43 41 B2 30 |H.10:. 3200:CA.0|
00000F70: 3A 8D 20 33 31 30 30 3A 56 B2 32 34 3A 54 58 24 |:. 3100:V.24:TX$|
00000F80: B2 45 52 24 00 9E 17 FD 1B 8D 20 33 30 30 30 3A |.ER$...... 3000:|
00000F90: 20 20 20 8D 20 33 32 30 30 3A 82 20 49 49 00 C3 | . 3200:. II..|
00000FA0: 17 02 1C 56 B2 31 32 AA 56 56 3A 48 B2 48 48 AB |...V.12.VV:H.HH.|
00000FB0: 31 3A 54 58 24 B2 22 C0 C0 C0 C0 C0 C0 C0 C0 C0 |1:TX$.".........|
00000FC0: C0 C0 22 00 DE 17 07 1C 8B 20 4E 31 B1 B2 34 20 |.."...... N1..4 |
00000FD0: A7 20 54 58 24 B2 54 58 24 AA 22 C0 C0 22 00 11 |. TX$.TX$.".."..|
00000FE0: 18 0C 1C 8D 20 33 32 30 30 20 3A 81 20 56 B2 31 |.... 3200 :. V.1|
00000FF0: 36 20 A4 20 32 30 20 A9 20 32 3A 48 B2 30 3A 54 |6 . 20 . 2:H.0:T|
00001000: 58 24 B2 45 52 24 3A 8D 20 33 32 30 30 3A 82 20 |X$.ER$:. 3200:. |
00001010: 56 00 3F 18 11 1C 56 B2 31 36 3A 54 58 24 B2 22 |V.?...V.16:TX$."|
00001020: CE 4F 57 20 41 44 44 3A 22 3A 8D 20 33 32 30 30 |.OW ADD:":. 3200|
00001030: 20 3A 8B 20 4F 50 B2 31 20 A7 20 37 32 31 30 00 | :. OP.1 . 7210.|
00001040: 65 18 16 1C 8B 20 4F 50 B2 32 20 A7 20 53 24 B2 |e.... OP.2 . S$.|
00001050: 53 45 24 28 37 29 3A 8D 20 31 34 30 30 30 3A 89 |SE$(7):. 14000:.|
00001060: 20 37 32 34 30 00 A6 18 2A 1C 56 B2 31 36 3A 48 | 7240...*.V.16:H|
00001070: 48 B2 33 36 20 3A 81 20 4A 4A B2 C3 28 53 45 24 |H.36 :. JJ..(SE$|
00001080: 28 37 29 29 AB 31 20 A4 20 31 20 A9 AB 32 3A 48 |(7)).1 . 1 ..2:H|
00001090: B2 48 48 3A 54 58 24 B2 CA 28 53 45 24 28 37 29 |.HH:TX$..(SE$(7)|
000010A0: 2C 4A 4A 2C 31 29 00 C8 18 34 1C 8D 20 33 32 30 |,JJ,1)...4.. 320|
000010B0: 30 3A 44 45 4C 41 59 B2 32 3A 8D 20 32 30 30 30 |0:DELAY.2:. 2000|
000010C0: 3A 48 48 B2 48 48 AB 32 00 D1 18 3E 1C 82 20 4A |:HH.HH.2...>.. J|
000010D0: 4A 00 D7 18 48 1C 8E 00 EA 18 40 1F 52 57 B2 B5 |J...H.....@.RW..|
000010E0: 28 BB 28 30 29 AC 36 29 AA 31 00 F5 18 4A 1F 81 |(.(0).6).1...J..|
000010F0: 4A B2 31 A4 32 00 1A 19 54 1F 3A 56 B2 32 30 3A |J.1.2...T.:V.20:|
00001100: 48 B2 35 20 20 3A 54 58 24 B2 C7 28 43 4F 28 4A |H.5 :TX$..(CO(J|
00001110: 29 29 AA 52 57 24 28 52 57 29 00 24 19 5E 1F 8D |)).RW$(RW).$.^..|
00001120: 33 32 30 30 00 37 19 68 1F 44 45 4C 41 59 B2 2E |3200.7.h.DELAY..|
00001130: 37 3A 8D 32 30 30 30 00 4F 19 72 1F 3A 54 58 24 |7:.2000.O.r.:TX$|
00001140: B2 C7 28 35 29 AA 45 52 24 3A 8D 33 32 30 30 00 |..(5).ER$:.3200.|
00001150: 62 19 7C 1F 44 45 4C 41 59 B2 2E 33 3A 8D 32 30 |b.|.DELAY..3:.20|
00001160: 30 30 00 6C 19 86 1F 82 4A 20 3A 8E 00 8D 19 28 |00.l....J :....(|
00001170: 23 56 B2 31 35 3A 48 B2 30 20 3A 54 58 24 B2 22 |#V.15:H.0 :TX$."|
00001180: D9 4F 55 52 20 41 4E 53 57 45 52 3A 22 00 97 19 |.OUR ANSWER:"...|
00001190: 32 23 8D 33 32 30 30 00 9F 19 3C 23 85 41 4E 00 |2#.3200...<#.AN.|
000011A0: B7 19 46 23 8B B5 28 41 4E 29 B2 B5 28 53 28 37 |..F#..(AN)..(S(7|
000011B0: 29 29 A7 39 30 38 30 00 C3 19 50 23 4D 49 B2 4D |)).9080...P#MI.M|
000011C0: 49 AA 31 00 F8 19 5A 23 56 B2 31 37 3A 54 58 24 |I.1...Z#V.17:TX$|
000011D0: B2 22 D4 48 45 20 43 4F 52 52 45 43 54 20 41 4E |.".HE CORRECT AN|
000011E0: 53 57 45 52 20 49 53 20 22 AA 53 24 28 37 29 AA |SWER IS ".S$(7).|
000011F0: 22 2E 22 20 3A 48 B2 30 00 02 1A 64 23 8D 33 32 |"." :H.0...d#.32|
00001200: 30 30 00 0D 1A 6E 23 89 20 39 31 38 30 00 20 1A |00...n#. 9180. .|
00001210: 78 23 52 57 B2 B5 28 BB 28 30 29 AC 36 29 AA 31 |x#RW..(.(0).6).1|
00001220: 00 2B 1A 82 23 81 4A B2 31 A4 35 00 4A 1A 8C 23 |.+..#.J.1.5.J..#|
00001230: 3A 56 B2 32 30 3A 54 58 24 B2 C7 28 43 4F 28 4A |:V.20:TX$..(CO(J|
00001240: 29 29 AA 52 57 24 28 52 57 29 00 5B 1A 96 23 3A |)).RW$(RW).[..#:|
00001250: 8D 33 30 30 30 3A 8D 33 32 30 30 00 6E 1A A0 23 |.3000:.3200.n..#|
00001260: 44 45 4C 41 59 B2 2E 37 3A 8D 32 30 30 30 00 7B |DELAY..7:.2000.{|
00001270: 1A AA 23 3A 54 58 24 B2 45 52 24 00 8C 1A B4 23 |..#:TX$.ER$....#|
00001280: 3A 8D 33 30 30 30 3A 8D 33 32 30 30 00 9F 1A BE |:.3000:.3200....|
00001290: 23 44 45 4C 41 59 B2 2E 33 3A 8D 32 30 30 30 00 |#DELAY..3:.2000.|
000012A0: A6 1A C8 23 82 4A 00 AC 1A DC 23 8E 00 CC 1A 10 |...#.J....#.....|
000012B0: 27 8F 20 2A 2A 2A 20 44 4F 20 53 50 52 49 54 45 |'. *** DO SPRITE|
000012C0: 59 20 54 48 49 4E 47 53 20 2A 2A 2A 00 DE 1A 11 |Y THINGS ***....|
000012D0: 27 81 20 49 B2 37 30 34 20 A4 20 37 36 37 00 EA |'. I.704 . 767..|
000012E0: 1A 12 27 87 58 3A 97 49 2C 58 00 F0 1A 13 27 82 |..'.X:.I,X....'.|
000012F0: 00 FD 1A 14 27 97 32 30 34 30 2C 31 31 00 13 1B |....'.2040,11...|
00001300: 15 27 97 35 33 32 36 39 2C C2 28 35 33 32 36 39 |.'.53269,.(53269|
00001310: 29 B0 31 00 36 1B 16 27 97 35 33 32 38 37 2C 32 |).1.6..'.53287,2|
00001320: 3A 97 35 33 32 37 37 2C 32 35 35 3A 97 35 33 32 |:.53277,255:.532|
00001330: 37 31 2C 32 35 35 00 4E 1B 17 27 97 35 33 32 34 |71,255.N..'.5324|
00001340: 38 2C 33 30 3A 97 35 33 32 34 39 2C 35 38 00 54 |8,30:.53249,58.T|
00001350: 1B 18 27 8E 00 7C 1B 19 27 83 32 35 32 2C 32 35 |..'..|..'.252,25|
00001360: 32 2C 32 35 32 2C 31 32 31 2C 32 34 39 2C 32 34 |2,252,121,249,24|
00001370: 38 2C 35 31 2C 32 34 33 2C 32 34 30 00 A0 1B 1A |8,51,243,240....|
00001380: 27 83 37 2C 32 33 31 2C 32 32 34 2C 31 35 2C 32 |'.7,231,224,15,2|
00001390: 30 37 2C 31 39 32 2C 37 2C 31 35 39 2C 31 32 38 |07,192,7,159,128|
000013A0: 00 BC 1B 1B 27 83 33 2C 36 33 2C 30 2C 30 2C 31 |....'.3,63,0,0,1|
000013B0: 32 36 2C 30 2C 30 2C 32 35 32 2C 30 00 D6 1B 1C |26,0,0,252,0....|
000013C0: 27 83 30 2C 31 32 30 2C 30 2C 30 2C 34 38 2C 30 |'.0,120,0,0,48,0|
000013D0: 2C 30 2C 30 2C 30 00 13 1C 1D 27 83 30 2C 30 2C |,0,0,0....'.0,0,|
000013E0: 30 2C 30 2C 30 2C 30 2C 30 2C 30 2C 30 2C 30 2C |0,0,0,0,0,0,0,0,|
000013F0: 30 2C 30 2C 30 2C 30 2C 30 2C 30 2C 30 2C 30 2C |0,0,0,0,0,0,0,0,|
00001400: 30 2C 30 2C 30 2C 30 2C 30 2C 30 2C 30 2C 30 2C |0,0,0,0,0,0,0,0,|
00001410: 30 2C 30 00 2E 1C F8 2A 8F 20 2A 2A 2A 20 53 45 |0,0....*. *** SE|
00001420: 45 20 45 58 41 4D 50 4C 45 53 20 2A 2A 2A 00 52 |E EXAMPLES ***.R|
00001430: 1C 02 2B 56 B2 31 31 3A 48 B2 31 33 3A 54 58 24 |..+V.11:H.13:TX$|
00001440: B2 22 DD 91 9D B0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |."..............|
00001450: C0 22 00 5C 1C 0C 2B 8D 33 32 30 30 00 75 1C DE |.".\..+.3200.u..|
00001460: 2B 56 B2 31 31 3A 48 B2 20 38 3A 54 58 24 B2 53 |+V.11:H. 8:TX$.S|
00001470: 45 24 28 32 29 00 7F 1C E8 2B 8D 33 32 30 30 00 |E$(2)....+.3200.|
00001480: 92 1C ED 2B 44 45 4C 41 59 B2 2E 35 3A 8D 32 30 |...+DELAY..5:.20|
00001490: 30 30 00 AB 1C F2 2B 56 B2 31 31 3A 48 B2 31 35 |00....+V.11:H.15|
000014A0: 3A 54 58 24 B2 53 45 24 28 31 29 00 B5 1C FC 2B |:TX$.SE$(1)....+|
000014B0: 8D 33 32 30 30 00 C7 1C 01 2C 44 45 4C 41 59 B2 |.3200....,DELAY.|
000014C0: 31 3A 8D 32 30 30 30 00 EC 1C 06 2C 56 B2 31 35 |1:.2000....,V.15|
000014D0: 3A 48 B2 30 3A 54 58 24 B2 22 CD 41 4B 45 20 41 |:H.0:TX$.".AKE A|
000014E0: 20 53 4B 49 50 20 43 4F 55 4E 54 22 00 F6 1C 10 | SKIP COUNT"....|
000014F0: 2C 8D 33 32 30 30 00 09 1D 15 2C 44 45 4C 41 59 |,.3200....,DELAY|
00001500: B2 31 20 3A 8D 32 30 30 30 00 14 1D 1A 2C 81 4A |.1 :.2000....,.J|
00001510: B2 30 A4 39 00 25 1D 24 2C 3A 56 B2 31 30 AA 4A |.0.9.%.$,:V.10.J|
00001520: 3A 48 B2 32 39 00 50 1D 2E 2C 3A 54 58 24 B2 C4 |:H.29.P..,:TX$..|
00001530: 28 4A 29 AA 22 58 22 AA C9 28 53 24 28 32 29 2C |(J)."X"..(S$(2),|
00001540: 32 29 AA 22 3D 22 AA C4 28 4A AC 53 28 32 29 29 |2)."="..(J.S(2))|
00001550: 00 5B 1D 38 2C 3A 8D 33 32 30 30 00 62 1D 42 2C |.[.8,:.3200.b.B,|
00001560: 82 4A 00 74 1D 47 2C 44 45 4C 41 59 B2 31 3A 8D |.J.t.G,DELAY.1:.|
00001570: 32 30 30 30 00 8E 1D 4C 2C 81 4B B2 31 A4 28 C3 |2000...L,.K.1.(.|
00001580: 28 53 24 28 31 29 29 AB 31 29 AC 32 A9 32 00 B9 |(S$(1)).1).2.2..|
00001590: 1D 51 2C 8B 20 4B B3 B1 31 20 A7 20 48 B2 31 31 |.Q,. K..1 . H.11|
000015A0: 3A 56 B2 31 37 3A 54 58 24 B2 C4 28 53 31 28 4B |:V.17:TX$..(S1(K|
000015B0: 29 29 3A 8D 20 33 32 30 30 00 D9 1D 53 2C 56 B2 |)):. 3200...S,V.|
000015C0: 31 32 3A 48 B2 31 35 AA 4B AB 31 3A 54 58 24 B2 |12:H.15.K.1:TX$.|
000015D0: 22 20 22 3A 8D 33 32 30 30 00 EB 1D 54 2C 44 45 |" ":.3200...T,DE|
000015E0: 4C 41 59 B2 32 3A 8D 32 30 30 30 00 06 1E 55 2C |LAY.2:.2000...U,|
000015F0: 48 B2 30 3A 56 B2 31 35 3A 54 58 24 B2 45 52 24 |H.0:V.15:TX$.ER$|
00001600: 3A 8D 33 32 30 30 00 1A 1E 56 2C 3A 58 B2 53 31 |:.3200...V,:X.S1|
00001610: 28 4B AA 31 29 AD 53 28 32 29 00 54 1E 60 2C 3A |(K.1).S(2).T.`,:|
00001620: 56 B2 31 35 3A 48 B2 30 3A 54 58 24 B2 22 C8 4F |V.15:H.0:TX$.".O|
00001630: 57 20 4D 41 4E 59 22 AA 53 24 28 32 29 AA 22 27 |W MANY".S$(2)."'|
00001640: 53 20 49 4E 22 AA C4 28 53 31 28 4B 29 29 AA 22 |S IN"..(S1(K))."|
00001650: 3F 20 20 22 00 6D 1E 65 2C 8D 33 32 30 30 3A 8B |? ".m.e,.3200:.|
00001660: 20 4F 50 B2 32 20 A7 20 31 31 33 37 30 00 9D 1E | OP.2 . 11370...|
00001670: 68 2C 3A 56 B2 31 30 AA 58 3A 48 B2 32 38 3A 54 |h,:V.10.X:H.28:T|
00001680: 58 24 B2 22 C0 3E 22 3A 8D 20 33 32 30 30 3A 44 |X$.".>":. 3200:D|
00001690: 45 4C 41 59 B2 32 3A 8D 20 32 30 30 30 00 B1 1E |ELAY.2:. 2000...|
000016A0: 69 2C 3A 54 58 24 B2 22 20 20 22 3A 8D 33 32 30 |i,:TX$." ":.320|
000016B0: 30 00 D9 1E 6A 2C 3A 56 B2 39 3A 48 B2 31 35 AA |0...j,:V.9:H.15.|
000016C0: 4B AB 31 3A 54 58 24 B2 C9 28 C4 28 58 29 2C C3 |K.1:TX$..(.(X),.|
000016D0: 28 C4 28 58 29 29 AB 31 29 00 EB 1E 74 2C 3A 8B |(.(X)).1)...t,:.|
000016E0: 4F 50 B2 32 A7 8D 31 35 30 30 30 00 F6 1E 7E 2C |OP.2..15000...~,|
000016F0: 3A 8D 33 32 30 30 00 11 1F 83 2C 8B 20 4F 50 B2 |:.3200....,. OP.|
00001700: 31 20 A7 20 44 45 4C 41 59 B2 33 3A 8D 32 30 30 |1 . DELAY.3:.200|
00001710: 30 00 1F 1F A6 2C 3A 56 B2 31 37 3A 48 B2 30 00 |0....,:V.17:H.0.|
00001720: 36 1F AB 2C 53 B2 B5 28 53 31 28 4B 29 AB 53 31 |6..,S..(S1(K).S1|
00001730: 28 4B AA 31 29 29 00 70 1F B0 2C 3A 54 58 24 B2 |(K.1)).p..,:TX$.|
00001740: 22 D3 55 42 54 52 41 43 54 3A 20 20 22 AA C4 28 |".UBTRACT: "..(|
00001750: 53 31 28 4B 29 29 AA 22 20 2D 22 AA C4 28 53 31 |S1(K))." -"..(S1|
00001760: 28 4B AA 31 29 29 AA 22 20 3D 22 AA C4 28 53 29 |(K.1))." ="..(S)|
00001770: 00 7B 1F BA 2C 3A 8D 33 32 30 30 00 8D 1F BC 2C |.{..,:.3200....,|
00001780: 44 45 4C 41 59 B2 33 3A 8D 32 30 30 30 00 AC 1F |DELAY.3:.2000...|
00001790: BF 2C 3A 8B 4B AA 31 B2 28 C3 28 53 24 28 31 29 |.,:.K.1.(.(S$(1)|
000017A0: 29 AB 31 29 AC 32 A7 31 31 35 31 30 00 C8 1F C2 |).1).2.11510....|
000017B0: 2C 48 B2 30 3A 56 B2 31 37 3A 54 58 24 B2 45 52 |,H.0:V.17:TX$.ER|
000017C0: 24 3A 8D 20 33 32 30 30 00 E6 1F C3 2C 48 B2 31 |$:. 3200....,H.1|
000017D0: 31 3A 56 B2 31 37 3A 54 58 24 B2 C4 28 53 29 3A |1:V.17:TX$..(S):|
000017E0: 8D 20 33 32 30 30 00 15 20 C4 2C 3A 56 B2 31 35 |. 3200.. .,:V.15|
000017F0: 3A 48 B2 30 3A 54 58 24 B2 22 C2 52 49 4E 47 20 |:H.0:TX$.".RING |
00001800: 44 4F 57 4E 20 54 48 45 20 4E 45 58 54 20 4E 55 |DOWN THE NEXT NU|
00001810: 4D 42 45 52 22 00 20 20 CE 2C 3A 8D 33 32 30 30 |MBER". .,:.3200|
00001820: 00 3B 20 D8 2C 3A 56 B2 31 32 3A 48 B2 31 35 AA |.; .,:V.12:H.15.|
00001830: 4B AA 31 3A 54 58 24 B2 22 5E 22 00 60 20 E2 2C |K.1:TX$."^".` .,|
00001840: 3A 8D 33 32 30 30 3A 8B 20 4F 50 B2 32 20 A7 20 |:.3200:. OP.2 . |
00001850: 4C 4F B2 30 3A 48 49 B2 39 3A 8D 20 32 31 31 30 |LO.0:HI.9:. 2110|
00001860: 00 7A 20 E7 2C 8B 20 4F 50 B2 31 20 A7 44 45 4C |.z .,. OP.1 .DEL|
00001870: 41 59 B2 35 3A 8D 32 30 30 30 00 8D 20 EC 2C 3A |AY.5:.2000.. .,:|
00001880: 54 58 24 B2 22 20 22 3A 8D 33 32 30 30 00 A8 20 |TX$." ":.3200.. |
00001890: EE 2C 48 B2 30 3A 56 B2 31 37 3A 54 58 24 B2 45 |.,H.0:V.17:TX$.E|
000018A0: 52 24 3A 8D 33 32 30 30 00 AF 20 F6 2C 82 4B 00 |R$:.3200.. .,.K.|
000018B0: E3 20 FB 2C 48 B2 30 3A 56 B2 31 39 3A 54 58 24 |. .,H.0:V.19:TX$|
000018C0: B2 22 D4 48 45 20 52 45 4D 41 49 4E 44 45 52 20 |.".HE REMAINDER |
000018D0: 49 53 22 AA C4 28 53 29 AA 22 2E 22 3A 8D 20 33 |IS"..(S).".":. 3|
000018E0: 32 30 30 00 E9 20 00 2D 8E 00 0A 21 B0 36 8F 20 |200.. .-...!.6. |
000018F0: 2A 2A 2A 20 45 58 41 4D 50 4C 45 53 20 57 49 54 |*** EXAMPLES WIT|
00001900: 48 20 48 45 4C 50 20 2A 2A 2A 00 25 21 BA 36 3A |H HELP ***.%!.6:|
00001910: 56 31 B2 31 36 3A 48 31 B2 33 36 3A 53 24 B2 53 |V1.16:H1.36:S$.S|
00001920: 45 24 28 37 29 00 3A 21 C4 36 81 4A B2 C3 28 53 |E$(7).:!.6.J..(S|
00001930: 24 29 AB 31 20 A4 31 A9 AB 32 00 59 21 CE 36 56 |$).1 .1..2.Y!.6V|
00001940: B2 56 31 AA 31 3A 48 B2 48 31 3A 54 58 24 B2 22 |.V1.1:H.H1:TX$."|
00001950: 5E 22 3A 8D 20 33 32 30 30 00 6C 21 E2 36 3A 59 |^":. 3200.l!.6:Y|
00001960: B2 30 3A 4C 4F B2 30 3A 48 49 B2 39 00 77 21 EC |.0:LO.0:HI.9.w!.|
00001970: 36 3A 8D 32 31 30 30 00 90 21 F6 36 3A 8B 41 24 |6:.2100..!.6:.A$|
00001980: B2 CA 28 53 24 2C 4A 2C 31 29 A7 31 34 31 35 30 |..(S$,J,1).14150|
00001990: 00 A6 21 00 37 3A 59 B2 59 AA 31 3A 8B 59 B3 33 |..!.7:Y.Y.1:.Y.3|
000019A0: A7 31 34 30 36 30 00 D6 21 0A 37 3A 56 B2 32 33 |.14060..!.7:V.23|
000019B0: 3A 54 58 24 B2 22 12 C5 4E 54 45 52 20 41 20 22 |:TX$."..NTER A "|
000019C0: AA CA 28 53 24 2C 4A 2C 31 29 AA 22 20 50 4C 45 |..(S$,J,1)." PLE|
000019D0: 41 53 45 2E 92 22 00 E7 21 14 37 3A 8D 33 30 30 |ASE.."..!.7:.300|
000019E0: 30 3A 8D 33 32 30 30 00 05 22 1E 37 3A 54 58 24 |0:.3200..".7:TX$|
000019F0: B2 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |." |
00001A00: 20 20 20 20 22 00 1A 22 28 37 3A 44 45 4C 41 59 | ".."(7:DELAY|
00001A10: B2 31 2E 35 3A 8D 32 30 30 30 00 2C 22 32 37 3A |.1.5:.2000.,"27:|
00001A20: 8D 33 32 30 30 3A 89 31 34 30 36 30 00 32 22 3C |.3200:.14060.2"<|
00001A30: 37 3A 00 4F 22 46 37 3A 56 B2 56 31 3A 48 B2 48 |7:.O"F7:V.V1:H.H|
00001A40: 31 3A 54 58 24 B2 CA 28 53 24 2C 4A 2C 31 29 00 |1:TX$..(S$,J,1).|
00001A50: 78 22 50 37 3A 8D 33 32 30 30 3A 56 B2 56 31 AA |x"P7:.3200:V.V1.|
00001A60: 31 3A 54 58 24 B2 22 20 22 3A 8D 20 33 32 30 30 |1:TX$." ":. 3200|
00001A70: 3A 48 31 B2 48 31 AB 32 00 7F 22 6E 37 82 4A 00 |:H1.H1.2.."n7.J.|
00001A80: 85 22 82 37 8E 00 A6 22 98 3A 8F 20 2A 2A 2A 20 |.".7...".:. *** |
00001A90: 45 58 41 4D 50 4C 45 53 20 57 49 54 48 20 48 45 |EXAMPLES WITH HE|
00001AA0: 4C 50 20 2A 2A 2A 00 BD 22 A2 3A 3A 56 31 B2 56 |LP ***..".::V1.V|
00001AB0: 3A 48 31 B2 48 3A 54 31 24 B2 54 58 24 00 C8 22 |:H1.H:T1$.TX$.."|
00001AC0: A7 3A 53 24 B2 54 58 24 00 DB 22 AC 3A 81 4A B2 |.:S$.TX$..".:.J.|
00001AD0: 31 A4 C3 28 53 24 29 AB 31 A9 32 00 EE 22 CA 3A |1..(S$).1.2..".:|
00001AE0: 3A 59 B2 30 3A 4C 4F B2 30 3A 48 49 B2 39 00 F9 |:Y.0:LO.0:HI.9..|
00001AF0: 22 D4 3A 3A 8D 32 31 30 30 00 12 23 DE 3A 3A 8B |".::.2100..#.::.|
00001B00: 41 24 B2 CA 28 53 24 2C 4A 2C 31 29 A7 31 35 31 |A$..(S$,J,1).151|
00001B10: 35 30 00 28 23 E8 3A 3A 59 B2 59 AA 31 3A 8B 59 |50.(#.::Y.Y.1:.Y|
00001B20: B3 33 A7 31 35 30 36 30 00 58 23 F2 3A 3A 56 B2 |.3.15060.X#.::V.|
00001B30: 32 33 3A 54 58 24 B2 22 12 C5 4E 54 45 52 20 41 |23:TX$."..NTER A|
00001B40: 20 22 AA CA 28 53 24 2C 4A 2C 31 29 AA 22 20 50 | "..(S$,J,1)." P|
00001B50: 4C 45 41 53 45 2E 92 22 00 69 23 FC 3A 3A 8D 33 |LEASE..".i#.::.3|
00001B60: 30 30 30 3A 8D 33 32 30 30 00 87 23 06 3B 3A 54 |000:.3200..#.;:T|
00001B70: 58 24 B2 22 20 20 20 20 20 20 20 20 20 20 20 20 |X$." |
00001B80: 20 20 20 20 20 20 22 00 9C 23 10 3B 3A 44 45 4C | "..#.;:DEL|
00001B90: 41 59 B2 31 2E 35 3A 8D 32 30 30 30 00 AE 23 1A |AY.1.5:.2000..#.|
00001BA0: 3B 3A 8D 33 32 30 30 3A 89 31 35 30 36 30 00 B4 |;:.3200:.15060..|
00001BB0: 23 24 3B 3A 00 D5 23 2E 3B 3A 56 B2 56 31 3A 48 |#$;:..#.;:V.V1:H|
00001BC0: B2 48 31 AA 4A AB 31 3A 54 58 24 B2 CA 28 53 24 |.H1.J.1:TX$..(S$|
00001BD0: 2C 4A 2C 31 29 00 E0 23 38 3B 3A 8D 33 32 30 30 |,J,1)..#8;:.3200|
00001BE0: 00 E7 23 56 3B 82 4A 00 FD 23 60 3B 56 B2 56 31 |..#V;.J..#`;V.V1|
00001BF0: 3A 48 B2 48 31 3A 54 58 24 B2 54 31 24 00 03 24 |:H.H1:TX$.T1$..$|
00001C00: 6A 3B 8E 00 1D 24 68 42 8F 20 2A 2A 2A 20 44 4F |j;...$hB. *** DO|
00001C10: 20 50 52 4F 42 4C 45 4D 53 20 2A 2A 2A 00 41 24 | PROBLEMS ***.A$|
00001C20: 69 42 56 B2 31 31 3A 48 B2 31 35 3A 54 58 24 B2 |iBV.11:H.15:TX$.|
00001C30: 22 DD 91 9D B0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |"...............|
00001C40: 22 00 4B 24 6A 42 8D 33 32 30 30 00 64 24 6B 42 |".K$jB.3200.d$kB|
00001C50: 56 B2 31 31 3A 48 B2 31 30 3A 54 58 24 B2 53 45 |V.11:H.10:TX$.SE|
00001C60: 24 28 32 29 00 6E 24 6C 42 8D 33 32 30 30 00 81 |$(2).n$lB.3200..|
00001C70: 24 6D 42 44 45 4C 41 59 B2 2E 35 3A 8D 32 30 30 |$mBDELAY..5:.200|
00001C80: 30 00 9A 24 6E 42 56 B2 31 31 3A 48 B2 31 37 3A |0..$nBV.11:H.17:|
00001C90: 54 58 24 B2 53 45 24 28 31 29 00 A4 24 6F 42 8D |TX$.SE$(1)..$oB.|
00001CA0: 33 32 30 30 00 C4 24 72 42 56 B2 31 35 3A 48 B2 |3200..$rBV.15:H.|
00001CB0: 30 20 3A 54 58 24 B2 22 D9 4F 55 52 20 41 4E 53 |0 :TX$.".OUR ANS|
00001CC0: 57 45 52 22 00 CE 24 7C 42 8D 33 32 30 30 00 E9 |WER"..$|B.3200..|
00001CD0: 24 81 42 52 4D B2 53 28 31 29 AB 28 B5 28 53 28 |$.BRM.S(1).(.(S(|
00001CE0: 37 29 29 AC 53 28 32 29 29 00 F1 24 86 42 85 41 |7)).S(2))..$.B.A|
00001CF0: 4E 00 0A 25 90 42 8B B5 28 41 4E 29 B2 B5 28 53 |N..%.B..(AN)..(S|
00001D00: 28 37 29 29 A7 31 37 31 32 30 00 16 25 A4 42 4D |(7)).17120..%.BM|
00001D10: 49 B2 4D 49 AA 31 00 40 25 AE 42 56 B2 31 37 3A |I.MI.1.@%.BV.17:|
00001D20: 54 58 24 B2 22 D4 48 45 20 43 4F 52 52 45 43 54 |TX$.".HE CORRECT|
00001D30: 20 41 4E 53 57 45 52 20 49 53 3A 22 3A 48 B2 30 | ANSWER IS:":H.0|
00001D40: 00 4A 25 B8 42 8D 33 32 30 30 00 6B 25 C2 42 56 |.J%.B.3200.k%.BV|
00001D50: B2 31 39 3A 54 58 24 B2 53 45 24 28 37 29 20 AA |.19:TX$.SE$(7) .|
00001D60: 22 20 52 2E 22 AA C4 28 52 4D 29 00 7B 25 CC 42 |" R."..(RM).{%.B|
00001D70: 8D 33 30 30 30 3A 8D 33 32 30 30 00 86 25 D6 42 |.3000:.3200..%.B|
00001D80: 89 31 37 32 38 30 00 99 25 E0 42 52 57 B2 B5 28 |.17280..%.BRW..(|
00001D90: BB 28 30 29 AC 36 29 AA 31 00 D0 25 E5 42 56 B2 |.(0).6).1..%.BV.|
00001DA0: 31 37 3A 48 B2 30 3A 54 58 24 B2 22 28 D4 48 45 |17:H.0:TX$."(.HE|
00001DB0: 20 52 45 4D 41 49 4E 44 45 52 20 49 53 22 AA C4 | REMAINDER IS"..|
00001DC0: 28 52 4D 29 AA 22 2E 29 22 3A 8D 20 33 32 30 30 |(RM).".)":. 3200|
00001DD0: 00 DB 25 EA 42 81 4A B2 31 A4 35 00 FA 25 F4 42 |..%.B.J.1.5..%.B|
00001DE0: 3A 56 B2 32 30 3A 54 58 24 B2 C7 28 43 4F 28 4A |:V.20:TX$..(CO(J|
00001DF0: 29 29 AA 52 57 24 28 52 57 29 00 0B 26 FE 42 3A |)).RW$(RW)..&.B:|
00001E00: 8D 33 30 30 30 3A 8D 33 32 30 30 00 1E 26 08 43 |.3000:.3200..&.C|
00001E10: 44 45 4C 41 59 B2 2E 37 3A 8D 32 30 30 30 00 50 |DELAY..7:.2000.P|
00001E20: 26 12 43 3A 54 58 24 B2 22 20 20 20 20 20 20 20 |&.C:TX$." |
00001E30: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001E40: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 | "|
00001E50: 00 61 26 1C 43 3A 8D 33 30 30 30 3A 8D 33 32 30 |.a&.C:.3000:.320|
00001E60: 30 00 74 26 26 43 44 45 4C 41 59 B2 2E 33 3A 8D |0.t&&CDELAY..3:.|
00001E70: 32 30 30 30 00 7B 26 30 43 82 4A 00 81 26 80 43 |2000.{&0C.J..&.C|
00001E80: 8E 00 9C 26 38 4A 8F 20 2A 2A 2A 20 4D 41 54 48 |...&8J. *** MATH|
00001E90: 20 52 4F 55 54 49 4E 45 20 2A 2A 2A 00 C6 26 39 | ROUTINE ***..&9|
00001EA0: 4A 56 B2 32 33 3A 54 58 24 B2 22 D0 4C 45 41 53 |JV.23:TX$.".LEAS|
00001EB0: 45 20 D7 41 49 54 2E 2E 2E 22 3A 8D 33 30 30 30 |E .AIT...":.3000|
00001EC0: 3A 8D 33 32 30 30 00 CF 26 3D 4A 4D 44 B2 31 00 |:.3200..&=JMD.1.|
00001ED0: F2 26 42 4A 4E 28 31 29 B2 4E 31 3A 4E 28 32 29 |.&BJN(1).N1:N(2)|
00001EE0: B2 4E 32 3A 4D 44 24 B2 22 51 55 4F 54 49 45 4E |.N2:MD$."QUOTIEN|
00001EF0: 54 22 00 17 27 43 4A 8B 20 4D 44 B2 31 20 A7 20 |T"..'CJ. MD.1 . |
00001F00: 4E 28 31 29 B2 4E 31 AB 31 3A 4D 44 24 B2 22 50 |N(1).N1.1:MD$."P|
00001F10: 52 4F 44 55 43 54 22 00 36 27 4C 4A 81 51 B2 31 |RODUCT".6'LJ.Q.1|
00001F20: A4 38 3A 53 28 51 29 B2 30 3A 53 45 24 28 51 29 |.8:S(Q).0:SE$(Q)|
00001F30: B2 22 22 3A 82 51 00 41 27 56 4A 81 51 B2 31 A4 |."":.Q.A'VJ.Q.1.|
00001F40: 32 00 53 27 60 4A 3A 81 52 B2 4E 28 51 29 A4 31 |2.S'`J:.R.N(Q).1|
00001F50: A9 AB 31 00 68 27 6A 4A 3A 3A 44 49 B2 B5 28 BB |..1.h'jJ::DI..(.|
00001F60: 28 31 29 AC 39 29 AA 31 00 86 27 74 4A 3A 3A 53 |(1).9).1..'tJ::S|
00001F70: 28 51 29 B2 53 28 51 29 AA 44 49 AC 28 31 30 AE |(Q).S(Q).DI.(10.|
00001F80: 28 52 AB 31 29 29 00 8E 27 7E 4A 3A 82 52 00 95 |(R.1))..'~J:.R..|
00001F90: 27 A6 4A 82 51 00 AB 27 CE 4A 53 28 37 29 B2 B5 |'.J.Q..'.JS(7)..|
00001FA0: 28 53 28 31 29 AD 53 28 32 29 29 00 C7 27 CF 4A |(S(1).S(2))..'.J|
00001FB0: 8B 20 4D 44 B2 31 20 A7 20 53 28 37 29 B2 53 28 |. MD.1 . S(7).S(|
00001FC0: 31 29 AC 53 28 32 29 00 D2 27 D8 4A 81 51 B2 31 |1).S(2)..'.J.Q.1|
00001FD0: A4 37 00 EF 27 E2 4A 3A 53 24 28 51 29 B2 C4 28 |.7..'.J:S$(Q)..(|
00001FE0: 53 28 51 29 29 3A 53 45 24 28 51 29 B2 22 22 00 |S(Q)):SE$(Q)."".|
00001FF0: 02 28 EC 4A 3A 81 52 B2 32 A4 C3 28 53 24 28 51 |.(.J:.R.2..(S$(Q|
00002000: 29 29 00 27 28 F6 4A 3A 3A 53 45 24 28 51 29 B2 |)).'(.J::SE$(Q).|
00002010: 53 45 24 28 51 29 AA CA 28 53 24 28 51 29 2C 52 |SE$(Q)..(S$(Q),R|
00002020: 2C 31 29 AA 22 20 22 00 2F 28 00 4B 3A 82 52 00 |,1)." "./(.K:.R.|
00002030: 36 28 0A 4B 82 51 00 52 28 0F 4B 8F 3A 20 20 49 |6(.K.Q.R(.K.: I|
00002040: 46 20 4D 44 3D 31 20 54 48 45 4E 20 52 45 54 55 |F MD=1 THEN RETU|
00002050: 52 4E 00 64 28 14 4B 81 51 B2 31 A4 C3 28 53 24 |RN.d(.K.Q.1..(S$|
00002060: 28 31 29 29 00 80 28 1E 4B 3A 44 28 51 29 B2 C5 |(1))..(.K:D(Q)..|
00002070: 28 CA 28 53 24 28 31 29 2C 51 AA 31 2C 31 29 29 |(.(S$(1),Q.1,1))|
00002080: 00 87 28 28 4B 82 51 00 96 28 2D 4B 8B 20 4D 44 |..((K.Q..(-K. MD|
00002090: B2 31 20 A7 20 8E 00 A5 28 64 4B 53 31 28 31 29 |.1 . ...(dKS1(1)|
000020A0: B2 44 28 31 29 00 B1 28 6E 4B 81 51 B2 31 A4 4E |.D(1)..(nK.Q.1.N|
000020B0: 31 00 C0 28 78 4B 3A 50 B2 32 AC 28 51 AB 31 29 |1..(xK:P.2.(Q.1)|
000020C0: 00 E2 28 82 4B 3A 53 31 28 32 AA 50 29 B2 53 28 |..(.K:S1(2.P).S(|
000020D0: 32 29 AC B5 28 53 31 28 31 AA 50 29 AD 53 28 32 |2)..(S1(1.P).S(2|
000020E0: 29 29 00 0B 29 8C 4B 3A 53 31 28 33 AA 50 29 B2 |))..).K:S1(3.P).|
000020F0: 28 53 31 28 31 AA 50 29 AB 53 31 28 32 AA 50 29 |(S1(1.P).S1(2.P)|
00002100: 29 AC 31 30 AA 44 28 51 AA 31 29 00 2E 29 96 4B |).10.D(Q.1)..).K|
00002110: 3A 8B 51 B2 4E 31 A7 53 31 28 33 AA 50 29 B2 53 |:.Q.N1.S1(3.P).S|
00002120: 31 28 31 AA 50 29 AB 53 31 28 32 AA 50 29 00 34 |1(1.P).S1(2.P).4|
00002130: 29 A0 4B 82 00 3A 29 AA 4B 8E 00 57 29 20 4E 8F |).K..:).K..W) N.|
00002140: 20 2A 2A 2A 20 49 4E 46 4F 20 49 4E 46 4F 20 49 | *** INFO INFO I|
00002150: 4E 46 4F 20 2A 2A 2A 00 65 29 21 4E 8D 33 36 30 |NFO ***.e)!N.360|
00002160: 30 3A 56 B2 36 00 6C 29 22 4E 87 4E 00 77 29 23 |0:V.6.l)"N.N.w)#|
00002170: 4E 81 49 B2 31 A4 4E 00 81 29 24 4E 3A 87 54 58 |N.I.1.N..)$N:.TX|
00002180: 24 00 AC 29 25 4E 3A 8B 54 58 24 B2 22 50 41 47 |$..)%N:.TX$."PAG|
00002190: 45 22 A7 20 8D 20 33 31 30 30 3A 8D 33 36 30 30 |E". . 3100:.3600|
000021A0: 3A 56 B2 36 20 3A 89 32 30 30 30 39 00 D9 29 26 |:V.6 :.20009..)&|
000021B0: 4E 3A 48 B2 32 3A 8B CA 28 54 58 24 2C 31 30 2C |N:H.2:..(TX$,10,|
000021C0: 31 29 B2 22 A3 22 A7 56 B2 56 AA 31 3A 8D 33 32 |1).".".V.V.1:.32|
000021D0: 30 30 3A 89 32 30 30 30 38 00 EA 29 27 4E 3A 56 |00:.20008..)'N:V|
000021E0: B2 56 AA 32 3A 8D 33 32 30 30 00 FE 29 28 4E 3A |.V.2:.3200..)(N:|
000021F0: 44 45 4C 41 59 B2 2E 35 3A 8D 32 30 30 30 00 05 |DELAY..5:.2000..|
00002200: 2A 29 4E 82 49 00 0B 2A 2A 4E 8E 00 13 2A 2B 4E |*)N.I..**N...*+N|
00002210: 83 34 35 00 3B 2A 2C 4E 83 22 D4 48 49 53 20 50 |.45.;*,N.".HIS P|
00002220: 52 4F 47 52 41 4D 20 57 49 4C 4C 20 48 45 4C 50 |ROGRAM WILL HELP|
00002230: 20 59 4F 55 20 4C 45 41 52 4E 22 00 61 2A 2D 4E | YOU LEARN".a*-N|
00002240: 83 22 54 4F 20 44 4F 20 4D 55 4C 54 49 50 4C 49 |."TO DO MULTIPLI|
00002250: 43 41 54 49 4F 4E 20 50 52 4F 42 4C 45 4D 53 2E |CATION PROBLEMS.|
00002260: 22 00 88 2A 2F 4E 83 22 D4 48 45 52 45 20 41 52 |"..*/N.".HERE AR|
00002270: 45 20 54 48 52 45 45 20 57 41 59 53 20 54 4F 20 |E THREE WAYS TO |
00002280: 55 53 45 20 54 48 45 22 00 B3 2A 30 4E 83 22 50 |USE THE"..*0N."P|
00002290: 52 4F 47 52 41 4D 3A 22 2C 22 20 20 20 20 31 29 |ROGRAM:"," 1)|
000022A0: 20 D3 45 45 20 45 58 41 4D 50 4C 45 53 20 44 4F | .EE EXAMPLES DO|
000022B0: 4E 45 22 00 D7 2A 31 4E 83 22 20 20 20 20 32 29 |NE"..*1N." 2)|
000022C0: 20 C4 4F 20 50 52 4F 42 4C 45 4D 53 20 57 49 54 | .O PROBLEMS WIT|
000022D0: 48 20 48 45 4C 50 22 00 FA 2A 32 4E 83 22 20 20 |H HELP"..*2N." |
000022E0: 20 20 33 29 20 C4 4F 20 50 52 4F 42 4C 45 4D 53 | 3) .O PROBLEMS|
000022F0: 20 59 4F 55 52 53 45 4C 46 22 00 06 2B 33 4E 83 | YOURSELF"..+3N.|
00002300: 22 50 41 47 45 22 00 27 2B 34 4E 83 22 20 20 20 |"PAGE".'+4N." |
00002310: 20 20 31 29 20 D3 45 45 20 45 58 41 4D 50 4C 45 | 1) .EE EXAMPLE|
00002320: 53 20 44 4F 4E 45 22 00 48 2B 35 4E 83 22 20 20 |S DONE".H+5N." |
00002330: 20 20 20 20 20 20 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 | ..........|
00002340: A3 A3 A3 A3 A3 A3 A3 22 00 71 2B 36 4E 83 22 C9 |.......".q+6N.".|
00002350: 46 20 59 4F 55 20 57 41 4E 54 20 54 4F 20 53 45 |F YOU WANT TO SE|
00002360: 45 20 45 58 41 4D 50 4C 45 53 20 44 4F 4E 45 2C |E EXAMPLES DONE,|
00002370: 22 00 98 2B 37 4E 83 22 C9 20 57 49 4C 4C 20 53 |"..+7N.". WILL S|
00002380: 48 4F 57 20 59 4F 55 20 48 4F 57 20 54 4F 20 44 |HOW YOU HOW TO D|
00002390: 4F 20 54 48 45 4D 2C 22 00 BD 2B 38 4E 83 22 45 |O THEM,"..+8N."E|
000023A0: 58 50 4C 41 49 4E 49 4E 47 20 45 41 43 48 20 53 |XPLAINING EACH S|
000023B0: 54 45 50 20 41 53 20 C9 20 47 4F 2E 22 00 C9 2B |TEP AS . GO."..+|
000023C0: 39 4E 83 22 50 41 47 45 22 00 EC 2B 3A 4E 83 22 |9N."PAGE"..+:N."|
000023D0: 20 20 20 32 29 20 C4 4F 20 50 52 4F 42 4C 45 4D | 2) .O PROBLEM|
000023E0: 53 20 57 49 54 48 20 48 45 4C 50 22 00 0F 2C 3B |S WITH HELP"..,;|
000023F0: 4E 83 22 20 20 20 20 20 20 A3 A3 A3 A3 A3 A3 A3 |N." .......|
00002400: A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 22 00 |..............".|
00002410: 37 2C 3C 4E 83 22 D4 4F 20 44 4F 20 50 52 4F 42 |7,<N.".O DO PROB|
00002420: 4C 45 4D 53 20 57 49 54 48 20 48 45 4C 50 2C 20 |LEMS WITH HELP, |
00002430: C9 20 57 49 4C 4C 22 00 5D 2C 3D 4E 83 22 47 49 |. WILL".],=N."GI|
00002440: 56 45 20 59 4F 55 20 41 20 48 49 4E 54 20 46 4F |VE YOU A HINT FO|
00002450: 52 20 45 41 43 48 20 53 54 45 50 2C 22 00 87 2C |R EACH STEP,"..,|
00002460: 3E 4E 83 22 41 4E 44 20 48 45 4C 50 20 59 4F 55 |>N."AND HELP YOU|
00002470: 20 49 46 20 59 4F 55 20 4D 41 4B 45 20 4D 49 53 | IF YOU MAKE MIS|
00002480: 54 41 4B 45 53 2E 22 00 93 2C 3F 4E 83 22 50 41 |TAKES."..,?N."PA|
00002490: 47 45 22 00 B6 2C 40 4E 83 22 20 20 20 20 33 29 |GE"..,@N." 3)|
000024A0: 20 C4 4F 20 50 52 4F 42 4C 45 4D 53 20 59 4F 55 | .O PROBLEMS YOU|
000024B0: 52 53 45 4C 46 22 00 D9 2C 41 4E 83 22 20 20 20 |RSELF"..,AN." |
000024C0: 20 20 20 20 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 | ............|
000024D0: A3 A3 A3 A3 A3 A3 A3 A3 22 00 05 2D 42 4E 83 22 |........"..-BN."|
000024E0: D4 48 45 20 54 48 49 52 44 20 4F 50 54 49 4F 4E |.HE THIRD OPTION|
000024F0: 20 49 53 20 54 4F 20 57 4F 52 4B 20 50 52 4F 42 | IS TO WORK PROB|
00002500: 4C 45 4D 53 22 00 2B 2D 43 4E 83 22 4F 4E 20 59 |LEMS".+-CN."ON Y|
00002510: 4F 55 52 20 4F 57 4E 2E 20 20 C6 4F 52 20 54 48 |OUR OWN. .OR TH|
00002520: 49 53 20 4F 50 54 49 4F 4E 2C 22 00 51 2D 44 4E |IS OPTION,".Q-DN|
00002530: 83 22 59 4F 55 20 4D 41 59 20 4E 45 45 44 20 50 |."YOU MAY NEED P|
00002540: 45 4E 43 49 4C 20 41 4E 44 20 50 41 50 45 52 2E |ENCIL AND PAPER.|
00002550: 22 00 5D 2D 45 4E 83 22 50 41 47 45 22 00 7A 2D |".]-EN."PAGE".z-|
00002560: 46 4E 83 22 20 20 20 20 20 20 D3 49 5A 45 20 4F |FN." .IZE O|
00002570: 46 20 CE 55 4D 42 45 52 53 22 00 97 2D 47 4E 83 |F .UMBERS"..-GN.|
00002580: 22 20 20 20 20 20 20 A3 A3 A3 A3 A3 A3 A3 A3 A3 |" .........|
00002590: A3 A3 A3 A3 A3 A3 22 00 C2 2D 48 4E 83 22 D9 4F |......"..-HN.".O|
000025A0: 55 20 4D 41 59 20 44 45 43 49 44 45 20 57 48 41 |U MAY DECIDE WHA|
000025B0: 54 20 4B 49 4E 44 20 4F 46 20 4E 55 4D 42 45 52 |T KIND OF NUMBER|
000025C0: 53 22 00 ED 2D 49 4E 83 22 59 4F 55 20 57 41 4E |S"..-IN."YOU WAN|
000025D0: 54 20 54 4F 20 57 4F 52 4B 20 57 49 54 48 2C 20 |T TO WORK WITH, |
000025E0: 46 52 4F 4D 20 34 20 44 49 47 49 54 22 00 14 2E |FROM 4 DIGIT"...|
000025F0: 4A 4E 83 22 4E 55 4D 42 45 52 53 20 28 4C 49 4B |JN."NUMBERS (LIK|
00002600: 45 20 38 2C 30 35 38 29 20 54 4F 20 35 20 44 49 |E 8,058) TO 5 DI|
00002610: 47 49 54 22 00 32 2E 4B 4E 83 22 4E 55 4D 42 45 |GIT".2.KN."NUMBE|
00002620: 52 53 20 28 4C 49 4B 45 20 36 33 2C 35 39 37 29 |RS (LIKE 63,597)|
00002630: 2E 22 00 3A 2E 4C 4E 83 22 22 00 62 2E 4D 4E 83 |.".:.LN."".b.MN.|
00002640: 22 D7 45 20 57 49 4C 4C 20 55 53 45 20 32 20 44 |".E WILL USE 2 D|
00002650: 49 47 49 54 20 4D 55 4C 54 49 50 4C 49 45 52 53 |IGIT MULTIPLIERS|
00002660: 2E 22 00 6E 2E 4E 4E 83 22 50 41 47 45 22 00 8D |.".n.NN."PAGE"..|
00002670: 2E 4F 4E 83 22 20 20 20 20 20 CE 55 4D 42 45 52 |.ON." .UMBER|
00002680: 20 4F 46 20 50 52 4F 42 4C 45 4D 53 22 00 AC 2E | OF PROBLEMS"...|
00002690: 50 4E 83 22 20 20 20 20 20 A3 A3 A3 A3 A3 A3 A3 |PN." .......|
000026A0: A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 22 00 D6 2E 51 |..........."...Q|
000026B0: 4E 83 22 CC 41 53 54 2C 20 59 4F 55 20 44 45 43 |N.".AST, YOU DEC|
000026C0: 49 44 45 20 48 4F 57 20 4D 41 4E 59 20 50 52 4F |IDE HOW MANY PRO|
000026D0: 42 4C 45 4D 53 22 00 00 2F 52 4E 83 22 54 4F 20 |BLEMS"../RN."TO |
000026E0: 44 4F 2E 20 20 C9 46 20 59 4F 55 20 4C 45 54 20 |DO. .F YOU LET |
000026F0: 54 48 45 20 43 4F 4D 50 55 54 45 52 20 44 4F 22 |THE COMPUTER DO"|
00002700: 00 25 2F 53 4E 83 22 54 48 45 20 57 4F 52 4B 2C |.%/SN."THE WORK,|
00002710: 20 59 4F 55 20 4D 41 59 20 4F 4E 4C 59 20 48 41 | YOU MAY ONLY HA|
00002720: 56 45 20 35 22 00 4D 2F 54 4E 83 22 50 52 4F 42 |VE 5".M/TN."PROB|
00002730: 4C 45 4D 53 3B 20 4F 54 48 45 52 57 49 53 45 20 |LEMS; OTHERWISE |
00002740: 59 4F 55 20 4D 41 59 20 48 41 56 45 22 00 6B 2F |YOU MAY HAVE".k/|
00002750: 55 4E 83 22 46 52 4F 4D 20 32 20 54 4F 20 32 30 |UN."FROM 2 TO 20|
00002760: 20 50 52 4F 42 4C 45 4D 53 2E 22 00 77 2F 56 4E | PROBLEMS.".w/VN|
00002770: 83 22 50 41 47 45 22 00 88 2F 57 4E 83 22 C8 41 |."PAGE"../WN.".A|
00002780: 56 45 20 46 55 4E 21 22 00 94 2F 58 4E 83 22 50 |VE FUN!"../XN."P|
00002790: 41 47 45 22 00 00 00 |AGE"... |
.......53280,0:.53281,0:."..".9....53280
,0:.53281,0:."..".E.... G(14).J...ER$."
"......S(11),S$
(11),SE$(11),S1(20)...D..4000...I.. 1000
0...N..3600.U.X.H.0:V.10:TX$."DO YOU NEE
D A LESSON? "......3200.....LO.0:.2100:.
A$......A$."Y".A$."Y"..20000:. 160......
A$."N" . A$."N" . 160.8.... 120.B. ..50
00.K...RU.1.U....1000.D....OP..3.180.N..
..3600.W....500......3600.....H.0:V.10:T
X$."DO YOU WANT TO PLAY AGAIN? "...H..32
00.M.R.LO.0:.2100:.A$......A$."Y".A$."Y"
.160...... A$."N" . A$."N" . 230...... 1
90......: ."MENU",8.!.....H...V.10:H.0:T
X$."YOU GOT".D(NP.MI)." RIGHT OUT OF".D(
NP) ." PROBLEMS".R....3200.....V.12:TX$.
"FOR".D(.(((NP.MI).NP).100))."%."...!..3
200...&.DELAY.5:.2000.C.0........ *** CE
NTRAL ROUTINE ***.....HP.0:MI.0......I.1
.NP.....:.19000.....:.3600.7...:H.0:V.6:
TX$."FIND THE ".MD$.":".R...:.3200 :. MD
..1 . 1065.].... 7000.H.... 1066...).:.O
P.11000,11000,17000...*.V.24:TX$." ..<
RETURN> TO CONTINUE, <_> TO EXIT..".K.+.
.3000:.3200.Z.,.LO.0:.2100...-..A$."_".
SA.I:I.NP...2..I:. SA..0 .NP.SA...3...!.
P.. *** TIMER ***.2.Z.TI$."000000".G....
A$:.A$.."".2030.]....TI.60.DELAY.2015.C.
.....4.. *** GET CHARACTER ***...>..A$:
.A$."".2110...H.A.E(A$):.A.LO.A.HI.2110.
..R...O.... *** CENTER TEXT ***...B.X1.C
(TX$)...L.H.(40.X1).2...V.......V.24:TX$
." ..<RETURN> TO CONTINUE.."...&..3000
:.3200.=.0.LO.0:.2100.S.:..A$..G(13) . 3
100.Y.D...S.... *** HOR/VER TAB ***.....
VT$."":.Q.1.V.....:VT$.VT$."."......Q...
...".";VT$;.......H);TX$;............ **
* LINE ACROSS SCREEN ***......".";......
Q.1.40...J.:.".";...T..Q......Q.1.40....
.:.".";.&....Q.0....".";.6.....X.... ***
PRINT SCREEN HEADER ***.A....".".....TX
$."VISION SOFTWARE PRESENTS:"...8.H.10..
.B.V.1:.3200...L.TX$.T$...Q..".";...V.H.
10.H.`.V.3:.3200.R.E..".";...J..:.3500:.
... .. *** READ DATA ***......T$......I.
1.6.....:.RW$(I)......I.*.H..I.1.3.7.R.:
.OP$(I).>....I.I....I.1.4.\...:.MU$(I),C
O(I).E....I:....... *** PROGRAM DATA ***
......"MULTIPLICATION PRACTICE".C...."GR
EAT!","FANTASTIC!","SUPER!"...".."YOU'RE
REALLY GOING NOW!","YES! YES! YES!","
THAT'S GREAT!". .,.."SEE EXAMPLES DONE."
.>.6.."DO PROBLEMS WITH HELP.".[.@.."DO
PROBLEMS YOURSELF."...J.."UNITS",28,"TEN
S",30,"HUNDREDS",31,"THOUSANDS",158.....
. *** SETUP FOR MATH ***......RU.1.5037.
....H.0:V.10:TX$."WHAT'S YOUR FIRST NAME
"......3200......NM$.7...V.10:H.0:TX$."W
OULD YOU LIKE TO: ".
A....3200.U...H.7:V.12:.I.1.3.O...:TX$.D
(I).". ".OP$(I).Z.D.:.3200...N.:V.V.2...
X..I.....H.0:TX$."YOUR CHOICE? (1-3) "..
....3200.P...LO.1:HI.3:.2100:.A$.....OP.
A:HI.20......OP.1.HI.5...... 3600.*...V.
10:H.0:TX$."HOW MANY PROBLEMS DO YOU WAN
T".4.(..3200.Z.2.V.11:TX$."TO DO? (2 -".
D(HI).") ".H.<.H.5:.3200.P.F..NP...P..NP
.LO.NP.HI. NP.0:.5170.F.Z.V.13:TX$."HOW
MANY DIGITS IN THE LARGEST":H.0:. 3200..
.D.V.14:H.5:TX$."NUMBER? (4-5) ":. 3200
.....LO.4:HI.5:.2100:.A$.....N1.A.1.....
N2.2.".....<.X.. OPTION 1 - MULTIPLY.E.B
.V.9:H.38.C(SE$(1)):TX$.SE$(1):. 3200...
L.V.10:H.38.C(SE$(2)):TX$.SE$(2):. 3200.
N.Q.V.11:H.37.C(SE$(1)):TX$.".........."
:. N1.3 . TX$.H(TX$,8)...V.. 3200 : . OP
.3 . 9000.....VV.0:. II.3 . 1 . .2 :V.12
.VV:H.0.....MU.E(J(SE$(2),II,1)): JK.1.R
...V.12.VV:H.0:TX$."MULTIPLY".S$(1).".BY
".D(MU.(10.VV)).".":. 3200.....DELAY.3:.
2000...... JJ.N(1). 1 ..1 : V.18:H.0:TX
$.ER$:. 3200:V.16:. 3200.P...V.20:. 3200
.....V.16:H.0:TX$.".MULTIPLY THE ".MU$(J
K).".".!.... 3200:. OP.1 . DELAY.1:. 200
0.A...V.18:H.0:TX$.D(MU)." X".D(D(JJ)):.
CA..0 . TX$.TX$." +".CA$.....AN.MU.D(JJ
).CA:CA..(AN.10) :CA$.D(CA):AN$.D(AN).E.
..V.18:H.0:TX$.TX$." =":. OP.1 . TX$.TX$
. AN$...... 3200:. OP.1 .. 2000.....VJ.1
2.VV:HJ.36.(VV.2).(JK.2):. CA.0 . HJ.HJ.
1.#.... OP.1 . 7080.,.... TT.A.... TT.AN
. . 8000.]...TX$.AN$:HH.HJ:H.HJ:V.VJ.P.
... 3200 :. 2000...... CA.0 . 7150.....T
X$."CARRY THE".CA$.".":V.20:H.0:. 3200.Y
...TX$.".". CA$:V.8:H.HH.1.(VV.2):. 320
0...F.TX$.". ":V.12.VV:H.HH:. 3200.....
JK.JK.1:DELAY.3: . 2000.G.... JJ:. CA..0
.V.12.VV:H.HH.1:TX$.CA$:. 3200.....VV.V
V.1:TX$.ER$:V.8:H.10:. 3200:CA.0:. 3100:
V.24:TX$.ER$...... 3000: . 3200:. II.C
...V.12.VV:H.HH.1:TX$."...........".....
. N1..4 . TX$.TX$.".."...... 3200 :. V.1
6 . 20 . 2:H.0:TX$.ER$:. 3200:. V.?...V.
16:TX$."NOW ADD:":. 3200 :. OP.1 . 7210.
E.... OP.2 . S$.SE$(7):. 14000:. 7240...
*.V.16:HH.36 :. JJ.C(SE$(7)).1 . 1 ..2:H
.HH:TX$.J(SE$(7),JJ,1).H.4.. 3200:DELAY.
2:. 2000:HH.HH.2.Q.>.. JJ.W.H.....@.RW..
(.(0).6).1...J..J.1.2...T.:V.20:H.5 :TX
$.G(CO(J)).RW$(RW).$.^..3200.7.H.DELAY..
7:.2000.O.R.:TX$.G(5).ER$:.3200.B.|.DELA
Y..3:.2000.L....J :....(#V.15:H.0 :TX$."
YOUR ANSWER:"...2#.3200...<#.AN...F#..(A
N)..(S(7)).9080.C.P#MI.MI.1...Z#V.17:TX$
."THE CORRECT ANSWER IS ".S$(7)."." :H.0
...D#.3200...N#. 9180. .X#RW..(.(0).6).1
.+..#.J.1.5.J..#:V.20:TX$.G(CO(J)).RW$(R
W).[..#:.3000:.3200.N. #DELAY..7:.2000.{
..#:TX$.ER$....#:.3000:.3200....#DELAY..
3:.2000...H#.J....#..L..'. *** DO SPRITE
Y THINGS ***....'. I.704 . 767....'.X:.I
,X....'.....'.2040,11....'.53269,B(53269
).1.6..'.53287,2:.53277,255:.53271,255.N
..'.53248,30:.53249,58.T..'..|..'.252,25
2,252,121,249,248,51,243,240. ..'.7,231,
224,15,207,192,7,159,128....'.3,63,0,0,1
26,0,0,252,0.V..'.0,120,0,0,48,0,0,0,0..
..'.0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
0,0,0,0,0,0,0,0,0,0....*. *** SEE EXAMPL
ES ***.R..+V.11:H.13:TX$."..............
.".\..+.3200.U..+V.11:H. 8:TX$.SE$(2)..
.+.3200....+DELAY..5:.2000....+V.11:H.15
:TX$.SE$(1)....+.3200.G..,DELAY.1:.2000.
...,V.15:H.0:TX$."MAKE A SKIP COUNT"....
,.3200....,DELAY.1 :.2000....,.J.0.9.%.$
,:V.10.J:H.29.P..,:TX$.D(J)."X".I(S$(2),
2)."=".D(J.S(2)).[.8,:.3200.B.B,.J.T.G,D
ELAY.1:.2000...L,.K.1.(C(S$(1)).1).2.2..
.Q,. K..1 . H.11:V.17:TX$.D(S1(K)):. 320
0.Y.S,V.12:H.15.K.1:TX$." ":.3200...T,DE
LAY.2:.2000...U,H.0:V.15:TX$.ER$:.3200..
.V,:X.S1(K.1).S(2).T.`,:V.15:H.0:TX$."HO
W MANY".S$(2)."'S IN".D(S1(K))."? ".M.E
,.3200:. OP.2 . 11370...H,:V.10.X:H.28:T
X$.".>":. 3200:DELAY.2:. 2000...I,:TX$."
":.3200.Y.J,:V.9:H.15.K.1:TX$.I(D(X),C
(D(X)).1)...T,:.OP.2..15000...~,:.3200..
..,. OP.1 . DELAY.3:.2000....,:V.17:H.0.
6..,S..(S1(K).S1(K.1)).P..,:TX$."SUBTRAC
T: ".D(S1(K))." -".D(S1(K.1))." =".D(S)
.{..,:.3200....,DELAY.3:.2000....,:.K.1.
(C(S$(1)).1).2.11510.H.B,H.0:V.17:TX$.ER
$:. 3200...C,H.11:V.17:TX$.D(S):. 3200..
D,:V.15:H.0:TX$."BRING DOWN THE NEXT NU
MBER". N,:.3200.; X,:V.12:H.15.K.1:TX$.
"^".` .,:.3200:. OP.2 . LO.0:HI.9:. 2110
.Z .,. OP.1 .DELAY.5:.2000.. .,:TX$." ":
.3200.. .,H.0:V.17:TX$.ER$:.3200.. .,.K.
. .,H.0:V.19:TX$."THE REMAINDER IS".D(S)
.".":. 3200.. .-...!.6. *** EXAMPLES WIT
H HELP ***.%!.6:V1.16:H1.36:S$.SE$(7).:!
D6.J.C(S$).1 .1..2.Y!N6V.V1.1:H.H1:TX$."
^":. 3200.L!.6:Y.0:LO.0:HI.9.W!.6:.2100.
.!.6:.A$.J(S$,J,1).14150..!.7:Y.Y.1:.Y.3
.14060.V!.7:V.23:TX$.".ENTER A ".J(S$,J,
1)." PLEASE.."..!.7:.3000:.3200..".7:TX$
." ".."(7:DELAY.1.5:.20
00.,"27:.3200:.14060.2"<7:.O"F7:V.V1:H.H
1:TX$.J(S$,J,1).X"P7:.3200:V.V1.1:TX$."
":. 3200:H1.H1.2."N7.J..".7...".:. ***
EXAMPLES WITH HELP ***..".::V1.V:H1.H:T1
$.TX$.H".:S$.TX$..".:.J.1.C(S$).1.2.."J:
:Y.0:LO.0:HI.9.."T::.2100..#.::.A$.J(S$,
J,1).15150.(#.::Y.Y.1:.Y.3.15060.X#.::V.
23:TX$.".ENTER A ".J(S$,J,1)." PLEASE.."
.I#.::.3000:.3200..#.;:TX$."
"..#.;:DELAY.1.5:.2000..#.;:.3200:
.15060..#$;:.U#.;:V.V1:H.H1.J.1:TX$.J(S$
,J,1)..#8;:.3200..#V;.J..#`;V.V1:H.H1:TX
$.T1$..$J;...$HB. *** DO PROBLEMS ***.A$
IBV.11:H.15:TX$."...............".K$JB.3
200.D$KBV.11:H.10:TX$.SE$(2).N$LB.3200..
$MBDELAY..5:.2000..$NBV.11:H.17:TX$.SE$(
1)..$OB.3200.D$RBV.15:H.0 :TX$."YOUR ANS
WER".N$|B.3200..$.BRM.S(1).(.(S(7)).S(2)
)..$.B.AN..%.B..(AN)..(S(7)).17120..%.BM
I.MI.1.@%.BV.17:TX$."THE CORRECT ANSWER
IS:":H.0.J%.B.3200.K%BBV.19:TX$.SE$(7) .
" R.".D(RM).{%LB.3000:.3200..%VB.17280..
%.BRW..(.(0).6).1.P%.BV.17:H.0:TX$."(THE
REMAINDER IS".D(RM).".)":. 3200..%.B.J.
1.5..%.B:V.20:TX$.G(CO(J)).RW$(RW)..&.B:
.3000:.3200..&.CDELAY..7:.2000.P&.C:TX$.
" "
.A&.C:.3000:.3200.T&&CDELAY..3:.2000.{&0
C.J..&.C...&8J. *** MATH ROUTINE ***.F&9
JV.23:TX$."PLEASE WAIT...":.3000:.3200.O
&=JMD.1..&BJN(1).N1:N(2).N2:MD$."QUOTIEN
T"..'CJ. MD.1 . N(1).N1.1:MD$."PRODUCT".
6'LJ.Q.1.8:S(Q).0:SE$(Q)."":.Q.A'VJ.Q.1.
2.S'`J:.R.N(Q).1..1.H'JJ::DI..(.(1).9).1
..'TJ::S(Q).S(Q).DI.(10.(R.1))..'~J:.R..
'.J.Q..'NJS(7)..(S(1).S(2)).G'OJ. MD.1 .
S(7).S(1).S(2).R'XJ.Q.1.7..'.J:S$(Q).D(
S(Q)):SE$(Q).""..(.J:.R.2.C(S$(Q)).'(.J:
:SE$(Q).SE$(Q).J(S$(Q),R,1)." "./(.K:.R.
6(.K.Q.R(.K.: IF MD=1 THEN RETURN.D(.K.
Q.1.C(S$(1))..(.K:D(Q).E(J(S$(1),Q.1,1))
..((K.Q..(-K. MD.1 . ...(DKS1(1).D(1)..(
NK.Q.1.N1..(XK:P.2.(Q.1)..(.K:S1(2.P).S(
2)..(S1(1.P).S(2))..).K:S1(3.P).(S1(1.P)
.S1(2.P)).10.D(Q.1)..).K:.Q.N1.S1(3.P).S
1(1.P).S1(2.P).4) K..:).K..W) N. *** INF
O INFO INFO ***.E)!N.3600:V.6.L)"N.N.W)#
N.I.1.N..)$N:.TX$..)%N:.TX$."PAGE". . 31
00:.3600:V.6 :.20009.Y)&N:H.2:.J(TX$,10,
1).".".V.V.1:.3200:.20008..)'N:V.V.2:.32
00..)(N:DELAY..5:.2000..*)N.I..**N...*+N
.45.;*,N."THIS PROGRAM WILL HELP YOU LEA
RN".A*-N."TO DO MULTIPLICATION PROBLEMS.
"..*/N."THERE ARE THREE WAYS TO USE THE"
..*0N."PROGRAM:"," 1) SEE EXAMPLES DO
NE".W*1N." 2) DO PROBLEMS WITH HELP".
.*2N." 3) DO PROBLEMS YOURSELF"..+3N.
"PAGE".'+4N." 1) SEE EXAMPLES DONE".
H+5N." .................".Q+6N."I
F YOU WANT TO SEE EXAMPLES DONE,"..+7N."
I WILL SHOW YOU HOW TO DO THEM,"..+8N."E
XPLAINING EACH STEP AS I GO.".I+9N."PAGE
"..+:N." 2) DO PROBLEMS WITH HELP"..,;
N." .....................".7,<N."TO
DO PROBLEMS WITH HELP, I WILL".],=N."GI
VE YOU A HINT FOR EACH STEP,"..,>N."AND
HELP YOU IF YOU MAKE MISTAKES."..,?N."PA
GE"..,@N." 3) DO PROBLEMS YOURSELF".Y
,AN." ...................."..-BN."
THE THIRD OPTION IS TO WORK PROBLEMS".+-
CN."ON YOUR OWN. FOR THIS OPTION,".Q-DN
."YOU MAY NEED PENCIL AND PAPER.".]-EN."
PAGE".Z-FN." SIZE OF NUMBERS"..-GN.
" ...............".B-HN."YOU MAY DE
CIDE WHAT KIND OF NUMBERS"..-IN."YOU WAN
T TO WORK WITH, FROM 4 DIGIT"...JN."NUMB
ERS (LIKE 8,058) TO 5 DIGIT".2.KN."NUMBE
RS (LIKE 63,597).".:.LN."".B.MN."WE WILL
USE 2 DIGIT MULTIPLIERS.".N.NN."PAGE"..
.ON." NUMBER OF PROBLEMS"...PN."
..................".V.QN."LAST, YOU DEC
IDE HOW MANY PROBLEMS"../RN."TO DO. IF
YOU LET THE COMPUTER DO".%/SN."THE WORK,
YOU MAY ONLY HAVE 5".M/TN."PROBLEMS; OT
HERWISE YOU MAY HAVE".K/UN."FROM 2 TO 20
PROBLEMS.".W/VN."PAGE"../WN."HAVE FUN!"
../XN."PAGE"...
> CLICK IMAGE PREVIEW FOR FULL MODAL