LADDER MULT.C3
FILE INFORMATION
FILENAME(S): LADDER MULT.C3
FILE TYPE(S): PRG
FILE SIZE: 8.5K
FIRST SEEN: 2025-11-30 01:08:45
APPEARS ON: 1 disk(s)
FILE HASH
43f1f42846cbd8d7d4e4a06fa3709d7a6d33041e3bee65ef4b18e3ad3d2bc1c1
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| FREESOFT DISK NR | LADDER MULT.C3 | PRG | Treasure Chest - Wolfgang Rauprich | 13 | 8 | 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 F0 |UTINE **.....:..|
000000D0: 08 13 00 8F 20 2A 2A 20 47 45 4E 45 52 41 4C 20 |.... ** GENERAL |
000000E0: 49 4E 50 55 54 20 52 4F 55 54 49 4E 45 20 2A 2A |INPUT ROUTINE **|
000000F0: 00 14 09 14 00 8F 20 2A 2A 20 54 4F 20 4F 55 52 |...... ** TO OUR|
00000100: 20 42 45 53 54 20 4B 4E 4F 57 4C 45 44 47 45 20 | BEST KNOWLEDGE |
00000110: 54 48 49 53 00 31 09 15 00 8F 20 20 20 20 50 52 |THIS.1.... PR|
00000120: 4F 47 52 41 4D 20 49 53 20 46 52 45 45 20 46 4F |OGRAM IS FREE FO|
00000130: 52 00 51 09 16 00 8F 20 20 20 20 44 55 50 4C 49 |R.Q.... DUPLI|
00000140: 43 41 54 49 4F 4E 20 49 4E 20 43 41 4E 41 44 41 |CATION IN CANADA|
00000150: 2E 00 6E 09 17 00 8F 20 20 20 20 49 46 20 59 4F |..n.... IF YO|
00000160: 55 20 48 41 56 45 20 43 4F 4E 54 41 52 59 00 8B |U HAVE CONTARY..|
00000170: 09 18 00 8F 20 20 20 20 49 4E 46 4F 52 4D 41 54 |.... INFORMAT|
00000180: 49 4F 4E 2C 20 50 4C 45 41 53 45 00 B1 09 19 00 |ION, PLEASE.....|
00000190: 8F 20 20 20 20 43 4F 4E 54 41 43 54 20 43 4F 4D |. CONTACT COM|
000001A0: 4D 4F 44 4F 52 45 20 43 41 4E 41 44 41 20 41 4E |MODORE CANADA AN|
000001B0: 44 00 D7 09 1A 00 8F 20 20 20 20 45 56 45 52 59 |D...... EVERY|
000001C0: 20 45 46 46 4F 52 54 20 57 49 4C 4C 20 42 45 20 | EFFORT WILL BE |
000001D0: 4D 41 44 45 20 54 4F 00 F8 09 1B 00 8F 20 20 20 |MADE TO...... |
000001E0: 20 57 49 54 48 44 52 41 57 20 43 4F 50 49 45 53 | WITHDRAW COPIES|
000001F0: 20 4F 46 20 54 48 49 53 00 0A 0A 1C 00 8F 20 20 | OF THIS...... |
00000200: 20 20 50 52 4F 47 52 41 4D 2E 00 10 0A 1E 00 3A | PROGRAM......:|
00000210: 00 2C 0A 23 00 8F 20 2B 2B 2B 20 49 4E 50 55 54 |.,.#.. +++ INPUT|
00000220: 20 53 45 43 54 49 4F 4E 20 2B 2B 2B 00 44 0A 28 | SECTION +++.D.(|
00000230: 00 97 55 4F 2C 30 3A 55 52 24 B2 22 22 3A 55 49 |..UO,0:UR$."":UI|
00000240: 24 B2 22 22 00 54 0A 2A 00 8B 55 4C B2 30 A7 55 |$."".T.*..UL.0.U|
00000250: 4C B2 38 30 00 67 0A 2D 00 99 22 20 20 9D 9D 22 |L.80.g.-.." .."|
00000260: 3B 3A 97 55 43 2C 30 00 7B 0A 32 00 A1 55 49 24 |;:.UC,0.{.2..UI$|
00000270: 3A 8B 55 49 24 B2 22 22 A7 35 30 00 A5 0A 37 00 |:.UI$."".50...7.|
00000280: 8B 55 49 24 B2 C7 28 31 33 29 AF C3 28 55 52 24 |.UI$..(13)..(UR$|
00000290: 29 B1 B2 31 A7 97 55 43 2C 31 3A 99 22 20 9D 22 |)..1..UC,1:." ."|
000002A0: 3B 3A 89 38 35 00 B8 0A 3C 00 8B 55 49 24 B2 C7 |;:.85...<..UI$..|
000002B0: 28 32 30 29 A7 31 30 35 00 CC 0A 3E 00 8B 20 C3 |(20).105...>.. .|
000002C0: 28 55 52 24 29 B2 B1 55 4C A7 35 30 00 F1 0A 41 |(UR$)..UL.50...A|
000002D0: 00 8D 31 32 30 3A 8F 20 43 48 45 43 4B 20 46 4F |..120:. CHECK FO|
000002E0: 52 20 56 41 4C 49 44 20 43 48 41 52 41 43 54 45 |R VALID CHARACTE|
000002F0: 52 00 01 0B 46 00 55 52 24 B2 55 52 24 AA 55 49 |R...F.UR$.UR$.UI|
00000300: 24 00 0B 0B 4B 00 99 55 49 24 3B 00 13 0B 50 00 |$...K..UI$;...P.|
00000310: 89 35 30 00 24 0B 51 00 20 20 20 20 20 20 20 20 |.50.$.Q. |
00000320: 20 20 20 20 00 49 0B 55 00 8F 20 2B 2B 2B 20 43 | .I.U.. +++ C|
00000330: 48 45 43 4B 20 46 4F 52 20 48 45 4C 50 20 52 45 |HECK FOR HELP RE|
00000340: 51 55 45 53 54 20 2B 2B 2B 00 71 0B 5A 00 8B 55 |QUEST +++.q.Z..U|
00000350: 52 24 B2 55 58 24 A7 31 39 35 3A 8F 20 45 58 49 |R$.UX$.195:. EXI|
00000360: 54 20 54 4F 20 48 45 4C 50 20 52 4F 55 54 49 4E |T TO HELP ROUTIN|
00000370: 45 00 80 0B 5F 00 8B 55 46 B2 31 A7 8D 32 34 30 |E..._..UF.1..240|
00000380: 00 8D 0B 64 00 55 46 B2 30 3A 99 3A 8E 00 A6 0B |...d.UF.0:.:....|
00000390: 66 00 8F 20 2B 2B 20 43 48 45 43 4B 20 44 45 4C |f.. ++ CHECK DEL|
000003A0: 45 54 45 20 2B 2B 00 B7 0B 69 00 8B C3 28 55 52 |ETE ++...i...(UR|
000003B0: 24 29 B3 31 A7 35 30 00 CF 0B 6E 00 55 52 24 B2 |$).1.50...n.UR$.|
000003C0: C8 28 55 52 24 2C C3 28 55 52 24 29 AB 31 29 00 |.(UR$,.(UR$).1).|
000003D0: E1 0B 73 00 99 22 9D 20 20 9D 9D 22 3B 3A 89 35 |..s..". ..";:.5|
000003E0: 30 00 08 0C 78 00 8F 20 2B 2B 20 43 48 45 43 4B |0...x.. ++ CHECK|
000003F0: 20 46 4F 52 20 56 41 4C 49 44 20 43 48 41 52 41 | FOR VALID CHARA|
00000400: 43 54 45 52 53 20 2B 2B 00 1A 0C 7D 00 8B C3 28 |CTERS ++...}...(|
00000410: 55 53 24 29 B2 30 A7 31 35 30 00 2B 0C 82 00 81 |US$).0.150.+....|
00000420: 55 53 B2 31 A4 C3 28 55 53 24 29 00 42 0C 87 00 |US.1..(US$).B...|
00000430: 8B 55 49 24 B2 CA 28 55 53 24 2C 55 53 2C 31 29 |.UI$..(US$,US,1)|
00000440: A7 8E 00 48 0C 8C 00 82 00 55 0C 91 00 55 49 24 |...H.....U...UI$|
00000450: B2 22 22 3A 8E 00 70 0C 96 00 8F 20 2A 2A 20 53 |."":..p.... ** S|
00000460: 54 41 4E 44 41 52 44 20 49 4E 50 55 54 20 2A 2A |TANDARD INPUT **|
00000470: 00 81 0C 98 00 8B C6 28 55 49 24 29 B2 34 36 A7 |.......(UI$).46.|
00000480: 8E 00 92 0C 9B 00 8B 55 49 24 B2 C7 28 33 32 29 |.......UI$..(32)|
00000490: A7 8E 00 AF 0C A0 00 8B C6 28 55 49 24 29 B3 34 |.........(UI$).4|
000004A0: 38 B0 C6 28 55 49 24 29 B1 35 37 A7 31 37 30 00 |8..(UI$).57.170.|
000004B0: B5 0C A5 00 8E 00 D2 0C AA 00 8B C6 28 55 49 24 |............(UI$|
000004C0: 29 B3 36 35 B0 C6 28 55 49 24 29 B1 39 30 A7 31 |).65..(UI$).90.1|
000004D0: 38 30 00 D8 0C AF 00 8E 00 FC 0C B4 00 8B C6 28 |80.............(|
000004E0: 55 49 24 29 B3 31 39 33 B0 C6 28 55 49 24 29 B1 |UI$).193..(UI$).|
000004F0: 32 31 38 A7 55 49 24 B2 22 22 3A 8E 00 1F 0D B9 |218.UI$."":.....|
00000500: 00 8B C2 28 55 54 29 B2 55 55 25 A7 55 49 24 B2 |...(UT).UU%.UI$.|
00000510: C7 28 C6 28 55 49 24 29 AB 31 32 38 29 3A 8E 00 |.(.(UI$).128):..|
00000520: 25 0D BB 00 8E 00 32 0D BE 00 55 49 24 B2 22 22 |%.....2...UI$.""|
00000530: 3A 8E 00 57 0D C3 00 55 46 B2 31 3A 8F 20 2B 2B |:..W...UF.1:. ++|
00000540: 2B 20 48 45 4C 50 20 52 4F 55 54 49 4E 45 20 45 |+ HELP ROUTINE E|
00000550: 58 49 54 20 2B 2B 2B 00 60 0D C5 00 8D 32 35 30 |XIT +++.`....250|
00000560: 00 69 0D C8 00 8D 32 34 35 00 7B 0D CD 00 81 55 |.i....245.{....U|
00000570: 51 B2 55 42 A4 55 42 AA 39 39 39 00 97 0D D2 00 |Q.UB.UB.999.....|
00000580: 55 51 25 28 55 51 AB 55 42 29 B2 C2 28 55 51 29 |UQ%(UQ.UB)..(UQ)|
00000590: 3A 82 3A 99 22 93 22 00 AA 0D D7 00 55 5A B2 31 |:.:.".".....UZ.1|
000005A0: 3A 55 56 25 B2 C2 28 55 54 29 00 B3 0D D8 00 89 |:UV%..(UT)......|
000005B0: 33 30 30 00 D8 0D D9 00 55 5A B2 30 3A 55 53 24 |300.....UZ.0:US$|
000005C0: B2 55 4A 24 3A 55 47 24 B2 55 4B 24 3A 55 50 B2 |.UJ$:UG$.UK$:UP.|
000005D0: 55 4A 3A 55 4C B2 55 4B 00 0F 0E DA 00 8B C2 28 |UJ:UL.UK.......(|
000005E0: 35 30 30 30 33 29 B2 30 A7 97 35 33 32 38 31 2C |50003).0..53281,|
000005F0: 31 3A 99 22 93 22 3B 3A 97 35 33 32 38 31 2C 36 |1:.".";:.53281,6|
00000600: 3A 97 35 33 32 38 30 2C 31 34 3A 89 32 32 30 00 |:.53280,14:.220.|
00000610: 19 0E DB 00 99 22 93 22 3B 00 48 0E DC 00 55 54 |.....".";.H...UT|
00000620: 24 B2 55 4C 24 3A 97 55 54 2C 55 56 25 3A 81 55 |$.UL$:.UT,UV%:.U|
00000630: 51 B2 55 42 A4 28 55 32 25 AC 32 35 36 AA 55 31 |Q.UB.(U2%.256.U1|
00000640: 25 AA 55 33 25 AB 33 29 00 5D 0E E1 00 97 55 51 |%.U3%.3).]....UQ|
00000650: 2C 55 51 25 28 55 51 AB 55 42 29 3A 82 00 94 0E |,UQ%(UQ.UB):....|
00000660: E3 00 99 C8 28 55 44 24 2C 32 34 29 3B 22 20 20 |....(UD$,24);" |
00000670: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000680: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000690: 20 20 20 22 00 A0 0E E6 00 97 55 31 2C 55 31 25 | "......U1,U1%|
000006A0: 00 AC 0E E8 00 97 55 32 2C 55 32 25 00 B8 0E E9 |......U2,U2%....|
000006B0: 00 97 55 34 2C 55 34 25 00 C6 0E EA 00 97 55 33 |..U4,U4%......U3|
000006C0: 2C 55 33 25 AB 31 00 CE 0E EB 00 89 33 35 00 00 |,U3%.1......35..|
000006D0: 0F F0 00 55 44 25 B2 28 28 55 32 25 AC 32 35 36 |...UD%.((U2%.256|
000006E0: AA 55 31 25 AA 55 33 25 29 AB 55 42 29 AD 34 30 |.U1%.U3%).UB).40|
000006F0: 3A 99 C8 28 55 44 24 2C 55 44 25 AA 31 29 3A 8E |:..(UD$,UD%.1):.|
00000700: 00 3B 0F F5 00 99 C8 28 55 44 24 2C 32 34 29 3B |.;.....(UD$,24);|
00000710: 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |" |
00000720: 20 20 20 20 20 20 20 12 20 48 45 4C 50 20 43 4F | . HELP CO|
00000730: 4D 49 4E 47 20 92 20 20 22 3A 8E 00 67 0F FA 00 |MING . ":..g...|
00000740: 55 31 25 B2 C2 28 55 31 29 3A 55 32 25 B2 C2 28 |U1%..(U1):U2%..(|
00000750: 55 32 29 3A 55 33 25 B2 C2 28 55 33 29 3A 55 34 |U2):U3%..(U3):U4|
00000760: 25 B2 C2 28 55 34 29 00 8F 0F FB 00 55 4A 24 B2 |%..(U4).....UJ$.|
00000770: 55 53 24 3A 55 4B 24 B2 55 47 24 3A 55 4C 24 B2 |US$:UK$.UG$:UL$.|
00000780: 55 54 24 3A 55 4A B2 55 50 3A 55 4B B2 55 4C 00 |UT$:UJ.UP:UK.UL.|
00000790: 95 0F FF 00 8E 00 A6 0F 2C 01 8F 20 2A 2A 20 4D |........,.. ** M|
000007A0: 45 4E 55 20 2A 2A 00 AC 0F 2D 01 3A 00 DB 0F 2E |ENU **...-.:....|
000007B0: 01 99 22 93 22 3A 97 55 54 2C 55 55 25 3A 8B C2 |..".":.UT,UU%:..|
000007C0: 28 35 30 30 30 33 29 B2 30 A7 97 35 33 32 38 31 |(50003).0..53281|
000007D0: 2C 39 3A 97 35 33 32 38 30 2C 38 00 E1 0F 2F 01 |,9:.53280,8.../.|
000007E0: 3A 00 FE 0F 31 01 99 22 13 20 20 20 20 20 20 20 |:...1..". |
000007F0: 20 20 20 20 20 20 20 20 20 4D 45 4E 55 22 00 2D | MENU".-|
00000800: 10 36 01 99 22 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |.6.." ----------|
00000810: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000820: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 00 5E 10 |------------".^.|
00000830: 3B 01 99 22 11 11 20 20 20 20 20 20 20 31 2E 20 |;..".. 1. |
00000840: 20 20 42 45 47 49 4E 20 4C 41 44 44 45 52 20 4D | BEGIN LADDER M|
00000850: 55 4C 54 49 50 4C 49 43 41 54 49 4F 4E 22 00 88 |ULTIPLICATION"..|
00000860: 10 40 01 99 22 11 11 20 20 20 20 20 20 20 32 2E |.@..".. 2.|
00000870: 20 20 20 53 54 55 44 45 4E 54 20 49 4E 53 54 52 | STUDENT INSTR|
00000880: 55 43 54 49 4F 4E 53 22 00 B2 10 45 01 99 22 11 |UCTIONS"...E..".|
00000890: 11 20 20 20 20 20 20 20 33 2E 20 20 20 54 45 41 |. 3. TEA|
000008A0: 43 48 45 52 20 49 4E 53 54 52 55 43 54 49 4F 4E |CHER INSTRUCTION|
000008B0: 53 22 00 DF 10 4A 01 99 22 11 11 20 20 20 20 20 |S"...J..".. |
000008C0: 20 20 34 2E 20 20 20 4D 4F 44 49 46 49 43 41 54 | 4. MODIFICAT|
000008D0: 49 4F 4E 20 4F 46 20 50 52 4F 47 52 41 4D 22 00 |ION OF PROGRAM".|
000008E0: FB 10 4F 01 99 22 11 11 20 20 20 20 20 20 20 35 |..O..".. 5|
000008F0: 2E 20 20 20 51 55 49 54 11 11 22 00 2A 11 54 01 |. QUIT..".*.T.|
00000900: 99 22 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |." -------------|
00000910: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000920: 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 00 55 11 59 01 99 |---------".U.Y..|
00000930: 22 11 11 20 20 20 20 20 20 20 50 52 45 53 53 20 |".. PRESS |
00000940: 41 20 4E 55 4D 42 45 52 20 4B 45 59 20 28 31 2D |A NUMBER KEY (1-|
00000950: 35 29 20 22 3B 00 7E 11 5E 01 55 4C B2 31 3A 55 |5) ";.~.^.UL.1:U|
00000960: 53 24 B2 22 31 32 33 34 35 22 3A 8D 33 35 3A 8F |S$."12345":.35:.|
00000970: 20 49 4E 50 55 54 20 52 4F 55 54 49 4E 45 00 89 | INPUT ROUTINE..|
00000980: 11 60 01 55 53 24 B2 22 22 00 AA 11 63 01 91 C5 |.`.US$.""...c...|
00000990: 28 55 52 24 29 8D 31 30 30 30 2C 34 30 30 2C 35 |(UR$).1000,400,5|
000009A0: 30 30 2C 36 30 30 2C 33 39 36 00 B3 11 68 01 89 |00,600,396...h..|
000009B0: 33 30 30 00 DA 11 8B 01 8F 20 2A 2A 20 52 45 2D |300...... ** RE-|
000009C0: 45 4E 41 42 4C 45 20 53 54 4F 50 20 4B 45 59 20 |ENABLE STOP KEY |
000009D0: 41 4E 44 20 45 4E 44 20 2A 2A 00 09 12 8C 01 8B |AND END **......|
000009E0: C2 28 35 30 30 30 33 29 B3 B1 31 AF C2 28 35 30 |.(50003)..1..(50|
000009F0: 30 30 33 29 B3 B1 31 36 30 AF C2 28 35 30 30 30 |003)..160..(5000|
00000A00: 33 29 B3 B1 30 A7 33 39 39 00 33 12 8D 01 9E 55 |3)..0.399.3....U|
00000A10: 55 AA 37 31 3A 8B C2 28 35 30 30 30 33 29 B2 30 |U.71:..(50003).0|
00000A20: A7 97 35 33 32 38 31 2C 36 3A 97 35 33 32 38 30 |..53281,6:.53280|
00000A30: 2C 31 34 00 3F 12 8E 01 99 22 9A 93 22 3A 80 00 |,14.?...."..":..|
00000A40: 4A 12 8F 01 8D 38 37 35 3A 8E 00 6B 12 90 01 8F |J....875:..k....|
00000A50: 20 2A 2A 20 53 54 55 44 45 4E 54 20 49 4E 53 54 | ** STUDENT INST|
00000A60: 52 55 43 54 49 4F 4E 53 20 2A 2A 00 9A 12 95 01 |RUCTIONS **.....|
00000A70: 99 22 93 22 3A 97 55 54 2C 55 4C 25 3A 8B C2 28 |.".":.UT,UL%:..(|
00000A80: 35 30 30 30 33 29 B2 30 A7 97 35 33 32 38 31 2C |50003).0..53281,|
00000A90: 30 3A 97 35 33 32 38 30 2C 30 00 C0 12 9A 01 55 |0:.53280,0.....U|
00000AA0: 48 B2 31 3A 55 50 B2 30 3A 55 47 24 B2 22 D3 54 |H.1:UP.0:UG$.".T|
00000AB0: 55 44 45 4E 54 20 C9 4E 53 54 22 3A 8D 38 35 30 |UDENT .NST":.850|
00000AC0: 00 C6 12 9B 01 99 00 F4 12 A9 01 99 22 11 20 20 |............". |
00000AD0: 20 D9 4F 55 52 20 54 41 53 4B 20 49 53 20 54 4F | .OUR TASK IS TO|
00000AE0: 20 43 4C 49 4D 42 20 54 48 45 20 4C 41 44 44 45 | CLIMB THE LADDE|
00000AF0: 52 20 42 59 00 FA 12 AB 01 99 00 25 13 AE 01 99 |R BY.......%....|
00000B00: 22 20 41 4E 53 57 45 52 49 4E 47 20 54 48 45 20 |" ANSWERING THE |
00000B10: 51 55 45 53 54 49 4F 4E 53 20 43 4F 52 52 45 43 |QUESTIONS CORREC|
00000B20: 54 4C 59 2E 22 00 52 13 B3 01 99 22 11 20 D7 48 |TLY.".R....". .H|
00000B30: 45 4E 20 41 4E 20 41 4E 53 57 45 52 20 49 53 20 |EN AN ANSWER IS |
00000B40: 49 4E 43 4F 52 52 45 43 54 20 59 4F 55 20 57 49 |INCORRECT YOU WI|
00000B50: 4C 4C 00 6E 13 B5 01 99 22 11 20 44 52 4F 50 20 |LL.n....". DROP |
00000B60: 44 4F 57 4E 20 4F 4E 45 20 52 55 4E 47 2E 00 9C |DOWN ONE RUNG...|
00000B70: 13 B6 01 99 3A 99 22 20 20 20 C1 46 54 45 52 20 |....:." .FTER |
00000B80: 54 4F 4F 20 4D 41 4E 59 20 4D 49 53 54 41 4B 45 |TOO MANY MISTAKE|
00000B90: 53 20 59 4F 55 27 4C 4C 20 42 45 22 00 BB 13 B7 |S YOU'LL BE"....|
00000BA0: 01 99 3A 99 22 20 20 20 20 20 20 20 20 20 20 20 |..:." |
00000BB0: 20 20 20 C5 C1 D4 C5 CE 21 21 22 00 E3 13 B8 01 | .....!!".....|
00000BC0: 99 22 11 20 20 20 20 D0 4C 45 41 53 45 20 54 52 |.". .LEASE TR|
00000BD0: 59 20 48 41 52 44 20 54 4F 20 47 45 54 20 41 57 |Y HARD TO GET AW|
00000BE0: 41 59 2E 00 E9 13 BB 01 99 00 0C 14 BD 01 99 22 |AY............."|
00000BF0: 20 20 20 20 20 20 20 C7 20 CF 20 CF 20 C4 20 20 | . . . . |
00000C00: CC 20 D5 20 C3 20 CB 21 21 21 21 21 00 15 14 BE |. . . .!!!!!....|
00000C10: 01 8D 38 33 35 00 28 14 C2 01 55 48 B2 31 3A 55 |..835.(...UH.1:U|
00000C20: 50 B2 31 3A 8D 38 35 30 00 54 14 C3 01 99 A3 39 |P.1:.850.T.....9|
00000C30: 29 3B 22 11 11 11 11 11 11 11 11 11 11 12 C2 C5 |);".............|
00000C40: D7 C1 D2 C5 A0 CF C6 A0 D4 C8 C5 A0 CD C1 C4 A0 |................|
00000C50: C4 CF C7 22 00 5D 14 E5 01 8D 38 33 35 00 71 14 |...".]....835.q.|
00000C60: EA 01 8B 55 5A B2 31 A7 9E 55 50 25 3A 89 32 31 |...UZ.1..UP%:.21|
00000C70: 37 00 77 14 F3 01 8E 00 98 14 F4 01 8F 20 2A 2A |7.w.......... **|
00000C80: 20 54 45 41 43 48 45 52 20 49 4E 53 54 52 55 43 | TEACHER INSTRUC|
00000C90: 54 49 4F 4E 53 20 2A 2A 00 C8 14 F5 01 99 22 93 |TIONS **......".|
00000CA0: 22 3A 97 55 54 2C 55 4C 25 3A 8B C2 28 35 30 30 |":.UT,UL%:..(500|
00000CB0: 30 33 29 B2 30 A7 97 35 33 32 38 31 2C 32 3A 97 |03).0..53281,2:.|
00000CC0: 35 33 32 38 30 2C 31 30 00 EE 14 F6 01 55 48 B2 |53280,10.....UH.|
00000CD0: 31 3A 55 50 B2 30 3A 55 47 24 B2 22 D4 45 41 43 |1:UP.0:UG$.".EAC|
00000CE0: 48 45 52 20 C9 4E 53 54 22 3A 8D 38 35 30 00 1C |HER .NST":.850..|
00000CF0: 15 F7 01 99 22 11 11 20 20 20 20 20 20 D4 4F 20 |....".. .O |
00000D00: 54 48 45 20 42 45 53 54 20 4F 46 20 4F 55 52 20 |THE BEST OF OUR |
00000D10: 4B 4E 4F 57 4C 45 44 47 45 2C 11 22 00 45 15 F8 |KNOWLEDGE,.".E..|
00000D20: 01 99 22 20 20 20 54 48 49 53 20 50 52 4F 47 52 |.." THIS PROGR|
00000D30: 41 4D 20 49 53 20 49 4E 20 54 48 45 20 50 55 42 |AM IS IN THE PUB|
00000D40: 4C 49 43 11 22 00 71 15 F9 01 99 22 20 20 20 44 |LIC.".q...." D|
00000D50: 4F 4D 41 49 4E 2E 20 20 C9 46 20 54 48 49 53 20 |OMAIN. .F THIS |
00000D60: 49 53 20 4E 4F 54 20 54 48 45 20 43 41 53 45 11 |IS NOT THE CASE.|
00000D70: 22 00 8E 15 FA 01 99 22 20 20 20 50 4C 45 41 53 |"......" PLEAS|
00000D80: 45 20 43 4F 4E 54 41 43 54 3A 11 11 11 22 00 B8 |E CONTACT:..."..|
00000D90: 15 FB 01 99 22 20 20 20 20 20 20 C3 4F 4D 4D 4F |...." .OMMO|
00000DA0: 44 4F 52 45 20 C2 55 53 49 4E 45 53 53 20 CD 41 |DORE .USINESS .A|
00000DB0: 43 48 49 4E 45 53 11 22 00 DB 15 FC 01 99 22 20 |CHINES."......" |
00000DC0: 20 20 20 20 20 20 20 20 20 33 33 37 30 20 D0 48 | 3370 .H|
00000DD0: 41 52 4D 41 43 59 20 C1 56 45 2E 00 FF 15 FD 01 |ARMACY .VE......|
00000DE0: 99 22 20 20 20 20 20 20 20 20 20 20 C1 47 49 4E |." .GIN|
00000DF0: 43 4F 55 52 54 2C 20 CF 4E 54 41 52 49 4F 22 00 |COURT, .NTARIO".|
00000E00: 21 16 FE 01 99 22 20 20 20 20 20 20 20 20 20 20 |!...." |
00000E10: C3 41 4E 41 44 41 20 20 20 CD 31 D7 20 32 CB 34 |.ANADA .1. 2.4|
00000E20: 22 00 41 16 FF 01 99 22 20 20 20 20 20 20 20 20 |".A...." |
00000E30: 20 20 28 34 31 36 29 20 34 39 39 2D 34 32 39 32 | (416) 499-4292|
00000E40: 22 00 5C 16 00 02 55 48 B2 31 3A 55 50 B2 31 3A |".\...UH.1:UP.1:|
00000E50: 8D 20 38 33 35 3A 8D 20 38 35 30 3A 00 85 16 01 |. 835:. 850:....|
00000E60: 02 99 22 20 20 20 20 20 11 11 D0 52 4F 47 52 41 |.." ...ROGRA|
00000E70: 4D 20 CE 41 4D 45 3A 20 CC 41 44 44 45 52 20 CD |M .AME: .ADDER .|
00000E80: 55 4C 54 2E 11 00 AA 16 02 02 99 22 20 20 20 20 |ULT........" |
00000E90: 20 D7 52 49 54 54 45 4E 20 C2 59 20 20 3A 20 D0 | .RITTEN .Y : .|
00000EA0: 41 54 54 59 20 C7 41 52 4E 11 00 CE 16 03 02 99 |ATTY .ARN.......|
00000EB0: 22 20 20 20 20 20 D5 50 47 52 41 44 45 44 20 C2 |" .PGRADED .|
00000EC0: 59 20 3A 20 20 20 20 20 20 20 20 20 20 11 00 F9 |Y : ...|
00000ED0: 16 04 02 99 22 20 20 20 20 20 11 D4 48 49 53 20 |...." ..HIS |
00000EE0: 50 52 4F 47 52 41 4D 20 57 49 4C 4C 20 52 55 4E |PROGRAM WILL RUN|
00000EF0: 20 4F 4E 20 41 4E 59 11 11 00 19 17 07 02 99 22 | ON ANY........"|
00000F00: 20 20 20 20 20 20 20 20 20 D0 C5 D4 20 36 34 20 | ... 64 |
00000F10: C3 CF CD D0 D5 D4 C5 D2 11 00 3E 17 08 02 99 22 |..........>...."|
00000F20: 20 20 20 20 20 20 20 20 20 C3 CF CD CD CF C4 CF | .......|
00000F30: D2 C5 20 36 34 20 C3 CF CD D0 D5 D4 C5 D2 00 47 |.. 64 .........G|
00000F40: 17 09 02 8D 38 33 35 00 5B 17 4E 02 8B 55 5A B2 |....835.[.N..UZ.|
00000F50: 31 A7 9E 55 50 25 3A 89 32 31 37 00 61 17 57 02 |1..UP%:.217.a.W.|
00000F60: 8E 00 87 17 58 02 8F 20 2A 2A 20 50 52 4F 47 52 |....X.. ** PROGR|
00000F70: 41 4D 20 4D 4F 44 49 46 49 43 41 54 49 4F 4E 20 |AM MODIFICATION |
00000F80: 49 4E 53 54 20 2A 2A 00 98 17 59 02 99 22 93 22 |INST **...Y.."."|
00000F90: 3A 97 55 54 2C 55 4C 25 00 BD 17 5D 02 55 48 B2 |:.UT,UL%...].UH.|
00000FA0: 31 3A 55 50 B2 30 3A 55 47 24 B2 22 D0 52 4F 47 |1:UP.0:UG$.".ROG|
00000FB0: 52 41 4D 20 CD 4F 44 22 3A 8D 38 35 30 00 ED 17 |RAM .OD":.850...|
00000FC0: 97 02 99 22 11 11 20 20 20 20 20 D4 48 45 20 43 |...".. .HE C|
00000FD0: 55 52 52 45 4E 54 20 56 41 4C 55 45 53 20 48 41 |URRENT VALUES HA|
00000FE0: 56 45 20 41 20 48 49 47 48 20 4F 46 22 00 0D 18 |VE A HIGH OF"...|
00000FF0: 98 02 99 3A 99 22 22 48 49 3B 22 41 4E 44 20 41 |...:.""HI;"AND A|
00001000: 20 4C 4F 57 20 4F 46 20 22 3B 4C 4F 57 00 39 18 | LOW OF ";LOW.9.|
00001010: 99 02 99 22 11 20 20 20 20 20 D4 48 45 20 50 52 |...". .HE PR|
00001020: 4F 44 55 43 54 20 4F 46 20 54 48 45 20 54 57 4F |ODUCT OF THE TWO|
00001030: 20 4C 41 52 47 45 53 54 22 00 68 18 9A 02 99 22 | LARGEST".h...."|
00001040: 11 20 56 41 4C 55 45 53 20 4D 55 53 54 20 4E 4F |. VALUES MUST NO|
00001050: 54 20 45 58 43 45 45 44 20 46 49 56 45 20 44 49 |T EXCEED FIVE DI|
00001060: 47 49 54 53 20 49 4E 22 00 79 18 9B 02 99 22 11 |GITS IN".y....".|
00001070: 20 4C 45 4E 47 54 48 2E 22 00 82 18 9C 02 99 22 | LENGTH."......"|
00001080: 11 22 00 BA 18 9D 02 99 22 20 20 20 20 20 C8 49 |."......" .I|
00001090: 47 48 20 22 3B 3A 55 53 24 B2 22 2D 30 31 32 33 |GH ";:US$."-0123|
000010A0: 34 35 36 37 38 39 22 3A 55 4C B2 33 3A 8D 33 35 |456789":UL.3:.35|
000010B0: 3A 48 49 B2 C5 28 55 52 24 29 00 E3 18 A3 02 99 |:HI..(UR$)......|
000010C0: 20 22 20 20 20 20 20 20 CC 4F 57 20 22 3B 3A 55 | " .OW ";:U|
000010D0: 4C B2 33 3A 8D 20 33 35 3A 4C 4F 57 B2 C5 28 55 |L.3:. 35:LOW..(U|
000010E0: 52 24 29 00 09 19 A6 02 8B 20 4C 4F 57 20 B3 AB |R$)...... LOW ..|
000010F0: 31 30 20 B0 20 4C 4F 57 20 B1 20 48 49 20 A7 99 |10 . LOW . HI ..|
00001100: 22 91 91 22 3A 89 36 37 35 00 1D 19 B2 02 8B 55 |"..":.675......U|
00001110: 5A B2 31 A7 9E 55 50 25 3A 89 32 31 37 00 23 19 |Z.1..UP%:.217.#.|
00001120: BB 02 8E 00 48 19 BC 02 8F 20 2A 2A 20 54 4F 20 |....H.... ** TO |
00001130: 55 53 45 20 38 30 33 32 20 4C 4F 41 44 20 43 42 |USE 8032 LOAD CB|
00001140: 4D 34 30 33 32 20 2A 2A 00 7E 19 C6 02 99 22 93 |M4032 **.~....".|
00001150: 11 11 11 05 42 45 46 4F 52 45 20 52 55 4E 4E 49 |....BEFORE RUNNI|
00001160: 4E 47 20 54 48 49 53 20 50 52 4F 47 52 41 4D 20 |NG THIS PROGRAM |
00001170: 4F 4E 20 41 4E 20 38 30 33 32 20 20 11 11 00 B4 |ON AN 8032 ....|
00001180: 19 D0 02 99 22 20 20 20 20 20 20 4C 4F 41 44 20 |...." LOAD |
00001190: 54 48 45 20 27 43 42 4D 20 34 30 33 32 27 20 50 |THE 'CBM 4032' P|
000011A0: 52 4F 47 52 41 4D 11 11 11 11 11 11 11 11 11 11 |ROGRAM..........|
000011B0: 11 11 11 22 00 BF 19 DA 02 9E 55 55 AA 37 31 00 |..."......UU.71.|
000011C0: C5 19 E4 02 80 00 EA 19 1D 03 8F 20 2A 2A 20 54 |........... ** T|
000011D0: 4F 20 55 53 45 20 38 30 33 32 20 4C 4F 41 44 20 |O USE 8032 LOAD |
000011E0: 43 42 4D 34 30 33 32 20 2A 2A 00 35 1A 1E 03 99 |CBM4032 **.5....|
000011F0: 22 93 11 11 11 42 45 46 4F 52 45 20 52 55 4E 4E |"....BEFORE RUNN|
00001200: 49 4E 47 20 54 48 49 53 20 50 52 4F 47 52 41 4D |ING THIS PROGRAM|
00001210: 20 4F 4E 20 41 4E 20 38 30 33 32 20 20 11 11 4C | ON AN 8032 ..L|
00001220: 4F 41 44 20 43 42 4D 20 34 30 33 32 20 50 52 4F |OAD CBM 4032 PRO|
00001230: 47 52 41 4D 22 00 41 1A 1F 03 9E 31 30 39 33 3A |GRAM".A....1093:|
00001240: 80 00 61 1A 20 03 8F 20 2A 2A 20 54 20 49 20 54 |..a. .. ** T I T|
00001250: 20 4C 20 45 20 20 20 50 20 41 20 47 20 45 20 2A | L E P A G E *|
00001260: 2A 00 95 1A 22 03 99 22 93 11 1D 05 22 3B 3A 97 |*...".."....";:.|
00001270: 55 54 2C 55 55 25 3A 8B C2 28 35 30 30 30 33 29 |UT,UU%:..(50003)|
00001280: B2 30 A7 97 35 33 32 38 30 2C 31 34 3A 97 35 33 |.0..53280,14:.53|
00001290: 32 38 31 2C 36 00 AB 1A 24 03 81 49 B2 31 A4 33 |281,6...$..I.1.3|
000012A0: 38 3A 99 22 12 A6 92 22 3B 3A 82 00 C3 1A 26 03 |8:."...";:....&.|
000012B0: 81 49 B2 31 A4 32 32 3A 99 22 11 9D 12 A6 92 22 |.I.1.22:."....."|
000012C0: 3B 3A 82 00 DB 1A 28 03 81 49 B2 31 A4 33 37 3A |;:....(..I.1.37:|
000012D0: 99 22 9D 9D 12 A6 92 22 3B 3A 82 00 F3 1A 2A 03 |.".....";:....*.|
000012E0: 81 49 B2 31 A4 32 32 3A 99 22 91 9D 12 A6 92 22 |.I.1.22:."....."|
000012F0: 3B 3A 82 00 18 1B 2C 03 99 22 13 11 11 11 11 11 |;:....,.."......|
00001300: 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
00001310: 1D 1D 1D 12 A9 20 20 92 00 3A 1B 2E 03 99 22 1D |..... ..:....".|
00001320: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
00001330: 1D 12 20 92 20 20 12 20 92 A9 00 5B 1B 30 03 99 |.. . . ...[.0..|
00001340: 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |"...............|
00001350: 1D 1D 1D 12 20 92 20 20 12 A3 DF 00 79 1B 32 03 |.... . ....y.2.|
00001360: 99 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |."..............|
00001370: 1D 1D 1D 1D DF 12 20 20 92 00 A1 1B 34 03 99 22 |...... ....4.."|
00001380: 11 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 43 20 |..............C |
00001390: 4F 20 4D 20 4D 20 4F 20 44 20 4F 20 52 20 45 11 |O M M O D O R E.|
000013A0: 11 00 C4 1B 36 03 99 22 1D 1D 1D 1D 1D 1D 1D 1D |....6.."........|
000013B0: 1D 1D 1D 1D 1D 1D 1D 45 44 55 43 41 54 49 4F 4E |.......EDUCATION|
000013C0: 41 4C 11 11 00 E3 1B 38 03 99 22 1D 1D 1D 1D 1D |AL.....8..".....|
000013D0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 53 4F 46 54 57 |...........SOFTW|
000013E0: 41 52 45 00 FE 1B 3A 03 8F 20 2A 2A 20 43 4F 4D |ARE...:.. ** COM|
000013F0: 4D 4F 44 4F 52 45 20 4C 4F 47 4F 20 2A 2A 00 36 |MODORE LOGO **.6|
00001400: 1C 3B 03 99 C8 28 55 44 24 2C 32 34 29 3B 22 1D |.;...(UD$,24);".|
00001410: 1D 1D 1D 1D 1D 1D 1D 1D 12 50 52 45 53 53 20 53 |.........PRESS S|
00001420: 50 41 43 45 20 42 41 52 20 4F 52 20 57 41 49 54 |PACE BAR OR WAIT|
00001430: 92 22 3A 49 B2 30 00 58 1C 3C 03 A1 41 24 3A 8B |.":I.0.X.<..A$:.|
00001440: 41 24 B3 B1 22 20 22 A7 49 B2 49 AA 31 3A 8B 49 |A$.." ".I.I.1:.I|
00001450: B3 32 35 30 A7 38 32 38 00 7C 1C 3E 03 54 31 24 |.250.828.|.>.T1$|
00001460: B2 22 22 3A 54 32 24 B2 22 22 3A 54 33 24 B2 22 |."":T2$."":T3$."|
00001470: 22 3A 54 34 24 B2 22 22 3A 49 B2 30 00 85 1C 40 |":T4$."":I.0...@|
00001480: 03 89 33 30 30 00 A1 1C 43 03 8F 20 2A 2A 20 53 |..300...C.. ** S|
00001490: 50 41 43 45 20 42 41 52 20 50 52 45 53 53 20 2A |PACE BAR PRESS *|
000014A0: 2A 00 DC 1C 48 03 97 55 4F 2C 30 3A 99 C8 28 55 |*...H..UO,0:..(U|
000014B0: 44 24 2C 32 34 29 3B 22 1D 1D 1D 1D 1D 1D 12 50 |D$,24);".......P|
000014C0: 52 45 53 53 20 53 50 41 43 45 20 42 41 52 20 54 |RESS SPACE BAR T|
000014D0: 4F 20 43 4F 4E 54 49 4E 55 45 92 22 00 F3 1C 4C |O CONTINUE."...L|
000014E0: 03 A1 55 49 24 3A 8B 55 49 24 B3 B1 22 20 22 A7 |..UI$:.UI$.." ".|
000014F0: 38 34 34 00 F9 1C 4E 03 8E 00 19 1D 52 03 8F 20 |844...N.....R.. |
00001500: 2A 2A 20 50 41 47 45 20 44 45 53 49 47 4E 20 52 |** PAGE DESIGN R|
00001510: 4F 55 54 49 4E 45 20 2A 2A 00 25 1D 54 03 55 50 |OUTINE **.%.T.UP|
00001520: B2 55 50 AA 31 00 4F 1D 57 03 99 22 93 22 C8 28 |.UP.1.O.W..".".(|
00001530: 55 54 24 AA 55 50 24 2C 32 31 29 3B C9 28 55 50 |UT$.UP$,21);.(UP|
00001540: 24 AA 55 47 24 AA C4 28 55 50 29 2C 31 38 29 00 |$.UG$..(UP),18).|
00001550: 7E 1D 5C 03 99 22 20 2D 2D 2D 2D 2D 2D 2D 2D 2D |~.\.." ---------|
00001560: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001570: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 00 8D |-------------"..|
00001580: 1D 60 03 8B 55 48 B3 B1 30 A7 38 37 30 00 C1 1D |.`..UH..0.870...|
00001590: 61 03 99 C8 28 55 44 24 2C 32 34 29 3B C8 28 55 |a...(UD$,24);.(U|
000015A0: 50 24 2C 37 29 3B 22 48 45 4C 50 20 2D 20 50 52 |P$,7);"HELP - PR|
000015B0: 45 53 53 20 20 20 48 20 3C 52 45 54 55 52 4E 3E |ESS H <RETURN>|
000015C0: 22 00 D2 1D 66 03 55 48 B2 30 3A 99 22 13 11 22 |"...f.UH.0:.".."|
000015D0: 3A 8E 00 F1 1D 6B 03 8F 20 2A 2A 20 50 4C 45 41 |:....k.. ** PLEA|
000015E0: 53 45 20 57 41 49 54 20 52 45 4D 41 52 4B 20 2A |SE WAIT REMARK *|
000015F0: 2A 00 27 1E 70 03 99 C8 28 55 44 24 2C 32 34 29 |*.'.p...(UD$,24)|
00001600: 3B 22 20 20 20 20 20 20 20 20 20 20 20 4F 4E 45 |;" ONE|
00001610: 20 4D 4F 4D 45 4E 54 20 50 4C 45 41 53 45 2E 2E | MOMENT PLEASE..|
00001620: 2E 20 20 20 20 20 22 00 2D 1E 75 03 8E 00 4A 1E |. ".-.u...J.|
00001630: 84 03 8F 20 2A 2A 20 53 45 54 20 55 50 20 56 41 |... ** SET UP VA|
00001640: 52 49 41 42 4C 45 53 20 2A 2A 00 95 1E 85 03 55 |RIABLES **.....U|
00001650: 58 24 B2 22 48 22 3A 86 55 51 25 28 31 30 30 30 |X$."H":.UQ%(1000|
00001660: 29 3A 55 42 B2 33 32 37 36 38 3A 55 31 B2 31 39 |):UB.32768:U1.19|
00001670: 36 3A 55 32 B2 31 39 37 3A 55 33 B2 31 39 38 3A |6:U2.197:U3.198:|
00001680: 55 34 B2 32 31 36 3A 55 43 B2 31 36 37 3A 55 55 |U4.216:UC.167:UU|
00001690: B2 31 30 32 34 00 D3 1E 86 03 55 54 B2 35 39 34 |.1024.....UT.594|
000016A0: 36 38 3A 55 55 25 B2 31 32 3A 55 4C 25 B2 31 34 |68:UU%.12:UL%.14|
000016B0: 3A 55 50 25 B2 31 31 34 36 3A 55 4D B2 33 32 37 |:UP%.1146:UM.327|
000016C0: 36 38 3A 55 4F B2 31 35 38 3A 97 20 35 30 30 30 |68:UO.158:. 5000|
000016D0: 33 2C 30 00 16 1F 87 03 8B C2 28 35 30 30 30 33 |3,0.......(50003|
000016E0: 29 B2 30 A7 55 42 B2 31 30 32 34 3A 55 31 B2 32 |).0.UB.1024:U1.2|
000016F0: 30 39 3A 55 32 B2 32 31 30 3A 55 33 B2 32 31 31 |09:U2.210:U3.211|
00001700: 3A 55 34 B2 32 31 34 3A 55 43 B2 32 30 34 3A 55 |:U4.214:UC.204:U|
00001710: 55 B2 32 30 34 38 00 55 1F 88 03 8B C2 28 35 30 |U.2048.U.....(50|
00001720: 30 30 33 29 B2 30 A7 55 54 B2 35 33 32 37 32 3A |003).0.UT.53272:|
00001730: 55 55 25 B2 32 31 3A 55 4C 25 B2 32 33 3A 55 50 |UU%.21:UL%.23:UP|
00001740: 25 B2 32 31 33 39 3A 55 4D B2 31 30 32 34 3A 55 |%.2139:UM.1024:U|
00001750: 4F B2 31 39 38 00 79 1F 89 03 55 44 24 B2 22 13 |O.198.y...UD$.".|
00001760: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
00001770: 11 11 11 11 11 11 11 11 22 00 AB 1F 8A 03 55 50 |........".....UP|
00001780: 24 B2 22 20 20 20 20 20 20 20 20 20 20 20 20 20 |$." |
00001790: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000017A0: 20 20 20 20 20 20 20 20 20 20 22 00 F9 1F 8B 03 | ".....|
000017B0: 55 54 24 B2 22 20 CC C1 C4 C4 C5 D2 A0 CD D5 CC |UT$." ..........|
000017C0: D4 2E 20 20 20 20 20 A0 22 3A 8F 20 50 4C 41 43 |.. .":. PLAC|
000017D0: 45 20 50 52 4F 47 52 41 4D 20 54 49 54 4C 45 20 |E PROGRAM TITLE |
000017E0: 48 45 52 45 20 21 21 21 21 21 21 21 21 21 21 21 |HERE !!!!!!!!!!!|
000017F0: 21 21 21 21 21 21 2A 2A 2A 00 FF 1F 8C 03 8E 00 |!!!!!!***.......|
00001800: 19 20 8E 03 8F 20 2A 2A 20 53 45 54 20 56 41 52 |. ... ** SET VAR|
00001810: 49 41 42 4C 45 53 20 2A 2A 00 22 20 93 03 8D 39 |IABLES **." ...9|
00001820: 30 30 00 32 20 94 03 48 49 B2 31 32 3A 4C 4F 57 |00.2 ..HI.12:LOW|
00001830: B2 31 00 38 20 95 03 3A 00 53 20 98 03 8F 20 2A |.1.8 ..:.S ... *|
00001840: 2A 20 43 48 45 43 4B 20 46 4F 52 20 38 30 33 32 |* CHECK FOR 8032|
00001850: 20 2A 2A 00 71 20 9D 03 99 22 93 22 3A 99 22 A0 | **.q ...".":.".|
00001860: 22 3A 8F 20 53 48 49 46 54 45 44 20 53 50 41 43 |":. SHIFTED SPAC|
00001870: 45 00 88 20 A2 03 8B C2 28 55 42 AA 34 30 29 B3 |E.. ....(UB.40).|
00001880: B1 39 36 A7 8D 37 30 30 00 A1 20 A3 03 8F 20 2A |.96..700.. ... *|
00001890: 2A 20 4D 45 4D 4F 52 59 20 43 48 45 43 4B 20 2A |* MEMORY CHECK *|
000018A0: 2A 00 B5 20 A4 03 8B 20 B8 28 30 29 B1 32 30 30 |*.. ... .(0).200|
000018B0: 30 A7 39 33 37 00 E3 20 A5 03 99 22 93 11 11 05 |0.937.. ..."....|
000018C0: 54 48 49 53 20 4D 41 43 48 49 4E 45 20 44 4F 45 |THIS MACHINE DOE|
000018D0: 53 20 4E 4F 54 20 48 41 56 45 20 45 4E 4F 55 47 |S NOT HAVE ENOUG|
000018E0: 48 11 22 00 07 21 A6 03 99 22 4D 45 4D 4F 52 59 |H."..!..."MEMORY|
000018F0: 20 54 4F 20 52 55 4E 20 54 48 49 53 20 50 52 4F | TO RUN THIS PRO|
00001900: 47 52 41 4D 20 21 22 00 12 21 A7 03 9E 55 55 AA |GRAM !"..!...UU.|
00001910: 37 31 00 18 21 A8 03 80 00 32 21 A9 03 99 22 93 |71..!....2!...".|
00001920: 05 22 3A 8B C2 28 35 30 30 30 33 29 B2 30 A7 39 |.":..(50003).0.9|
00001930: 36 32 00 61 21 AC 03 8F 20 2A 2A 20 42 41 53 49 |62.a!... ** BASI|
00001940: 43 20 32 2E 30 20 20 4F 52 20 20 34 2E 30 20 20 |C 2.0 OR 4.0 |
00001950: 4F 52 20 20 43 2D 36 34 20 53 45 54 55 50 20 2A |OR C-64 SETUP *|
00001960: 2A 00 9F 21 AD 03 97 31 30 37 35 2C 31 33 33 3A |*..!...1075,133:|
00001970: 97 31 30 37 36 2C 31 34 34 3A 97 31 30 37 37 2C |.1076,144:.1077,|
00001980: 32 33 34 3A 97 31 30 37 39 2C 34 3A 97 31 30 38 |234:.1079,4:.108|
00001990: 30 2C 31 33 33 3A 97 31 30 38 31 2C 31 34 35 00 |0,133:.1081,145.|
000019A0: D5 21 AE 03 97 31 30 39 31 2C 31 35 35 3A 97 31 |.!...1091,155:.1|
000019B0: 30 39 38 2C 31 33 33 3A 97 31 30 39 39 2C 31 34 |098,133:.1099,14|
000019C0: 34 3A 97 31 31 30 30 2C 32 33 34 3A 97 31 31 30 |4:.1100,234:.110|
000019D0: 33 2C 31 33 33 00 F7 21 AF 03 97 31 31 30 34 2C |3,133..!...1104,|
000019E0: 31 34 35 3A 97 31 31 30 35 2C 32 33 34 3A 97 31 |145:.1105,234:.1|
000019F0: 30 38 32 2C 32 33 34 00 0E 22 B1 03 8B C2 28 35 |082,234.."....(5|
00001A00: 30 30 30 33 29 B3 B1 31 36 30 A7 39 35 35 00 3D |0003)..160.955.=|
00001A10: 22 B6 03 97 31 30 39 33 2C 38 38 3A 97 31 30 39 |"...1093,88:.109|
00001A20: 34 2C 32 32 38 3A 97 31 30 39 37 2C 38 35 3A 97 |4,228:.1097,85:.|
00001A30: 31 31 30 32 2C 32 32 38 3A 89 39 36 35 00 52 22 |1102,228:.965.R"|
00001A40: BB 03 8B C2 28 35 30 30 30 33 29 B3 B1 31 A7 39 |....(50003)..1.9|
00001A50: 39 30 00 81 22 C0 03 97 31 30 39 33 2C 34 39 3A |90.."...1093,49:|
00001A60: 97 31 30 39 34 2C 32 33 30 3A 97 31 30 39 37 2C |.1094,230:.1097,|
00001A70: 34 36 3A 97 31 31 30 32 2C 32 33 30 3A 89 39 36 |46:.1102,230:.96|
00001A80: 35 00 BB 22 C2 03 97 32 30 39 39 2C 31 34 31 3A |5.."...2099,141:|
00001A90: 97 32 31 30 30 2C 32 30 3A 97 32 31 30 31 2C 33 |.2100,20:.2101,3|
00001AA0: 3A 97 32 31 30 33 2C 38 3A 97 32 31 30 34 2C 31 |:.2103,8:.2104,1|
00001AB0: 34 31 3A 97 32 31 30 35 2C 32 31 00 F7 22 C3 03 |41:.2105,21.."..|
00001AC0: 97 32 31 30 36 2C 33 3A 97 32 31 31 35 2C 31 34 |.2106,3:.2115,14|
00001AD0: 35 3A 97 32 31 31 37 2C 35 32 3A 97 32 31 31 38 |5:.2117,52:.2118|
00001AE0: 2C 32 33 34 3A 97 32 31 32 31 2C 34 39 3A 97 32 |,234:.2121,49:.2|
00001AF0: 31 32 32 2C 31 34 31 00 31 23 C4 03 97 32 31 32 |122,141.1#...212|
00001B00: 33 2C 32 30 3A 97 32 31 32 34 2C 33 3A 97 32 31 |3,20:.2124,3:.21|
00001B10: 32 36 2C 32 33 34 3A 97 32 31 32 37 2C 31 34 31 |26,234:.2127,141|
00001B20: 3A 97 32 31 32 38 2C 32 31 3A 97 32 31 32 39 2C |:.2128,21:.2129,|
00001B30: 33 00 4F 23 C5 03 9E 55 55 AA 34 38 3A 8F 20 44 |3.O#...UU.48:. D|
00001B40: 49 53 41 42 4C 45 20 53 54 4F 50 20 4B 45 59 00 |ISABLE STOP KEY.|
00001B50: 60 23 CA 03 8D 38 30 30 3A 8F 20 54 49 54 4C 45 |`#...800:. TITLE|
00001B60: 00 70 23 D4 03 89 33 30 30 3A 8F 20 4D 45 4E 55 |.p#...300:. MENU|
00001B70: 00 A1 23 DE 03 99 22 93 54 48 45 20 50 47 4D 20 |..#...".THE PGM |
00001B80: 57 49 4C 4C 20 4E 4F 54 20 57 4F 52 4B 20 4F 4E |WILL NOT WORK ON|
00001B90: 20 54 48 49 53 20 4D 41 43 48 49 4E 45 21 22 3A | THIS MACHINE!":|
00001BA0: 80 00 D6 23 E8 03 8B 55 5A B2 31 A7 9E 55 50 25 |...#...UZ.1..UP%|
00001BB0: 3A 9E 55 50 25 3A 55 5A B2 30 3A 8F 20 2A 2A 20 |:.UP%:UZ.0:. ** |
00001BC0: 50 52 4F 47 52 41 4D 20 53 54 41 52 54 53 20 48 |PROGRAM STARTS H|
00001BD0: 45 52 45 20 2A 2A 00 02 24 E9 03 99 22 93 05 22 |ERE **..$...".."|
00001BE0: 3B 3A 8C 3A 8B C2 28 35 30 30 30 33 29 B2 30 A7 |;:.:..(50003).0.|
00001BF0: 97 35 33 32 38 31 2C 36 3A 97 35 33 32 38 30 2C |.53281,6:.53280,|
00001C00: 31 34 00 13 24 F2 03 8F 20 50 41 54 54 59 20 47 |14..$... PATTY G|
00001C10: 41 52 4E 00 19 24 FC 03 3A 00 34 24 06 04 8F 20 |ARN..$..:.4$... |
00001C20: 4D 55 4C 54 49 50 4C 49 43 41 54 49 4F 4E 20 44 |MULTIPLICATION D|
00001C30: 52 49 4C 4C 00 46 24 10 04 8F 20 4D 41 52 43 48 |RILL.F$... MARCH|
00001C40: 2C 20 31 39 38 32 00 4C 24 1A 04 3A 00 59 24 4C |, 1982.L$..:.Y$L|
00001C50: 04 50 B2 55 4D AA 38 31 33 00 67 24 28 05 8F 20 |.P.UM.813.g$(.. |
00001C60: 50 49 43 54 55 52 45 00 85 24 32 05 99 22 93 20 |PICTURE..$2..". |
00001C70: 20 20 20 20 20 A7 A5 20 20 20 20 20 20 20 20 20 | .. |
00001C80: 20 20 20 A7 A5 00 A2 24 3C 05 99 22 20 20 20 20 | ....$<.." |
00001C90: 20 20 A7 CF A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 | ..............|
00001CA0: D0 A5 00 BF 24 46 05 99 22 20 20 20 20 20 20 A7 |....$F.." .|
00001CB0: A5 20 20 20 20 20 20 20 20 20 20 20 20 A7 A5 00 |. ...|
00001CC0: DC 24 50 05 99 22 20 20 20 20 20 20 A7 CF A3 A3 |.$P.." ....|
00001CD0: A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 D0 A5 00 F9 24 5A |..............$Z|
00001CE0: 05 99 22 20 20 20 20 20 20 A7 A5 20 20 20 20 20 |.." .. |
00001CF0: 20 20 20 20 20 20 20 A7 A5 00 16 25 64 05 99 22 | ....%d.."|
00001D00: 20 20 20 20 20 20 A7 CF A3 A3 A3 A3 A3 A3 A3 A3 | ..........|
00001D10: A3 A3 A3 A3 D0 A5 00 33 25 6E 05 99 22 20 20 20 |.......3%n.." |
00001D20: 20 20 20 A7 A5 20 20 20 20 20 20 20 20 20 20 20 | .. |
00001D30: 20 A7 A5 00 50 25 78 05 99 22 20 20 20 20 20 20 | ...P%x.." |
00001D40: A7 CF A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 D0 A5 |................|
00001D50: 00 6D 25 82 05 99 22 20 20 20 20 20 20 A7 A5 20 |.m%..." .. |
00001D60: 20 20 20 20 20 20 20 20 20 20 20 A7 A5 00 8A 25 | ....%|
00001D70: 8C 05 99 22 20 20 20 20 20 20 A7 CF A3 A3 A3 A3 |..." ......|
00001D80: A3 A3 A3 A3 A3 A3 A3 A3 D0 A5 00 A7 25 96 05 99 |............%...|
00001D90: 22 20 20 20 20 20 20 A7 A5 20 20 20 20 20 20 20 |" .. |
00001DA0: 20 20 20 20 20 A7 A5 00 C4 25 A0 05 99 22 20 20 | ....%..." |
00001DB0: 20 20 20 20 A7 CF A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 | ............|
00001DC0: A3 A3 D0 A5 00 E1 25 AA 05 99 22 20 20 20 20 20 |......%..." |
00001DD0: 20 A7 A5 20 20 20 20 20 20 20 20 20 20 20 20 A7 | .. .|
00001DE0: A5 00 FE 25 B4 05 99 22 20 20 20 20 20 20 A7 CF |...%..." ..|
00001DF0: A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 D0 A5 00 1B |................|
00001E00: 26 BE 05 99 22 20 20 20 20 20 20 A7 A5 A0 A0 A0 |&..." .....|
00001E10: A0 A0 A0 A0 A0 A0 A0 A0 A0 A7 A5 00 38 26 C8 05 |............8&..|
00001E20: 99 22 20 20 20 20 20 20 A7 CF A3 A3 A3 A3 A3 A3 |." ........|
00001E30: A3 A3 A3 A3 A3 A3 D0 A5 00 55 26 D2 05 99 22 20 |.........U&..." |
00001E40: 20 20 20 20 20 A7 A5 20 20 20 20 20 20 20 20 20 | .. |
00001E50: 20 20 20 A7 A5 00 72 26 DC 05 99 22 20 20 20 20 | ...r&..." |
00001E60: 20 20 A7 CF A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 | ..............|
00001E70: D0 A5 00 8F 26 E6 05 99 22 20 20 20 20 20 20 A7 |....&..." .|
00001E80: A5 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 20 A7 A5 00 |............ ...|
00001E90: AC 26 F0 05 99 22 20 20 20 20 20 20 A7 CF A3 A3 |.&..." ....|
00001EA0: A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 D0 A5 00 C9 26 FA |..............&.|
00001EB0: 05 99 22 20 20 20 20 20 20 A7 A5 20 20 20 20 20 |.." .. |
00001EC0: 20 20 20 20 20 20 20 A7 A5 00 17 27 04 06 41 24 | ....'..A$|
00001ED0: B2 22 A4 A4 A4 CE CD 11 9D 9D 9D 9D 9D CD 20 20 |."............ |
00001EE0: 20 AE CD 11 9D 9D 9D 9D 9D 9D AD CD 20 D1 20 A7 | ........... . .|
00001EF0: 11 9D 9D 9D 9D 9D 9D B0 CE 20 20 20 A7 11 9D 9D |......... ....|
00001F00: 9D 9D 9D 9D CE 20 20 20 20 CE 11 9D 9D 9D 9D 9D |..... .......|
00001F10: 9D A3 A3 A3 A3 A3 22 00 4B 27 0E 06 99 22 13 11 |......".K'..."..|
00001F20: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 1D |................|
00001F30: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
00001F40: 1D 1D 1D 1D 1D 1D 1D 22 3B 41 24 00 55 27 18 06 |.......";A$.U'..|
00001F50: 97 50 2C 38 31 00 63 27 22 06 8F 20 50 52 4F 43 |.P,81.c'".. PROC|
00001F60: 45 53 53 00 76 27 27 06 52 41 4E 47 45 B2 48 49 |ESS.v''.RANGE.HI|
00001F70: AB 4C 4F 20 AA 31 00 94 27 2C 06 3A 20 4E 31 20 |.LO .1..',.: N1 |
00001F80: B2 20 B5 20 28 BB 28 31 29 AC 52 41 4E 47 45 29 |. . (.(1).RANGE)|
00001F90: AA 4C 4F 57 00 B1 27 36 06 3A 20 4E 32 20 B2 20 |.LOW..'6.: N2 . |
00001FA0: B5 20 28 BB 28 31 29 AC 52 41 4E 47 45 29 AA 4C |. (.(1).RANGE).L|
00001FB0: 4F 00 E6 27 40 06 99 22 13 11 11 11 11 11 1D 1D |O..'@.."........|
00001FC0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
00001FD0: 1D 1D 1D 1D 1D 1D 22 3B 4E 31 3B 22 D6 22 3B 4E |......";N1;".";N|
00001FE0: 32 3B 22 9D 3D 22 00 16 28 4A 06 99 22 13 11 11 |2;".="..(J.."...|
00001FF0: 11 11 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
00002000: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
00002010: 1D 1D 1D 1D 22 3B 00 36 28 4D 06 3A 55 53 24 B2 |....";.6(M.:US$.|
00002020: 22 2D 30 31 32 33 34 35 36 37 38 39 22 3A 55 4C |"-0123456789":UL|
00002030: B2 35 3A 8D 33 35 00 46 28 4F 06 41 4E 53 57 45 |.5:.35.F(O.ANSWE|
00002040: 52 24 B2 55 52 24 00 7B 28 54 06 99 22 13 11 11 |R$.UR$.{(T.."...|
00002050: 11 11 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
00002060: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 20 20 20 20 20 |........... |
00002070: 20 20 20 20 20 20 20 20 20 20 22 00 8D 28 5E 06 | "..(^.|
00002080: 41 4E 53 57 45 52 B2 C5 28 55 52 24 29 00 AF 28 |ANSWER..(UR$)..(|
00002090: 68 06 8B 20 41 4E 53 57 45 52 20 B2 20 4E 31 20 |h.. ANSWER . N1 |
000020A0: AC 20 4E 32 20 A7 20 50 B2 50 20 AB 20 38 30 00 |. N2 . P.P . 80.|
000020B0: D2 28 72 06 8B 20 41 4E 53 57 45 52 20 B3 B1 20 |.(r.. ANSWER .. |
000020C0: 4E 31 20 AC 20 4E 32 20 A7 20 50 B2 50 20 AA 20 |N1 . N2 . P.P . |
000020D0: 38 30 00 DD 28 7C 06 97 20 50 2C 38 31 00 00 29 |80..(|.. P,81..)|
000020E0: 86 06 8B 20 41 4E 53 57 45 52 20 B2 20 4E 31 20 |... ANSWER . N1 |
000020F0: AC 20 4E 32 20 A7 20 97 20 50 AA 38 30 2C 33 32 |. N2 . . P.80,32|
00002100: 00 24 29 90 06 8B 20 41 4E 53 57 45 52 20 B3 B1 |.$)... ANSWER ..|
00002110: 20 4E 31 20 AC 20 4E 32 20 A7 20 97 20 50 AB 38 | N1 . N2 . . P.8|
00002120: 30 2C 33 32 00 3B 29 95 06 8B 20 50 B2 55 4D AA |0,32.;)... P.UM.|
00002130: 39 37 33 A7 20 89 20 32 30 30 30 00 52 29 9A 06 |973. . 2000.R)..|
00002140: 8B 20 50 B2 55 4D AA 31 33 20 A7 20 89 20 31 37 |. P.UM.13 . . 17|
00002150: 32 30 00 63 29 9F 06 20 20 20 20 20 20 20 20 20 |20.c).. |
00002160: 20 20 20 00 6D 29 A4 06 89 31 35 38 30 00 74 29 | .m)...1580.t)|
00002170: AE 06 82 49 00 A7 29 B8 06 99 22 93 11 11 11 11 |...I..)...".....|
00002180: 11 11 11 11 11 11 11 11 1D 1D 1D 1D 1D 1D 1D 1D |................|
00002190: 1D 1D 1D 1D 12 21 21 59 4F 55 27 52 45 20 53 41 |.....!!YOU'RE SA|
000021A0: 56 45 44 21 21 92 22 00 B2 29 CC 06 89 20 32 30 |VED!!."..)... 20|
000021B0: 34 35 00 D7 29 D0 07 5A 24 B2 22 53 4F 52 52 59 |45..)..Z$."SORRY|
000021C0: 2C 20 59 4F 55 20 57 45 52 45 20 4A 55 53 54 20 |, YOU WERE JUST |
000021D0: 45 41 54 45 4E 21 22 00 F5 29 F8 07 99 22 93 11 |EATEN!"..)..."..|
000021E0: 11 11 11 11 11 11 11 11 11 11 11 1D 1D 1D 1D 1D |................|
000021F0: 1D 22 3B 5A 24 00 00 2A FD 07 8D 38 33 35 3A 8E |.";Z$..*...835:.|
00002200: 00 00 00 |... |
.......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...:...... ** GENERAL INPUT ROUTINE **
...... ** TO OUR BEST KNOWLEDGE THIS.1..
.. PROGRAM IS FREE FOR.Q.... DUPLI
CATION IN CANADA..N.... IF YOU HAVE C
ONTARY...... INFORMATION, PLEASE.....
. CONTACT COMMODORE CANADA AND.W....
EVERY EFFORT WILL BE MADE TO......
WITHDRAW COPIES OF THIS...... PROGRA
M......:.,.#.. +++ INPUT SECTION +++.D.(
..UO,0:UR$."":UI$."".T.*..UL.0.UL.80.G.-
.." ..";:.UC,0.{.2..UI$:.UI$."".50...7.
.UI$.G(13).C(UR$)..1..UC,1:." .";:.85...
<..UI$.G(20).105.L.>.. C(UR$)..UL.50...A
..120:. CHECK FOR VALID CHARACTER...F.UR
$.UR$.UI$...K..UI$;...P..50.$.Q.
.I.U.. +++ CHECK FOR HELP REQUEST ++
+.Q.Z..UR$.UX$.195:. EXIT TO HELP ROUTIN
E..._..UF.1..240...D.UF.0:.:....F.. ++ C
HECK DELETE ++...I..C(UR$).1.50.O.N.UR$.
H(UR$,C(UR$).1)...S..". ..";:.50...X..
++ CHECK FOR VALID CHARACTERS ++...}..C(
US$).0.150.+....US.1.C(US$).B....UI$.J(U
S$,US,1)...H.....U...UI$."":..P.... ** S
TANDARD INPUT **......F(UI$).46........U
I$.G(32)..... ..F(UI$).48.F(UI$).57.170.
......R....F(UI$).65.F(UI$).90.180.X....
......F(UI$).193.F(UI$).218.UI$."":.....
..B(UT).UU%.UI$.G(F(UI$).128):..%.....2.
..UI$."":..W.C.UF.1:. +++ HELP ROUTINE E
XIT +++.`.E..250.I.H..245.{.M..UQ.UB.UB.
999...R.UQ%(UQ.UB).B(UQ):.:."."...W.UZ.1
:UV%.B(UT)...X..300.X.Y.UZ.0:US$.UJ$:UG$
.UK$:UP.UJ:UL.UK...Z..B(50003).0..53281,
1:.".";:.53281,6:.53280,14:.220......"."
;.H...UT$.UL$:.UT,UV%:.UQ.UB.(U2%.256.U1
%.U3%.3).]....UQ,UQ%(UQ.UB):.......H(UD$
,24);"
". ....U1,U1%......U2,U2%......U4,U4%
.F....U3,U3%.1.N....35.....UD%.((U2%.256
.U1%.U3%).UB).40:.H(UD$,UD%.1):..;....H(
UD$,24);" . HELP CO
MING . ":..G...U1%.B(U1):U2%.B(U2):U3%.
B(U3):U4%.B(U4).....UJ$.US$:UK$.UG$:UL$.
UT$:UJ.UP:UK.UL.........,.. ** MENU **..
.-.:......".":.UT,UU%:.B(50003).0..53281
,9:.53280,8.../.:...1..".
MENU".-.6.." --------------------------
------------".^.;..".. 1. BEGIN
LADDER MULTIPLICATION"...@..".. 2.
STUDENT INSTRUCTIONS"...E.."..
3. TEACHER INSTRUCTIONS"...J.."..
4. MODIFICATION OF PROGRAM"...O.."..
5. QUIT..".*.T.." -------------
-------------------------".U.Y.."..
PRESS A NUMBER KEY (1-5) ";.~.^.UL.1:U
S$."12345":.35:. INPUT ROUTINE...`.US$."
"...C..E(UR$).1000,400,500,600,396...H..
300.Z.... ** RE-ENABLE STOP KEY AND END
**......B(50003)..1.B(50003)..160.B(5000
3)..0.399.3....UU.71:.B(50003).0..53281,
6:.53280,14.?...."..":..J....875:..K....
** STUDENT INSTRUCTIONS **......".":.UT
,UL%:.B(50003).0..53281,0:.53280,0.....U
H.1:UP.0:UG$."STUDENT INST":.850.F......
....". YOUR TASK IS TO CLIMB THE LADDE
R BY.......%...." ANSWERING THE QUESTION
S CORRECTLY.".R....". WHEN AN ANSWER IS
INCORRECT YOU WILL.N....". DROP DOWN ONE
RUNG.......:." AFTER TOO MANY MISTAKE
S YOU'LL BE"......:." EATEN
!!"......". PLEASE TRY HARD TO GET AW
AY............." G O O D L U C K!
!!!!......835.(.B.UH.1:UP.1:.850.T.C...9
);"...........BEWARE OF THE MAD DOG".]..
..835.Q....UZ.1..UP%:.217.W.......... **
TEACHER INSTRUCTIONS **.H....".":.UT,UL
%:.B(50003).0..53281,2:.53280,10.....UH.
1:UP.0:UG$."TEACHER INST":.850......"..
TO THE BEST OF OUR KNOWLEDGE,.".E..
.." THIS PROGRAM IS IN THE PUBLIC.".Q.
..." DOMAIN. IF THIS IS NOT THE CASE.
"......" PLEASE CONTACT:..."......"
COMMODORE BUSINESS MACHINES."......"
3370 PHARMACY AVE......."
AGINCOURT, ONTARIO".!...."
CANADA M1W 2K4".A...." (416)
499-4292".\...UH.1:UP.1:. 835:. 850:....
.." ..PROGRAM NAME: LADDER MULT.....
..." WRITTEN BY : PATTY GARN..N....
" UPGRADED BY : ......."
.THIS PROGRAM WILL RUN ON ANY........"
PET 64 COMPUTER..>...."
COMMODORE 64 COMPUTER.G....835.[.N..UZ.
1..UP%:.217.A.W.....X.. ** PROGRAM MODIF
ICATION INST **...Y..".":.UT,UL%...].UH.
1:UP.0:UG$."PROGRAM MOD":.850......"..
THE CURRENT VALUES HAVE A HIGH OF"...
...:.""HI;"AND A LOW OF ";LOW.9....".
THE PRODUCT OF THE TWO LARGEST".H...."
. VALUES MUST NOT EXCEED FIVE DIGITS IN"
.Y....". LENGTH."......"."......" HI
GH ";:US$."-0123456789":UL.3:.35:HI.E(UR
$)...... " LOW ";:UL.3:. 35:LOW.E(U
R$)...... LOW ..10 . LOW . HI .."..":.67
5......UZ.1..UP%:.217.#.....H.... ** TO
USE 8032 LOAD CBM4032 **.~.F..".....BEFO
RE RUNNING THIS PROGRAM ON AN 8032 ....
.P.." LOAD THE 'CBM 4032' PROGRAM..
..........."...Z..UU.71.E.......... ** T
O USE 8032 LOAD CBM4032 **.5...."....BEF
ORE RUNNING THIS PROGRAM ON AN 8032 ..L
OAD CBM 4032 PROGRAM".A....1093:..A. ..
** T I T L E P A G E **...".."....";:.
UT,UU%:.B(50003).0..53280,14:.53281,6...
$..I.1.38:."...";:..C.&..I.1.22:."....."
;:....(..I.1.37:.".....";:....*..I.1.22:
.".....";:....,.."......................
..... ..:...."................... . .
...[.0.."................... . ....Y.2.
.".................... ....4.."........
......C O M M O D O R E...D.6.."........
.......EDUCATIONAL.....8..".............
...SOFTWARE...:.. ** COMMODORE LOGO **.6
.;..H(UD$,24);"..........PRESS SPACE BAR
OR WAIT.":I.0.X.<..A$:.A$.." ".I.I.1:.I
.250.828.|.>.T1$."":T2$."":T3$."":T4$.""
:I.0...@..300...C.. ** SPACE BAR PRESS *
*...H..UO,0:.H(UD$,24);".......PRESS SPA
CE BAR TO CONTINUE."...L..UI$:.UI$.." ".
844...N.....R.. ** PAGE DESIGN ROUTINE *
*.%.T.UP.UP.1.O.W.."."H(UT$.UP$,21);I(UP
$.UG$.D(UP),18).~.\.." -----------------
---------------------"...`..UH..0.870.A.
A..H(UD$,24);H(UP$,7);"HELP - PRESS H
<RETURN>".R.F.UH.0:."..":....K.. ** PLEA
SE WAIT REMARK **.'.P..H(UD$,24);"
ONE MOMENT PLEASE... ".-.U...J.
... ** SET UP VARIABLES **.....UX$."H":.
UQ%(1000):UB.32768:U1.196:U2.197:U3.198:
U4.216:UC.167:UU.1024.S...UT.59468:UU%.1
2:UL%.14:UP%.1146:UM.32768:UO.158:. 5000
3,0......B(50003).0.UB.1024:U1.209:U2.21
0:U3.211:U4.214:UC.204:UU.2048.U....B(50
003).0.UT.53272:UU%.21:UL%.23:UP%.2139:U
M.1024:UO.198.Y...UD$.".................
........".....UP$."
".....UT$." LADDER MUL
T. ":. PLACE PROGRAM TITLE HERE !!!
!!!!!!!!!!!!!!***........ ... ** SET VAR
IABLES **." ...900.2 ..HI.12:LOW.1.8 ..:
.S ... ** CHECK FOR 8032 **.Q ...".":."
":. SHIFTED SPACE.. ...B(UB.40)..96..700
.. ... ** MEMORY CHECK **.. ... .(0).200
0.937.. ..."....THIS MACHINE DOES NOT HA
VE ENOUGH."..!..."MEMORY TO RUN THIS PRO
GRAM !"..!...UU.71..!....2!..."..":.B(50
003).0.962.A!... ** BASIC 2.0 OR 4.0
OR C-64 SETUP **..!...1075,133:.1076,14
4:.1077,234:.1079,4:.1080,133:.1081,145.
U!...1091,155:.1098,133:.1099,144:.1100,
234:.1103,133..!...1104,145:.1105,234:.1
082,234.."...B(50003)..160.955.="...1093
,88:.1094,228:.1097,85:.1102,228:.965.R"
...B(50003)..1.990.."...1093,49:.1094,23
0:.1097,46:.1102,230:.965.."B..2099,141:
.2100,20:.2101,3:.2103,8:.2104,141:.2105
,21.."C..2106,3:.2115,145:.2117,52:.2118
,234:.2121,49:.2122,141.1#D..2123,20:.21
24,3:.2126,234:.2127,141:.2128,21:.2129,
3.O#E..UU.48:. DISABLE STOP KEY.`#J..800
:. TITLE.P#T..300:. MENU..#...".THE PGM
WILL NOT WORK ON THIS MACHINE!":..V#...U
Z.1..UP%:.UP%:UZ.0:. ** PROGRAM STARTS H
ERE **..$..."..";:.:.B(50003).0..53281,6
:.53280,14..$... PATTY GARN..$..:.4$...
MULTIPLICATION DRILL.F$... MARCH, 1982.L
$..:.Y$L.P.UM.813.G$(.. PICTURE..$2..".
.. ....$<.." .O....
........P...$F.." .. ...
.$P.." .O............P...$Z.."
.. ....%D.." .O........
....P..3%N.." .. ...P%X.
." .O............P..M%..." ..
....%..." .O............
P...%..." .. ...D% .."
.O............P...%..." ..
....%..." .O............P...
&..." .. ...8&H.."
.O............P..U&R.." ..
...R&..." .O............P...&...
" .. ....&..." .O..
..........P..I&..." .. .
...'..A$."...NM......M .M........M Q .
........N ........N N............".
K'..."..................................
.......";A$.U'...P,81.C'".. PROCESS.V''.
RANGE.HI.LO .1..',.: N1 . . (.(1).RANGE)
.LOW..'6.: N2 . . (.(1).RANGE).LO..'@.."
..............................";N1;"V";N
2;".="..(J.."...........................
............";.6(M.:US$."-0123456789":UL
.5:.35.F(O.ANSWER$.UR$.{(T.."...........
................... "..(^.
ANSWER.E(UR$)..(H.. ANSWER . N1 . N2 . P
.P . 80.R(R.. ANSWER .. N1 . N2 . P.P .
80..(|.. P,81..)... ANSWER . N1 . N2 . .
P.80,32.$)... ANSWER .. N1 . N2 . . P.8
0,32.;)... P.UM.973. . 2000.R)... P.UM.1
3 . . 1720.C).. .M)...1580.T)
...I..)..."..........................!!Y
OU'RE SAVED!!."..)L.. 2045.W)P.Z$."SORRY
, YOU WERE JUST EATEN!"..)..."..........
.........";Z$..*...835:....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL