AUTO ADD TCHR.C3
FILE INFORMATION
FILENAME(S): AUTO ADD TCHR.C3
FILE TYPE(S): PRG
FILE SIZE: 13K
FIRST SEEN: 2025-11-30 01:08:45
APPEARS ON: 1 disk(s)
FILE HASH
395cab11bee6778d5577cd679eadd2ca275f0d7b18177edcbc80844a064581f8
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| FREESOFT DISK NR | AUTO ADD TCHR.C3 | PRG | Treasure Chest - Wolfgang Rauprich | 15 | 3 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 0A 08 01 00 89 39 31 30 00 2A 08 02 00 8F |.......910.*....|
00000010: 20 2A 2A 20 4D 4C 20 53 54 4F 50 20 4B 45 59 20 | ** ML STOP KEY |
00000020: 44 49 53 41 42 4C 45 20 2A 2A 00 55 08 03 00 99 |DISABLE **.U....|
00000030: 22 78 A9 3D 85 90 EA A9 04 85 91 EA 58 60 20 EA |"x.=........X` .|
00000040: FF A9 FF 85 9B 4C 58 E4 78 A9 55 85 90 EA A9 E4 |.....LX.x.U.....|
00000050: 85 91 EA 58 60 00 74 08 04 00 99 22 78 68 68 68 |...X`.t...."xhhh|
00000060: AA 68 A8 68 68 68 68 68 68 68 98 48 8A 48 58 60 |.h.hhhhhhh.H.HX`|
00000070: 31 31 31 22 00 85 08 05 00 99 22 68 68 68 68 68 |111"......"hhhhh|
00000080: 68 68 60 31 22 00 A7 08 06 00 8F 20 2A 2A 20 34 |hh`1"...... ** 4|
00000090: 20 2D 20 50 4F 50 20 4D 4C 20 53 55 42 52 4F 55 | - POP ML SUBROU|
000000A0: 54 49 4E 45 20 2A 2A 00 C8 08 0A 00 8F 20 2A 2A |TINE **...... **|
000000B0: 47 45 4E 45 52 41 4C 20 49 4E 50 55 54 20 52 4F |GENERAL INPUT RO|
000000C0: 55 54 49 4E 45 20 2A 2A 00 CE 08 0F 00 3A 00 D4 |UTINE **.....:..|
000000D0: 08 19 00 3A 00 DA 08 1E 00 3A 00 F6 08 23 00 8F |...:.....:...#..|
000000E0: 20 2B 2B 2B 20 49 4E 50 55 54 20 53 45 43 54 49 | +++ INPUT SECTI|
000000F0: 4F 4E 20 2B 2B 2B 00 08 09 28 00 55 52 24 B2 22 |ON +++...(.UR$."|
00000100: 22 3A 55 49 24 B2 22 22 00 18 09 2A 00 8B 55 4C |":UI$.""...*..UL|
00000110: B2 30 A7 55 4C B2 38 30 00 2B 09 2D 00 99 22 20 |.0.UL.80.+.-.." |
00000120: 20 9D 9D 22 3B 3A 97 55 43 2C 30 00 3F 09 32 00 | ..";:.UC,0.?.2.|
00000130: A1 55 49 24 3A 8B 55 49 24 B2 22 22 A7 35 30 00 |.UI$:.UI$."".50.|
00000140: 69 09 37 00 8B 55 49 24 B2 C7 28 31 33 29 AF C3 |i.7..UI$..(13)..|
00000150: 28 55 52 24 29 B1 B2 31 A7 97 55 43 2C 31 3A 99 |(UR$)..1..UC,1:.|
00000160: 22 20 9D 22 3B 3A 89 38 35 00 7C 09 3C 00 8B 55 |" .";:.85.|.<..U|
00000170: 49 24 B2 C7 28 32 30 29 A7 31 30 35 00 90 09 3E |I$..(20).105...>|
00000180: 00 8B 20 C3 28 55 52 24 29 B2 B1 55 4C A7 35 30 |.. .(UR$)..UL.50|
00000190: 00 B5 09 41 00 8D 31 32 30 3A 8F 20 43 48 45 43 |...A..120:. CHEC|
000001A0: 4B 20 46 4F 52 20 56 41 4C 49 44 20 43 48 41 52 |K FOR VALID CHAR|
000001B0: 41 43 54 45 52 00 C5 09 46 00 55 52 24 B2 55 52 |ACTER...F.UR$.UR|
000001C0: 24 AA 55 49 24 00 CF 09 4B 00 99 55 49 24 3B 00 |$.UI$...K..UI$;.|
000001D0: D7 09 50 00 89 35 30 00 FC 09 55 00 8F 20 2B 2B |..P..50...U.. ++|
000001E0: 2B 20 43 48 45 43 4B 20 46 4F 52 20 48 45 4C 50 |+ CHECK FOR HELP|
000001F0: 20 52 45 51 55 45 53 54 20 2B 2B 2B 00 24 0A 5A | REQUEST +++.$.Z|
00000200: 00 8B 55 52 24 B2 55 58 24 A7 31 39 35 3A 8F 20 |..UR$.UX$.195:. |
00000210: 45 58 49 54 20 54 4F 20 48 45 4C 50 20 52 4F 55 |EXIT TO HELP ROU|
00000220: 54 49 4E 45 00 33 0A 5F 00 8B 55 46 B2 31 A7 8D |TINE.3._..UF.1..|
00000230: 32 34 30 00 40 0A 64 00 55 46 B2 30 3A 99 3A 8E |240.@.d.UF.0:.:.|
00000240: 00 59 0A 66 00 8F 20 2B 2B 20 43 48 45 43 4B 20 |.Y.f.. ++ CHECK |
00000250: 44 45 4C 45 54 45 20 2B 2B 00 6A 0A 69 00 8B C3 |DELETE ++.j.i...|
00000260: 28 55 52 24 29 B3 31 A7 35 30 00 82 0A 6E 00 55 |(UR$).1.50...n.U|
00000270: 52 24 B2 C8 28 55 52 24 2C C3 28 55 52 24 29 AB |R$..(UR$,.(UR$).|
00000280: 31 29 00 94 0A 73 00 99 22 9D 20 20 9D 9D 22 3B |1)...s..". ..";|
00000290: 3A 89 35 30 00 BB 0A 78 00 8F 20 2B 2B 20 43 48 |:.50...x.. ++ CH|
000002A0: 45 43 4B 20 46 4F 52 20 56 41 4C 49 44 20 43 48 |ECK FOR VALID CH|
000002B0: 41 52 41 43 54 45 52 53 20 2B 2B 00 CD 0A 7D 00 |ARACTERS ++...}.|
000002C0: 8B C3 28 55 53 24 29 B2 30 A7 31 35 30 00 DE 0A |..(US$).0.150...|
000002D0: 82 00 81 55 53 B2 31 A4 C3 28 55 53 24 29 00 F5 |...US.1..(US$)..|
000002E0: 0A 87 00 8B 55 49 24 B2 CA 28 55 53 24 2C 55 53 |....UI$..(US$,US|
000002F0: 2C 31 29 A7 8E 00 FB 0A 8C 00 82 00 08 0B 91 00 |,1).............|
00000300: 55 49 24 B2 22 22 3A 8E 00 23 0B 96 00 8F 20 2A |UI$."":..#.... *|
00000310: 2A 20 53 54 41 4E 44 41 52 44 20 49 4E 50 55 54 |* STANDARD INPUT|
00000320: 20 2A 2A 00 34 0B 98 00 8B C6 28 55 49 24 29 B2 | **.4.....(UI$).|
00000330: 34 36 A7 8E 00 45 0B 9B 00 8B 55 49 24 B2 C7 28 |46...E....UI$..(|
00000340: 33 32 29 A7 8E 00 62 0B A0 00 8B C6 28 55 49 24 |32)...b.....(UI$|
00000350: 29 B3 34 38 B0 C6 28 55 49 24 29 B1 35 37 A7 31 |).48..(UI$).57.1|
00000360: 37 30 00 68 0B A5 00 8E 00 85 0B AA 00 8B C6 28 |70.h...........(|
00000370: 55 49 24 29 B3 36 35 B0 C6 28 55 49 24 29 B1 39 |UI$).65..(UI$).9|
00000380: 30 A7 31 38 30 00 8B 0B AF 00 8E 00 AF 0B B4 00 |0.180...........|
00000390: 8B C6 28 55 49 24 29 B3 31 39 33 B0 C6 28 55 49 |..(UI$).193..(UI|
000003A0: 24 29 B1 32 31 38 A7 55 49 24 B2 22 22 3A 8E 00 |$).218.UI$."":..|
000003B0: D2 0B B9 00 8B C2 28 55 54 29 B2 55 55 25 A7 55 |......(UT).UU%.U|
000003C0: 49 24 B2 C7 28 C6 28 55 49 24 29 AB 31 32 38 29 |I$..(.(UI$).128)|
000003D0: 3A 8E 00 D8 0B BB 00 8E 00 E5 0B BE 00 55 49 24 |:............UI$|
000003E0: B2 22 22 3A 8E 00 0A 0C C3 00 55 46 B2 31 3A 8F |."":......UF.1:.|
000003F0: 20 2B 2B 2B 20 48 45 4C 50 20 52 4F 55 54 49 4E | +++ HELP ROUTIN|
00000400: 45 20 45 58 49 54 20 2B 2B 2B 00 13 0C C5 00 8D |E EXIT +++......|
00000410: 32 35 30 00 1C 0C C8 00 8D 32 34 35 00 2E 0C CD |250......245....|
00000420: 00 81 55 51 B2 55 42 A4 55 42 AA 39 33 39 00 4A |..UQ.UB.UB.939.J|
00000430: 0C D2 00 55 51 25 28 55 51 AB 55 42 29 B2 C2 28 |...UQ%(UQ.UB)..(|
00000440: 55 51 29 3A 82 3A 99 22 93 22 00 5D 0C D7 00 55 |UQ):.:.".".]...U|
00000450: 5A B2 31 3A 55 56 25 B2 C2 28 55 54 29 00 66 0C |Z.1:UV%..(UT).f.|
00000460: D8 00 89 33 30 30 00 8B 0C D9 00 55 5A B2 30 3A |...300.....UZ.0:|
00000470: 55 53 24 B2 55 4A 24 3A 55 47 24 B2 55 4B 24 3A |US$.UJ$:UG$.UK$:|
00000480: 55 50 B2 55 4A 3A 55 4C B2 55 4B 00 C2 0C DA 00 |UP.UJ:UL.UK.....|
00000490: 8B C2 28 35 30 30 30 33 29 B2 30 A7 97 35 33 32 |..(50003).0..532|
000004A0: 38 31 2C 31 3A 99 22 93 22 3B 3A 97 35 33 32 38 |81,1:.".";:.5328|
000004B0: 31 2C 36 3A 97 35 33 32 38 30 2C 31 34 3A 89 32 |1,6:.53280,14:.2|
000004C0: 32 30 00 CC 0C DB 00 99 22 93 22 3B 00 EE 0C DC |20......".";....|
000004D0: 00 55 54 24 B2 55 4C 24 3A 97 55 54 2C 55 56 25 |.UT$.UL$:.UT,UV%|
000004E0: 3A 81 55 51 B2 55 42 A4 55 42 AA 39 31 39 00 03 |:.UQ.UB.UB.919..|
000004F0: 0D E1 00 97 55 51 2C 55 51 25 28 55 51 AB 55 42 |....UQ,UQ%(UQ.UB|
00000500: 29 3A 82 00 0F 0D E6 00 97 55 31 2C 55 31 25 00 |):.......U1,U1%.|
00000510: 1B 0D E8 00 97 55 32 2C 55 32 25 00 27 0D E9 00 |.....U2,U2%.'...|
00000520: 97 55 34 2C 55 34 25 00 35 0D EA 00 97 55 33 2C |.U4,U4%.5....U3,|
00000530: 55 33 25 AB 31 00 45 0D EB 00 99 22 12 20 9D 22 |U3%.1.E....". ."|
00000540: 3B 3A 89 33 35 00 77 0D F0 00 55 44 25 B2 28 28 |;:.35.w...UD%.((|
00000550: 55 32 25 AC 32 35 36 AA 55 31 25 AA 55 33 25 29 |U2%.256.U1%.U3%)|
00000560: AB 55 42 29 AD 34 30 3A 99 C8 28 55 44 24 2C 55 |.UB).40:..(UD$,U|
00000570: 44 25 AA 31 29 3A 8E 00 B3 0D F5 00 99 C8 28 55 |D%.1):........(U|
00000580: 44 24 2C 32 34 29 3B 22 92 20 20 20 20 20 20 20 |D$,24);". |
00000590: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 12 | .|
000005A0: 20 48 45 4C 50 20 43 4F 4D 49 4E 47 20 92 20 20 | HELP COMING . |
000005B0: 22 3A 8E 00 DF 0D FA 00 55 31 25 B2 C2 28 55 31 |":......U1%..(U1|
000005C0: 29 3A 55 32 25 B2 C2 28 55 32 29 3A 55 33 25 B2 |):U2%..(U2):U3%.|
000005D0: C2 28 55 33 29 3A 55 34 25 B2 C2 28 55 34 29 00 |.(U3):U4%..(U4).|
000005E0: F1 0D FB 00 55 4A 24 B2 55 53 24 3A 55 4A B2 55 |....UJ$.US$:UJ.U|
000005F0: 4C 00 11 0E FC 00 55 4A 24 B2 55 53 24 3A 55 4B |L.....UJ$.US$:UK|
00000600: 24 B2 55 47 24 3A 55 4A B2 55 50 3A 55 4B B2 55 |$.UG$:UJ.UP:UK.U|
00000610: 4C 00 17 0E FF 00 8E 00 28 0E 2C 01 8F 20 2A 2A |L.......(.,.. **|
00000620: 20 4D 45 4E 55 20 2A 2A 00 2E 0E 2D 01 3A 00 5D | MENU **...-.:.]|
00000630: 0E 2E 01 99 22 93 22 3A 97 55 54 2C 55 55 25 3A |....".":.UT,UU%:|
00000640: 8B C2 28 35 30 30 30 33 29 B2 30 A7 97 35 33 32 |..(50003).0..532|
00000650: 38 31 2C 39 3A 97 35 33 32 38 30 2C 38 00 63 0E |81,9:.53280,8.c.|
00000660: 2F 01 3A 00 80 0E 31 01 99 22 13 20 20 20 20 20 |/.:...1..". |
00000670: 20 20 20 20 20 20 20 20 20 20 20 4D 45 4E 55 22 | MENU"|
00000680: 00 AF 0E 36 01 99 22 20 2D 2D 2D 2D 2D 2D 2D 2D |...6.." --------|
00000690: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000006A0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 00 |--------------".|
000006B0: D5 0E 3B 01 99 22 11 11 20 20 20 20 20 20 20 31 |..;..".. 1|
000006C0: 2E 20 20 20 41 44 44 49 54 49 4F 4E 20 54 45 41 |. ADDITION TEA|
000006D0: 43 48 45 52 22 00 FF 0E 40 01 99 22 11 11 20 20 |CHER"...@..".. |
000006E0: 20 20 20 20 20 32 2E 20 20 20 53 54 55 44 45 4E | 2. STUDEN|
000006F0: 54 20 49 4E 53 54 52 55 43 54 49 4F 4E 53 22 00 |T INSTRUCTIONS".|
00000700: 29 0F 45 01 99 22 11 11 20 20 20 20 20 20 20 33 |).E..".. 3|
00000710: 2E 20 20 20 54 45 41 43 48 45 52 20 49 4E 53 54 |. TEACHER INST|
00000720: 52 55 43 54 49 4F 4E 53 22 00 45 0F 4F 01 99 22 |RUCTIONS".E.O.."|
00000730: 11 11 20 20 20 20 20 20 20 34 2E 20 20 20 51 55 |.. 4. QU|
00000740: 49 54 11 11 22 00 74 0F 54 01 99 22 20 2D 2D 2D |IT..".t.T.." ---|
00000750: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000760: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000770: 2D 2D 2D 22 00 9F 0F 59 01 99 22 11 11 20 20 20 |---"...Y..".. |
00000780: 20 20 20 20 50 52 45 53 53 20 41 20 4E 55 4D 42 | PRESS A NUMB|
00000790: 45 52 20 4B 45 59 20 28 31 2D 34 29 20 22 3B 00 |ER KEY (1-4) ";.|
000007A0: C7 0F 5E 01 55 4C B2 31 3A 55 53 24 B2 22 31 32 |..^.UL.1:US$."12|
000007B0: 33 34 22 3A 8D 33 35 3A 8F 20 49 4E 50 55 54 20 |34":.35:. INPUT |
000007C0: 52 4F 55 54 49 4E 45 00 DC 0F 5F 01 3A 20 20 8B |ROUTINE..._.: .|
000007D0: C3 28 55 52 24 29 B1 31 A7 33 30 30 00 E7 0F 60 |.(UR$).1.300...`|
000007E0: 01 55 53 24 B2 22 22 00 04 10 63 01 91 C5 28 55 |.US$.""...c...(U|
000007F0: 52 24 29 8D 31 30 30 30 2C 34 30 30 2C 35 30 30 |R$).1000,400,500|
00000800: 2C 33 39 36 00 0D 10 68 01 89 33 30 30 00 34 10 |,396...h..300.4.|
00000810: 8B 01 8F 20 2A 2A 20 52 45 2D 45 4E 41 42 4C 45 |... ** RE-ENABLE|
00000820: 20 53 54 4F 50 20 4B 45 59 20 41 4E 44 20 45 4E | STOP KEY AND EN|
00000830: 44 20 2A 2A 00 63 10 8C 01 8B C2 28 35 30 30 30 |D **.c.....(5000|
00000840: 33 29 B3 B1 31 AF C2 28 35 30 30 30 33 29 B3 B1 |3)..1..(50003)..|
00000850: 31 36 30 AF C2 28 35 30 30 30 33 29 B3 B1 30 A7 |160..(50003)..0.|
00000860: 33 39 39 00 8D 10 8D 01 9E 55 55 AA 37 31 3A 8B |399......UU.71:.|
00000870: C2 28 35 30 30 30 33 29 B2 30 A7 97 35 33 32 38 |.(50003).0..5328|
00000880: 31 2C 36 3A 97 35 33 32 38 30 2C 31 34 00 99 10 |1,6:.53280,14...|
00000890: 8E 01 99 22 9A 93 22 3A 80 00 A4 10 8F 01 8D 38 |..."..":.......8|
000008A0: 37 35 3A 8E 00 C5 10 90 01 8F 20 2A 2A 20 53 54 |75:....... ** ST|
000008B0: 55 44 45 4E 54 20 49 4E 53 54 52 55 43 54 49 4F |UDENT INSTRUCTIO|
000008C0: 4E 53 20 2A 2A 00 F4 10 95 01 99 22 93 22 3A 97 |NS **......".":.|
000008D0: 55 54 2C 55 4C 25 3A 8B C2 28 35 30 30 30 33 29 |UT,UL%:..(50003)|
000008E0: B2 30 A7 97 35 33 32 38 31 2C 30 3A 97 35 33 32 |.0..53281,0:.532|
000008F0: 38 30 2C 30 00 15 11 9A 01 55 50 B2 30 3A 55 47 |80,0.....UP.0:UG|
00000900: 24 B2 22 D3 54 55 44 45 4E 54 20 C9 4E 53 54 22 |$.".TUDENT .NST"|
00000910: 3A 8D 38 35 30 00 43 11 9C 01 3A 20 20 99 22 11 |:.850.C...: .".|
00000920: 20 20 20 20 D2 45 4D 45 4D 42 45 52 20 54 4F 20 | .EMEMBER TO |
00000930: 48 49 54 20 3C 52 45 54 55 52 4E 3E 20 41 46 54 |HIT <RETURN> AFT|
00000940: 45 52 22 00 70 11 9E 01 3A 20 20 99 22 11 20 20 |ER".p...: .". |
00000950: 20 54 59 50 49 4E 47 20 59 4F 55 52 20 41 4E 53 | TYPING YOUR ANS|
00000960: 57 45 52 2E 20 D4 48 49 53 20 54 45 4C 4C 53 22 |WER. .HIS TELLS"|
00000970: 00 9E 11 A0 01 3A 20 20 99 22 11 20 20 20 54 48 |.....: .". TH|
00000980: 45 20 43 4F 4D 50 55 54 45 52 20 54 4F 20 41 43 |E COMPUTER TO AC|
00000990: 43 45 50 54 20 57 48 41 54 20 59 4F 55 22 00 B7 |CEPT WHAT YOU"..|
000009A0: 11 A2 01 3A 20 20 99 22 11 20 20 20 48 41 56 45 |...: .". HAVE|
000009B0: 20 54 59 50 45 44 2E 00 E5 11 A4 01 3A 20 20 99 | TYPED......: .|
000009C0: 22 11 20 20 20 20 D4 59 50 45 20 3C 48 3E 20 41 |". .YPE <H> A|
000009D0: 54 20 41 4E 59 20 54 49 4D 45 20 54 4F 20 52 45 |T ANY TIME TO RE|
000009E0: 54 55 52 4E 22 00 13 12 A6 01 3A 20 20 99 22 11 |TURN".....: .".|
000009F0: 20 20 20 54 4F 20 54 48 45 20 4D 45 4E 55 20 46 | TO THE MENU F|
00000A00: 4F 52 20 48 45 4C 50 2E 20 20 D9 4F 55 20 57 49 |OR HELP. .OU WI|
00000A10: 4C 4C 22 00 41 12 A8 01 3A 20 20 99 22 11 20 20 |LL".A...: .". |
00000A20: 20 42 45 20 52 45 54 55 52 4E 45 44 20 54 4F 20 | BE RETURNED TO |
00000A30: 54 48 45 20 50 4C 41 43 45 20 49 4E 20 54 48 45 |THE PLACE IN THE|
00000A40: 22 00 6D 12 AA 01 3A 20 20 99 22 11 20 20 20 50 |".m...: .". P|
00000A50: 52 4F 47 52 41 4D 20 57 48 45 52 45 20 59 4F 55 |ROGRAM WHERE YOU|
00000A60: 20 4C 45 46 54 20 4F 46 46 20 41 53 22 00 9C 12 | LEFT OFF AS"...|
00000A70: AC 01 3A 20 20 99 22 11 20 20 20 53 4F 4F 4E 20 |..: .". SOON |
00000A80: 41 53 20 54 48 45 20 4F 50 54 49 4F 4E 20 46 52 |AS THE OPTION FR|
00000A90: 4F 4D 20 54 48 45 20 4D 45 4E 55 22 00 B7 12 AE |OM THE MENU"....|
00000AA0: 01 3A 20 20 99 22 11 20 20 20 49 53 20 43 4F 4D |.: .". IS COM|
00000AB0: 50 4C 45 54 45 2E 22 00 CA 12 B0 01 55 50 B2 31 |PLETE.".....UP.1|
00000AC0: 3A 8D 38 33 35 3A 8D 38 35 30 00 F7 12 B2 01 99 |:.835:.850......|
00000AD0: 22 11 11 20 20 20 20 20 D4 48 49 53 20 50 52 4F |".. .HIS PRO|
00000AE0: 47 52 41 4D 20 48 45 4C 50 53 20 59 4F 55 20 54 |GRAM HELPS YOU T|
00000AF0: 4F 20 4C 45 41 52 4E 00 25 13 B4 01 99 22 11 1D |O LEARN.%...."..|
00000B00: 54 4F 20 41 44 44 20 43 4F 52 52 45 43 54 4C 59 |TO ADD CORRECTLY|
00000B10: 2E 20 20 D9 4F 55 20 53 4C 4F 57 4C 59 20 54 41 |. .OU SLOWLY TA|
00000B20: 43 4B 4C 45 22 00 53 13 B6 01 99 22 11 1D 54 48 |CKLE".S...."..TH|
00000B30: 45 20 51 55 45 53 54 49 4F 4E 20 53 54 45 50 20 |E QUESTION STEP |
00000B40: 42 59 20 53 54 45 50 20 55 4E 54 49 4C 20 49 54 |BY STEP UNTIL IT|
00000B50: 20 49 53 00 81 13 B8 01 99 22 11 1D 43 4F 4D 50 | IS......"..COMP|
00000B60: 4C 45 54 45 44 2E 20 20 C9 46 20 59 4F 55 20 44 |LETED. .F YOU D|
00000B70: 49 44 20 57 45 4C 4C 20 57 49 54 48 20 4F 4E 45 |ID WELL WITH ONE|
00000B80: 22 00 AE 13 BA 01 99 22 11 1D 53 45 43 54 49 4F |"......"..SECTIO|
00000B90: 4E 2C 20 59 4F 55 20 57 49 4C 4C 20 4D 4F 56 45 |N, YOU WILL MOVE|
00000BA0: 20 55 50 20 54 4F 20 53 4C 49 47 48 54 59 00 D9 | UP TO SLIGHTY..|
00000BB0: 13 BC 01 99 22 11 1D 48 41 52 44 45 52 20 51 55 |...."..HARDER QU|
00000BC0: 45 53 54 49 4F 4E 53 2E 20 20 D4 48 45 52 45 20 |ESTIONS. .HERE |
00000BD0: 41 52 45 20 45 49 47 48 54 00 FB 13 BE 01 99 22 |ARE EIGHT......"|
00000BE0: 11 1D 4C 45 56 45 4C 53 20 59 4F 55 20 4D 41 59 |..LEVELS YOU MAY|
00000BF0: 20 43 4F 4D 50 4C 45 54 45 2E 22 00 29 14 C0 01 | COMPLETE.".)...|
00000C00: 99 22 11 11 20 20 20 20 20 D4 4F 20 45 4E 44 20 |.".. .O END |
00000C10: 54 48 45 20 50 52 4F 47 52 41 4D 20 41 54 20 41 |THE PROGRAM AT A|
00000C20: 4E 59 20 54 49 4D 45 2C 22 00 4B 14 C2 01 99 22 |NY TIME,".K...."|
00000C30: 11 20 20 20 20 20 54 59 50 45 20 27 D1 27 20 3C |. TYPE '.' <|
00000C40: 20 52 45 54 55 52 4E 20 3E 2E 22 00 54 14 E5 01 | RETURN >.".T...|
00000C50: 8D 38 33 35 00 68 14 EA 01 8B 55 5A B2 31 A7 9E |.835.h....UZ.1..|
00000C60: 55 50 25 3A 89 32 31 37 00 6E 14 F3 01 8E 00 8F |UP%:.217.n......|
00000C70: 14 F4 01 8F 20 2A 2A 20 54 45 41 43 48 45 52 20 |.... ** TEACHER |
00000C80: 49 4E 53 54 52 55 43 54 49 4F 4E 53 20 2A 2A 00 |INSTRUCTIONS **.|
00000C90: BF 14 F5 01 99 22 93 22 3A 97 55 54 2C 55 4C 25 |.....".":.UT,UL%|
00000CA0: 3A 8B C2 28 35 30 30 30 33 29 B2 30 A7 97 35 33 |:..(50003).0..53|
00000CB0: 32 38 31 2C 32 3A 97 35 33 32 38 30 2C 31 30 00 |281,2:.53280,10.|
00000CC0: E1 14 F6 01 55 50 B2 30 3A 55 47 24 B2 22 D4 45 |....UP.0:UG$.".E|
00000CD0: 41 43 48 45 52 20 C9 4E 53 54 2E 22 3A 8D 38 35 |ACHER .NST.":.85|
00000CE0: 30 00 0F 15 F7 01 99 22 11 11 20 20 20 20 20 20 |0......".. |
00000CF0: D4 4F 20 54 48 45 20 42 45 53 54 20 4F 46 20 4F |.O THE BEST OF O|
00000D00: 55 52 20 4B 4E 4F 57 4C 45 44 47 45 2C 11 22 00 |UR KNOWLEDGE,.".|
00000D10: 38 15 F8 01 99 22 20 20 20 54 48 49 53 20 50 52 |8...." THIS PR|
00000D20: 4F 47 52 41 4D 20 49 53 20 49 4E 20 54 48 45 20 |OGRAM IS IN THE |
00000D30: 50 55 42 4C 49 43 11 22 00 64 15 F9 01 99 22 20 |PUBLIC.".d...." |
00000D40: 20 20 44 4F 4D 41 49 4E 2E 20 20 C9 46 20 54 48 | DOMAIN. .F TH|
00000D50: 49 53 20 49 53 20 4E 4F 54 20 54 48 45 20 43 41 |IS IS NOT THE CA|
00000D60: 53 45 11 22 00 81 15 FA 01 99 22 20 20 20 50 4C |SE."......" PL|
00000D70: 45 41 53 45 20 43 4F 4E 54 41 43 54 3A 11 11 11 |EASE CONTACT:...|
00000D80: 22 00 AB 15 FB 01 99 22 20 20 20 20 20 20 C3 4F |"......" .O|
00000D90: 4D 4D 4F 44 4F 52 45 20 C2 55 53 49 4E 45 53 53 |MMODORE .USINESS|
00000DA0: 20 CD 41 43 48 49 4E 45 53 11 22 00 CE 15 FC 01 | .ACHINES.".....|
00000DB0: 99 22 20 20 20 20 20 20 20 20 20 20 33 33 37 30 |." 3370|
00000DC0: 20 D0 48 41 52 4D 41 43 59 20 C1 56 45 2E 00 F2 | .HARMACY .VE...|
00000DD0: 15 FD 01 99 22 20 20 20 20 20 20 20 20 20 20 C1 |...." .|
00000DE0: 47 49 4E 43 4F 55 52 54 2C 20 CF 4E 54 41 52 49 |GINCOURT, .NTARI|
00000DF0: 4F 22 00 14 16 FE 01 99 22 20 20 20 20 20 20 20 |O"......" |
00000E00: 20 20 20 C3 41 4E 41 44 41 20 20 20 CD 31 D7 20 | .ANADA .1. |
00000E10: 32 CB 34 22 00 34 16 FF 01 99 22 20 20 20 20 20 |2.4".4...." |
00000E20: 20 20 20 20 20 28 34 31 36 29 20 34 39 39 2D 34 | (416) 499-4|
00000E30: 32 39 32 22 00 4A 16 00 02 55 50 B2 31 3A 8D 20 |292".J...UP.1:. |
00000E40: 38 33 35 3A 8D 20 38 35 30 3A 00 77 16 01 02 99 |835:. 850:.w....|
00000E50: 22 20 20 20 20 20 11 11 D0 52 4F 47 52 41 4D 20 |" ...ROGRAM |
00000E60: CE 41 4D 45 3A 20 C1 44 44 49 54 49 4F 4E 20 D4 |.AME: .DDITION .|
00000E70: 45 41 43 48 45 52 11 00 99 16 02 02 99 22 20 20 |EACHER......." |
00000E80: 20 20 20 D7 52 49 54 54 45 4E 20 C2 59 20 20 3A | .RITTEN .Y :|
00000E90: 20 D5 4E 4B 4E 4F 57 4E 11 00 BC 16 03 02 99 22 | .NKNOWN......."|
00000EA0: 20 20 20 20 20 D5 50 47 52 41 44 45 44 20 C2 59 | .PGRADED .Y|
00000EB0: 20 3A 20 D2 41 59 20 D7 48 49 54 45 00 E7 16 04 | : .AY .HITE....|
00000EC0: 02 99 22 20 20 20 20 20 11 D4 48 49 53 20 50 52 |.." ..HIS PR|
00000ED0: 4F 47 52 41 4D 20 57 49 4C 4C 20 52 55 4E 20 4F |OGRAM WILL RUN O|
00000EE0: 4E 20 41 4E 59 11 11 00 07 17 07 02 99 22 20 20 |N ANY........" |
00000EF0: 20 20 20 20 20 20 20 D0 C5 D4 20 36 34 20 C3 CF | ... 64 ..|
00000F00: CD D0 D5 D4 C5 D2 11 00 2C 17 08 02 99 22 20 20 |........,...." |
00000F10: 20 20 20 20 20 20 20 C3 CF CD CD CF C4 CF D2 C5 | .........|
00000F20: 20 36 34 20 C3 CF CD D0 D5 D4 C5 D2 00 3A 17 0C | 64 .........:..|
00000F30: 02 8D 38 33 35 3A 8D 38 35 30 00 69 17 0E 02 99 |..835:.850.i....|
00000F40: 22 11 11 11 20 20 20 20 20 D4 48 49 53 20 50 52 |"... .HIS PR|
00000F50: 4F 47 52 41 4D 20 49 53 20 49 4E 54 45 4E 44 45 |OGRAM IS INTENDE|
00000F60: 44 20 46 4F 52 20 54 48 45 00 97 17 10 02 99 22 |D FOR THE......"|
00000F70: 11 1D 4C 4F 57 45 52 20 47 52 41 44 45 53 20 4F |..LOWER GRADES O|
00000F80: 46 20 45 4C 45 4D 45 4E 54 41 52 59 20 53 43 48 |F ELEMENTARY SCH|
00000F90: 4F 4F 4C 2E 20 20 22 00 C2 17 12 02 99 22 11 1D |OOL. "......"..|
00000FA0: D4 48 45 20 53 54 55 44 45 4E 54 20 49 53 20 44 |.HE STUDENT IS D|
00000FB0: 52 49 4C 4C 45 44 20 4F 4E 20 41 44 44 49 54 49 |RILLED ON ADDITI|
00000FC0: 4F 4E 00 F1 17 14 02 99 22 11 1D 53 4B 49 4C 4C |ON......"..SKILL|
00000FD0: 53 20 41 54 20 41 20 43 4F 4D 46 4F 52 54 41 42 |S AT A COMFORTAB|
00000FE0: 4C 45 20 4C 45 56 45 4C 2C 20 53 54 45 50 20 42 |LE LEVEL, STEP B|
00000FF0: 59 00 1F 18 16 02 99 22 11 1D 53 54 45 50 20 49 |Y......"..STEP I|
00001000: 4E 20 54 48 45 20 41 44 44 49 54 49 4F 4E 20 50 |N THE ADDITION P|
00001010: 52 4F 43 45 53 53 2E 20 20 C9 46 20 54 48 45 00 |ROCESS. .F THE.|
00001020: 4E 18 18 02 99 22 11 1D 53 54 55 44 45 4E 54 20 |N...."..STUDENT |
00001030: 44 4F 45 53 20 57 45 4C 4C 2C 20 41 20 44 52 49 |DOES WELL, A DRI|
00001040: 4C 4C 20 41 54 20 41 20 48 49 47 48 45 52 00 7A |LL AT A HIGHER.z|
00001050: 18 1A 02 99 22 11 1D 4C 45 56 45 4C 20 4F 46 20 |...."..LEVEL OF |
00001060: 44 49 46 46 49 43 55 4C 54 59 20 46 4F 4C 4C 4F |DIFFICULTY FOLLO|
00001070: 57 53 2E 20 20 20 20 20 20 22 00 A5 18 1C 02 99 |WS. "......|
00001080: 22 11 20 20 20 20 D4 48 45 52 45 20 41 52 45 20 |". .HERE ARE |
00001090: 45 49 47 48 54 20 4C 45 56 45 4C 53 20 49 4E 20 |EIGHT LEVELS IN |
000010A0: 41 4C 4C 2E 22 00 AE 18 44 02 8D 38 33 35 00 C2 |ALL."...D..835..|
000010B0: 18 4E 02 8B 55 5A B2 31 A7 9E 55 50 25 3A 89 32 |.N..UZ.1..UP%:.2|
000010C0: 31 37 00 C8 18 57 02 8E 00 EE 18 58 02 8F 20 2A |17...W.....X.. *|
000010D0: 2A 20 50 52 4F 47 52 41 4D 20 4D 4F 44 49 46 49 |* PROGRAM MODIFI|
000010E0: 43 41 54 49 4F 4E 20 49 4E 53 54 20 2A 2A 00 FF |CATION INST **..|
000010F0: 18 59 02 99 22 93 22 3A 97 55 54 2C 55 4C 25 00 |.Y..".":.UT,UL%.|
00001100: 1F 19 5D 02 55 50 B2 30 3A 55 47 24 B2 22 D0 52 |..].UP.0:UG$.".R|
00001110: 4F 47 52 41 4D 20 CD 4F 44 22 3A 8D 38 35 30 00 |OGRAM .OD":.850.|
00001120: 28 19 94 02 8D 38 33 35 00 3C 19 B2 02 8B 55 5A |(....835.<....UZ|
00001130: B2 31 A7 9E 55 50 25 3A 89 32 31 37 00 42 19 BB |.1..UP%:.217.B..|
00001140: 02 8E 00 67 19 BC 02 8F 20 2A 2A 20 54 4F 20 55 |...g.... ** TO U|
00001150: 53 45 20 38 30 33 32 20 4C 4F 41 44 20 43 42 4D |SE 8032 LOAD CBM|
00001160: 34 30 33 32 20 2A 2A 00 9D 19 C6 02 99 22 93 11 |4032 **......"..|
00001170: 11 11 05 42 45 46 4F 52 45 20 52 55 4E 4E 49 4E |...BEFORE RUNNIN|
00001180: 47 20 54 48 49 53 20 50 52 4F 47 52 41 4D 20 4F |G THIS PROGRAM O|
00001190: 4E 20 41 4E 20 38 30 33 32 20 20 11 11 00 D3 19 |N AN 8032 .....|
000011A0: D0 02 99 22 20 20 20 20 20 20 4C 4F 41 44 20 54 |..." LOAD T|
000011B0: 48 45 20 27 43 42 4D 20 34 30 33 32 27 20 50 52 |HE 'CBM 4032' PR|
000011C0: 4F 47 52 41 4D 11 11 11 11 11 11 11 11 11 11 11 |OGRAM...........|
000011D0: 11 11 22 00 DE 19 DA 02 9E 55 55 AA 37 31 00 E4 |.."......UU.71..|
000011E0: 19 E4 02 80 00 04 1A 20 03 8F 20 2A 2A 20 54 20 |....... .. ** T |
000011F0: 49 20 54 20 4C 20 45 20 20 20 50 20 41 20 47 20 |I T L E P A G |
00001200: 45 20 2A 2A 00 38 1A 22 03 99 22 93 11 1D 05 22 |E **.8.".."...."|
00001210: 3B 3A 97 55 54 2C 55 55 25 3A 8B C2 28 35 30 30 |;:.UT,UU%:..(500|
00001220: 30 33 29 B2 30 A7 97 35 33 32 38 30 2C 31 34 3A |03).0..53280,14:|
00001230: 97 35 33 32 38 31 2C 36 00 4E 1A 24 03 81 49 B2 |.53281,6.N.$..I.|
00001240: 31 A4 33 38 3A 99 22 12 A6 92 22 3B 3A 82 00 66 |1.38:."...";:..f|
00001250: 1A 26 03 81 49 B2 31 A4 32 32 3A 99 22 11 9D 12 |.&..I.1.22:."...|
00001260: A6 92 22 3B 3A 82 00 7E 1A 28 03 81 49 B2 31 A4 |..";:..~.(..I.1.|
00001270: 33 37 3A 99 22 9D 9D 12 A6 92 22 3B 3A 82 00 96 |37:.".....";:...|
00001280: 1A 2A 03 81 49 B2 31 A4 32 32 3A 99 22 91 9D 12 |.*..I.1.22:."...|
00001290: A6 92 22 3B 3A 82 00 BB 1A 2C 03 99 22 13 11 11 |..";:....,.."...|
000012A0: 11 11 11 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
000012B0: 1D 1D 1D 1D 1D 1D 12 A9 20 20 92 00 DD 1A 2E 03 |........ ......|
000012C0: 99 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |."..............|
000012D0: 1D 1D 1D 1D 12 20 92 20 20 12 20 92 A9 00 FE 1A |..... . . .....|
000012E0: 30 03 99 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |0.."............|
000012F0: 1D 1D 1D 1D 1D 1D 12 20 92 20 20 12 A3 DF 00 1C |....... . .....|
00001300: 1B 32 03 99 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |.2.."...........|
00001310: 1D 1D 1D 1D 1D 1D 1D DF 12 20 20 92 00 44 1B 34 |......... ..D.4|
00001320: 03 99 22 11 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |..".............|
00001330: 1D 43 20 4F 20 4D 20 4D 20 4F 20 44 20 4F 20 52 |.C O M M O D O R|
00001340: 20 45 11 11 00 67 1B 36 03 99 22 1D 1D 1D 1D 1D | E...g.6..".....|
00001350: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 45 44 55 43 41 54 |..........EDUCAT|
00001360: 49 4F 4E 41 4C 11 11 00 86 1B 38 03 99 22 1D 1D |IONAL.....8.."..|
00001370: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 53 4F |..............SO|
00001380: 46 54 57 41 52 45 00 A1 1B 3A 03 8F 20 2A 2A 20 |FTWARE...:.. ** |
00001390: 43 4F 4D 4D 4F 44 4F 52 45 20 4C 4F 47 4F 20 2A |COMMODORE LOGO *|
000013A0: 2A 00 D9 1B 3B 03 99 C8 28 55 44 24 2C 32 34 29 |*...;...(UD$,24)|
000013B0: 3B 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 12 50 52 45 53 |;"..........PRES|
000013C0: 53 20 53 50 41 43 45 20 42 41 52 20 4F 52 20 57 |S SPACE BAR OR W|
000013D0: 41 49 54 92 22 3A 49 B2 30 00 FB 1B 3C 03 A1 41 |AIT.":I.0...<..A|
000013E0: 24 3A 8B 41 24 B3 B1 22 20 22 A7 49 B2 49 AA 31 |$:.A$.." ".I.I.1|
000013F0: 3A 8B 49 B3 32 35 30 A7 38 32 38 00 1F 1C 3E 03 |:.I.250.828...>.|
00001400: 54 31 24 B2 22 22 3A 54 32 24 B2 22 22 3A 54 33 |T1$."":T2$."":T3|
00001410: 24 B2 22 22 3A 54 34 24 B2 22 22 3A 49 B2 30 00 |$."":T4$."":I.0.|
00001420: 28 1C 40 03 89 33 30 30 00 44 1C 43 03 8F 20 2A |(.@..300.D.C.. *|
00001430: 2A 20 53 50 41 43 45 20 42 41 52 20 50 52 45 53 |* SPACE BAR PRES|
00001440: 53 20 2A 2A 00 79 1C 48 03 99 C8 28 55 44 24 2C |S **.y.H...(UD$,|
00001450: 32 34 29 3B 22 1D 1D 1D 1D 1D 1D 12 50 52 45 53 |24);".......PRES|
00001460: 53 20 53 50 41 43 45 20 42 41 52 20 54 4F 20 43 |S SPACE BAR TO C|
00001470: 4F 4E 54 49 4E 55 45 92 22 00 90 1C 4C 03 A1 55 |ONTINUE."...L..U|
00001480: 49 24 3A 8B 55 49 24 B3 B1 22 20 22 A7 38 34 34 |I$:.UI$.." ".844|
00001490: 00 96 1C 4E 03 8E 00 B6 1C 52 03 8F 20 2A 2A 20 |...N.....R.. ** |
000014A0: 50 41 47 45 20 44 45 53 49 47 4E 20 52 4F 55 54 |PAGE DESIGN ROUT|
000014B0: 49 4E 45 20 2A 2A 00 C2 1C 54 03 55 50 B2 55 50 |INE **...T.UP.UP|
000014C0: AA 31 00 E9 1C 57 03 99 22 93 22 C8 28 55 54 24 |.1...W..".".(UT$|
000014D0: AA 55 50 24 2C 32 31 29 3B C8 28 55 47 24 AA 55 |.UP$,21);.(UG$.U|
000014E0: 50 24 2C 31 34 29 3B 55 50 00 18 1D 5C 03 99 22 |P$,14);UP...\.."|
000014F0: 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D | ---------------|
00001500: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001510: 2D 2D 2D 2D 2D 2D 2D 22 00 4C 1D 61 03 99 C8 28 |-------".L.a...(|
00001520: 55 44 24 2C 32 34 29 3B C8 28 55 50 24 2C 36 29 |UD$,24);.(UP$,6)|
00001530: 3B 22 48 45 4C 50 20 2D 20 50 52 45 53 53 20 20 |;"HELP - PRESS |
00001540: 20 48 20 3C 52 45 54 55 52 4E 3E 22 00 58 1D 66 | H <RETURN>".X.f|
00001550: 03 99 22 13 11 22 3A 8E 00 77 1D 6B 03 8F 20 2A |.."..":..w.k.. *|
00001560: 2A 20 50 4C 45 41 53 45 20 57 41 49 54 20 52 45 |* PLEASE WAIT RE|
00001570: 4D 41 52 4B 20 2A 2A 00 AD 1D 70 03 99 C8 28 55 |MARK **...p...(U|
00001580: 44 24 2C 32 34 29 3B 22 20 20 20 20 20 20 20 20 |D$,24);" |
00001590: 20 20 20 4F 4E 45 20 4D 4F 4D 45 4E 54 20 50 4C | ONE MOMENT PL|
000015A0: 45 41 53 45 2E 2E 2E 20 20 20 20 20 22 00 B3 1D |EASE... "...|
000015B0: 75 03 8E 00 D0 1D 84 03 8F 20 2A 2A 20 53 45 54 |u........ ** SET|
000015C0: 20 55 50 20 56 41 52 49 41 42 4C 45 53 20 2A 2A | UP VARIABLES **|
000015D0: 00 1B 1E 85 03 55 58 24 B2 22 48 22 3A 86 55 51 |.....UX$."H":.UQ|
000015E0: 25 28 31 30 30 30 29 3A 55 42 B2 33 32 37 36 38 |%(1000):UB.32768|
000015F0: 3A 55 31 B2 31 39 36 3A 55 32 B2 31 39 37 3A 55 |:U1.196:U2.197:U|
00001600: 33 B2 31 39 38 3A 55 34 B2 32 31 36 3A 55 43 B2 |3.198:U4.216:UC.|
00001610: 31 36 37 3A 55 55 B2 31 30 32 34 00 52 1E 86 03 |167:UU.1024.R...|
00001620: 55 54 B2 35 39 34 36 38 3A 55 55 25 B2 31 32 3A |UT.59468:UU%.12:|
00001630: 55 4C 25 B2 31 34 3A 55 50 25 B2 31 31 34 36 3A |UL%.14:UP%.1146:|
00001640: 55 4D B2 33 32 37 36 38 3A 97 20 35 30 30 30 33 |UM.32768:. 50003|
00001650: 2C 30 00 95 1E 87 03 8B C2 28 35 30 30 30 33 29 |,0.......(50003)|
00001660: B2 30 A7 55 42 B2 31 30 32 34 3A 55 31 B2 32 30 |.0.UB.1024:U1.20|
00001670: 39 3A 55 32 B2 32 31 30 3A 55 33 B2 32 31 31 3A |9:U2.210:U3.211:|
00001680: 55 34 B2 32 31 34 3A 55 43 B2 32 30 34 3A 55 55 |U4.214:UC.204:UU|
00001690: B2 32 30 34 38 00 CD 1E 88 03 8B C2 28 35 30 30 |.2048.......(500|
000016A0: 30 33 29 B2 30 A7 55 54 B2 35 33 32 37 32 3A 55 |03).0.UT.53272:U|
000016B0: 55 25 B2 32 31 3A 55 4C 25 B2 32 33 3A 55 50 25 |U%.21:UL%.23:UP%|
000016C0: B2 32 31 33 39 3A 55 4D B2 31 30 32 34 00 F1 1E |.2139:UM.1024...|
000016D0: 89 03 55 44 24 B2 22 13 11 11 11 11 11 11 11 11 |..UD$.".........|
000016E0: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
000016F0: 22 00 23 1F 8A 03 55 50 24 B2 22 20 20 20 20 20 |".#...UP$." |
00001700: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001710: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001720: 20 20 22 00 71 1F 8B 03 55 54 24 B2 22 20 C1 C4 | ".q...UT$." ..|
00001730: C4 C9 D4 C9 CF CE A0 D4 C5 C1 C3 C8 C5 D2 A0 A0 |................|
00001740: 22 3A 8F 20 50 4C 41 43 45 20 50 52 4F 47 52 41 |":. PLACE PROGRA|
00001750: 4D 20 54 49 54 4C 45 20 48 45 52 45 20 21 21 21 |M TITLE HERE !!!|
00001760: 21 21 21 21 21 21 21 21 21 21 21 21 21 21 2A 2A |!!!!!!!!!!!!!!**|
00001770: 2A 00 85 1F 8C 03 86 20 52 43 28 32 30 29 2C 4C |*...... RC(20),L|
00001780: 56 28 32 30 29 00 8B 1F 8D 03 8E 00 A5 1F 8E 03 |V(20)...........|
00001790: 8F 20 2A 2A 20 53 45 54 20 56 41 52 49 41 42 4C |. ** SET VARIABL|
000017A0: 45 53 20 2A 2A 00 AE 1F 93 03 8D 39 30 30 00 C9 |ES **......900..|
000017B0: 1F 98 03 8F 20 2A 2A 20 43 48 45 43 4B 20 46 4F |.... ** CHECK FO|
000017C0: 52 20 38 30 33 32 20 2A 2A 00 E7 1F 9D 03 99 22 |R 8032 **......"|
000017D0: 93 22 3A 99 22 A0 22 3A 8F 20 53 48 49 46 54 45 |.":.".":. SHIFTE|
000017E0: 44 20 53 50 41 43 45 00 FE 1F A2 03 8B C2 28 55 |D SPACE.......(U|
000017F0: 42 AA 34 30 29 B3 B1 39 36 A7 8D 37 30 30 00 17 |B.40)..96..700..|
00001800: 20 A3 03 8F 20 2A 2A 20 4D 45 4D 4F 52 59 20 43 | ... ** MEMORY C|
00001810: 48 45 43 4B 20 2A 2A 00 2B 20 A4 03 8B 20 B8 28 |HECK **.+ ... .(|
00001820: 30 29 B1 32 30 30 30 A7 39 33 37 00 59 20 A5 03 |0).2000.937.Y ..|
00001830: 99 22 93 11 11 05 54 48 49 53 20 4D 41 43 48 49 |."....THIS MACHI|
00001840: 4E 45 20 44 4F 45 53 20 4E 4F 54 20 48 41 56 45 |NE DOES NOT HAVE|
00001850: 20 45 4E 4F 55 47 48 11 22 00 7D 20 A6 03 99 22 | ENOUGH.".} ..."|
00001860: 4D 45 4D 4F 52 59 20 54 4F 20 52 55 4E 20 54 48 |MEMORY TO RUN TH|
00001870: 49 53 20 50 52 4F 47 52 41 4D 20 21 22 00 88 20 |IS PROGRAM !".. |
00001880: A7 03 9E 55 55 AA 37 31 00 8E 20 A8 03 80 00 A8 |...UU.71.. .....|
00001890: 20 A9 03 99 22 93 05 22 3A 8B C2 28 35 30 30 30 | ..."..":..(5000|
000018A0: 33 29 B2 30 A7 39 36 32 00 D7 20 AC 03 8F 20 2A |3).0.962.. ... *|
000018B0: 2A 20 42 41 53 49 43 20 32 2E 30 20 20 4F 52 20 |* BASIC 2.0 OR |
000018C0: 20 34 2E 30 20 20 4F 52 20 20 43 2D 36 34 20 53 | 4.0 OR C-64 S|
000018D0: 45 54 55 50 20 2A 2A 00 15 21 AD 03 97 31 30 37 |ETUP **..!...107|
000018E0: 35 2C 31 33 33 3A 97 31 30 37 36 2C 31 34 34 3A |5,133:.1076,144:|
000018F0: 97 31 30 37 37 2C 32 33 34 3A 97 31 30 37 39 2C |.1077,234:.1079,|
00001900: 34 3A 97 31 30 38 30 2C 31 33 33 3A 97 31 30 38 |4:.1080,133:.108|
00001910: 31 2C 31 34 35 00 4B 21 AE 03 97 31 30 39 31 2C |1,145.K!...1091,|
00001920: 31 35 35 3A 97 31 30 39 38 2C 31 33 33 3A 97 31 |155:.1098,133:.1|
00001930: 30 39 39 2C 31 34 34 3A 97 31 31 30 30 2C 32 33 |099,144:.1100,23|
00001940: 34 3A 97 31 31 30 33 2C 31 33 33 00 6D 21 AF 03 |4:.1103,133.m!..|
00001950: 97 31 31 30 34 2C 31 34 35 3A 97 31 31 30 35 2C |.1104,145:.1105,|
00001960: 32 33 34 3A 97 31 30 38 32 2C 32 33 34 00 84 21 |234:.1082,234..!|
00001970: B1 03 8B C2 28 35 30 30 30 33 29 B3 B1 31 36 30 |....(50003)..160|
00001980: A7 39 35 35 00 B3 21 B6 03 97 31 30 39 33 2C 38 |.955..!...1093,8|
00001990: 38 3A 97 31 30 39 34 2C 32 32 38 3A 97 31 30 39 |8:.1094,228:.109|
000019A0: 37 2C 38 35 3A 97 31 31 30 32 2C 32 32 38 3A 89 |7,85:.1102,228:.|
000019B0: 39 36 35 00 C8 21 BB 03 8B C2 28 35 30 30 30 33 |965..!....(50003|
000019C0: 29 B3 B1 31 A7 39 39 30 00 F7 21 C0 03 97 31 30 |)..1.990..!...10|
000019D0: 39 33 2C 34 39 3A 97 31 30 39 34 2C 32 33 30 3A |93,49:.1094,230:|
000019E0: 97 31 30 39 37 2C 34 36 3A 97 31 31 30 32 2C 32 |.1097,46:.1102,2|
000019F0: 33 30 3A 89 39 36 35 00 31 22 C2 03 97 32 30 39 |30:.965.1"...209|
00001A00: 39 2C 31 34 31 3A 97 32 31 30 30 2C 32 30 3A 97 |9,141:.2100,20:.|
00001A10: 32 31 30 31 2C 33 3A 97 32 31 30 33 2C 38 3A 97 |2101,3:.2103,8:.|
00001A20: 32 31 30 34 2C 31 34 31 3A 97 32 31 30 35 2C 32 |2104,141:.2105,2|
00001A30: 31 00 6D 22 C3 03 97 32 31 30 36 2C 33 3A 97 32 |1.m"...2106,3:.2|
00001A40: 31 31 35 2C 31 34 35 3A 97 32 31 31 37 2C 35 32 |115,145:.2117,52|
00001A50: 3A 97 32 31 31 38 2C 32 33 34 3A 97 32 31 32 31 |:.2118,234:.2121|
00001A60: 2C 34 39 3A 97 32 31 32 32 2C 31 34 31 00 A7 22 |,49:.2122,141.."|
00001A70: C4 03 97 32 31 32 33 2C 32 30 3A 97 32 31 32 34 |...2123,20:.2124|
00001A80: 2C 33 3A 97 32 31 32 36 2C 32 33 34 3A 97 32 31 |,3:.2126,234:.21|
00001A90: 32 37 2C 31 34 31 3A 97 32 31 32 38 2C 32 31 3A |27,141:.2128,21:|
00001AA0: 97 32 31 32 39 2C 33 00 C5 22 C5 03 9E 55 55 AA |.2129,3.."...UU.|
00001AB0: 34 38 3A 8F 20 44 49 53 41 42 4C 45 20 53 54 4F |48:. DISABLE STO|
00001AC0: 50 20 4B 45 59 00 D6 22 CA 03 8D 38 30 30 3A 8F |P KEY.."...800:.|
00001AD0: 20 54 49 54 4C 45 00 E6 22 D4 03 89 33 30 30 3A | TITLE.."...300:|
00001AE0: 8F 20 4D 45 4E 55 00 17 23 DE 03 99 22 93 54 48 |. MENU..#...".TH|
00001AF0: 45 20 50 47 4D 20 57 49 4C 4C 20 4E 4F 54 20 57 |E PGM WILL NOT W|
00001B00: 4F 52 4B 20 4F 4E 20 54 48 49 53 20 4D 41 43 48 |ORK ON THIS MACH|
00001B10: 49 4E 45 21 22 3A 80 00 4C 23 E8 03 8B 55 5A B2 |INE!":..L#...UZ.|
00001B20: 31 A7 9E 55 50 25 3A 9E 55 50 25 3A 55 5A B2 30 |1..UP%:.UP%:UZ.0|
00001B30: 3A 8F 20 2A 2A 20 50 52 4F 47 52 41 4D 20 53 54 |:. ** PROGRAM ST|
00001B40: 41 52 54 53 20 48 45 52 45 20 2A 2A 00 77 23 E9 |ARTS HERE **.w#.|
00001B50: 03 99 22 93 05 22 3B 3A 8C 3A 8B C2 28 35 30 30 |.."..";:.:..(500|
00001B60: 30 33 29 B2 30 A7 97 35 33 32 38 31 2C 36 3A 97 |03).0..53281,6:.|
00001B70: 35 33 32 38 30 2C 36 00 B1 23 F2 03 4C B2 30 3A |53280,6..#..L.0:|
00001B80: 53 43 B2 30 3A 4E 55 B2 30 3A 56 31 B2 30 3A 56 |SC.0:NU.0:V1.0:V|
00001B90: 32 B2 30 3A 56 33 B2 30 3A 56 34 B2 30 3A 56 35 |2.0:V3.0:V4.0:V5|
00001BA0: B2 30 3A 46 36 B2 30 3A 46 35 B2 30 3A 4E 33 B2 |.0:F6.0:F5.0:N3.|
00001BB0: 30 00 EA 23 FC 03 44 45 24 B2 22 20 20 20 20 20 |0..#..DE$." |
00001BC0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001BD0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001BE0: 20 22 3A 97 55 54 2C 55 4C 25 00 1A 24 06 04 99 | ":.UT,UL%..$...|
00001BF0: 22 93 11 20 20 20 20 20 20 20 20 20 20 C1 55 54 |".. .UT|
00001C00: 4F 2D C1 44 44 2D D4 45 41 43 48 45 52 20 20 20 |O-.DD-.EACHER |
00001C10: 20 20 20 20 20 20 20 11 11 22 00 4A 24 10 04 99 | ..".J$...|
00001C20: 22 11 11 11 1D 1D 1D D4 48 49 53 20 50 52 4F 47 |".......HIS PROG|
00001C30: 52 41 4D 20 41 55 54 4F 4D 41 54 49 43 41 4C 4C |RAM AUTOMATICALL|
00001C40: 59 20 43 48 41 4E 47 45 53 22 00 7B 24 1A 04 99 |Y CHANGES".{$...|
00001C50: 22 11 1D 4C 45 56 45 4C 20 41 46 54 45 52 20 53 |"..LEVEL AFTER S|
00001C60: 49 58 20 53 55 4D 53 20 57 49 54 48 20 46 45 57 |IX SUMS WITH FEW|
00001C70: 20 4D 49 53 54 41 4B 45 53 2E 22 00 A7 24 24 04 | MISTAKES."..$$.|
00001C80: 99 22 11 1D 1D 1D 1D 1D D7 49 54 48 20 46 45 57 |.".......ITH FEW|
00001C90: 20 43 4F 52 52 45 43 54 20 49 54 20 52 45 4D 41 | CORRECT IT REMA|
00001CA0: 49 4E 53 20 4F 4E 22 00 CB 24 2E 04 99 22 11 1D |INS ON"..$..."..|
00001CB0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 54 48 45 20 |............THE |
00001CC0: 53 41 4D 45 20 4C 45 56 45 4C 2E 00 F8 24 4E 04 |SAME LEVEL...$N.|
00001CD0: 99 22 11 11 20 20 20 20 20 D4 4F 20 51 55 49 54 |.".. .O QUIT|
00001CE0: 20 41 54 20 41 4E 59 20 54 49 4D 45 2C 20 54 59 | AT ANY TIME, TY|
00001CF0: 50 45 20 27 D1 27 2E 22 00 0C 25 51 04 81 41 B2 |PE '.'."..%Q..A.|
00001D00: 31 A4 33 3A 99 3A 82 3A 8D 38 33 35 00 29 25 60 |1.3:.:.:.835.)%`|
00001D10: 04 99 22 93 11 20 20 20 20 20 20 20 20 20 20 20 |..".. |
00001D20: 20 20 CC 45 56 45 4C 53 22 00 51 25 6A 04 99 22 | .EVELS".Q%j.."|
00001D30: 11 1D 1D 31 2E 20 C1 44 44 20 54 57 4F 20 4E 55 |...1. .DD TWO NU|
00001D40: 4D 42 45 52 53 20 54 4F 54 41 4C 20 3C 20 35 2E |MBERS TOTAL < 5.|
00001D50: 22 00 81 25 74 04 99 22 11 1D 1D 32 2E 20 C1 44 |"..%t.."...2. .D|
00001D60: 44 20 54 57 4F 20 4E 55 4D 42 45 52 53 20 54 4F |D TWO NUMBERS TO|
00001D70: 54 41 4C 20 3E 20 35 20 41 4E 44 20 3C 20 39 2E |TAL > 5 AND < 9.|
00001D80: 22 00 B1 25 7E 04 99 22 11 1D 1D 33 2E 20 C1 44 |"..%~.."...3. .D|
00001D90: 44 49 4E 47 20 57 49 54 48 20 54 4F 54 41 4C 53 |DING WITH TOTALS|
00001DA0: 20 42 45 54 57 45 45 4E 20 31 30 20 41 4E 44 20 | BETWEEN 10 AND |
00001DB0: 22 00 D6 25 88 04 99 22 11 1D 1D 20 20 20 31 39 |"..%..."... 19|
00001DC0: 20 41 4C 57 41 59 53 20 43 41 52 52 59 49 4E 47 | ALWAYS CARRYING|
00001DD0: 20 54 45 4E 2E 22 00 04 26 92 04 99 22 11 1D 1D | TEN."..&..."...|
00001DE0: 34 2E 20 C1 44 44 20 54 57 4F 20 4E 55 4D 42 45 |4. .DD TWO NUMBE|
00001DF0: 52 53 20 42 45 54 57 45 45 4E 20 30 20 41 4E 44 |RS BETWEEN 0 AND|
00001E00: 20 31 39 2E 00 2F 26 9C 04 99 22 11 1D 1D 35 2E | 19../&..."...5.|
00001E10: 20 C1 44 44 20 54 48 52 45 45 20 4E 55 4D 42 45 | .DD THREE NUMBE|
00001E20: 52 53 20 54 4F 54 41 4C 20 3C 20 31 30 2E 22 00 |RS TOTAL < 10.".|
00001E30: 58 26 A6 04 99 22 11 1D 1D 36 2E 20 C1 44 44 20 |X&..."...6. .DD |
00001E40: 54 48 52 45 45 20 4E 55 4D 42 45 52 53 20 54 4F |THREE NUMBERS TO|
00001E50: 54 41 4C 20 3C 20 32 30 00 83 26 B0 04 99 22 11 |TAL < 20..&...".|
00001E60: 1D 1D 37 2E 20 C1 44 44 20 54 48 52 45 45 20 4E |..7. .DD THREE N|
00001E70: 55 4D 42 45 52 53 20 54 4F 54 41 4C 20 3C 20 34 |UMBERS TOTAL < 4|
00001E80: 35 2E 22 00 AE 26 BA 04 99 22 11 1D 1D 38 2E 20 |5."..&..."...8. |
00001E90: C1 44 44 20 54 48 52 45 45 20 4E 55 4D 42 45 52 |.DD THREE NUMBER|
00001EA0: 53 20 54 4F 54 41 4C 20 3C 20 39 39 2E 22 00 DF |S TOTAL < 99."..|
00001EB0: 26 D8 04 44 24 B2 22 13 12 11 11 11 11 11 11 11 |&..D$.".........|
00001EC0: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
00001ED0: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 22 00 |..............".|
00001EE0: EC 26 E2 04 53 24 B2 22 54 45 4E 22 00 0E 27 EC |.&..S$."TEN"..'.|
00001EF0: 04 99 22 11 20 20 C3 48 4F 4F 53 45 20 53 54 41 |..". .HOOSE STA|
00001F00: 52 54 49 4E 47 20 4C 45 56 45 4C 20 22 3B 00 35 |RTING LEVEL ";.5|
00001F10: 27 F1 04 55 53 24 B2 22 51 48 31 32 33 34 35 36 |'..US$."QH123456|
00001F20: 37 38 22 3A 55 4C B2 31 3A 8D 33 35 3A 4C B2 C5 |78":UL.1:.35:L..|
00001F30: 28 55 52 24 29 00 44 27 F3 04 8B 55 52 24 B2 22 |(UR$).D'...UR$."|
00001F40: 51 22 A7 8E 00 66 27 F6 04 8B 4C B1 38 A7 3A 99 |Q"...f'...L.8.:.|
00001F50: 22 91 22 44 45 24 22 91 91 22 3A 8D 35 30 30 30 |"."DE$"..":.5000|
00001F60: 3A 89 31 32 36 35 00 7D 27 00 05 99 22 93 22 3A |:.1265.}'...".":|
00001F70: 97 55 54 2C 55 55 25 3A 4C B2 4C AB 31 00 8D 27 |.UT,UU%:L.L.1..'|
00001F80: 14 05 8D 33 39 32 30 3A 8D 33 38 36 30 00 A9 27 |...3920:.3860..'|
00001F90: 28 05 8F 20 53 45 54 20 44 49 46 46 49 43 55 4C |(.. SET DIFFICUL|
00001FA0: 54 59 20 4C 45 56 45 4C 53 00 D5 27 3C 05 8B 4C |TY LEVELS..'<..L|
00001FB0: B2 30 A7 4C B2 31 3A 56 31 B2 35 3A 56 32 B2 35 |.0.L.1:V1.5:V2.5|
00001FC0: 3A 56 33 B2 30 3A 56 34 B2 35 3A 46 36 B2 31 3A |:V3.0:V4.5:F6.1:|
00001FD0: 89 31 35 30 30 00 01 28 50 05 8B 4C B2 31 A7 4C |.1500..(P..L.1.L|
00001FE0: B2 32 3A 56 31 B2 39 3A 56 32 B2 39 3A 56 34 B2 |.2:V1.9:V2.9:V4.|
00001FF0: 39 3A 56 35 B2 35 3A 46 36 B2 31 3A 89 31 35 30 |9:V5.5:F6.1:.150|
00002000: 30 00 31 28 64 05 8B 4C B2 32 A7 4C B2 33 3A 56 |0.1(d..L.2.L.3:V|
00002010: 31 B2 31 30 3A 56 32 B2 31 30 3A 56 34 B2 31 39 |1.10:V2.10:V4.19|
00002020: 3A 56 35 B2 31 30 3A 46 36 B2 30 3A 89 31 35 30 |:V5.10:F6.0:.150|
00002030: 30 00 60 28 78 05 8B 4C B2 33 A7 4C B2 34 3A 56 |0.`(x..L.3.L.4:V|
00002040: 31 B2 31 30 3A 56 32 B2 31 30 3A 56 34 B2 31 39 |1.10:V2.10:V4.19|
00002050: 3A 56 35 B2 30 3A 46 36 B2 30 3A 89 31 35 30 30 |:V5.0:F6.0:.1500|
00002060: 00 99 28 8C 05 8B 4C B2 34 A7 4C B2 35 3A 56 31 |..(...L.4.L.5:V1|
00002070: B2 31 30 3A 56 32 B2 31 30 3A 56 33 B2 31 30 3A |.10:V2.10:V3.10:|
00002080: 56 34 B2 39 3A 56 35 B2 30 3A 46 35 B2 35 3A 46 |V4.9:V5.0:F5.5:F|
00002090: 36 B2 30 3A 89 31 35 30 30 00 D4 28 A0 05 8B 4C |6.0:.1500..(...L|
000020A0: B2 35 A7 4C B2 36 3A 56 31 B2 31 30 3A 56 32 B2 |.5.L.6:V1.10:V2.|
000020B0: 31 30 3A 56 33 B2 31 30 3A 56 34 B2 31 39 3A 56 |10:V3.10:V4.19:V|
000020C0: 35 B2 31 30 3A 46 36 B2 30 3A 46 35 B2 35 3A 89 |5.10:F6.0:F5.5:.|
000020D0: 31 35 30 30 00 0F 29 B4 05 8B 4C B2 36 A7 4C B2 |1500..)...L.6.L.|
000020E0: 37 3A 56 31 B2 35 30 3A 56 32 B2 35 30 3A 56 33 |7:V1.50:V2.50:V3|
000020F0: B2 35 30 3A 56 34 B2 34 35 3A 56 35 B2 32 30 3A |.50:V4.45:V5.20:|
00002100: 46 36 B2 30 3A 46 35 B2 35 3A 89 31 35 30 30 00 |F6.0:F5.5:.1500.|
00002110: 44 29 C8 05 8B 4C B2 37 A7 4C B2 38 3A 56 31 B2 |D)...L.7.L.8:V1.|
00002120: 39 39 3A 56 32 B2 39 39 3A 56 33 B2 39 39 3A 56 |99:V2.99:V3.99:V|
00002130: 34 B2 39 39 3A 56 35 B2 35 30 3A 46 36 B2 30 3A |4.99:V5.50:F6.0:|
00002140: 46 35 B2 35 00 52 29 DC 05 53 43 B2 30 3A 4E 55 |F5.5.R)..SC.0:NU|
00002150: B2 30 00 64 29 F0 05 8F 20 46 49 4E 44 20 56 41 |.0.d)... FIND VA|
00002160: 4C 55 45 53 00 76 29 04 06 8B 20 46 35 B3 B1 35 |LUES.v)... F5..5|
00002170: A7 20 31 37 30 30 00 88 29 18 06 4E 33 B2 B5 28 |. 1700..)..N3..(|
00002180: BB 28 31 29 AC 56 33 29 00 96 29 2C 06 4E 33 24 |.(1).V3)..),.N3$|
00002190: B2 C4 28 4E 33 29 00 A7 29 40 06 55 33 24 B2 C9 |..(N3)..)@.U3$..|
000021A0: 28 4E 33 24 2C 31 29 00 B5 29 54 06 5A 33 B2 C5 |(N3$,1)..)T.Z3..|
000021B0: 28 55 33 24 29 00 C8 29 68 06 54 33 24 B2 CA 28 |(U3$)..)h.T3$..(|
000021C0: 4E 33 24 2C 32 2C 31 29 00 D6 29 7C 06 54 33 B2 |N3$,2,1)..)|.T3.|
000021D0: C5 28 54 33 24 29 00 EF 29 90 06 8B 4E 33 B3 31 |.(T3$)..)...N3.1|
000021E0: 30 A7 3A 54 33 24 B2 22 20 22 3A 54 33 B2 30 00 |0.:T3$." ":T3.0.|
000021F0: 01 2A A4 06 4E 31 B2 B5 28 BB 28 31 29 AC 56 31 |.*..N1..(.(1).V1|
00002200: 29 00 0F 2A B8 06 4E 31 24 B2 C4 28 4E 31 29 00 |)..*..N1$..(N1).|
00002210: 20 2A CC 06 55 31 24 B2 C9 28 4E 31 24 2C 31 29 | *..U1$..(N1$,1)|
00002220: 00 2E 2A E0 06 5A 31 B2 C5 28 55 31 24 29 00 41 |..*..Z1..(U1$).A|
00002230: 2A F4 06 54 31 24 B2 CA 28 4E 31 24 2C 32 2C 31 |*..T1$..(N1$,2,1|
00002240: 29 00 4F 2A 08 07 54 31 B2 C5 28 54 31 24 29 00 |).O*..T1..(T1$).|
00002250: 69 2A 1C 07 8B 4E 31 B3 31 30 A7 3A 54 31 24 B2 |i*...N1.10.:T1$.|
00002260: 22 12 20 22 3A 54 31 B2 30 00 7B 2A 30 07 4E 32 |". ":T1.0.{*0.N2|
00002270: B2 B5 28 BB 28 31 29 AC 56 32 29 00 91 2A 44 07 |..(.(1).V2)..*D.|
00002280: 8B 4E 31 AA 4E 32 AA 4E 33 B1 56 34 A7 31 35 34 |.N1.N2.N3.V4.154|
00002290: 30 00 A7 2A 46 07 8B 4E 31 AA 4E 32 AA 4E 33 B3 |0..*F..N1.N2.N3.|
000022A0: 56 35 A7 31 35 34 30 00 D8 2A 48 07 4E 32 24 B2 |V5.1540..*H.N2$.|
000022B0: C4 28 4E 32 29 3A 55 32 24 B2 C9 28 4E 32 24 2C |.(N2):U2$..(N2$,|
000022C0: 31 29 3A 5A 32 B2 C5 28 55 32 24 29 3A 5A 54 B2 |1):Z2..(U2$):ZT.|
000022D0: 5A 31 AA 5A 32 AA 5A 33 00 0A 2B 4A 07 54 32 24 |Z1.Z2.Z3..+J.T2$|
000022E0: B2 CA 28 4E 32 24 2C 32 2C 31 29 3A 54 32 B2 C5 |..(N2$,2,1):T2..|
000022F0: 28 54 32 24 29 3A 8B 4E 32 B3 31 30 A7 54 32 24 |(T2$):.N2.10.T2$|
00002300: B2 22 12 20 22 3A 54 32 B2 30 00 2E 2B 4C 07 46 |.". ":T2.0..+L.F|
00002310: 31 B2 30 3A 8B 5A 54 B1 39 A7 46 31 B2 31 3A 43 |1.0:.ZT.9.F1.1:C|
00002320: 24 B2 22 31 22 3A 53 24 B2 22 54 45 4E 22 00 4A |$."1":S$."TEN".J|
00002330: 2B 4E 07 8B 5A 54 B1 31 39 A7 43 24 B2 22 32 22 |+N..ZT.19.C$."2"|
00002340: 3A 53 24 B2 22 54 45 4E 53 22 00 60 2B 58 07 8B |:S$."TENS".`+X..|
00002350: 4E 31 AA 4E 32 AA 4E 33 B3 56 35 A7 31 35 34 30 |N1.N2.N3.V5.1540|
00002360: 00 7D 2B 6C 07 4E 55 B2 4E 55 AA 31 3A 53 50 B2 |.}+l.NU.NU.1:SP.|
00002370: 31 30 3A 46 34 B2 31 3A 8D 34 32 34 30 00 8E 2B |10:F4.1:.4240..+|
00002380: 80 07 8B 20 46 31 B2 31 20 A7 53 50 B2 39 00 AC |... F1.1 .SP.9..|
00002390: 2B 8A 07 99 C8 28 44 24 2C 32 29 3B A6 35 29 3B |+....(D$,2);.5);|
000023A0: 22 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 22 00 CF 2B 94 |".........."..+.|
000023B0: 07 99 C8 28 44 24 2C 33 29 3B A6 35 29 3B 22 92 |...(D$,3);.5);".|
000023C0: 20 4C 45 56 45 4C 20 22 3B 4C 3B 22 9D 20 22 00 | LEVEL ";L;". ".|
000023D0: EF 2B A8 07 99 C8 28 44 24 2C 35 29 22 20 20 20 |.+....(D$,5)" |
000023E0: 53 55 4D 20 4E 55 4D 42 45 52 20 22 3B 4E 55 00 |SUM NUMBER ";NU.|
000023F0: 11 2C BC 07 99 C8 28 44 24 2C 38 29 22 20 20 20 |.,....(D$,8)" |
00002400: 20 54 45 4E 53 20 20 20 55 4E 49 54 53 20 20 20 | TENS UNITS |
00002410: 22 00 3B 2C D0 07 99 C8 28 44 24 2C 31 30 29 22 |".;,....(D$,10)"|
00002420: 20 20 20 20 20 20 22 54 33 24 22 20 20 20 20 20 | "T3$" |
00002430: 20 22 55 33 24 22 20 20 20 20 22 00 65 2C E4 07 | "U3$" ".e,..|
00002440: 99 C8 28 44 24 2C 31 32 29 22 20 20 20 20 20 20 |..(D$,12)" |
00002450: 22 54 31 24 22 20 20 20 20 20 20 22 55 31 24 22 |"T1$" "U1$"|
00002460: 20 20 20 20 22 00 8F 2C F8 07 99 C8 28 44 24 2C | "..,....(D$,|
00002470: 31 34 29 22 20 20 20 2B 20 20 22 54 32 24 22 20 |14)" + "T2$" |
00002480: 20 20 20 20 20 22 55 32 24 22 20 20 20 20 22 00 | "U2$" ".|
00002490: AF 2C 0C 08 99 C8 28 44 24 2C 31 36 29 22 20 20 |.,....(D$,16)" |
000024A0: 20 20 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 22 00 | ............".|
000024B0: D3 2C 20 08 99 C8 28 44 24 2C 31 37 29 22 20 20 |., ...(D$,17)" |
000024C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000024D0: 20 20 22 00 F7 2C 34 08 99 C8 28 44 24 2C 31 39 | "..,4...(D$,19|
000024E0: 29 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |)" |
000024F0: 20 20 20 20 20 20 22 00 01 2D 48 08 8D 33 38 30 | "..-H..380|
00002500: 30 00 12 2D 5C 08 8F 20 47 45 54 20 4E 55 4D 42 |0..-\.. GET NUMB|
00002510: 45 52 00 2E 2D 70 08 99 C8 28 44 24 2C 31 37 29 |ER..-p...(D$,17)|
00002520: A6 53 50 29 22 20 20 20 20 20 20 20 20 22 00 43 |.SP)" ".C|
00002530: 2D 84 08 99 C8 28 44 24 2C 31 37 29 A6 53 50 AA |-....(D$,17).SP.|
00002540: 34 29 3B 00 70 2D 98 08 99 22 9D 22 3B 3A 55 53 |4);.p-...".";:US|
00002550: 24 B2 22 51 30 48 31 32 33 34 35 36 37 38 39 22 |$."Q0H123456789"|
00002560: 3A 55 4C B2 32 3A 8D 33 35 3A 4B 24 B2 55 52 24 |:UL.2:.35:K$.UR$|
00002570: 00 7A 2D AC 08 99 22 9D 22 3B 00 97 2D C0 08 81 |.z-...".";..-...|
00002580: 41 B2 31 A4 33 3A 8B CA 28 55 52 24 2C 41 2C 31 |A.1.3:..(UR$,A,1|
00002590: 29 B2 22 51 22 A7 8E 00 A3 2D D4 08 41 55 24 B2 |)."Q"....-..AU$.|
000025A0: 55 52 24 00 C7 2D E8 08 8B C5 28 41 55 24 29 B3 |UR$..-....(AU$).|
000025B0: B1 5A 54 A7 8D 34 30 34 30 3A 46 33 B2 46 33 AA |.ZT..4040:F3.F3.|
000025C0: 31 3A 89 32 31 34 30 00 F1 2D FC 08 43 4F 24 B2 |1:.2140..-..CO$.|
000025D0: 22 55 4E 49 54 53 22 3A 8D 33 38 36 30 3A 8D 33 |"UNITS":.3860:.3|
000025E0: 39 36 30 3A 81 41 41 B2 31 A4 35 30 30 3A 82 41 |960:.AA.1.500:.A|
000025F0: 41 00 00 2E 10 09 8B 46 36 B2 31 A7 32 38 30 30 |A......F6.1.2800|
00002600: 00 24 2E 24 09 99 C8 28 44 24 2C 31 36 29 3B A6 |.$.$...(D$,16);.|
00002610: 32 35 29 3B 22 43 41 52 52 59 20 22 3B 53 24 3B |25);"CARRY ";S$;|
00002620: 22 3F 92 22 00 47 2E 38 09 99 C8 28 44 24 2C 31 |"?.".G.8...(D$,1|
00002630: 38 29 3B A6 32 34 29 3B 22 54 59 50 45 27 59 27 |8);.24);"TYPE'Y'|
00002640: 4F 52 27 4E 27 92 22 00 77 2E 4C 09 55 53 24 B2 |OR'N'.".w.L.US$.|
00002650: 22 51 48 59 4E 22 3A 99 22 9D 9D 9D 9D 11 9D 9D |"QHYN":.".......|
00002660: 9D 9D 9D 9D 9D 22 3B 3A 55 4C B2 31 3A 8D 33 35 |.....";:UL.1:.35|
00002670: 3A 51 24 B2 55 52 24 00 85 2E 60 09 8B 51 24 B2 |:Q$.UR$...`..Q$.|
00002680: 22 51 22 A7 8E 00 9C 2E 74 09 8B 51 24 B2 22 4E |"Q".....t..Q$."N|
00002690: 22 AF 46 31 B2 31 A7 8D 34 34 30 30 00 B2 2E 88 |".F1.1..4400....|
000026A0: 09 8B 51 24 B2 22 59 22 AF 46 31 B2 31 A7 32 35 |..Q$."Y".F1.1.25|
000026B0: 34 30 00 C8 2E 9C 09 8B 51 24 B2 22 4E 22 AF 46 |40......Q$."N".F|
000026C0: 31 B2 30 A7 32 38 30 30 00 DF 2E B0 09 8B 51 24 |1.0.2800......Q$|
000026D0: B2 22 59 22 AF 46 31 B2 30 A7 8D 34 34 30 30 00 |."Y".F1.0..4400.|
000026E0: E9 2E C4 09 89 32 33 30 30 00 FF 2E D8 09 8F 20 |.....2300...... |
000026F0: 20 41 4E 49 4D 41 54 45 44 20 43 41 52 52 59 00 | ANIMATED CARRY.|
00002700: 0E 2F EC 09 99 C8 28 44 24 2C 31 37 29 3B 00 19 |./....(D$,17);..|
00002710: 2F 00 0A 81 43 B2 31 A4 33 00 2B 2F 14 0A 99 A6 |/...C.1.3.+/....|
00002720: 53 50 AA 33 29 22 12 22 3B 43 24 00 3A 2F 28 0A |SP.3)".";C$.:/(.|
00002730: 81 54 B2 31 A4 34 30 30 3A 82 00 4C 2F 3C 0A 99 |.T.1.400:..L/<..|
00002740: A6 53 50 29 22 91 12 20 20 20 20 22 00 52 2F 50 |.SP)".. ".R/P|
00002750: 0A 82 00 60 2F 64 0A 99 C8 28 44 24 2C 31 38 29 |...`/d...(D$,18)|
00002760: 00 6B 2F 78 0A 81 43 B2 31 A4 36 00 77 2F 8C 0A |.k/x..C.1.6.w/..|
00002770: 43 32 B2 43 32 AA 31 00 81 2F A0 0A 99 22 12 20 |C2.C2.1../...". |
00002780: 22 00 99 2F B4 0A 99 A6 31 32 AB 43 32 29 22 91 |"../....12.C2)".|
00002790: 12 22 43 24 3B 22 9D 22 3B 00 A8 2F C8 0A 81 54 |."C$;".";../...T|
000027A0: B2 31 A4 34 30 30 3A 82 00 AF 2F DC 0A 82 43 00 |.1.400:.../...C.|
000027B0: C9 2F F0 0A 43 32 B2 30 3A 8D 33 38 36 30 3A 46 |./..C2.0:.3860:F|
000027C0: 34 B2 32 3A 8D 34 32 34 30 00 DF 2F 04 0B 53 50 |4.2:.4240../..SP|
000027D0: B2 33 3A 8F 20 49 4E 50 55 54 20 54 45 4E 53 00 |.3:. INPUT TENS.|
000027E0: F4 2F 18 0B 54 41 B2 54 31 AA 54 32 AA 54 33 3A |./..TA.T1.T2.T3:|
000027F0: 46 34 B2 32 00 0E 30 2C 0B 8B 5A 54 B1 31 39 A7 |F4.2..0,..ZT.19.|
00002800: 3A 54 41 B2 54 41 AA 32 3A 89 32 39 30 30 00 21 |:TA.TA.2:.2900.!|
00002810: 30 40 0B 8B 5A 54 B1 39 A7 3A 54 41 B2 54 41 AA |0@..ZT.9.:TA.TA.|
00002820: 31 00 31 30 54 0B 8B 54 41 B1 39 A7 3A 53 50 B2 |1.10T..TA.9.:SP.|
00002830: 32 00 4C 30 68 0B 99 C8 28 44 24 2C 31 37 29 A6 |2.L0h...(D$,17).|
00002840: 53 50 29 22 20 20 20 20 20 20 20 22 00 67 30 7C |SP)" ".g0||
00002850: 0B 99 C8 28 44 24 2C 31 37 29 A6 53 50 AA 34 29 |...(D$,17).SP.4)|
00002860: 3B 3A 89 34 36 34 30 00 78 30 90 0B 41 54 24 B2 |;:.4640.x0..AT$.|
00002870: C8 28 41 32 24 2C 32 29 00 95 30 A4 0B 8B C5 28 |.(A2$,2)..0....(|
00002880: 41 54 24 29 B2 54 41 AB 31 A7 8D 34 37 38 30 3A |AT$).TA.1..4780:|
00002890: 89 32 38 32 30 00 A4 30 B8 0B 43 4F 24 B2 22 54 |.2820..0..CO$."T|
000028A0: 45 4E 53 22 00 C5 30 CC 0B 8B C5 28 41 54 24 29 |ENS"..0....(AT$)|
000028B0: B2 54 41 A7 8D 33 38 36 30 3A 8D 33 39 36 30 3A |.TA..3860:.3960:|
000028C0: 89 33 30 36 30 00 D5 30 E0 0B 8D 34 30 34 30 3A |.3060..0...4040:|
000028D0: 89 32 39 32 30 00 E7 30 F4 0B 8B 46 33 B2 30 A7 |.2920..0...F3.0.|
000028E0: 53 43 B2 53 43 AA 31 00 FD 30 08 0C 8B 4E 55 B2 |SC.SC.1..0...NU.|
000028F0: 36 A7 8D 34 39 34 30 3A 89 33 31 34 30 00 0D 31 |6..4940:.3140..1|
00002900: 1C 0C 81 43 B2 31 A4 32 30 30 30 3A 82 00 2B 31 |...C.1.2000:..+1|
00002910: 30 0C 46 33 B2 30 3A 53 50 B2 30 3A 46 31 B2 30 |0.F3.0:SP.0:F1.0|
00002920: 3A 46 32 B2 30 3A 89 31 35 32 30 00 44 31 44 0C |:F2.0:.1520.D1D.|
00002930: 8F 20 20 41 55 54 4F 4C 45 56 45 4C 20 43 4F 4E |. AUTOLEVEL CON|
00002940: 54 52 4F 4C 00 54 31 58 0C 8B 53 43 B3 34 A7 4C |TROL.T1X..SC.4.L|
00002950: B2 4C AB 31 00 6F 31 6C 0C 8B 53 43 B3 34 AF 4E |.L.1.o1l..SC.4.N|
00002960: 55 B2 36 A7 8D 35 31 36 30 3A 89 31 33 30 30 00 |U.6..5160:.1300.|
00002970: 7C 31 80 0C 8B 4C B3 30 A7 4C B2 30 00 8E 31 94 ||1...L.0.L.0..1.|
00002980: 0C 8F 20 20 20 20 20 46 49 47 55 52 45 53 00 98 |.. FIGURES..|
00002990: 31 A8 0C 8D 33 38 36 30 00 CB 31 BC 0C 99 22 13 |1...3860..1...".|
000029A0: 11 11 11 11 11 11 11 11 11 11 11 11 22 3A 81 41 |............":.A|
000029B0: B2 31 A4 36 3A 99 22 20 20 20 20 20 20 20 22 3A |.1.6:." ":|
000029C0: 82 41 3A 41 B2 55 4D AA 35 36 33 00 DD 31 C6 0C |.A:A.UM.563..1..|
000029D0: 4E 55 B2 4E 55 AA 31 3A 8D 33 38 30 30 00 FB 31 |NU.NU.1:.3800..1|
000029E0: D0 0C 97 41 2C 38 37 3A 97 41 AA 34 30 2C 32 33 |...A,87:.A.40,23|
000029F0: 30 3A 97 41 AA 38 30 2C 32 33 30 00 13 32 E4 0C |0:.A.80,230..2..|
00002A00: 97 41 AA 31 31 39 2C 37 38 3A 97 41 AA 31 32 31 |.A.119,78:.A.121|
00002A10: 2C 37 37 00 29 32 F8 0C 97 41 AA 34 31 2C 39 39 |,77.)2...A.41,99|
00002A20: 3A 97 41 AA 33 39 2C 39 39 00 3F 32 0C 0D 97 41 |:.A.39,99.?2...A|
00002A30: AA 34 31 2C 39 39 3A 97 41 AA 33 39 2C 39 39 00 |.41,99:.A.39,99.|
00002A40: 4C 32 20 0D 81 41 31 B2 31 A4 31 30 00 62 32 34 |L2 ..A1.1.10.b24|
00002A50: 0D 97 41 AB 32 2C 31 30 33 3A 97 41 AA 32 2C 31 |..A.2,103:.A.2,1|
00002A60: 30 31 00 74 32 48 0D 81 41 41 B2 31 A4 31 30 30 |01.t2H..AA.1.100|
00002A70: 3A 82 41 41 00 88 32 5C 0D 97 41 AB 32 2C 33 32 |:.AA..2\..A.2,32|
00002A80: 3A 97 41 AA 32 2C 33 32 00 9E 32 70 0D 97 41 AA |:.A.2,32..2p..A.|
00002A90: 33 38 2C 39 39 3A 97 41 AA 34 32 2C 39 39 00 B0 |38,99:.A.42,99..|
00002AA0: 32 84 0D 81 41 41 B2 31 A4 31 30 30 3A 82 41 41 |2...AA.1.100:.AA|
00002AB0: 00 C6 32 98 0D 97 41 AA 33 38 2C 33 32 3A 97 41 |..2...A.38,32:.A|
00002AC0: AA 34 32 2C 33 32 00 CC 32 AC 0D 82 00 E2 32 C0 |.42,32..2.....2.|
00002AD0: 0D 97 41 AA 34 31 2C 39 39 3A 97 41 AA 33 39 2C |..A.41,99:.A.39,|
00002AE0: 39 39 00 EE 32 D4 0D 81 41 31 B2 31 A4 38 00 05 |99..2...A1.1.8..|
00002AF0: 33 E8 0D 97 41 AB 32 2C 31 30 33 3A 97 41 AA 34 |3...A.2,103:.A.4|
00002B00: 32 2C 31 30 31 00 17 33 FC 0D 81 41 41 B2 31 A4 |2,101..3...AA.1.|
00002B10: 31 30 30 3A 82 41 41 00 2C 33 10 0E 97 41 AB 32 |100:.AA.,3...A.2|
00002B20: 2C 33 32 3A 97 41 AA 34 32 2C 33 32 00 43 33 24 |,32:.A.42,32.C3$|
00002B30: 0E 97 41 AA 33 38 2C 31 30 33 3A 97 41 AA 32 2C |..A.38,103:.A.2,|
00002B40: 31 30 31 00 55 33 38 0E 81 41 41 B2 31 A4 31 30 |101.U38..AA.1.10|
00002B50: 30 3A 82 41 41 00 6A 33 4C 0E 97 41 AA 32 2C 33 |0:.AA.j3L..A.2,3|
00002B60: 32 3A 97 41 AA 33 38 2C 33 32 00 70 33 60 0E 82 |2:.A.38,32.p3`..|
00002B70: 00 87 33 74 0E 97 41 AB 32 2C 31 30 33 3A 97 41 |..3t..A.2,103:.A|
00002B80: AA 34 32 2C 31 30 31 00 AE 33 7E 0E 99 C8 28 44 |.42,101..3~...(D|
00002B90: 24 2C 31 35 29 3B 22 92 1D 1D 1D 1D 1D 1D 1D 20 |$,15);"........ |
00002BA0: 20 20 20 20 20 20 20 20 20 20 20 20 20 22 00 E8 | "..|
00002BB0: 33 88 0E 99 C8 28 44 24 2C 31 36 29 3B 22 92 1D |3....(D$,16);"..|
00002BC0: 1D 1D 1D 1D 1D 1D 57 45 4C 4C 20 44 4F 4E 45 2E |......WELL DONE.|
00002BD0: 20 20 59 4F 55 20 48 41 44 22 3B 53 43 3B 22 43 | YOU HAD";SC;"C|
00002BE0: 4F 52 52 45 43 54 2E 22 00 10 34 92 0E 99 C8 28 |ORRECT."..4....(|
00002BF0: 44 24 2C 31 37 29 3B 22 92 1D 1D 1D 1D 1D 1D 1D |D$,17);"........|
00002C00: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 | "|
00002C10: 00 30 34 9C 0E 8B 4C B2 38 A7 81 41 41 B2 31 A4 |.04...L.8..AA.1.|
00002C20: 31 30 30 30 3A 82 41 41 3A 8D 35 30 32 30 3A 8E |1000:.AA:.5020:.|
00002C30: 00 5D 34 B0 0E 99 C8 28 44 24 2C 31 37 29 3B 22 |.]4....(D$,17);"|
00002C40: 92 1D 1D 1D 1D 1D 1D 1D 20 20 20 20 20 47 4F 20 |........ GO |
00002C50: 54 4F 20 4C 45 56 45 4C 22 3B 4C AA 31 00 84 34 |TO LEVEL";L.1..4|
00002C60: BA 0E 99 C8 28 44 24 2C 31 38 29 3B 22 92 1D 1D |....(D$,18);"...|
00002C70: 1D 1D 1D 1D 1D 20 20 20 20 20 20 20 20 20 20 20 |..... |
00002C80: 20 20 20 22 00 A3 34 C4 0E 81 41 41 B2 31 A4 32 | "..4...AA.1.2|
00002C90: 30 30 30 3A 82 41 41 3A 8D 35 30 32 30 3A 89 31 |000:.AA:.5020:.1|
00002CA0: 33 30 30 00 C6 34 D8 0E 99 C8 28 44 24 2C 32 31 |300..4....(D$,21|
00002CB0: 29 22 20 20 20 20 59 4F 55 52 20 53 43 4F 52 45 |)" YOUR SCORE|
00002CC0: 20 49 53 20 20 22 00 EA 34 EC 0E 99 C8 28 44 24 | IS "..4....(D$|
00002CD0: 2C 32 33 29 22 20 20 20 22 53 43 22 20 4F 55 54 |,23)" "SC" OUT|
00002CE0: 20 4F 46 20 22 3B 4E 55 AB 31 00 F0 34 00 0F 8E | OF ";NU.1..4...|
00002CF0: 00 18 35 14 0F 8F 2D 53 55 42 20 54 4F 20 43 4C |..5...-SUB TO CL|
00002D00: 45 41 52 20 52 49 47 48 54 20 53 49 44 45 20 4F |EAR RIGHT SIDE O|
00002D10: 46 20 53 43 52 45 45 4E 00 4A 35 28 0F 99 22 13 |F SCREEN.J5(..".|
00002D20: 22 3B 3A 81 41 B2 31 A4 32 34 3A 99 A3 32 30 29 |";:.A.1.24:..20)|
00002D30: 3B 22 92 20 20 20 20 20 20 20 20 20 20 20 20 20 |;". |
00002D40: 20 20 20 20 20 20 22 3A 82 41 00 50 35 3C 0F 8E | ":.A.P5<..|
00002D50: 00 77 35 50 0F 8F 2D 2D 2D 2D 53 55 42 54 4F 20 |.w5P..----SUBTO |
00002D60: 52 45 56 20 4C 45 46 54 20 53 49 44 45 20 4F 46 |REV LEFT SIDE OF|
00002D70: 20 53 43 52 45 45 4E 00 A8 35 64 0F 99 22 13 22 | SCREEN..5d.."."|
00002D80: 3B 3A 81 41 B2 31 A4 32 34 3A 99 22 12 20 20 20 |;:.A.1.24:.". |
00002D90: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002DA0: 20 92 22 3A 82 41 3A 8E 00 C9 35 78 0F 8F 20 20 | .":.A:...5x.. |
00002DB0: 20 20 50 52 49 4E 54 20 43 4F 52 52 45 43 54 20 | PRINT CORRECT |
00002DC0: 41 4E 44 20 53 43 4F 52 45 00 E1 35 8C 0F 99 C8 |AND SCORE..5....|
00002DD0: 28 44 24 2C 31 32 29 A6 32 37 29 22 92 22 43 4F |(D$,12).27)"."CO|
00002DE0: 24 00 FE 35 A0 0F 99 C8 28 44 24 2C 31 34 29 A6 |$..5....(D$,14).|
00002DF0: 32 36 29 22 92 43 4F 52 52 45 43 54 2E 22 00 04 |26)".CORRECT."..|
00002E00: 36 B4 0F 8E 00 23 36 C8 0F 8F 20 20 20 20 50 52 |6....#6... PR|
00002E10: 49 4E 54 20 57 52 4F 4E 47 20 54 52 59 20 41 47 |INT WRONG TRY AG|
00002E20: 41 49 4E 00 2F 36 DC 0F 46 33 B2 46 33 AA 31 00 |AIN./6..F3.F3.1.|
00002E30: 39 36 F0 0F 8D 33 38 36 30 00 63 36 04 10 8B C5 |96...3860.c6....|
00002E40: 28 41 55 24 29 B3 5A 54 A7 99 C8 28 44 24 2C 31 |(AU$).ZT...(D$,1|
00002E50: 30 29 A6 32 35 29 22 92 54 4F 4F 20 53 4D 41 4C |0).25)".TOO SMAL|
00002E60: 4C 2E 22 00 8D 36 18 10 8B C5 28 41 54 24 29 B3 |L."..6....(AT$).|
00002E70: 54 41 A7 99 C8 28 44 24 2C 31 30 29 A6 32 35 29 |TA...(D$,10).25)|
00002E80: 22 92 54 4F 4F 20 53 4D 41 4C 4C 2E 22 00 B7 36 |".TOO SMALL."..6|
00002E90: 2C 10 8B C5 28 41 55 24 29 B1 5A 54 A7 99 C8 28 |,...(AU$).ZT...(|
00002EA0: 44 24 2C 31 30 29 A6 32 35 29 22 92 20 54 4F 4F |D$,10).25)". TOO|
00002EB0: 20 42 49 47 2E 20 22 00 E1 36 40 10 8B C5 28 41 | BIG. "..6@...(A|
00002EC0: 54 24 29 B1 54 41 A7 99 C8 28 44 24 2C 31 30 29 |T$).TA...(D$,10)|
00002ED0: A6 32 35 29 22 92 20 54 4F 4F 20 42 49 47 2E 20 |.25)". TOO BIG. |
00002EE0: 22 00 FF 36 54 10 99 C8 28 44 24 2C 31 32 29 A6 |"..6T...(D$,12).|
00002EF0: 32 34 29 22 92 20 20 20 20 54 52 59 20 20 22 00 |24)". TRY ".|
00002F00: 1D 37 68 10 99 C8 28 44 24 2C 31 34 29 A6 32 34 |.7h...(D$,14).24|
00002F10: 29 22 92 20 20 20 41 47 41 49 4E 2E 22 00 23 37 |)". AGAIN.".#7|
00002F20: 7C 10 8E 00 46 37 90 10 8F 20 20 54 59 50 45 20 ||...F7... TYPE |
00002F30: 48 4F 57 20 4D 41 4E 59 20 54 4F 20 52 49 47 48 |HOW MANY TO RIGH|
00002F40: 54 20 53 49 44 45 00 69 37 A4 10 8B 46 34 B2 31 |T SIDE.i7...F4.1|
00002F50: A7 3A 99 C8 28 44 24 2C 35 29 A6 32 36 29 22 92 |.:..(D$,5).26)".|
00002F60: 4E 45 57 20 53 55 4D 2E 22 00 85 37 B8 10 99 C8 |NEW SUM."..7....|
00002F70: 28 44 24 2C 31 30 29 A6 32 36 29 22 92 20 48 4F |(D$,10).26)". HO|
00002F80: 57 20 20 20 22 00 A2 37 CC 10 99 C8 28 44 24 2C |W "..7....(D$,|
00002F90: 31 32 29 A6 32 36 29 22 92 20 20 4D 41 4E 59 20 |12).26)". MANY |
00002FA0: 20 22 00 CC 37 E0 10 8B 46 34 B2 31 A7 3A 99 C8 | "..7...F4.1.:..|
00002FB0: 28 44 24 2C 31 34 29 A6 32 36 29 22 92 20 20 20 |(D$,14).26)". |
00002FC0: 55 4E 49 54 53 2E 22 3A 46 34 B2 30 00 F5 37 F4 |UNITS.":F4.0..7.|
00002FD0: 10 8B 46 34 B2 32 A7 3A 99 C8 28 44 24 2C 31 34 |..F4.2.:..(D$,14|
00002FE0: 29 A6 32 36 29 22 92 20 20 20 54 45 4E 53 3F 22 |).26)". TENS?"|
00002FF0: 3A 46 34 B2 30 00 FB 37 08 11 8E 00 13 38 1C 11 |:F4.0..7.....8..|
00003000: 8F 20 20 20 43 48 45 43 4B 20 43 41 52 45 46 55 |. CHECK CAREFU|
00003010: 4C 4C 59 00 22 38 30 11 8B 46 B2 31 A7 8D 33 38 |LLY."80..F.1..38|
00003020: 36 30 00 2E 38 44 11 46 33 B2 46 33 AA 31 00 3C |60..8D.F3.F3.1.<|
00003030: 38 58 11 99 C8 28 44 24 2C 31 30 29 00 55 38 6C |8X...(D$,10).U8l|
00003040: 11 99 A6 32 34 29 22 12 20 20 20 20 20 20 20 20 |...24)". |
00003050: 20 20 20 20 22 00 6E 38 80 11 99 A6 32 34 29 22 | ".n8....24)"|
00003060: 12 20 20 20 43 48 45 43 4B 20 20 20 20 22 00 87 |. CHECK "..|
00003070: 38 94 11 99 A6 32 34 29 22 12 20 20 20 20 20 20 |8....24)". |
00003080: 20 20 20 20 20 20 22 00 A0 38 A8 11 99 A6 32 34 | "..8....24|
00003090: 29 22 12 20 43 41 52 45 46 55 4C 4C 59 20 20 22 |)". CAREFULLY "|
000030A0: 00 B9 38 BC 11 99 A6 32 34 29 22 12 20 20 20 20 |..8....24)". |
000030B0: 20 20 20 20 20 20 20 20 22 00 D2 38 D0 11 99 A6 | "..8....|
000030C0: 32 34 29 22 12 20 20 20 20 20 20 20 20 20 20 20 |24)". |
000030D0: 20 22 00 EB 38 E4 11 99 A6 32 34 29 22 12 20 20 | "..8....24)". |
000030E0: 20 20 20 20 20 20 20 20 20 20 22 00 FC 38 F8 11 | "..8..|
000030F0: 81 41 B2 31 A4 31 30 30 30 3A 82 41 00 02 39 0C |.A.1.1000:.A..9.|
00003100: 12 8E 00 17 39 20 12 8F 20 20 20 20 20 47 45 54 |....9 .. GET|
00003110: 20 4E 55 4D 42 45 52 00 33 39 34 12 99 C8 28 44 | NUMBER.394...(D|
00003120: 24 2C 31 37 29 A6 53 50 29 22 20 20 20 20 20 20 |$,17).SP)" |
00003130: 20 20 22 00 48 39 48 12 99 C8 28 44 24 2C 31 37 | ".H9H...(D$,17|
00003140: 29 A6 53 50 AA 34 29 3B 00 75 39 5C 12 99 22 9D |).SP.4);.u9\..".|
00003150: 22 3B 3A 55 53 24 B2 22 51 30 48 31 32 33 34 35 |";:US$."Q0H12345|
00003160: 36 37 38 39 22 3A 55 4C B2 31 3A 8D 33 35 3A 4B |6789":UL.1:.35:K|
00003170: 24 B2 55 52 24 00 7F 39 70 12 99 22 9D 22 3B 00 |$.UR$..9p..".";.|
00003180: 9C 39 84 12 81 41 B2 31 A4 33 3A 8B CA 28 55 52 |.9...A.1.3:..(UR|
00003190: 24 2C 41 2C 31 29 B2 22 51 22 A7 8E 00 AE 39 98 |$,A,1)."Q"....9.|
000031A0: 12 41 32 24 B2 55 52 24 3A 89 32 39 36 30 00 C9 |.A2$.UR$:.2960..|
000031B0: 39 AC 12 8F 20 20 46 4F 52 47 4F 54 54 45 4E 20 |9... FORGOTTEN |
000031C0: 43 41 52 52 59 20 54 45 4E 00 D5 39 C0 12 46 33 |CARRY TEN..9..F3|
000031D0: B2 46 33 AA 31 00 E1 39 D4 12 8B 46 31 B2 30 A7 |.F3.1..9...F1.0.|
000031E0: 8E 00 FF 39 E8 12 99 C8 28 44 24 2C 31 37 29 A6 |...9....(D$,17).|
000031F0: 32 33 29 22 92 59 4F 55 20 48 41 56 45 20 22 00 |23)".YOU HAVE ".|
00003200: 1D 3A FC 12 99 C8 28 44 24 2C 31 39 29 A6 32 33 |.:....(D$,19).23|
00003210: 29 22 92 46 4F 52 47 4F 54 54 45 4E 22 00 40 3A |)".FORGOTTEN".@:|
00003220: 10 13 99 C8 28 44 24 2C 32 31 29 A6 32 33 29 22 |....(D$,21).23)"|
00003230: 92 54 48 45 20 22 3B 53 24 3B 22 20 59 4F 55 22 |.THE ";S$;" YOU"|
00003240: 00 5D 3A 24 13 99 C8 28 44 24 2C 32 33 29 A6 32 |.]:$...(D$,23).2|
00003250: 33 29 22 92 43 41 52 52 49 45 44 2E 22 00 63 3A |3)".CARRIED.".c:|
00003260: 38 13 8E 00 82 3A 4C 13 8F 20 20 20 4B 45 45 50 |8....:L.. KEEP|
00003270: 20 41 43 43 4F 55 4E 54 20 4F 46 20 53 43 4F 52 | ACCOUNT OF SCOR|
00003280: 45 53 00 8E 3A 60 13 49 31 B2 49 31 AA 31 00 A7 |ES..:`.I1.I1.1..|
00003290: 3A 74 13 52 43 28 49 31 29 B2 53 43 3A 4C 56 28 |:t.RC(I1).SC:LV(|
000032A0: 49 31 29 B2 4C 3A 8E 00 C3 3A 88 13 8F 20 20 50 |I1).L:...:... P|
000032B0: 52 49 4E 54 20 4F 55 54 20 52 45 43 4F 52 44 20 |RINT OUT RECORD |
000032C0: 53 55 42 00 CC 3A 9C 13 99 22 93 22 00 EC 3A B0 |SUB..:..."."..:.|
000032D0: 13 99 22 1D 1D 1D 1D 1D 1D 4C 45 56 45 4C 1D 1D |.."......LEVEL..|
000032E0: 1D 1D 1D 1D 1D 1D 53 43 4F 52 45 22 00 F2 3A C4 |......SCORE"..:.|
000032F0: 13 99 00 FE 3A D8 13 81 49 B2 31 A4 49 31 00 34 |....:...I.1.I1.4|
00003300: 3B EC 13 99 22 1D 1D 1D 1D 1D 1D 1D 22 4C 56 28 |;..."......."LV(|
00003310: 49 29 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 22 52 43 |I)".........."RC|
00003320: 28 49 29 22 1D 1D 1D 1D 1D 1D 4F 55 54 20 4F 46 |(I)"......OUT OF|
00003330: 20 36 2E 22 00 3A 3B 00 14 82 00 45 3B 14 14 8D | 6.".:;....E;...|
00003340: 38 33 35 3A 8E 00 66 3B 28 14 8F 20 20 20 45 4E |835:..f;(.. EN|
00003350: 44 20 4F 46 20 53 45 54 20 57 49 54 48 20 4D 49 |D OF SET WITH MI|
00003360: 53 54 41 4B 45 53 00 78 3B 3C 14 99 22 93 11 11 |STAKES.x;<.."...|
00003370: 11 11 11 11 11 11 11 22 00 9D 3B 50 14 99 22 59 |......."..;P.."Y|
00003380: 4F 55 20 53 43 4F 52 45 44 20 22 3B 53 43 3B 22 |OU SCORED ";SC;"|
00003390: 20 4F 55 54 20 4F 46 20 53 49 58 2E 22 00 B9 3B | OUT OF SIX."..;|
000033A0: 64 14 99 22 11 11 53 54 41 59 20 4F 4E 20 4C 45 |d.."..STAY ON LE|
000033B0: 56 45 4C 20 22 3B 4C AA 31 00 C2 3B 78 14 8D 38 |VEL ";L.1..;x..8|
000033C0: 33 35 00 D7 3B 8C 14 99 22 93 22 3A 8D 33 38 36 |35..;...".":.386|
000033D0: 30 3A 8D 33 39 32 30 00 DD 3B A0 14 8E 00 00 00 |0:.3920..;......|
.......910.*.... ** ML STOP KEY DISABLE
**.U...."X.=........X` ......LX.X.U.....
...X`.T...."XHHH.H.HHHHHHH.H.HX`111"....
.."HHHHHHH`1"...... ** 4 - POP ML SUBROU
TINE **.H.... **GENERAL INPUT ROUTINE **
.N...:.T...:.Z...:...#.. +++ INPUT SECTI
ON +++...(.UR$."":UI$.""...*..UL.0.UL.80
.+.-.." ..";:.UC,0.?.2..UI$:.UI$."".50.
I.7..UI$.G(13).C(UR$)..1..UC,1:." .";:.8
5.|.<..UI$.G(20).105...>.. C(UR$)..UL.50
...A..120:. CHECK FOR VALID CHARACTER.E.
F.UR$.UR$.UI$.O.K..UI$;.W.P..50...U.. ++
+ CHECK FOR HELP REQUEST +++.$.Z..UR$.UX
$.195:. EXIT TO HELP ROUTINE.3._..UF.1..
240.@.D.UF.0:.:..Y.F.. ++ CHECK DELETE +
+.J.I..C(UR$).1.50...N.UR$.H(UR$,C(UR$).
1)...S..". ..";:.50...X.. ++ CHECK FOR
VALID CHARACTERS ++.M.}..C(US$).0.150...
...US.1.C(US$)......UI$.J(US$,US,1).....
........UI$."":..#.... ** STANDARD INPUT
**.4....F(UI$).46...E....UI$.G(32)...B.
..F(UI$).48.F(UI$).57.170.H..........F(
UI$).65.F(UI$).90.180............F(UI$).
193.F(UI$).218.UI$."":..R....B(UT).UU%.U
I$.G(F(UI$).128):..X.........UI$."":....
C.UF.1:. +++ HELP ROUTINE EXIT +++...E..
250...H..245...M..UQ.UB.UB.939.J.R.UQ%(U
Q.UB).B(UQ):.:.".".].W.UZ.1:UV%.B(UT).F.
X..300...Y.UZ.0:US$.UJ$:UG$.UK$:UP.UJ:UL
.UK.B.Z..B(50003).0..53281,1:.".";:.5328
1,6:.53280,14:.220.L....".";.....UT$.UL$
:.UT,UV%:.UQ.UB.UB.919......UQ,UQ%(UQ.UB
):.......U1,U1%......U2,U2%.'....U4,U4%.
5....U3,U3%.1.E....". .";:.35.W...UD%.((
U2%.256.U1%.U3%).UB).40:.H(UD$,UD%.1):..
.....H(UD$,24);". .
HELP COMING . ":......U1%.B(U1):U2%.B(
U2):U3%.B(U3):U4%.B(U4).....UJ$.US$:UJ.U
L.....UJ$.US$:UK$.UG$:UJ.UP:UK.UL.......
(.,.. ** MENU **...-.:.]....".":.UT,UU%:
.B(50003).0..53281,9:.53280,8.C./.:...1.
.". MENU"...6.." --------
------------------------------".U.;.."..
1. ADDITION TEACHER"...@.."..
2. STUDENT INSTRUCTIONS".).E.."..
3. TEACHER INSTRUCTIONS".E.O.."
.. 4. QUIT..".T.T.." -----------
---------------------------"...Y.."..
PRESS A NUMBER KEY (1-4) ";.G.^.UL.1
:US$."1234":.35:. INPUT ROUTINE..._.: .
C(UR$).1.300...`.US$.""...C..E(UR$).1000
,400,500,396...H..300.4.... ** RE-ENABLE
STOP KEY AND END **.C....B(50003)..1.B(
50003)..160.B(50003)..0.399......UU.71:.
B(50003).0..53281,6:.53280,14......"..":
.......875:..E.... ** STUDENT INSTRUCTIO
NS **......".":.UT,UL%:.B(50003).0..5328
1,0:.53280,0.....UP.0:UG$."STUDENT INST"
:.850.C...: .". REMEMBER TO HIT <RET
URN> AFTER".P...: .". TYPING YOUR ANS
WER. THIS TELLS"... .: .". THE COMPUT
ER TO ACCEPT WHAT YOU".....: .". HAVE
TYPED......: .". TYPE <H> AT ANY TI
ME TO RETURN".....: .". TO THE MENU F
OR HELP. YOU WILL".A...: .". BE RETU
RNED TO THE PLACE IN THE".M...: .". P
ROGRAM WHERE YOU LEFT OFF AS".....: .".
SOON AS THE OPTION FROM THE MENU"....
.: .". IS COMPLETE.".J...UP.1:.835:.8
50......".. THIS PROGRAM HELPS YOU T
O LEARN.%...."..TO ADD CORRECTLY. YOU S
LOWLY TACKLE".S...."..THE QUESTION STEP
BY STEP UNTIL IT IS......"..COMPLETED.
IF YOU DID WELL WITH ONE"......"..SECTIO
N, YOU WILL MOVE UP TO SLIGHTY.Y...."..H
ARDER QUESTIONS. THERE ARE EIGHT......"
..LEVELS YOU MAY COMPLETE.".)...."..
TO END THE PROGRAM AT ANY TIME,".K.B.."
. TYPE 'Q' < RETURN >.".T....835.H..
..UZ.1..UP%:.217.N.......... ** TEACHER
INSTRUCTIONS **......".":.UT,UL%:.B(5000
3).0..53281,2:.53280,10.....UP.0:UG$."TE
ACHER INST.":.850......".. TO THE B
EST OF OUR KNOWLEDGE,.".8...." THIS PR
OGRAM IS IN THE PUBLIC.".D...." DOMAIN
. IF THIS IS NOT THE CASE."......" PL
EASE CONTACT:..."......" COMMODORE
BUSINESS MACHINES.".N...." 3370
PHARMACY AVE......." AGINCOURT
, ONTARIO"......" CANADA M1W
2K4".4...." (416) 499-4292".J..
.UP.1:. 835:. 850:.W...." ..PROGRAM
NAME: ADDITION TEACHER......." WRITT
EN BY : UNKNOWN......." UPGRADED BY
: RAY WHITE......" .THIS PROGRAM WI
LL RUN ON ANY........" PET 64 CO
MPUTER..,...." COMMODORE 64 COMP
UTER.:....835:.850.I...."... THIS PR
OGRAM IS INTENDED FOR THE......"..LOWER
GRADES OF ELEMENTARY SCHOOL. ".B...."..
THE STUDENT IS DRILLED ON ADDITION......
"..SKILLS AT A COMFORTABLE LEVEL, STEP B
Y......"..STEP IN THE ADDITION PROCESS.
IF THE.N...."..STUDENT DOES WELL, A DRI
LL AT A HIGHER.Z...."..LEVEL OF DIFFICUL
TY FOLLOWS. "......". THERE ARE
EIGHT LEVELS IN ALL."...D..835.B.N..UZ.1
..UP%:.217.H.W.....X.. ** PROGRAM MODIFI
CATION INST **...Y..".":.UT,UL%...].UP.0
:UG$."PROGRAM MOD":.850.(....835.<....UZ
.1..UP%:.217.B.....G.... ** TO USE 8032
LOAD CBM4032 **...F..".....BEFORE RUNNIN
G THIS PROGRAM ON AN 8032 ...S.P.."
LOAD THE 'CBM 4032' PROGRAM...........
.."...Z..UU.71......... .. ** T I T L E
P A G E **.8.".."....";:.UT,UU%:.B(500
03).0..53280,14:.53281,6.N.$..I.1.38:.".
..";:..F.&..I.1.22:.".....";:..~.(..I.1.
37:.".....";:....*..I.1.22:.".....";:...
.,.."........................... ......
."................... . . .....0.."....
............... . ......2.."...........
......... ..D.4.."..............C O M M
O D O R E...G.6.."...............EDUCAT
IONAL.....8.."................SOFTWARE..
.:.. ** COMMODORE LOGO **.Y.;..H(UD$,24)
;"..........PRESS SPACE BAR OR WAIT.":I.
0...<..A$:.A$.." ".I.I.1:.I.250.828...>.
T1$."":T2$."":T3$."":T4$."":I.0.(.@..300
.D.C.. ** SPACE BAR PRESS **.Y.H..H(UD$,
24);".......PRESS SPACE BAR TO CONTINUE.
"...L..UI$:.UI$.." ".844...N.....R.. **
PAGE DESIGN ROUTINE **.B.T.UP.UP.1...W..
"."H(UT$.UP$,21);H(UG$.UP$,14);UP...\.."
--------------------------------------"
.L.A..H(UD$,24);H(UP$,6);"HELP - PRESS
H <RETURN>".X.F.."..":..W.K.. ** PLEASE
WAIT REMARK **...P..H(UD$,24);"
ONE MOMENT PLEASE... "...U...P...
. ** SET UP VARIABLES **.....UX$."H":.UQ
%(1000):UB.32768:U1.196:U2.197:U3.198:U4
.216:UC.167:UU.1024.R...UT.59468:UU%.12:
UL%.14:UP%.1146:UM.32768:. 50003,0......
B(50003).0.UB.1024:U1.209:U2.210:U3.211:
U4.214:UC.204:UU.2048.M....B(50003).0.UT
.53272:UU%.21:UL%.23:UP%.2139:UM.1024...
..UD$.".........................".#...UP
$."
".Q...UT$." ADDITION TEACHER ":. PLAC
E PROGRAM TITLE HERE !!!!!!!!!!!!!!!!!**
*...... RC(20),LV(20)............ ** SET
VARIABLES **......900.I.... ** CHECK FO
R 8032 **......".":." ":. SHIFTED SPACE.
.....B(UB.40)..96..700.. ... ** MEMORY C
HECK **.+ ... .(0).2000.937.Y ..."....TH
IS MACHINE DOES NOT HAVE ENOUGH.".} ..."
MEMORY TO RUN THIS PROGRAM !".. ...UU.71
.. ..... ..."..":.B(50003).0.962.W ... *
* BASIC 2.0 OR 4.0 OR C-64 SETUP **.
.!...1075,133:.1076,144:.1077,234:.1079,
4:.1080,133:.1081,145.K!...1091,155:.109
8,133:.1099,144:.1100,234:.1103,133.M!..
.1104,145:.1105,234:.1082,234..!...B(500
03)..160.955..!...1093,88:.1094,228:.109
7,85:.1102,228:.965.H!...B(50003)..1.990
..!...1093,49:.1094,230:.1097,46:.1102,2
30:.965.1"B..2099,141:.2100,20:.2101,3:.
2103,8:.2104,141:.2105,21.M"C..2106,3:.2
115,145:.2117,52:.2118,234:.2121,49:.212
2,141.."D..2123,20:.2124,3:.2126,234:.21
27,141:.2128,21:.2129,3.E"E..UU.48:. DIS
ABLE STOP KEY.V"J..800:. TITLE.."T..300:
. MENU..#...".THE PGM WILL NOT WORK ON T
HIS MACHINE!":..L#...UZ.1..UP%:.UP%:UZ.0
:. ** PROGRAM STARTS HERE **.W#..."..";:
.:.B(50003).0..53281,6:.53280,6..#..L.0:
SC.0:NU.0:V1.0:V2.0:V3.0:V4.0:V5.0:F6.0:
F5.0:N3.0..#..DE$."
":.UT,UL%..$..."..
AUTO-ADD-TEACHER ..".J$...
"......THIS PROGRAM AUTOMATICALLY CHANGE
S".{$..."..LEVEL AFTER SIX SUMS WITH FEW
MISTAKES."..$$.."......WITH FEW CORRECT
IT REMAINS ON".K$..."..............THE
SAME LEVEL...$N..".. TO QUIT AT ANY
TIME, TYPE 'Q'."..%Q..A.1.3:.:.:.835.)%`
..".. LEVELS".Q%J.."...1. AD
D TWO NUMBERS TOTAL < 5."..%T.."...2. AD
D TWO NUMBERS TOTAL > 5 AND < 9."..%~.."
...3. ADDING WITH TOTALS BETWEEN 10 AND
".V%..."... 19 ALWAYS CARRYING TEN."..
&..."...4. ADD TWO NUMBERS BETWEEN 0 AND
19../&..."...5. ADD THREE NUMBERS TOTAL
< 10.".X&..."...6. ADD THREE NUMBERS TO
TAL < 20..&..."...7. ADD THREE NUMBERS T
OTAL < 45."..&..."...8. ADD THREE NUMBER
S TOTAL < 99."..&X.D$.".................
......................"..&..S$."TEN"..'.
..". CHOOSE STARTING LEVEL ";.5'..US$."
QH12345678":UL.1:.35:L.E(UR$).D'...UR$."
Q"...F'...L.8.:."."DE$"..":.5000:.1265.}
'...".":.UT,UU%:L.L.1..'...3920:.3860..'
(.. SET DIFFICULTY LEVELS.U'<..L.0.L.1:V
1.5:V2.5:V3.0:V4.5:F6.1:.1500..(P..L.1.L
.2:V1.9:V2.9:V4.9:V5.5:F6.1:.1500.1(D..L
.2.L.3:V1.10:V2.10:V4.19:V5.10:F6.0:.150
0.`(X..L.3.L.4:V1.10:V2.10:V4.19:V5.0:F6
.0:.1500..(...L.4.L.5:V1.10:V2.10:V3.10:
V4.9:V5.0:F5.5:F6.0:.1500.T( ..L.5.L.6:V
1.10:V2.10:V3.10:V4.19:V5.10:F6.0:F5.5:.
1500..)...L.6.L.7:V1.50:V2.50:V3.50:V4.4
5:V5.20:F6.0:F5.5:.1500.D)H..L.7.L.8:V1.
99:V2.99:V3.99:V4.99:V5.50:F6.0:F5.5.R).
.SC.0:NU.0.D)... FIND VALUES.V)... F5..5
. 1700..)..N3..(.(1).V3)..),.N3$.D(N3)..
)@.U3$.I(N3$,1)..)T.Z3.E(U3$).H)H.T3$.J(
N3$,2,1).V)|.T3.E(T3$)..)...N3.10.:T3$."
":T3.0..*..N1..(.(1).V1)..*..N1$.D(N1).
*L.U1$.I(N1$,1)..*..Z1.E(U1$).A*..T1$.J
(N1$,2,1).O*..T1.E(T1$).I*...N1.10.:T1$.
". ":T1.0.{*0.N2..(.(1).V2)..*D..N1.N2.N
3.V4.1540..*F..N1.N2.N3.V5.1540.X*H.N2$.
D(N2):U2$.I(N2$,1):Z2.E(U2$):ZT.Z1.Z2.Z3
..+J.T2$.J(N2$,2,1):T2.E(T2$):.N2.10.T2$
.". ":T2.0..+L.F1.0:.ZT.9.F1.1:C$."1":S$
."TEN".J+N..ZT.19.C$."2":S$."TENS".`+X..
N1.N2.N3.V5.1540.}+L.NU.NU.1:SP.10:F4.1:
.4240..+... F1.1 .SP.9..+...H(D$,2);.5);
"..........".O+...H(D$,3);.5);". LEVEL "
;L;". "..+...H(D$,5)" SUM NUMBER ";NU.
.,...H(D$,8)" TENS UNITS ".;,P..H
(D$,10)" "T3$" "U3$" ".E,..
.H(D$,12)" "T1$" "U1$" "..,
...H(D$,14)" + "T2$" "U2$" ".
.,...H(D$,16)" ............".S, ..H(D
$,17)" "..,4..H(D$,19
)" "..-H..3800..-\..
GET NUMBER..-P..H(D$,17).SP)" ".C
-...H(D$,17).SP.4);.P-...".";:US$."Q0H12
3456789":UL.2:.35:K$.UR$.Z-...".";..-...
A.1.3:.J(UR$,A,1)."Q"....-T.AU$.UR$.G-..
.E(AU$)..ZT..4040:F3.F3.1:.2140..-..CO$.
"UNITS":.3860:.3960:.AA.1.500:.AA......F
6.1.2800.$.$..H(D$,16);.25);"CARRY ";S$;
"?.".G.8..H(D$,18);.24);"TYPE'Y'OR'N'.".
W.L.US$."QHYN":."............";:UL.1:.35
:Q$.UR$...`..Q$."Q".....T..Q$."N".F1.1..
4400......Q$."Y".F1.1.2540.H....Q$."N".F
1.0.2800......Q$."Y".F1.0..4400...D..230
0...X.. ANIMATED CARRY../...H(D$,17);..
/...C.1.3.+/....SP.3)".";C$.:/(..T.1.400
:..L/<...SP)".. ".R/P...`/D..H(D$,18)
.K/X..C.1.6.W/..C2.C2.1../ ..". "../....
12.C2)".."C$;".";../H..T.1.400:.../...C.
I/..C2.0:.3860:F4.2:.4240../..SP.3:. INP
UT TENS../..TA.T1.T2.T3:F4.2..0,..ZT.19.
:TA.TA.2:.2900.!0@..ZT.9.:TA.TA.1.10T..T
A.9.:SP.2.L0H..H(D$,17).SP)" ".G0|
..H(D$,17).SP.4);:.4640.X0..AT$.H(A2$,2)
..0...E(AT$).TA.1..4780:.2820..0..CO$."T
ENS".E0L..E(AT$).TA..3860:.3960:.3060.U0
...4040:.2920..0...F3.0.SC.SC.1..0...NU.
6..4940:.3140..1...C.1.2000:..+10.F3.0:S
P.0:F1.0:F2.0:.1520.D1D.. AUTOLEVEL CON
TROL.T1X..SC.4.L.L.1.O1L..SC.4.NU.6..516
0:.1300.|1...L.0.L.0..1... FIGURES..
1...3860.K1...".............":.A.1.6:."
":.A:A.UM.563..1F.NU.NU.1:.3800..1
P..A,87:.A.40,230:.A.80,230..2...A.119,7
8:.A.121,77.)2...A.41,99:.A.39,99.?2...A
.41,99:.A.39,99.L2 ..A1.1.10.B24..A.2,10
3:.A.2,101.T2H..AA.1.100:.AA..2\..A.2,32
:.A.2,32..2P..A.38,99:.A.42,99..2...AA.1
.100:.AA.F2...A.38,32:.A.42,32.L2.....2.
..A.41,99:.A.39,99..2T..A1.1.8..3...A.2,
103:.A.42,101..3...AA.1.100:.AA.,3...A.2
,32:.A.42,32.C3$..A.38,103:.A.2,101.U38.
.AA.1.100:.AA.J3L..A.2,32:.A.38,32.P3`..
..3T..A.2,103:.A.42,101..3~..H(D$,15);".
....... "..3...H(D$,16);"..
......WELL DONE. YOU HAD";SC;"CORRECT."
..4...H(D$,17);"........ "
.04...L.8..AA.1.1000:.AA:.5020:..]4...H(
D$,17);"........ GO TO LEVEL";L.1..4
...H(D$,18);"........ "..4D
..AA.1.2000:.AA:.5020:.1300.F4X..H(D$,21
)" YOUR SCORE IS "..4...H(D$,23)"
"SC" OUT OF ";NU.1..4.....5...-SUB TO CL
EAR RIGHT SIDE OF SCREEN.J5(..".";:.A.1.
24:..20);". ":.A.P5<..
.W5P..----SUBTO REV LEFT SIDE OF SCREEN.
.5D..".";:.A.1.24:.".
.":.A:..I5X.. PRINT CORRECT AND SCOR
E..5...H(D$,12).27)"."CO$..5 ..H(D$,14).
26)".CORRECT."..6....#6H.. PRINT WRON
G TRY AGAIN./6..F3.F3.1.96...3860.C6...E
(AU$).ZT..H(D$,10).25)".TOO SMALL."..6..
.E(AT$).TA..H(D$,10).25)".TOO SMALL."..6
,..E(AU$).ZT..H(D$,10).25)". TOO BIG. ".
.6@..E(AT$).TA..H(D$,10).25)". TOO BIG.
"..6T..H(D$,12).24)". TRY "..7H..H(D
$,14).24)". AGAIN.".#7|...F7... TYPE
HOW MANY TO RIGHT SIDE.I7...F4.1.:.H(D$,
5).26)".NEW SUM."..7...H(D$,10).26)". HO
W "..7L..H(D$,12).26)". MANY ".L7...
F4.1.:.H(D$,14).26)". UNITS.":F4.0..7.
..F4.2.:.H(D$,14).26)". TENS?":F4.0..7
.....8... CHECK CAREFULLY."80..F.1..38
60..8D.F3.F3.1.<8X..H(D$,10).U8L...24)".
".N8....24)". CHECK "..
8....24)". ". 8....24)". CARE
FULLY "..8....24)". ".R8P...
24)". "..8....24)".
"..8...A.1.1000:.A..9.....9 .. GET
NUMBER.394..H(D$,17).SP)" ".H9H.
.H(D$,17).SP.4);.U9\..".";:US$."Q0H12345
6789":UL.1:.35:K$.UR$.9P..".";..9...A.1
.3:.J(UR$,A,1)."Q"....9..A2$.UR$:.2960.I
9... FORGOTTEN CARRY TEN.U9..F3.F3.1..9
T..F1.0....9...H(D$,17).23)".YOU HAVE ".
.:...H(D$,19).23)".FORGOTTEN".@:...H(D$,
21).23)".THE ";S$;" YOU".]:$..H(D$,23).2
3)".CARRIED.".C:8....:L.. KEEP ACCOUNT
OF SCORES..:`.I1.I1.1..:T.RC(I1).SC:LV(
I1).L:..C:... PRINT OUT RECORD SUB.L:..
."."..:..."......LEVEL........SCORE"..:D
....:X..I.1.I1.4;..."......."LV(I)".....
....."RC(I)"......OUT OF 6.".:;....E;...
835:..F;(.. END OF SET WITH MISTAKES.X
;<..".........."..;P.."YOU SCORED ";SC;"
OUT OF SIX."..;D.."..STAY ON LEVEL ";L.
1.B;X..835.W;...".":.3860:.3920..; .....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL