╭│♠─
FILE INFORMATION
FILENAME(S): ╭│♠─
FILE TYPE(S): PRG
FILE SIZE: 7.6K
FIRST SEEN: 2025-10-19 22:49:06
APPEARS ON: 1 disk(s)
FILE HASH
c005b9f715c3e0a9447199927882f0d204fe131d8c68863358d306d3051280df
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| MICRO MANIAC | ╭│♠─ | PRG | Radd Maxx | 22 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 07 08 01 00 9C 00 29 08 0A 00 97 35 33 32 |........)....532|
00000010: 38 30 2C 30 3A 97 35 33 32 38 31 2C 30 3A 99 22 |80,0:.53281,0:."|
00000020: 93 05 22 3B C7 28 31 34 29 00 32 08 0F 00 41 31 |..";.(14).2...A1|
00000030: B2 31 00 57 08 14 00 86 53 28 36 2C 35 29 2C 53 |.1.W....S(6,5),S|
00000040: 24 28 31 31 29 2C 53 45 24 28 31 31 29 2C 4E 55 |$(11),SE$(11),NU|
00000050: 24 28 31 30 2C 33 29 00 61 08 64 00 8D 34 30 30 |$(10,3).a.d..400|
00000060: 30 00 6D 08 69 00 8D 20 31 30 30 30 30 00 77 08 |0.m.i.. 10000.w.|
00000070: 6E 00 8D 33 36 30 30 00 A1 08 78 00 48 B2 30 3A |n..3600...x.H.0:|
00000080: 56 B2 31 30 3A 54 58 24 B2 22 C4 4F 20 59 4F 55 |V.10:TX$.".O YOU|
00000090: 20 4E 45 45 44 20 41 20 4C 45 53 53 4F 4E 3F 20 | NEED A LESSON? |
000000A0: 22 00 AB 08 82 00 8D 33 32 30 30 00 BF 08 8C 00 |"......3200.....|
000000B0: 4C 4F B2 30 3A 8D 32 31 30 30 20 3A 99 41 24 00 |LO.0:.2100 :.A$.|
000000C0: DF 08 96 00 8B 41 24 B2 22 59 22 B0 41 24 B2 22 |.....A$."Y".A$."|
000000D0: D9 22 A7 8D 32 30 30 30 30 3A 89 20 31 36 30 00 |."..20000:. 160.|
000000E0: FB 08 97 00 8B 20 41 24 B2 22 4E 22 20 B0 20 41 |..... A$."N" . A|
000000F0: 24 B2 22 CE 22 20 A7 20 31 36 30 00 05 09 98 00 |$."." . 160.....|
00000100: 89 20 31 32 30 00 0F 09 A0 00 8D 35 30 30 30 00 |. 120......5000.|
00000110: 18 09 A5 00 52 55 B2 31 00 22 09 AA 00 8D 31 30 |....RU.1."....10|
00000120: 30 30 00 31 09 AC 00 8B 4F 50 B3 B1 33 A7 31 38 |00.1....OP..3.18|
00000130: 30 00 3B 09 AE 00 8D 33 36 30 30 00 44 09 B0 00 |0.;....3600.D...|
00000140: 8D 35 30 30 00 4E 09 B4 00 8D 33 36 30 30 00 7D |.500.N....3600.}|
00000150: 09 BE 00 48 B2 30 3A 56 B2 31 30 3A 54 58 24 B2 |...H.0:V.10:TX$.|
00000160: 22 C4 4F 20 59 4F 55 20 57 41 4E 54 20 54 4F 20 |".O YOU WANT TO |
00000170: 50 4C 41 59 20 41 47 41 49 4E 3F 20 22 00 87 09 |PLAY AGAIN? "...|
00000180: C8 00 8D 33 32 30 30 00 9B 09 D2 00 4C 4F B2 30 |...3200.....LO.0|
00000190: 3A 8D 32 31 30 30 20 3A 99 41 24 00 B2 09 DC 00 |:.2100 :.A$.....|
000001A0: 8B 41 24 B2 22 59 22 B0 41 24 B2 22 D9 22 A7 31 |.A$."Y".A$.".".1|
000001B0: 36 30 00 CE 09 DD 00 8B 20 41 24 B2 22 4E 22 20 |60...... A$."N" |
000001C0: B0 20 41 24 B2 22 CE 22 20 A7 20 32 33 30 00 D8 |. A$."." . 230..|
000001D0: 09 DE 00 89 20 31 39 30 00 E8 09 E6 00 9C 3A 93 |.... 190......:.|
000001E0: 22 4D 45 4E 55 22 2C 38 00 EE 09 F0 00 90 00 F4 |"MENU",8........|
000001F0: 09 A3 01 AA 00 21 0A F4 01 56 B2 31 30 3A 48 B2 |.....!...V.10:H.|
00000200: 30 3A 54 58 24 B2 22 D9 4F 55 20 47 4F 54 22 AA |0:TX$.".OU GOT".|
00000210: C4 28 4E 50 AB 4D 49 29 AA 22 20 52 49 47 48 54 |.(NP.MI)." RIGHT|
00000220: 22 00 31 0A FE 01 8D 33 30 30 30 3A 8D 33 32 30 |".1....3000:.320|
00000230: 30 00 4E 0A 08 02 56 B2 31 31 3A 54 58 24 B2 22 |0.N...V.11:TX$."|
00000240: 4F 55 54 20 4F 46 20 22 AA C4 28 4E 50 29 00 5E |OUT OF "..(NP).^|
00000250: 0A 12 02 8D 33 30 30 30 3A 8D 33 32 30 30 00 8E |....3000:.3200..|
00000260: 0A 1C 02 56 B2 31 32 3A 54 58 24 B2 22 46 4F 52 |...V.12:TX$."FOR|
00000270: 20 22 AA C4 28 B5 28 28 28 4E 50 AB 4D 49 29 AD | "..(.(((NP.MI).|
00000280: 4E 50 29 AC 31 30 30 29 29 AA 22 25 2E 22 00 9E |NP).100))."%."..|
00000290: 0A 21 02 8D 33 30 30 30 3A 8D 33 32 30 30 00 B1 |.!..3000:.3200..|
000002A0: 0A 26 02 44 45 4C 41 59 B2 31 30 3A 8D 32 30 30 |.&.DELAY.10:.200|
000002B0: 30 00 B7 0A 30 02 8E 00 D5 0A E8 03 8F 20 2A 2A |0...0........ **|
000002C0: 2A 20 43 45 4E 54 52 41 4C 20 52 4F 55 54 49 4E |* CENTRAL ROUTIN|
000002D0: 45 20 2A 2A 2A 00 E3 0A ED 03 48 50 B2 30 3A 4D |E ***.....HP.0:M|
000002E0: 49 B2 30 00 EF 0A F2 03 81 49 B2 31 A4 4E 50 00 |I.0......I.1.NP.|
000002F0: FB 0A FC 03 3A 8D 31 39 30 30 30 00 23 0B FD 03 |....:.19000.#...|
00000300: 8D 33 36 30 30 3A 48 B2 30 3A 56 B2 36 3A 54 58 |.3600:H.0:V.6:TX|
00000310: 24 B2 22 D3 55 42 54 52 41 43 54 3A 22 3A 8D 33 |$.".UBTRACT:":.3|
00000320: 32 30 30 00 3D 0B 10 04 91 4F 50 8D 31 31 30 30 |200.=....OP.1100|
00000330: 30 2C 31 31 30 30 30 2C 31 37 30 30 30 00 75 0B |0,11000,17000.u.|
00000340: 2A 04 56 B2 32 34 3A 54 58 24 B2 22 20 20 20 1F |*.V.24:TX$." .|
00000350: 12 3C D2 C5 D4 D5 D2 CE 3E 20 54 4F 20 43 4F 4E |.<......> TO CON|
00000360: 54 49 4E 55 45 2C 20 3C 5F 3E 20 54 4F 20 45 58 |TINUE, <_> TO EX|
00000370: 49 54 92 05 22 00 85 0B 2B 04 8D 33 30 30 30 3A |IT.."...+..3000:|
00000380: 8D 33 32 30 30 00 94 0B 2C 04 4C 4F B2 30 3A 8D |.3200...,.LO.0:.|
00000390: 32 31 30 30 00 AA 0B 2D 04 8B 41 24 B2 22 5F 22 |2100...-..A$."_"|
000003A0: A7 53 41 B2 49 3A 49 B2 4E 50 00 BF 0B 2E 04 8B |.SA.I:I.NP......|
000003B0: 4F 50 B2 33 AF 4D 49 B2 33 A7 8D 31 30 37 36 00 |OP.3.MI.3..1076.|
000003C0: CE 0B 30 04 8B 48 50 B2 31 A7 49 B2 4E 50 00 E5 |..0..HP.1.I.NP..|
000003D0: 0B 32 04 82 49 3A 8B 20 53 41 B3 B1 30 20 A7 20 |.2..I:. SA..0 . |
000003E0: 4E 50 B2 53 41 00 F3 0B 33 04 99 C7 28 31 34 29 |NP.SA...3...(14)|
000003F0: 3B 3A 8E 00 19 0C 34 04 56 B2 31 39 3A 54 58 24 |;:....4.V.19:TX$|
00000400: B2 22 44 4F 20 59 4F 55 20 4E 45 45 44 20 53 4F |."DO YOU NEED SO|
00000410: 4D 45 20 48 45 4C 50 3F 22 00 29 0C 35 04 8D 33 |ME HELP?".).5..3|
00000420: 30 30 30 3A 8D 33 32 30 30 00 38 0C 36 04 4C 4F |000:.3200.8.6.LO|
00000430: B2 30 3A 8D 32 31 30 30 00 50 0C 37 04 8B 41 24 |.0:.2100.P.7..A$|
00000440: B2 22 59 22 B0 41 24 B2 22 D9 22 A7 48 50 B2 31 |."Y".A$.".".HP.1|
00000450: 00 56 0C 38 04 8E 00 6A 0C D0 07 8F 20 2A 2A 2A |.V.8...j.... ***|
00000460: 20 54 49 4D 45 52 20 2A 2A 2A 00 7B 0C DA 07 54 | TIMER ***.{...T|
00000470: 49 24 B2 22 30 30 30 30 30 30 22 00 90 0C DF 07 |I$."000000".....|
00000480: A1 41 24 3A 8B 41 24 B3 B1 22 22 A7 32 30 33 30 |.A$:.A$.."".2030|
00000490: 00 A6 0C E4 07 8B 54 49 AD 36 30 B3 44 45 4C 41 |......TI.60.DELA|
000004A0: 59 A7 32 30 31 35 00 AC 0C EE 07 8E 00 C8 0C 34 |Y.2015.........4|
000004B0: 08 8F 20 2A 2A 2A 20 47 45 54 20 43 48 41 52 41 |.. *** GET CHARA|
000004C0: 43 54 45 52 20 2A 2A 2A 00 DC 0C 3E 08 A1 41 24 |CTER ***...>..A$|
000004D0: 3A 8B 41 24 B2 22 22 A7 32 31 31 30 00 F8 0C 48 |:.A$."".2110...H|
000004E0: 08 41 B2 C5 28 41 24 29 3A 8B 41 B3 4C 4F B0 41 |.A..(A$):.A.LO.A|
000004F0: B1 48 49 A7 32 31 31 30 00 FE 0C 52 08 8E 00 18 |.HI.2110...R....|
00000500: 0D B8 0B 8F 20 2A 2A 2A 20 43 45 4E 54 45 52 20 |.... *** CENTER |
00000510: 54 45 58 54 20 2A 2A 2A 00 25 0D C2 0B 58 B2 C3 |TEXT ***.%...X..|
00000520: 28 54 58 24 29 00 34 0D CC 0B 48 B2 28 34 30 AB |(TX$).4...H.(40.|
00000530: 58 29 AD 32 00 3A 0D D6 0B 8E 00 65 0D 1C 0C 56 |X).2.:.....e...V|
00000540: B2 32 34 3A 54 58 24 B2 22 20 20 20 1F 12 3C D2 |.24:TX$." ..<.|
00000550: C5 D4 D5 D2 CE 3E 20 54 4F 20 43 4F 4E 54 49 4E |.....> TO CONTIN|
00000560: 55 45 92 05 22 00 75 0D 26 0C 8D 33 30 30 30 3A |UE..".u.&..3000:|
00000570: 8D 33 32 30 30 00 84 0D 30 0C 4C 4F B2 30 3A 8D |.3200...0.LO.0:.|
00000580: 32 31 30 30 00 9B 0D 3A 0C 8B 41 24 B3 B1 20 C7 |2100...:..A$.. .|
00000590: 28 31 33 29 20 A7 20 33 31 30 30 00 A1 0D 44 0C |(13) . 3100...D.|
000005A0: 8E 00 BB 0D 80 0C 8F 20 2A 2A 2A 20 48 4F 52 2F |....... *** HOR/|
000005B0: 56 45 52 20 54 41 42 20 2A 2A 2A 00 CD 0D 8A 0C |VER TAB ***.....|
000005C0: 56 54 24 B2 22 22 3A 81 51 B2 31 A4 56 00 DE 0D |VT$."":.Q.1.V...|
000005D0: 94 0C 3A 56 54 24 B2 56 54 24 AA 22 11 22 00 E5 |..:VT$.VT$."."..|
000005E0: 0D 9E 0C 82 51 00 F3 0D A8 0C 99 22 13 22 3B 56 |....Q......".";V|
000005F0: 54 24 3B 00 01 0E B2 0C 99 A3 48 29 3B 54 58 24 |T$;.......H);TX$|
00000600: 3B 00 07 0E BC 0C 8E 00 28 0E AC 0D 8F 20 2A 2A |;.......(.... **|
00000610: 2A 20 4C 49 4E 45 20 41 43 52 4F 53 53 20 53 43 |* LINE ACROSS SC|
00000620: 52 45 45 4E 20 2A 2A 2A 00 32 0E B6 0D 99 22 1F |REEN ***.2....".|
00000630: 22 3B 00 3E 0E C0 0D 81 51 B2 31 A4 34 30 00 49 |";.>....Q.1.40.I|
00000640: 0E CA 0D 3A 99 22 B2 22 3B 00 50 0E D4 0D 82 51 |...:.".";.P....Q|
00000650: 00 5C 0E DE 0D 81 51 B2 31 A4 34 30 00 67 0E E8 |.\....Q.1.40.g..|
00000660: 0D 3A 99 22 B1 22 3B 00 6E 0E F2 0D 82 51 00 78 |.:.".";.n....Q.x|
00000670: 0E F7 0D 99 22 05 22 3B 00 7E 0E FC 0D 8E 00 A0 |....".";.~......|
00000680: 0E 10 0E 8F 20 2A 2A 2A 20 50 52 49 4E 54 20 53 |.... *** PRINT S|
00000690: 43 52 45 45 4E 20 48 45 41 44 45 52 20 2A 2A 2A |CREEN HEADER ***|
000006A0: 00 A9 0E 1A 0E 99 22 93 22 00 CD 0E 2E 0E 54 58 |......".".....TX|
000006B0: 24 B2 22 D6 C9 D3 C9 CF CE 20 D3 CF C6 D4 D7 C1 |$."...... ......|
000006C0: D2 C5 A0 D0 D2 C5 D3 C5 CE D4 D3 3A 22 00 D6 0E |...........:"...|
000006D0: 38 0E 48 B2 31 30 00 E4 0E 42 0E 56 B2 31 3A 8D |8.H.10...B.V.1:.|
000006E0: 33 32 30 30 00 EF 0E 4C 0E 54 58 24 B2 54 24 00 |3200...L.TX$.T$.|
000006F0: F9 0E 51 0E 99 22 1C 22 3B 00 02 0F 56 0E 48 B2 |..Q..".";...V.H.|
00000700: 31 30 00 10 0F 60 0E 56 B2 33 3A 8D 33 32 30 30 |10...`.V.3:.3200|
00000710: 00 1A 0F 65 0E 99 22 05 22 3B 00 28 0F 6A 0E 99 |...e..".";.(.j..|
00000720: 3A 8D 33 35 30 30 3A 8E 00 40 0F A0 0F 8F 20 2A |:.3500:..@.... *|
00000730: 2A 2A 20 52 45 41 44 20 44 41 54 41 20 2A 2A 2A |** READ DATA ***|
00000740: 00 48 0F A5 0F 87 54 24 00 53 0F AA 0F 81 49 B2 |.H....T$.S....I.|
00000750: 31 A4 36 00 60 0F B4 0F 3A 87 52 57 24 28 49 29 |1.6.`...:.RW$(I)|
00000760: 00 67 0F BE 0F 82 49 00 72 0F C8 0F 81 49 B2 31 |.g....I.r....I.1|
00000770: A4 33 00 7F 0F D2 0F 3A 87 4F 50 24 28 49 29 00 |.3.....:.OP$(I).|
00000780: 86 0F DC 0F 82 49 00 91 0F E6 0F 81 49 B2 31 A4 |.....I......I.1.|
00000790: 34 00 A4 0F F0 0F 3A 87 4D 55 24 28 49 29 2C 43 |4.....:.MU$(I),C|
000007A0: 4F 28 49 29 00 AB 0F FF 0F 82 49 00 B6 0F 00 10 |O(I)......I.....|
000007B0: 81 49 B2 31 A4 36 00 C2 0F 01 10 3A 87 47 24 28 |.I.1.6.....:.G$(|
000007C0: 49 29 00 CB 0F 02 10 82 49 3A 8E 00 E6 0F 04 10 |I)......I:......|
000007D0: 8F 20 2A 2A 2A 20 50 52 4F 47 52 41 4D 20 44 41 |. *** PROGRAM DA|
000007E0: 54 41 20 2A 2A 2A 00 F9 0F 0E 10 83 22 D3 55 42 |TA ***......".UB|
000007F0: 54 52 41 43 54 49 4F 4E 22 00 1D 10 18 10 83 22 |TRACTION"......"|
00000800: C7 52 45 41 54 21 22 2C 22 C6 41 4E 54 41 53 54 |.REAT!",".ANTAST|
00000810: 49 43 21 22 2C 22 D3 55 50 45 52 21 22 00 60 10 |IC!",".UPER!".`.|
00000820: 22 10 83 22 D9 4F 55 27 52 45 20 52 45 41 4C 4C |"..".OU'RE REALL|
00000830: 59 20 47 4F 49 4E 47 20 4E 4F 57 21 22 2C 22 D9 |Y GOING NOW!",".|
00000840: 45 53 21 20 20 D9 45 53 21 20 20 D9 45 53 21 22 |ES! .ES! .ES!"|
00000850: 2C 22 D4 48 41 54 27 53 20 47 52 45 41 54 21 22 |,".HAT'S GREAT!"|
00000860: 00 7A 10 2C 10 83 22 D3 45 45 20 45 58 41 4D 50 |.z.,..".EE EXAMP|
00000870: 4C 45 53 20 44 4F 4E 45 2E 22 00 98 10 36 10 83 |LES DONE."...6..|
00000880: 22 C4 4F 20 50 52 4F 42 4C 45 4D 53 20 57 49 54 |".O PROBLEMS WIT|
00000890: 48 20 48 45 4C 50 2E 22 00 B5 10 40 10 83 22 C4 |H HELP."...@..".|
000008A0: 4F 20 50 52 4F 42 4C 45 4D 53 20 59 4F 55 52 53 |O PROBLEMS YOURS|
000008B0: 45 4C 46 2E 22 00 F1 10 4A 10 83 22 54 45 4E 22 |ELF."...J.."TEN"|
000008C0: 2C 32 38 2C 22 48 55 4E 44 52 45 44 22 2C 33 30 |,28,"HUNDRED",30|
000008D0: 2C 22 54 48 4F 55 53 41 4E 44 22 2C 33 31 2C 22 |,"THOUSAND",31,"|
000008E0: 54 45 4E 20 54 48 4F 55 53 41 4E 44 22 2C 31 35 |TEN THOUSAND",15|
000008F0: 38 00 0E 11 88 13 8F 20 2A 2A 2A 20 53 45 54 55 |8...... *** SETU|
00000900: 50 20 46 4F 52 20 4D 41 54 48 20 2A 2A 2A 00 1D |P FOR MATH ***..|
00000910: 11 89 13 8B 52 55 B2 31 A7 35 30 33 37 00 48 11 |....RU.1.5037.H.|
00000920: 92 13 48 B2 30 3A 56 B2 31 30 3A 54 58 24 B2 22 |..H.0:V.10:TX$."|
00000930: D7 48 41 54 27 53 20 59 4F 55 52 20 46 49 52 53 |.HAT'S YOUR FIRS|
00000940: 54 20 4E 41 4D 45 20 22 00 52 11 9C 13 8D 33 32 |T NAME ".R....32|
00000950: 30 30 00 5B 11 A6 13 85 4E 4D 24 00 96 11 AD 13 |00.[....NM$.....|
00000960: 56 B2 31 30 3A 48 B2 30 3A 54 58 24 B2 22 D7 4F |V.10:H.0:TX$.".O|
00000970: 55 4C 44 20 59 4F 55 20 4C 49 4B 45 20 54 4F 3A |ULD YOU LIKE TO:|
00000980: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000990: 20 20 20 20 20 22 00 A0 11 AE 13 8D 33 32 30 30 | "......3200|
000009A0: 00 B4 11 B0 13 48 B2 37 3A 56 B2 31 32 3A 81 49 |.....H.7:V.12:.I|
000009B0: B2 31 A4 33 00 CE 11 BA 13 3A 54 58 24 B2 C4 28 |.1.3.....:TX$..(|
000009C0: 49 29 AA 22 2E 20 22 AA 4F 50 24 28 49 29 00 D9 |I).". ".OP$(I)..|
000009D0: 11 C4 13 3A 8D 33 32 30 30 00 E4 11 CE 13 3A 56 |...:.3200.....:V|
000009E0: B2 56 AA 32 00 EB 11 D8 13 82 49 00 0D 12 E2 13 |.V.2......I.....|
000009F0: 48 B2 30 3A 54 58 24 B2 22 D9 4F 55 52 20 43 48 |H.0:TX$.".OUR CH|
00000A00: 4F 49 43 45 3F 20 28 31 2D 33 29 20 22 00 17 12 |OICE? (1-3) "...|
00000A10: EC 13 8D 33 32 30 30 00 2B 12 F6 13 4C 4F B2 31 |...3200.+...LO.1|
00000A20: 3A 48 49 B2 33 3A 8D 32 31 30 30 00 3A 12 00 14 |:HI.3:.2100.:...|
00000A30: 4F 50 B2 41 3A 48 49 B2 32 30 00 49 12 0A 14 8B |OP.A:HI.20.I....|
00000A40: 4F 50 B2 31 A7 48 49 B2 35 00 7A 12 1E 14 56 B2 |OP.1.HI.5.z...V.|
00000A50: 32 30 3A 48 B2 30 3A 54 58 24 B2 22 C8 4F 57 20 |20:H.0:TX$.".OW |
00000A60: 4D 41 4E 59 20 50 52 4F 42 4C 45 4D 53 20 44 4F |MANY PROBLEMS DO|
00000A70: 20 59 4F 55 20 57 41 4E 54 22 00 84 12 28 14 8D | YOU WANT"...(..|
00000A80: 33 32 30 30 00 AA 12 32 14 56 B2 32 31 3A 54 58 |3200...2.V.21:TX|
00000A90: 24 B2 22 54 4F 20 44 4F 3F 20 28 32 20 2D 22 AA |$."TO DO? (2 -".|
00000AA0: C4 28 48 49 29 AA 22 29 20 22 00 B4 12 3C 14 8D |.(HI).") "...<..|
00000AB0: 33 32 30 30 00 BC 12 46 14 85 4E 50 00 DD 12 50 |3200...F..NP...P|
00000AC0: 14 8B 4E 50 B3 4C 4F B0 4E 50 B1 48 49 A7 99 22 |..NP.LO.NP.HI.."|
00000AD0: 14 14 14 14 14 22 3B 3A 89 35 31 37 30 00 E7 12 |.....";:.5170...|
00000AE0: 5A 14 8D 33 36 30 30 00 19 13 64 14 56 B2 31 31 |Z..3600...d.V.11|
00000AF0: 3A 48 B2 30 3A 54 58 24 B2 22 C8 4F 57 20 4D 41 |:H.0:TX$.".OW MA|
00000B00: 4E 59 20 44 49 47 49 54 53 20 49 4E 20 54 48 45 |NY DIGITS IN THE|
00000B10: 20 4C 41 52 47 45 53 54 22 00 23 13 6E 14 8D 33 | LARGEST".#.n..3|
00000B20: 32 30 30 00 47 13 70 14 56 B2 31 32 3A 48 B2 30 |200.G.p.V.12:H.0|
00000B30: 3A 54 58 24 B2 22 4E 55 4D 42 45 52 3F 20 28 32 |:TX$."NUMBER? (2|
00000B40: 20 2D 20 35 29 20 22 00 51 13 72 14 8D 33 32 30 | - 5) ".Q.r..320|
00000B50: 30 00 6E 13 78 14 48 49 B2 35 3A 4C 4F B2 32 3A |0.n.x.HI.5:LO.2:|
00000B60: 8D 32 31 30 30 3A 4E 44 B2 41 3A 99 41 24 00 74 |.2100:ND.A:.A$.t|
00000B70: 13 0E 15 8E 00 94 13 10 27 8F 20 2A 2A 2A 20 44 |........'. *** D|
00000B80: 4F 20 53 50 52 49 54 45 59 20 54 48 49 4E 47 53 |O SPRITEY THINGS|
00000B90: 20 2A 2A 2A 00 A6 13 11 27 81 20 49 B2 37 30 34 | ***....'. I.704|
00000BA0: 20 A4 20 37 36 37 00 B2 13 12 27 87 58 3A 97 49 | . 767....'.X:.I|
00000BB0: 2C 58 00 B8 13 13 27 82 00 C5 13 14 27 97 32 30 |,X....'.....'.20|
00000BC0: 34 30 2C 31 31 00 DB 13 15 27 97 35 33 32 36 39 |40,11....'.53269|
00000BD0: 2C C2 28 35 33 32 36 39 29 B0 31 00 FE 13 16 27 |,.(53269).1....'|
00000BE0: 97 35 33 32 38 37 2C 32 3A 97 35 33 32 37 37 2C |.53287,2:.53277,|
00000BF0: 32 35 35 3A 97 35 33 32 37 31 2C 32 35 35 00 16 |255:.53271,255..|
00000C00: 14 17 27 97 35 33 32 34 38 2C 33 30 3A 97 35 33 |..'.53248,30:.53|
00000C10: 32 34 39 2C 35 38 00 1C 14 18 27 8E 00 44 14 19 |249,58....'..D..|
00000C20: 27 83 32 35 32 2C 32 35 32 2C 32 35 32 2C 31 32 |'.252,252,252,12|
00000C30: 31 2C 32 34 39 2C 32 34 38 2C 35 31 2C 32 34 33 |1,249,248,51,243|
00000C40: 2C 32 34 30 00 68 14 1A 27 83 37 2C 32 33 31 2C |,240.h..'.7,231,|
00000C50: 32 32 34 2C 31 35 2C 32 30 37 2C 31 39 32 2C 37 |224,15,207,192,7|
00000C60: 2C 31 35 39 2C 31 32 38 00 84 14 1B 27 83 33 2C |,159,128....'.3,|
00000C70: 36 33 2C 30 2C 30 2C 31 32 36 2C 30 2C 30 2C 32 |63,0,0,126,0,0,2|
00000C80: 35 32 2C 30 00 9E 14 1C 27 83 30 2C 31 32 30 2C |52,0....'.0,120,|
00000C90: 30 2C 30 2C 34 38 2C 30 2C 30 2C 30 2C 30 00 DB |0,0,48,0,0,0,0..|
00000CA0: 14 1D 27 83 30 2C 30 2C 30 2C 30 2C 30 2C 30 2C |..'.0,0,0,0,0,0,|
00000CB0: 30 2C 30 2C 30 2C 30 2C 30 2C 30 2C 30 2C 30 2C |0,0,0,0,0,0,0,0,|
00000CC0: 30 2C 30 2C 30 2C 30 2C 30 2C 30 2C 30 2C 30 2C |0,0,0,0,0,0,0,0,|
00000CD0: 30 2C 30 2C 30 2C 30 2C 30 2C 30 00 EC 14 1E 27 |0,0,0,0,0,0....'|
00000CE0: 83 30 2C 30 2C 30 2C 30 2C 30 2C 30 00 07 15 F8 |.0,0,0,0,0,0....|
00000CF0: 2A 8F 20 2A 2A 2A 20 53 45 45 20 45 58 41 4D 50 |*. *** SEE EXAMP|
00000D00: 4C 45 53 20 2A 2A 2A 00 20 15 02 2B 56 B2 31 30 |LES ***. ..+V.10|
00000D10: 3A 48 B2 31 35 3A 54 58 24 B2 53 45 24 28 31 29 |:H.15:TX$.SE$(1)|
00000D20: 00 2A 15 0C 2B 8D 33 32 30 30 00 48 15 16 2B 56 |.*..+.3200.H..+V|
00000D30: B2 31 32 3A 48 B2 31 35 3A 54 58 24 B2 22 2D 20 |.12:H.15:TX$."- |
00000D40: 22 AA 53 45 24 28 32 29 00 52 15 20 2B 8D 33 32 |".SE$(2).R. +.32|
00000D50: 30 30 00 73 15 2A 2B 56 B2 31 33 3A 48 B2 31 33 |00.s.*+V.13:H.13|
00000D60: 3A 54 58 24 B2 22 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |:TX$."..........|
00000D70: C0 C0 22 00 7D 15 34 2B 8D 33 32 30 30 00 90 15 |..".}.4+.3200...|
00000D80: 39 2B 44 45 4C 41 59 B2 2E 35 3A 8D 32 30 30 30 |9+DELAY..5:.2000|
00000D90: 00 9E 15 3E 2B 81 4C B2 31 A4 4E 44 AB 31 00 CD |...>+.L.1.ND.1..|
00000DA0: 15 48 2B 3A 81 4D B2 35 35 36 39 36 AA 31 35 AA |.H+:.M.55696.15.|
00000DB0: 28 4E 44 AB 4C 29 AC 32 A4 35 35 36 39 36 AA 39 |(ND.L).2.55696.9|
00000DC0: 35 AA 28 4E 44 AB 4C 29 AC 32 A9 34 30 00 DF 15 |5.(ND.L).2.40...|
00000DD0: 52 2B 3A 3A 97 4D 2C 32 3A 97 4D AB 31 2C 32 00 |R+::.M,2:.M.1,2.|
00000DE0: E7 15 5C 2B 3A 82 4D 00 1C 16 66 2B 3A 48 B2 30 |..\+:.M...f+:H.0|
00000DF0: 3A 56 B2 32 31 3A 54 58 24 B2 22 C9 53 20 54 48 |:V.21:TX$.".S TH|
00000E00: 45 20 42 4F 54 54 4F 4D 20 4E 55 4D 42 45 52 20 |E BOTTOM NUMBER |
00000E10: 4C 41 52 47 45 52 20 54 48 41 4E 22 00 27 16 70 |LARGER THAN".'.p|
00000E20: 2B 3A 8D 33 32 30 30 00 41 16 7A 2B 3A 56 B2 32 |+:.3200.A.z+:V.2|
00000E30: 32 3A 54 58 24 B2 22 54 48 45 20 54 4F 50 3F 20 |2:TX$."THE TOP? |
00000E40: 22 00 4C 16 84 2B 3A 8D 33 32 30 30 00 7B 16 8E |".L..+:.3200.{..|
00000E50: 2B 3A 56 B2 32 32 3A 48 B2 39 3A 8B 53 28 32 2C |+:V.22:H.9:.S(2,|
00000E60: 4C 29 B1 53 28 31 2C 4C 29 A7 54 58 24 B2 22 20 |L).S(1,L).TX$." |
00000E70: 59 45 53 22 3A 89 31 31 31 37 30 00 8A 16 98 2B |YES":.11170....+|
00000E80: 3A 54 58 24 B2 22 20 4E 4F 22 00 A8 16 A2 2B 3A |:TX$." NO"....+:|
00000E90: 8B 4F 50 B2 32 A7 53 24 B2 C8 28 54 58 24 2C 31 |.OP.2.S$..(TX$,1|
00000EA0: 29 3A 8D 31 35 30 30 30 00 BD 16 A7 2B 3A 44 45 |):.15000....+:DE|
00000EB0: 4C 41 59 B2 31 2E 35 3A 8D 32 30 30 30 00 C8 16 |LAY.1.5:.2000...|
00000EC0: AC 2B 3A 8D 33 32 30 30 00 DD 16 AE 2B 3A 44 45 |.+:.3200....+:DE|
00000ED0: 4C 41 59 B2 31 2E 35 3A 8D 32 30 30 30 00 17 17 |LAY.1.5:.2000...|
00000EE0: B0 2B 3A 56 B2 32 32 3A 48 B2 30 3A 54 58 24 B2 |.+:V.22:H.0:TX$.|
00000EF0: 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |" |
00000F00: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000F10: 20 20 20 20 20 20 22 00 22 17 B2 2B 3A 8D 33 32 | "."..+:.32|
00000F20: 30 30 00 3D 17 B6 2B 3A 8B 53 28 32 2C 4C 29 B2 |00.=..+:.S(2,L).|
00000F30: B3 53 28 31 2C 4C 29 A7 31 32 30 30 30 00 78 17 |.S(1,L).12000.x.|
00000F40: C0 2B 3A 56 B2 32 31 3A 48 B2 30 3A 54 58 24 B2 |.+:V.21:H.0:TX$.|
00000F50: 22 C2 4F 52 52 4F 57 20 4F 4E 45 20 46 52 4F 4D |".ORROW ONE FROM|
00000F60: 20 54 48 45 20 4E 45 58 54 20 4E 55 4D 42 45 52 | THE NEXT NUMBER|
00000F70: 2E 20 20 20 20 20 20 22 00 83 17 CA 2B 3A 8D 33 |. "....+:.3|
00000F80: 32 30 30 00 96 17 CF 2B 3A 44 45 4C 41 59 B2 32 |200....+:DELAY.2|
00000F90: 3A 8D 32 30 30 30 00 C6 17 D4 2B 3A 56 B2 31 30 |:.2000....+:V.10|
00000FA0: 3A 48 B2 31 32 AA 28 4E 44 AB 4C 29 AC 32 3A 54 |:H.12.(ND.L).2:T|
00000FB0: 58 24 B2 22 1F 22 AA C4 28 53 28 31 2C 4C AA 31 |X$."."..(S(1,L.1|
00000FC0: 29 29 AA 22 05 22 00 D1 17 DE 2B 3A 8D 33 32 30 |))."."....+:.320|
00000FD0: 30 00 E4 17 E3 2B 3A 44 45 4C 41 59 B2 31 3A 8D |0....+:DELAY.1:.|
00000FE0: 32 30 30 30 00 1F 18 E8 2B 3A 56 B2 32 31 3A 48 |2000....+:V.21:H|
00000FF0: B2 30 3A 54 58 24 B2 22 C1 44 44 20 31 30 20 54 |.0:TX$.".DD 10 T|
00001000: 4F 20 54 48 45 20 54 4F 50 20 4E 55 4D 42 45 52 |O THE TOP NUMBER|
00001010: 2E 20 20 20 20 20 20 20 20 20 20 20 20 20 22 00 |. ".|
00001020: 2A 18 F2 2B 3A 8D 33 32 30 30 00 3D 18 F7 2B 3A |*..+:.3200.=..+:|
00001030: 44 45 4C 41 59 B2 32 3A 8D 32 30 30 30 00 5F 18 |DELAY.2:.2000._.|
00001040: FC 2B 3A 56 B2 31 30 3A 48 B2 31 34 AA 28 4E 44 |.+:V.10:H.14.(ND|
00001050: AB 4C 29 AC 32 3A 54 58 24 B2 22 1C 31 05 22 00 |.L).2:TX$.".1.".|
00001060: 6A 18 06 2C 3A 8D 33 32 30 30 00 7D 18 0B 2C 3A |j..,:.3200.}..,:|
00001070: 44 45 4C 41 59 B2 31 3A 8D 32 30 30 30 00 B8 18 |DELAY.1:.2000...|
00001080: E0 2E 3A 56 B2 32 31 3A 48 B2 30 3A 54 58 24 B2 |..:V.21:H.0:TX$.|
00001090: 22 D3 55 42 54 52 41 43 54 2E 2E 2E 20 20 20 20 |".UBTRACT... |
000010A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000010B0: 20 20 20 20 20 20 20 22 00 C3 18 EA 2E 3A 8D 33 | ".....:.3|
000010C0: 32 30 30 00 D6 18 EF 2E 3A 44 45 4C 41 59 B2 32 |200.....:DELAY.2|
000010D0: 3A 8D 32 30 30 30 00 FC 18 F4 2E 3A 56 B2 31 36 |:.2000.....:V.16|
000010E0: 3A 48 B2 31 34 AA 28 4E 44 AB 4C 29 AC 32 3A 54 |:H.14.(ND.L).2:T|
000010F0: 58 24 B2 C4 28 53 28 33 2C 4C 29 29 00 1A 19 FE |X$..(S(3,L))....|
00001100: 2E 3A 8B 4F 50 B2 32 A7 53 24 B2 C9 28 54 58 24 |.:.OP.2.S$..(TX$|
00001110: 2C 31 29 3A 8D 31 35 30 30 30 00 25 19 03 2F 3A |,1):.15000.%../:|
00001120: 8D 33 32 30 30 00 37 19 05 2F 44 45 4C 41 59 B2 |.3200.7../DELAY.|
00001130: 31 3A 8D 32 30 30 30 00 66 19 08 2F 3A 81 4D B2 |1:.2000.f../:.M.|
00001140: 35 35 36 39 36 AA 31 35 AA 28 4E 44 AB 4C 29 AC |55696.15.(ND.L).|
00001150: 32 A4 35 35 36 39 36 AA 39 35 AA 28 4E 44 AB 4C |2.55696.95.(ND.L|
00001160: 29 AC 32 A9 34 30 00 78 19 0A 2F 3A 3A 97 4D 2C |).2.40.x../::.M,|
00001170: 31 3A 97 4D AB 31 2C 30 00 80 19 0C 2F 3A 82 4D |1:.M.1,0..../:.M|
00001180: 00 92 19 12 2F 44 45 4C 41 59 B2 31 3A 8D 32 30 |..../DELAY.1:.20|
00001190: 30 30 00 99 19 17 2F 82 4C 00 D3 19 1C 2F 56 B2 |00..../.L..../V.|
000011A0: 32 31 3A 48 B2 30 3A 54 58 24 B2 22 C2 52 49 4E |21:H.0:TX$.".RIN|
000011B0: 47 20 44 4F 57 4E 20 54 48 45 20 4C 41 53 54 20 |G DOWN THE LAST |
000011C0: 4E 55 4D 42 45 52 2E 20 20 20 20 20 20 20 20 20 |NUMBER. |
000011D0: 20 20 22 00 DD 19 26 2F 8D 33 32 30 30 00 EF 19 | "...&/.3200...|
000011E0: 2B 2F 44 45 4C 41 59 B2 31 3A 8D 32 30 30 30 00 |+/DELAY.1:.2000.|
000011F0: 0C 1A 30 2F 56 B2 31 36 3A 48 B2 31 34 3A 54 58 |..0/V.16:H.14:TX|
00001200: 24 B2 C4 28 53 28 33 2C 4E 44 29 29 00 29 1A 3A |$..(S(3,ND)).).:|
00001210: 2F 8B 4F 50 B2 32 A7 53 24 B2 C8 28 54 58 24 2C |/.OP.2.S$..(TX$,|
00001220: 31 29 3A 8D 31 35 30 30 30 00 33 1A 44 2F 8D 33 |1):.15000.3.D/.3|
00001230: 32 30 30 00 39 1A 4E 2F 8E 00 5A 1A 98 3A 8F 20 |200.9.N/..Z..:. |
00001240: 2A 2A 2A 20 45 58 41 4D 50 4C 45 53 20 57 49 54 |*** EXAMPLES WIT|
00001250: 48 20 48 45 4C 50 20 2A 2A 2A 00 71 1A A2 3A 3A |H HELP ***.q..::|
00001260: 56 31 B2 56 3A 48 31 B2 48 3A 54 31 24 B2 54 58 |V1.V:H1.H:T1$.TX|
00001270: 24 00 7C 1A A7 3A 53 24 B2 54 58 24 00 8B 1A AC |$.|..:S$.TX$....|
00001280: 3A 81 4A B2 32 A4 C3 28 53 24 29 00 A8 1A B6 3A |:.J.2..(S$)....:|
00001290: 3A 56 B2 56 31 AA 31 3A 48 B2 48 31 AA 4A AB 31 |:V.V1.1:H.H1.J.1|
000012A0: 3A 54 58 24 B2 22 5E 22 00 B3 1A C0 3A 3A 8D 33 |:TX$."^"....::.3|
000012B0: 32 30 30 00 C6 1A CA 3A 3A 59 B2 30 3A 4C 4F B2 |200....::Y.0:LO.|
000012C0: 30 3A 48 49 B2 39 00 D1 1A D4 3A 3A 8D 32 31 30 |0:HI.9....::.210|
000012D0: 30 00 EA 1A DE 3A 3A 8B 41 24 B2 CA 28 53 24 2C |0....::.A$..(S$,|
000012E0: 4A 2C 31 29 A7 31 35 31 35 30 00 00 1B E8 3A 3A |J,1).15150....::|
000012F0: 59 B2 59 AA 31 3A 8B 59 B3 33 A7 31 35 30 36 30 |Y.Y.1:.Y.3.15060|
00001300: 00 30 1B F2 3A 3A 56 B2 32 33 3A 54 58 24 B2 22 |.0..::V.23:TX$."|
00001310: 12 C5 4E 54 45 52 20 41 20 22 AA CA 28 53 24 2C |..NTER A "..(S$,|
00001320: 4A 2C 31 29 AA 22 20 50 4C 45 41 53 45 2E 92 22 |J,1)." PLEASE.."|
00001330: 00 41 1B FC 3A 3A 8D 33 30 30 30 3A 8D 33 32 30 |.A..::.3000:.320|
00001340: 30 00 5F 1B 06 3B 3A 54 58 24 B2 22 20 20 20 20 |0._..;:TX$." |
00001350: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 00 | ".|
00001360: 74 1B 10 3B 3A 44 45 4C 41 59 B2 31 2E 35 3A 8D |t..;:DELAY.1.5:.|
00001370: 32 30 30 30 00 86 1B 1A 3B 3A 8D 33 32 30 30 3A |2000....;:.3200:|
00001380: 89 31 35 30 36 30 00 8C 1B 24 3B 3A 00 AD 1B 2E |.15060...$;:....|
00001390: 3B 3A 56 B2 56 31 3A 48 B2 48 31 AA 4A AB 31 3A |;:V.V1:H.H1.J.1:|
000013A0: 54 58 24 B2 CA 28 53 24 2C 4A 2C 31 29 00 B8 1B |TX$..(S$,J,1)...|
000013B0: 38 3B 3A 8D 33 32 30 30 00 D5 1B 42 3B 3A 56 B2 |8;:.3200...B;:V.|
000013C0: 56 31 AA 31 3A 48 B2 48 31 AA 4A AB 31 3A 54 58 |V1.1:H.H1.J.1:TX|
000013D0: 24 B2 22 20 22 00 E0 1B 4C 3B 3A 8D 33 32 30 30 |$." "...L;:.3200|
000013E0: 00 E7 1B 56 3B 82 4A 00 FD 1B 60 3B 56 B2 56 31 |...V;.J...`;V.V1|
000013F0: 3A 48 B2 48 31 3A 54 58 24 B2 54 31 24 00 03 1C |:H.H1:TX$.T1$...|
00001400: 6A 3B 8E 00 1D 1C 68 42 8F 20 2A 2A 2A 20 44 4F |j;....hB. *** DO|
00001410: 20 50 52 4F 42 4C 45 4D 53 20 2A 2A 2A 00 36 1C | PROBLEMS ***.6.|
00001420: 69 42 56 B2 31 30 3A 48 B2 31 35 3A 54 58 24 B2 |iBV.10:H.15:TX$.|
00001430: 53 45 24 28 31 29 00 40 1C 6A 42 8D 33 32 30 30 |SE$(1).@.jB.3200|
00001440: 00 5E 1C 6B 42 56 B2 31 32 3A 48 B2 31 35 3A 54 |.^.kBV.12:H.15:T|
00001450: 58 24 B2 22 2D 20 22 AA 53 45 24 28 32 29 00 68 |X$."- ".SE$(2).h|
00001460: 1C 6C 42 8D 33 32 30 30 00 89 1C 6D 42 56 B2 31 |.lB.3200...mBV.1|
00001470: 33 3A 48 B2 31 33 3A 54 58 24 B2 22 C0 C0 C0 C0 |3:H.13:TX$."....|
00001480: C0 C0 C0 C0 C0 C0 C0 C0 22 00 93 1C 6E 42 8D 33 |........"...nB.3|
00001490: 32 30 30 00 B5 1C 72 42 56 B2 31 35 3A 48 B2 30 |200...rBV.15:H.0|
000014A0: 20 3A 54 58 24 B2 22 D9 4F 55 52 20 41 4E 53 57 | :TX$.".OUR ANSW|
000014B0: 45 52 3A 20 22 00 BF 1C 7C 42 8D 33 32 30 30 00 |ER: "...|B.3200.|
000014C0: C7 1C 86 42 85 41 4E 00 E2 1C 90 42 8B B5 28 41 |...B.AN....B..(A|
000014D0: 4E 29 B2 B5 28 53 28 33 2C 30 29 29 A7 31 37 31 |N)..(S(3,0)).171|
000014E0: 32 30 00 EE 1C A4 42 4D 49 B2 4D 49 AA 31 00 1C |20....BMI.MI.1..|
000014F0: 1D AE 42 56 B2 31 38 3A 54 58 24 B2 22 D3 4F 52 |..BV.18:TX$.".OR|
00001500: 52 59 2E 20 20 D4 48 45 20 43 4F 52 52 45 43 54 |RY. .HE CORRECT|
00001510: 20 41 4E 53 57 45 52 20 49 53 3A 22 00 2C 1D B8 | ANSWER IS:".,..|
00001520: 42 8D 33 30 30 30 3A 8D 33 32 30 30 00 40 1D C2 |B.3000:.3200.@..|
00001530: 42 56 B2 32 30 3A 54 58 24 B2 53 45 24 28 33 29 |BV.20:TX$.SE$(3)|
00001540: 00 50 1D CC 42 8D 33 30 30 30 3A 8D 33 32 30 30 |.P..B.3000:.3200|
00001550: 00 5B 1D D6 42 89 31 37 32 38 30 00 6E 1D E0 42 |.[..B.17280.n..B|
00001560: 52 57 B2 B5 28 BB 28 30 29 AC 36 29 AA 31 00 79 |RW..(.(0).6).1.y|
00001570: 1D EA 42 81 4A B2 31 A4 34 00 9D 1D F4 42 3A 56 |..B.J.1.4....B:V|
00001580: B2 31 38 3A 54 58 24 B2 C7 28 43 4F 28 4A 29 29 |.18:TX$..(CO(J))|
00001590: AA 52 57 24 28 52 57 29 AA C7 28 35 29 00 AE 1D |.RW$(RW)..(5)...|
000015A0: FE 42 3A 8D 33 30 30 30 3A 8D 33 32 30 30 00 C1 |.B:.3000:.3200..|
000015B0: 1D 08 43 44 45 4C 41 59 B2 2E 37 3A 8D 32 30 30 |..CDELAY..7:.200|
000015C0: 30 00 F3 1D 12 43 3A 54 58 24 B2 22 20 20 20 20 |0....C:TX$." |
000015D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000015E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000015F0: 20 20 22 00 04 1E 1C 43 3A 8D 33 30 30 30 3A 8D | "....C:.3000:.|
00001600: 33 32 30 30 00 17 1E 26 43 44 45 4C 41 59 B2 2E |3200...&CDELAY..|
00001610: 33 3A 8D 32 30 30 30 00 1E 1E 30 43 82 4A 00 24 |3:.2000...0C.J.$|
00001620: 1E 80 43 8E 00 3F 1E 38 4A 8F 20 2A 2A 2A 20 4D |..C..?.8J. *** M|
00001630: 41 54 48 20 52 4F 55 54 49 4E 45 20 2A 2A 2A 00 |ATH ROUTINE ***.|
00001640: 69 1E 39 4A 56 B2 32 33 3A 54 58 24 B2 22 D0 4C |i.9JV.23:TX$.".L|
00001650: 45 41 53 45 20 D7 41 49 54 2E 2E 2E 22 3A 8D 33 |EASE .AIT...":.3|
00001660: 30 30 30 3A 8D 33 32 30 30 00 99 1E 3D 4A 81 20 |000:.3200...=J. |
00001670: 49 4A B2 30 20 A4 20 33 3A 81 20 4A 49 B2 30 20 |IJ.0 . 3:. JI.0 |
00001680: A4 20 35 3A 53 28 49 4A 2C 4A 49 29 B2 30 3A 82 |. 5:S(IJ,JI).0:.|
00001690: 20 4A 49 3A 20 82 20 49 4A 00 A4 1E 42 4A 81 51 | JI: . IJ...BJ.Q|
000016A0: B2 31 A4 32 00 B2 1E 47 4A 3A 53 28 51 2C 30 29 |.1.2...GJ:S(Q,0)|
000016B0: B2 30 00 C7 1E 4C 4A 3A 81 52 B2 30 A4 4E 44 AB |.0...LJ:.R.0.ND.|
000016C0: 31 AA 28 51 B2 32 29 00 DB 1E 56 4A 3A 3A 44 B2 |1.(Q.2)...VJ::D.|
000016D0: B5 28 BB 28 31 29 AC 39 29 AA 31 00 F8 1E 60 4A |.(.(1).9).1...`J|
000016E0: 3A 3A 53 28 51 2C 30 29 B2 53 28 51 2C 30 29 AA |::S(Q,0).S(Q,0).|
000016F0: 44 AC 28 31 30 AE 52 29 00 0D 1F 65 4A 53 28 51 |D.(10.R)...eJS(Q|
00001700: 2C 30 29 B2 B5 28 53 28 51 2C 30 29 29 00 1E 1F |,0)..(S(Q,0))...|
00001710: 6A 4A 3A 3A 53 28 51 2C 31 AA 52 29 B2 44 00 26 |jJ::S(Q,1.R).D.&|
00001720: 1F 74 4A 3A 82 52 00 2D 1F 7E 4A 82 51 00 46 1F |.tJ:.R.-.~J.Q.F.|
00001730: 83 4A 53 28 33 2C 30 29 B2 53 28 31 2C 30 29 AB |.JS(3,0).S(1,0).|
00001740: 53 28 32 2C 30 29 00 51 1F 88 4A 81 51 B2 31 A4 |S(2,0).Q..J.Q.1.|
00001750: 33 00 70 1F 92 4A 3A 53 24 28 51 29 B2 C4 28 53 |3.p..J:S$(Q)..(S|
00001760: 28 51 2C 30 29 29 3A 53 45 24 28 51 29 B2 22 22 |(Q,0)):SE$(Q).""|
00001770: 00 83 1F 9C 4A 3A 81 52 B2 32 A4 C3 28 53 24 28 |....J:.R.2..(S$(|
00001780: 51 29 29 00 A8 1F A6 4A 3A 3A 53 45 24 28 51 29 |Q))....J::SE$(Q)|
00001790: B2 53 45 24 28 51 29 AA CA 28 53 24 28 51 29 2C |.SE$(Q)..(S$(Q),|
000017A0: 52 2C 31 29 AA 22 20 22 00 B0 1F B0 4A 3A 82 52 |R,1)." "....J:.R|
000017B0: 00 B7 1F BA 4A 82 51 00 C3 1F CE 4A 81 51 B2 31 |....J.Q....J.Q.1|
000017C0: A4 4E 44 00 DD 1F D8 4A 3A 53 28 33 2C 51 29 B2 |.ND....J:S(3,Q).|
000017D0: 53 28 31 2C 51 29 AB 53 28 32 2C 51 29 00 11 20 |S(1,Q).S(2,Q).. |
000017E0: E2 4A 3A 8B 53 28 33 2C 51 29 B3 30 A7 53 28 33 |.J:.S(3,Q).0.S(3|
000017F0: 2C 51 29 B2 53 28 33 2C 51 29 AA 31 30 3A 53 28 |,Q).S(3,Q).10:S(|
00001800: 31 2C 51 AA 31 29 B2 53 28 31 2C 51 AA 31 29 AB |1,Q.1).S(1,Q.1).|
00001810: 31 00 18 20 EC 4A 82 51 00 1E 20 00 4B 8E 00 3B |1.. .J.Q.. .K..;|
00001820: 20 20 4E 8F 20 2A 2A 2A 20 49 4E 46 4F 20 49 4E | N. *** INFO IN|
00001830: 46 4F 20 49 4E 46 4F 20 2A 2A 2A 00 49 20 21 4E |FO INFO ***.I !N|
00001840: 8D 33 36 30 30 3A 56 B2 36 00 50 20 22 4E 87 4E |.3600:V.6.P "N.N|
00001850: 00 5B 20 23 4E 81 49 B2 31 A4 4E 00 65 20 24 4E |.[ #N.I.1.N.e $N|
00001860: 3A 87 54 58 24 00 90 20 25 4E 3A 8B 54 58 24 B2 |:.TX$.. %N:.TX$.|
00001870: 22 50 41 47 45 22 A7 20 8D 20 33 31 30 30 3A 8D |"PAGE". . 3100:.|
00001880: 33 36 30 30 3A 56 B2 36 20 3A 89 32 30 30 30 39 |3600:V.6 :.20009|
00001890: 00 BC 20 26 4E 3A 48 B2 32 3A 8B CA 28 54 58 24 |.. &N:H.2:..(TX$|
000018A0: 2C 39 2C 31 29 B2 22 A3 22 A7 56 B2 56 AA 31 3A |,9,1).".".V.V.1:|
000018B0: 8D 33 32 30 30 3A 89 32 30 30 30 38 00 CD 20 27 |.3200:.20008.. '|
000018C0: 4E 3A 56 B2 56 AA 32 3A 8D 33 32 30 30 00 E1 20 |N:V.V.2:.3200.. |
000018D0: 28 4E 3A 44 45 4C 41 59 B2 2E 35 3A 8D 32 30 30 |(N:DELAY..5:.200|
000018E0: 30 00 E8 20 29 4E 82 49 00 EE 20 2A 4E 8E 00 F6 |0.. )N.I.. *N...|
000018F0: 20 2B 4E 83 34 34 00 1E 21 2C 4E 83 22 D4 48 49 | +N.44..!,N.".HI|
00001900: 53 20 50 52 4F 47 52 41 4D 20 57 49 4C 4C 20 48 |S PROGRAM WILL H|
00001910: 45 4C 50 20 59 4F 55 20 4C 45 41 52 4E 22 00 49 |ELP YOU LEARN".I|
00001920: 21 2D 4E 83 22 54 4F 20 53 55 42 54 52 41 43 54 |!-N."TO SUBTRACT|
00001930: 20 50 52 4F 50 45 52 4C 59 2C 20 55 53 49 4E 47 | PROPERLY, USING|
00001940: 20 42 4F 52 52 4F 57 2D 22 00 60 21 2E 4E 83 22 | BORROW-".`!.N."|
00001950: 49 4E 47 20 54 45 43 48 4E 49 51 55 45 53 2E 22 |ING TECHNIQUES."|
00001960: 00 87 21 2F 4E 83 22 D4 48 45 52 45 20 41 52 45 |..!/N.".HERE ARE|
00001970: 20 54 48 52 45 45 20 57 41 59 53 20 54 4F 20 55 | THREE WAYS TO U|
00001980: 53 45 20 54 48 45 22 00 B2 21 30 4E 83 22 50 52 |SE THE"..!0N."PR|
00001990: 4F 47 52 41 4D 3A 22 2C 22 20 20 20 20 31 29 20 |OGRAM:"," 1) |
000019A0: D3 45 45 20 45 58 41 4D 50 4C 45 53 20 44 4F 4E |.EE EXAMPLES DON|
000019B0: 45 22 00 D6 21 31 4E 83 22 20 20 20 20 32 29 20 |E"..!1N." 2) |
000019C0: C4 4F 20 50 52 4F 42 4C 45 4D 53 20 57 49 54 48 |.O PROBLEMS WITH|
000019D0: 20 48 45 4C 50 22 00 F9 21 32 4E 83 22 20 20 20 | HELP"..!2N." |
000019E0: 20 33 29 20 C4 4F 20 50 52 4F 42 4C 45 4D 53 20 | 3) .O PROBLEMS |
000019F0: 59 4F 55 52 53 45 4C 46 22 00 05 22 33 4E 83 22 |YOURSELF".."3N."|
00001A00: 50 41 47 45 22 00 26 22 34 4E 83 22 20 20 20 20 |PAGE".&"4N." |
00001A10: 20 31 29 20 D3 45 45 20 45 58 41 4D 50 4C 45 53 | 1) .EE EXAMPLES|
00001A20: 20 44 4F 4E 45 22 00 47 22 35 4E 83 22 20 20 20 | DONE".G"5N." |
00001A30: 20 20 20 20 20 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 | ...........|
00001A40: A3 A3 A3 A3 A3 A3 22 00 70 22 36 4E 83 22 C9 46 |......".p"6N.".F|
00001A50: 20 59 4F 55 20 57 41 4E 54 20 54 4F 20 53 45 45 | YOU WANT TO SEE|
00001A60: 20 45 58 41 4D 50 4C 45 53 20 44 4F 4E 45 2C 22 | EXAMPLES DONE,"|
00001A70: 00 97 22 37 4E 83 22 C9 20 57 49 4C 4C 20 53 48 |.."7N.". WILL SH|
00001A80: 4F 57 20 59 4F 55 20 48 4F 57 20 54 4F 20 44 4F |OW YOU HOW TO DO|
00001A90: 20 54 48 45 4D 2C 22 00 BC 22 38 4E 83 22 45 58 | THEM,".."8N."EX|
00001AA0: 50 4C 41 49 4E 49 4E 47 20 45 41 43 48 20 53 54 |PLAINING EACH ST|
00001AB0: 45 50 20 41 53 20 C9 20 47 4F 2E 22 00 C8 22 39 |EP AS . GO.".."9|
00001AC0: 4E 83 22 50 41 47 45 22 00 EB 22 3A 4E 83 22 20 |N."PAGE"..":N." |
00001AD0: 20 20 32 29 20 C4 4F 20 50 52 4F 42 4C 45 4D 53 | 2) .O PROBLEMS|
00001AE0: 20 57 49 54 48 20 48 45 4C 50 22 00 0E 23 3B 4E | WITH HELP"..#;N|
00001AF0: 83 22 20 20 20 20 20 20 A3 A3 A3 A3 A3 A3 A3 A3 |." ........|
00001B00: A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 22 00 36 |.............".6|
00001B10: 23 3C 4E 83 22 D4 4F 20 44 4F 20 50 52 4F 42 4C |#<N.".O DO PROBL|
00001B20: 45 4D 53 20 57 49 54 48 20 48 45 4C 50 2C 20 C9 |EMS WITH HELP, .|
00001B30: 20 57 49 4C 4C 22 00 5C 23 3D 4E 83 22 47 49 56 | WILL".\#=N."GIV|
00001B40: 45 20 59 4F 55 20 41 20 48 49 4E 54 20 46 4F 52 |E YOU A HINT FOR|
00001B50: 20 45 41 43 48 20 53 54 45 50 2C 22 00 86 23 3E | EACH STEP,"..#>|
00001B60: 4E 83 22 41 4E 44 20 48 45 4C 50 20 59 4F 55 20 |N."AND HELP YOU |
00001B70: 49 46 20 59 4F 55 20 4D 41 4B 45 20 4D 49 53 54 |IF YOU MAKE MIST|
00001B80: 41 4B 45 53 2E 22 00 92 23 3F 4E 83 22 50 41 47 |AKES."..#?N."PAG|
00001B90: 45 22 00 B5 23 40 4E 83 22 20 20 20 20 33 29 20 |E"..#@N." 3) |
00001BA0: C4 4F 20 50 52 4F 42 4C 45 4D 53 20 59 4F 55 52 |.O PROBLEMS YOUR|
00001BB0: 53 45 4C 46 22 00 D8 23 41 4E 83 22 20 20 20 20 |SELF"..#AN." |
00001BC0: 20 20 20 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 | .............|
00001BD0: A3 A3 A3 A3 A3 A3 A3 22 00 04 24 42 4E 83 22 D4 |......."..$BN.".|
00001BE0: 48 45 20 54 48 49 52 44 20 4F 50 54 49 4F 4E 20 |HE THIRD OPTION |
00001BF0: 49 53 20 54 4F 20 57 4F 52 4B 20 50 52 4F 42 4C |IS TO WORK PROBL|
00001C00: 45 4D 53 22 00 2A 24 43 4E 83 22 4F 4E 20 59 4F |EMS".*$CN."ON YO|
00001C10: 55 52 20 4F 57 4E 2E 20 20 C6 4F 52 20 54 48 49 |UR OWN. .OR THI|
00001C20: 53 20 4F 50 54 49 4F 4E 2C 22 00 50 24 44 4E 83 |S OPTION,".P$DN.|
00001C30: 22 59 4F 55 20 4D 41 59 20 4E 45 45 44 20 50 45 |"YOU MAY NEED PE|
00001C40: 4E 43 49 4C 20 41 4E 44 20 50 41 50 45 52 2E 22 |NCIL AND PAPER."|
00001C50: 00 5C 24 45 4E 83 22 50 41 47 45 22 00 7A 24 46 |.\$EN."PAGE".z$F|
00001C60: 4E 83 22 20 20 20 20 20 20 20 D3 49 5A 45 20 4F |N." .IZE O|
00001C70: 46 20 CE 55 4D 42 45 52 53 22 00 98 24 47 4E 83 |F .UMBERS"..$GN.|
00001C80: 22 20 20 20 20 20 20 20 A3 A3 A3 A3 A3 A3 A3 A3 |" ........|
00001C90: A3 A3 A3 A3 A3 A3 A3 22 00 BD 24 48 4E 83 22 D9 |......."..$HN.".|
00001CA0: 4F 55 20 4D 41 59 20 44 45 43 49 44 45 20 4F 4E |OU MAY DECIDE ON|
00001CB0: 20 54 48 45 20 53 49 5A 45 20 4F 46 22 00 E4 24 | THE SIZE OF"..$|
00001CC0: 49 4E 83 22 4E 55 4D 42 45 52 20 59 4F 55 20 57 |IN."NUMBER YOU W|
00001CD0: 41 4E 54 20 54 4F 20 57 4F 52 4B 20 57 49 54 48 |ANT TO WORK WITH|
00001CE0: 20 2D 2D 22 00 0D 25 4A 4E 83 22 46 52 4F 4D 20 | --"..%JN."FROM |
00001CF0: 32 20 44 49 47 49 54 20 4E 55 4D 42 45 52 53 20 |2 DIGIT NUMBERS |
00001D00: 28 4C 49 4B 45 20 38 35 29 20 54 4F 22 00 33 25 |(LIKE 85) TO".3%|
00001D10: 4B 4E 83 22 35 20 44 49 47 49 54 20 4E 55 4D 42 |KN."5 DIGIT NUMB|
00001D20: 45 52 53 20 28 4C 49 4B 45 20 36 33 2C 35 39 37 |ERS (LIKE 63,597|
00001D30: 29 2E 22 00 3F 25 4C 4E 83 22 50 41 47 45 22 00 |).".?%LN."PAGE".|
00001D40: 5E 25 4D 4E 83 22 20 20 20 20 20 CE 55 4D 42 45 |^%MN." .UMBE|
00001D50: 52 20 4F 46 20 50 52 4F 42 4C 45 4D 53 22 00 7D |R OF PROBLEMS".}|
00001D60: 25 4E 4E 83 22 20 20 20 20 20 A3 A3 A3 A3 A3 A3 |%NN." ......|
00001D70: A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 22 00 A7 25 |............"..%|
00001D80: 4F 4E 83 22 CC 41 53 54 2C 20 59 4F 55 20 44 45 |ON.".AST, YOU DE|
00001D90: 43 49 44 45 20 48 4F 57 20 4D 41 4E 59 20 50 52 |CIDE HOW MANY PR|
00001DA0: 4F 42 4C 45 4D 53 22 00 D1 25 50 4E 83 22 54 4F |OBLEMS"..%PN."TO|
00001DB0: 20 44 4F 2E 20 20 C9 46 20 59 4F 55 20 4C 45 54 | DO. .F YOU LET|
00001DC0: 20 54 48 45 20 43 4F 4D 50 55 54 45 52 20 44 4F | THE COMPUTER DO|
00001DD0: 22 00 F6 25 51 4E 83 22 54 48 45 20 57 4F 52 4B |"..%QN."THE WORK|
00001DE0: 2C 20 59 4F 55 20 4D 41 59 20 4F 4E 4C 59 20 48 |, YOU MAY ONLY H|
00001DF0: 41 56 45 20 35 22 00 1E 26 52 4E 83 22 50 52 4F |AVE 5"..&RN."PRO|
00001E00: 42 4C 45 4D 53 3B 20 4F 54 48 45 52 57 49 53 45 |BLEMS; OTHERWISE|
00001E10: 20 59 4F 55 20 4D 41 59 20 48 41 56 45 22 00 3C | YOU MAY HAVE".<|
00001E20: 26 53 4E 83 22 46 52 4F 4D 20 32 20 54 4F 20 32 |&SN."FROM 2 TO 2|
00001E30: 30 20 50 52 4F 42 4C 45 4D 53 2E 22 00 48 26 54 |0 PROBLEMS.".H&T|
00001E40: 4E 83 22 50 41 47 45 22 00 59 26 55 4E 83 22 C8 |N."PAGE".Y&UN.".|
00001E50: 41 56 45 20 46 55 4E 21 22 00 65 26 56 4E 83 22 |AVE FUN!".e&VN."|
00001E60: 50 41 47 45 22 00 00 00 |PAGE"... |
........)....53280,0:.53281,0:."..";G(14
).2...A1.1.W....S(6,5),S$(11),SE$(11),NU
$(10,3).A.D..4000.M.I.. 10000.W.N..3600.
..X.H.0:V.10:TX$."DO YOU NEED A LESSON?
"......3200.....LO.0:.2100 :.A$......A$.
"Y".A$."Y"..20000:. 160...... A$."N" . A
$."N" . 160...... 120... ..5000.....RU.1
."....1000.1....OP..3.180.;....3600.D...
.500.N....3600.}...H.0:V.10:TX$."DO YOU
WANT TO PLAY AGAIN? "...H..3200...R.LO.0
:.2100 :.A$......A$."Y".A$."Y".160.N....
A$."N" . A$."N" . 230.X.... 190......:.
"MENU",8.............!...V.10:H.0:TX$."Y
OU GOT".D(NP.MI)." RIGHT".1....3000:.320
0.N...V.11:TX$."OUT OF ".D(NP).^....3000
:.3200.....V.12:TX$."FOR ".D(.(((NP.MI).
NP).100))."%."...!..3000:.3200...&.DELAY
.10:.2000...0...U.... *** CENTRAL ROUTIN
E ***.....HP.0:MI.0......I.1.NP.....:.19
000.#....3600:H.0:V.6:TX$."SUBTRACT:":.3
200.=....OP.11000,11000,17000.U.*.V.24:T
X$." ..<RETURN> TO CONTINUE, <_> TO EX
IT.."...+..3000:.3200...,.LO.0:.2100...-
..A$."_".SA.I:I.NP......OP.3.MI.3..1076.
N.0..HP.1.I.NP...2..I:. SA..0 . NP.SA...
3..G(14);:....4.V.19:TX$."DO YOU NEED SO
ME HELP?".).5..3000:.3200.8.6.LO.0:.2100
.P.7..A$."Y".A$."Y".HP.1.V.8...J.P.. ***
TIMER ***.{.Z.TI$."000000"......A$:.A$.
."".2030......TI.60.DELAY.2015.......H.4
.. *** GET CHARACTER ***...>..A$:.A$."".
2110...H.A.E(A$):.A.LO.A.HI.2110...R....
.... *** CENTER TEXT ***.%.B.X.C(TX$).4.
L.H.(40.X).2.:.V...E...V.24:TX$." ..<R
ETURN> TO CONTINUE..".U.&..3000:.3200...
0.LO.0:.2100...:..A$.. G(13) . 3100...D.
....... *** HOR/VER TAB ***.M...VT$."":.
Q.1.V.....:VT$.VT$."."......Q......".";V
T$;.......H);TX$;.......(.... *** LINE A
CROSS SCREEN ***.2....".";.>....Q.1.40.I
.J.:.".";.P.T..Q.\....Q.1.40.G...:.".";.
N....Q.X....".";.~..... .... *** PRINT S
CREEN HEADER ***......".".M...TX$."VISIO
N SOFTWARE PRESENTS:".V.8.H.10...B.V.1:.
3200...L.TX$.T$...Q..".";...V.H.10...`.V
.3:.3200...E..".";.(.J..:.3500:..@. .. *
** READ DATA ***.H....T$.S....I.1.6.`...
:.RW$(I).G....I.R.H..I.1.3..R.:.OP$(I).
.....I......I.1.4.....:.MU$(I),CO(I)....
..I......I.1.6.B...:.G$(I).K....I:......
. *** PROGRAM DATA ***......"SUBTRACTION
"......"GREAT!","FANTASTIC!","SUPER!".`.
".."YOU'RE REALLY GOING NOW!","YES! YES
! YES!","THAT'S GREAT!".Z.,.."SEE EXAMP
LES DONE."...6.."DO PROBLEMS WITH HELP."
...@.."DO PROBLEMS YOURSELF."...J.."TEN"
,28,"HUNDRED",30,"THOUSAND",31,"TEN THOU
SAND",158...... *** SETUP FOR MATH ***..
....RU.1.5037.H...H.0:V.10:TX$."WHAT'S Y
OUR FIRST NAME ".R....3200.[....NM$.....
V.10:H.0:TX$."WOULD YOU LIKE TO:
". ....3200.....H.7:V.12:.I
.1.3.N...:TX$.D(I).". ".OP$(I).Y.D.:.320
0...N.:V.V.2...X..I.....H.0:TX$."YOUR CH
OICE? (1-3) "......3200.+...LO.1:HI.3:.2
100.:...OP.A:HI.20.I....OP.1.HI.5.Z...V.
20:H.0:TX$."HOW MANY PROBLEMS DO YOU WAN
T"...(..3200...2.V.21:TX$."TO DO? (2 -".
D(HI).") "...<..3200...F..NP...P..NP.LO.
NP.HI..".....";:.5170...Z..3600...D.V.11
:H.0:TX$."HOW MANY DIGITS IN THE LARGEST
".#.N..3200.G.P.V.12:H.0:TX$."NUMBER? (2
- 5) ".Q.R..3200.N.X.HI.5:LO.2:.2100:ND
.A:.A$.T........'. *** DO SPRITEY THINGS
***....'. I.704 . 767....'.X:.I,X....'.
.E..'.2040,11....'.53269,B(53269).1....'
.53287,2:.53277,255:.53271,255....'.5324
8,30:.53249,58....'..D..'.252,252,252,12
1,249,248,51,243,240.H..'.7,231,224,15,2
07,192,7,159,128....'.3,63,0,0,126,0,0,2
52,0....'.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....'.0,0,0,0,0,0....*. *** S
EE EXAMPLES ***. ..+V.10:H.15:TX$.SE$(1)
.*..+.3200.H..+V.12:H.15:TX$."- ".SE$(2)
.R. +.3200.S.*+V.13:H.13:TX$."..........
..".}.4+.3200...9+DELAY..5:.2000...>+.L.
1.ND.1.M.H+:.M.55696.15.(ND.L).2.55696.9
5.(ND.L).2.40...R+::.M,2:.M.1,2...\+:.M.
..F+:H.0:V.21:TX$."IS THE BOTTOM NUMBER
LARGER THAN".'.P+:.3200.A.Z+:V.22:TX$."T
HE TOP? ".L..+:.3200.{..+:V.22:H.9:.S(2,
L).S(1,L).TX$." YES":.11170....+:TX$." N
O"....+:.OP.2.S$.H(TX$,1):.15000....+:DE
LAY.1.5:.2000.H..+:.3200....+:DELAY.1.5:
.2000....+:V.22:H.0:TX$."
"."..+:.3200.=..+:
.S(2,L)..S(1,L).12000.X..+:V.21:H.0:TX$.
"BORROW ONE FROM THE NEXT NUMBER. "
...J+:.3200...O+:DELAY.2:.2000.F.T+:V.10
:H.12.(ND.L).2:TX$.".".D(S(1,L.1)).".".Q
..+:.3200....+:DELAY.1:.2000....+:V.21:H
.0:TX$."ADD 10 TO THE TOP NUMBER.
".*..+:.3200.=..+:DELAY.2:.2000._.
.+:V.10:H.14.(ND.L).2:TX$.".1.".J..,:.32
00.}..,:DELAY.1:.2000.....:V.21:H.0:TX$.
"SUBTRACT... "
.C...:.3200.V...:DELAY.2:.2000.....:V.16
:H.14.(ND.L).2:TX$.D(S(3,L)).....:.OP.2.
S$.I(TX$,1):.15000.%../:.3200.7../DELAY.
1:.2000.F../:.M.55696.15.(ND.L).2.55696.
95.(ND.L).2.40.X../::.M,1:.M.1,0..../:.M
..../DELAY.1:.2000..../.L.S../V.21:H.0:T
X$."BRING DOWN THE LAST NUMBER.
"...&/.3200...+/DELAY.1:.2000...0/V.16
:H.14:TX$.D(S(3,ND)).).:/.OP.2.S$.H(TX$,
1):.15000.3.D/.3200.9.N/..Z..:. *** EXAM
PLES WITH HELP ***.Q..::V1.V:H1.H:T1$.TX
$.|..:S$.TX$....:.J.2.C(S$)....::V.V1.1:
H.H1.J.1:TX$."^"....::.3200.F.J::Y.0:LO.
0:HI.9.Q.T::.2100....::.A$.J(S$,J,1).151
50....::Y.Y.1:.Y.3.15060.0..::V.23:TX$."
.ENTER A ".J(S$,J,1)." PLEASE..".A..::.3
000:.3200._..;:TX$." ".
T..;:DELAY.1.5:.2000....;:.3200:.15060..
.$;:....;:V.V1:H.H1.J.1:TX$.J(S$,J,1)...
8;:.3200.U.B;:V.V1.1:H.H1.J.1:TX$." "...
L;:.3200...V;.J...`;V.V1:H.H1:TX$.T1$...
J;....HB. *** DO PROBLEMS ***.6.IBV.10:H
.15:TX$.SE$(1).@.JB.3200.^.KBV.12:H.15:T
X$."- ".SE$(2).H.LB.3200...MBV.13:H.13:T
X$."............"...NB.3200...RBV.15:H.0
:TX$."YOUR ANSWER: "...|B.3200.G..B.AN.
...B..(AN)..(S(3,0)).17120....BMI.MI.1..
..BV.18:TX$."SORRY. THE CORRECT ANSWER
IS:".,..B.3000:.3200.@.BBV.20:TX$.SE$(3)
.P.LB.3000:.3200.[.VB.17280.N..BRW..(.(0
).6).1.Y..B.J.1.4....B:V.18:TX$.G(CO(J))
.RW$(RW).G(5)....B:.3000:.3200.A..CDELAY
..7:.2000....C:TX$."
"....C:.3000:.3200...&
CDELAY..3:.2000...0C.J.$..C..?.8J. *** M
ATH ROUTINE ***.I.9JV.23:TX$."PLEASE WAI
T...":.3000:.3200...=J. IJ.0 . 3:. JI.0
. 5:S(IJ,JI).0:. JI: . IJ...BJ.Q.1.2...G
J:S(Q,0).0.G.LJ:.R.0.ND.1.(Q.2)...VJ::D.
.(.(1).9).1...`J::S(Q,0).S(Q,0).D.(10.R)
...EJS(Q,0)..(S(Q,0))...JJ::S(Q,1.R).D.&
.TJ:.R.-.~J.Q.F..JS(3,0).S(1,0).S(2,0).Q
..J.Q.1.3.P..J:S$(Q).D(S(Q,0)):SE$(Q).""
....J:.R.2.C(S$(Q))....J::SE$(Q).SE$(Q).
J(S$(Q),R,1)." "....J:.R....J.Q.C.NJ.Q.1
.ND...XJ:S(3,Q).S(1,Q).S(2,Q).. .J:.S(3,
Q).0.S(3,Q).S(3,Q).10:S(1,Q.1).S(1,Q.1).
1.. .J.Q.. .K..; N. *** INFO INFO INFO
***.I !N.3600:V.6.P "N.N.[ #N.I.1.N.E $N
:.TX$.. %N:.TX$."PAGE". . 3100:.3600:V.6
:.20009.. &N:H.2:.J(TX$,9,1).".".V.V.1:
.3200:.20008.M 'N:V.V.2:.3200.. (N:DELAY
..5:.2000.. )N.I.. *N... +N.44..!,N."THI
S PROGRAM WILL HELP YOU LEARN".I!-N."TO
SUBTRACT PROPERLY, USING BORROW-".`!.N."
ING TECHNIQUES."..!/N."THERE ARE THREE W
AYS TO USE THE"..!0N."PROGRAM:"," 1)
SEE EXAMPLES DONE".V!1N." 2) DO PROBL
EMS WITH HELP"..!2N." 3) DO PROBLEMS
YOURSELF".."3N."PAGE".&"4N." 1) SEE
EXAMPLES DONE".G"5N." ...........
......".P"6N."IF YOU WANT TO SEE EXAMPLE
S DONE,".."7N."I WILL SHOW YOU HOW TO DO
THEM,".."8N."EXPLAINING EACH STEP AS I
GO.".H"9N."PAGE"..":N." 2) DO PROBLEMS
WITH HELP"..#;N." ................
.....".6#<N."TO DO PROBLEMS WITH HELP, I
WILL".\#=N."GIVE YOU A HINT FOR EACH ST
EP,"..#>N."AND HELP YOU IF YOU MAKE MIST
AKES."..#?N."PAGE"..#@N." 3) DO PROBL
EMS YOURSELF".X#AN." .............
......."..$BN."THE THIRD OPTION IS TO WO
RK PROBLEMS".*$CN."ON YOUR OWN. FOR THI
S OPTION,".P$DN."YOU MAY NEED PENCIL AND
PAPER.".\$EN."PAGE".Z$FN." SIZE O
F NUMBERS"..$GN." ..............."
..$HN."YOU MAY DECIDE ON THE SIZE OF"..$
IN."NUMBER YOU WANT TO WORK WITH --"..%J
N."FROM 2 DIGIT NUMBERS (LIKE 85) TO".3%
KN."5 DIGIT NUMBERS (LIKE 63,597).".?%LN
."PAGE".^%MN." NUMBER OF PROBLEMS".}
%NN." .................."..%ON."LAST
, YOU DECIDE HOW MANY PROBLEMS".Q%PN."TO
DO. IF YOU LET THE COMPUTER DO"..%QN."
THE WORK, YOU MAY ONLY HAVE 5"..&RN."PRO
BLEMS; OTHERWISE YOU MAY HAVE".<&SN."FRO
M 2 TO 20 PROBLEMS.".H&TN."PAGE".Y&UN."H
AVE FUN!".E&VN."PAGE"...
> CLICK IMAGE PREVIEW FOR FULL MODAL