DISK CMD.C3
FILE INFORMATION
FILENAME(S): DISK CMD.C3
FILE TYPE(S): PRG
FILE SIZE: 12.3K
FIRST SEEN: 2025-10-19 22:48:39
APPEARS ON: 5 disk(s)
FILE HASH
6d77378dda172fb62a43fedf08ca9d217bc3607ead2f17e5c71b2f20962ecf63
FOUND ON DISKS (5 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| TERMINAL PRGS | DISK CMD.C3 | PRG | Radd Maxx | 30 | 2 | DOWNLOAD FILE |
| FREESOFT NR | DISK CMD.C3 | PRG | Treasure Chest - Wolfgang Rauprich | 19 | 0 | DOWNLOAD FILE |
| FREESOFT NR | DISK CMD.C3 | PRG | Treasure Chest - Wolfgang Rauprich | 21 | 8 | DOWNLOAD FILE |
| FREESOFT DISK NR | DISK CMD.C3 | PRG | Treasure Chest - Wolfgang Rauprich | 21 | 8 | DOWNLOAD FILE |
| PD DISK 17 | DISK CMD.C3 | PRG | Treasure Chest - Wolfgang Rauprich | 19 | 0 | 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 8D 14 03 A9 08 8D 15 03 58 60 20 EA |"x.=........X` .| 00000040: FF A9 FF 85 91 4C 34 EA 78 A9 31 8D 14 03 A9 EA |.....L4.x.1.....| 00000050: 8D 15 03 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 F2 |UTINE **.....:..| 000000D0: 08 14 00 8F 20 2A 2A 20 54 4F 20 4F 55 52 20 42 |.... ** TO OUR B| 000000E0: 45 53 54 20 4B 4E 4F 57 4C 45 44 47 45 20 54 48 |EST KNOWLEDGE TH| 000000F0: 49 53 00 0F 09 15 00 8F 20 20 20 20 50 52 4F 47 |IS...... PROG| 00000100: 52 41 4D 20 49 53 20 46 52 45 45 20 46 4F 52 00 |RAM IS FREE FOR.| 00000110: 2F 09 16 00 8F 20 20 20 20 44 55 50 4C 49 43 41 |/.... DUPLICA| 00000120: 54 49 4F 4E 20 49 4E 20 43 41 4E 41 44 41 2E 00 |TION IN CANADA..| 00000130: 4C 09 17 00 8F 20 20 20 20 49 46 20 59 4F 55 20 |L.... IF YOU | 00000140: 48 41 56 45 20 43 4F 4E 54 41 52 59 00 69 09 18 |HAVE CONTARY.i..| 00000150: 00 8F 20 20 20 20 49 4E 46 4F 52 4D 41 54 49 4F |.. INFORMATIO| 00000160: 4E 2C 20 50 4C 45 41 53 45 00 8F 09 19 00 8F 20 |N, PLEASE...... | 00000170: 20 20 20 43 4F 4E 54 41 43 54 20 43 4F 4D 4D 4F | CONTACT COMMO| 00000180: 44 4F 52 45 20 43 41 4E 41 44 41 20 41 4E 44 00 |DORE CANADA AND.| 00000190: B5 09 1A 00 8F 20 20 20 20 45 56 45 52 59 20 45 |..... EVERY E| 000001A0: 46 46 4F 52 54 20 57 49 4C 4C 20 42 45 20 4D 41 |FFORT WILL BE MA| 000001B0: 44 45 20 54 4F 00 D6 09 1B 00 8F 20 20 20 20 57 |DE TO...... W| 000001C0: 49 54 48 44 52 41 57 20 43 4F 50 49 45 53 20 4F |ITHDRAW COPIES O| 000001D0: 46 20 54 48 49 53 00 E8 09 1C 00 8F 20 20 20 20 |F THIS...... | 000001E0: 50 52 4F 47 52 41 4D 2E 00 EE 09 1E 00 3A 00 0A |PROGRAM......:..| 000001F0: 0A 23 00 8F 20 2B 2B 2B 20 49 4E 50 55 54 20 53 |.#.. +++ INPUT S| 00000200: 45 43 54 49 4F 4E 20 2B 2B 2B 00 22 0A 28 00 97 |ECTION +++.".(..| 00000210: 55 4F 2C 30 3A 55 52 24 B2 22 22 3A 55 49 24 B2 |UO,0:UR$."":UI$.| 00000220: 22 22 00 32 0A 2A 00 8B 55 4C B2 30 A7 55 4C B2 |"".2.*..UL.0.UL.| 00000230: 38 30 00 45 0A 2D 00 99 22 20 20 9D 9D 22 3B 3A |80.E.-.." ..";:| 00000240: 97 55 43 2C 30 00 59 0A 32 00 A1 55 49 24 3A 8B |.UC,0.Y.2..UI$:.| 00000250: 55 49 24 B2 22 22 A7 35 30 00 83 0A 37 00 8B 55 |UI$."".50...7..U| 00000260: 49 24 B2 C7 28 31 33 29 AF C3 28 55 52 24 29 B1 |I$..(13)..(UR$).| 00000270: B2 31 A7 97 55 43 2C 31 3A 99 22 20 9D 22 3B 3A |.1..UC,1:." .";:| 00000280: 89 38 35 00 96 0A 3C 00 8B 55 49 24 B2 C7 28 32 |.85...<..UI$..(2| 00000290: 30 29 A7 31 30 35 00 AA 0A 3E 00 8B 20 C3 28 55 |0).105...>.. .(U| 000002A0: 52 24 29 B2 B1 55 4C A7 35 30 00 CF 0A 41 00 8D |R$)..UL.50...A..| 000002B0: 31 32 30 3A 8F 20 43 48 45 43 4B 20 46 4F 52 20 |120:. CHECK FOR | 000002C0: 56 41 4C 49 44 20 43 48 41 52 41 43 54 45 52 00 |VALID CHARACTER.| 000002D0: DF 0A 46 00 55 52 24 B2 55 52 24 AA 55 49 24 00 |..F.UR$.UR$.UI$.| 000002E0: E9 0A 4B 00 99 55 49 24 3B 00 F1 0A 50 00 89 35 |..K..UI$;...P..5| 000002F0: 30 00 16 0B 55 00 8F 20 2B 2B 2B 20 43 48 45 43 |0...U.. +++ CHEC| 00000300: 4B 20 46 4F 52 20 48 45 4C 50 20 52 45 51 55 45 |K FOR HELP REQUE| 00000310: 53 54 20 2B 2B 2B 00 3E 0B 5A 00 8B 55 52 24 B2 |ST +++.>.Z..UR$.| 00000320: 55 58 24 A7 31 39 35 3A 8F 20 45 58 49 54 20 54 |UX$.195:. EXIT T| 00000330: 4F 20 48 45 4C 50 20 52 4F 55 54 49 4E 45 00 4D |O HELP ROUTINE.M| 00000340: 0B 5F 00 8B 55 46 B2 31 A7 8D 32 34 30 00 5A 0B |._..UF.1..240.Z.| 00000350: 64 00 55 46 B2 30 3A 99 3A 8E 00 73 0B 66 00 8F |d.UF.0:.:..s.f..| 00000360: 20 2B 2B 20 43 48 45 43 4B 20 44 45 4C 45 54 45 | ++ CHECK DELETE| 00000370: 20 2B 2B 00 84 0B 69 00 8B C3 28 55 52 24 29 B3 | ++...i...(UR$).| 00000380: 31 A7 35 30 00 9C 0B 6E 00 55 52 24 B2 C8 28 55 |1.50...n.UR$..(U| 00000390: 52 24 2C C3 28 55 52 24 29 AB 31 29 00 AE 0B 73 |R$,.(UR$).1)...s| 000003A0: 00 99 22 9D 20 20 9D 9D 22 3B 3A 89 35 30 00 D5 |..". ..";:.50..| 000003B0: 0B 78 00 8F 20 2B 2B 20 43 48 45 43 4B 20 46 4F |.x.. ++ CHECK FO| 000003C0: 52 20 56 41 4C 49 44 20 43 48 41 52 41 43 54 45 |R VALID CHARACTE| 000003D0: 52 53 20 2B 2B 00 E7 0B 7D 00 8B C3 28 55 53 24 |RS ++...}...(US$| 000003E0: 29 B2 30 A7 31 35 30 00 F8 0B 82 00 81 55 53 B2 |).0.150......US.| 000003F0: 31 A4 C3 28 55 53 24 29 00 0F 0C 87 00 8B 55 49 |1..(US$)......UI| 00000400: 24 B2 CA 28 55 53 24 2C 55 53 2C 31 29 A7 8E 00 |$..(US$,US,1)...| 00000410: 15 0C 8C 00 82 00 22 0C 91 00 55 49 24 B2 22 22 |......"...UI$.""| 00000420: 3A 8E 00 3D 0C 96 00 8F 20 2A 2A 20 53 54 41 4E |:..=.... ** STAN| 00000430: 44 41 52 44 20 49 4E 50 55 54 20 2A 2A 00 4E 0C |DARD INPUT **.N.| 00000440: 98 00 8B C6 28 55 49 24 29 B2 34 36 A7 8E 00 5F |....(UI$).46..._| 00000450: 0C 9B 00 8B 55 49 24 B2 C7 28 33 32 29 A7 8E 00 |....UI$..(32)...| 00000460: 7C 0C A0 00 8B C6 28 55 49 24 29 B3 34 38 B0 C6 ||.....(UI$).48..| 00000470: 28 55 49 24 29 B1 35 37 A7 31 37 30 00 82 0C A5 |(UI$).57.170....| 00000480: 00 8E 00 9F 0C AA 00 8B C6 28 55 49 24 29 B3 36 |.........(UI$).6| 00000490: 35 B0 C6 28 55 49 24 29 B1 39 30 A7 31 38 30 00 |5..(UI$).90.180.| 000004A0: A5 0C AF 00 8E 00 C9 0C B4 00 8B C6 28 55 49 24 |............(UI$| 000004B0: 29 B3 31 39 33 B0 C6 28 55 49 24 29 B1 32 31 38 |).193..(UI$).218| 000004C0: A7 55 49 24 B2 22 22 3A 8E 00 EC 0C B9 00 8B C2 |.UI$."":........| 000004D0: 28 55 54 29 B2 55 55 25 A7 55 49 24 B2 C7 28 C6 |(UT).UU%.UI$..(.| 000004E0: 28 55 49 24 29 AB 31 32 38 29 3A 8E 00 F2 0C BB |(UI$).128):.....| 000004F0: 00 8E 00 FF 0C BE 00 55 49 24 B2 22 22 3A 8E 00 |.......UI$."":..| 00000500: 24 0D C3 00 55 46 B2 31 3A 8F 20 2B 2B 2B 20 48 |$...UF.1:. +++ H| 00000510: 45 4C 50 20 52 4F 55 54 49 4E 45 20 45 58 49 54 |ELP ROUTINE EXIT| 00000520: 20 2B 2B 2B 00 2D 0D C5 00 8D 32 35 30 00 36 0D | +++.-....250.6.| 00000530: C8 00 8D 32 34 35 00 55 0D CD 00 81 55 51 B2 55 |...245.U....UQ.U| 00000540: 42 A4 28 55 32 25 AC 32 35 36 AA 55 31 25 AA 55 |B.(U2%.256.U1%.U| 00000550: 33 25 AB 32 29 00 71 0D D2 00 55 51 25 28 55 51 |3%.2).q...UQ%(UQ| 00000560: AB 55 42 29 B2 C2 28 55 51 29 3A 82 3A 99 22 93 |.UB)..(UQ):.:.".| 00000570: 22 00 84 0D D7 00 55 5A B2 31 3A 55 56 25 B2 C2 |".....UZ.1:UV%..| 00000580: 28 55 54 29 00 8D 0D D8 00 89 33 30 30 00 B2 0D |(UT)......300...| 00000590: D9 00 55 5A B2 30 3A 55 53 24 B2 55 4A 24 3A 55 |..UZ.0:US$.UJ$:U| 000005A0: 47 24 B2 55 4B 24 3A 55 50 B2 55 4A 3A 55 4C B2 |G$.UK$:UP.UJ:UL.| 000005B0: 55 4B 00 E9 0D DA 00 8B C2 28 35 30 30 30 33 29 |UK.......(50003)| 000005C0: B2 30 A7 97 35 33 32 38 31 2C 31 3A 99 22 93 22 |.0..53281,1:."."| 000005D0: 3B 3A 97 35 33 32 38 31 2C 36 3A 97 35 33 32 38 |;:.53281,6:.5328| 000005E0: 30 2C 31 34 3A 89 32 32 30 00 F3 0D DB 00 99 22 |0,14:.220......"| 000005F0: 93 22 3B 00 22 0E DC 00 55 54 24 B2 55 4C 24 3A |.";."...UT$.UL$:| 00000600: 97 55 54 2C 55 56 25 3A 81 55 51 B2 55 42 A4 28 |.UT,UV%:.UQ.UB.(| 00000610: 55 32 25 AC 32 35 36 AA 55 31 25 AA 55 33 25 AB |U2%.256.U1%.U3%.| 00000620: 33 29 00 37 0E E1 00 97 55 51 2C 55 51 25 28 55 |3).7....UQ,UQ%(U| 00000630: 51 AB 55 42 29 3A 82 00 43 0E E6 00 97 55 31 2C |Q.UB):..C....U1,| 00000640: 55 31 25 00 4F 0E E8 00 97 55 32 2C 55 32 25 00 |U1%.O....U2,U2%.| 00000650: 5B 0E E9 00 97 55 34 2C 55 34 25 00 69 0E EA 00 |[....U4,U4%.i...| 00000660: 97 55 33 2C 55 33 25 AB 31 00 71 0E EB 00 89 33 |.U3,U3%.1.q....3| 00000670: 35 00 A3 0E F0 00 55 44 25 B2 28 28 55 32 25 AC |5.....UD%.((U2%.| 00000680: 32 35 36 AA 55 31 25 AA 55 33 25 29 AB 55 42 29 |256.U1%.U3%).UB)| 00000690: AD 34 30 3A 99 C8 28 55 44 24 2C 55 44 25 AA 31 |.40:..(UD$,UD%.1| 000006A0: 29 3A 8E 00 DE 0E F5 00 99 C8 28 55 44 24 2C 32 |):........(UD$,2| 000006B0: 34 29 3B 22 20 20 20 20 20 20 20 20 20 20 20 20 |4);" | 000006C0: 20 20 20 20 20 20 20 20 20 20 12 20 48 45 4C 50 | . HELP| 000006D0: 20 43 4F 4D 49 4E 47 20 92 20 20 22 3A 8E 00 0A | COMING . ":...| 000006E0: 0F FA 00 55 31 25 B2 C2 28 55 31 29 3A 55 32 25 |...U1%..(U1):U2%| 000006F0: B2 C2 28 55 32 29 3A 55 33 25 B2 C2 28 55 33 29 |..(U2):U3%..(U3)| 00000700: 3A 55 34 25 B2 C2 28 55 34 29 00 32 0F FB 00 55 |:U4%..(U4).2...U| 00000710: 4A 24 B2 55 53 24 3A 55 4B 24 B2 55 47 24 3A 55 |J$.US$:UK$.UG$:U| 00000720: 4C 24 B2 55 54 24 3A 55 4A B2 55 50 3A 55 4B B2 |L$.UT$:UJ.UP:UK.| 00000730: 55 4C 00 38 0F FF 00 8E 00 49 0F 2C 01 8F 20 2A |UL.8.....I.,.. *| 00000740: 2A 20 4D 45 4E 55 20 2A 2A 00 4F 0F 2D 01 3A 00 |* MENU **.O.-.:.| 00000750: 7E 0F 2E 01 99 22 93 22 3A 97 55 54 2C 55 55 25 |~....".":.UT,UU%| 00000760: 3A 8B C2 28 35 30 30 30 33 29 B2 30 A7 97 35 33 |:..(50003).0..53| 00000770: 32 38 31 2C 39 3A 97 35 33 32 38 30 2C 38 00 84 |281,9:.53280,8..| 00000780: 0F 2F 01 3A 00 A1 0F 31 01 99 22 13 20 20 20 20 |./.:...1..". | 00000790: 20 20 20 20 20 20 20 20 20 20 20 20 4D 45 4E 55 | MENU| 000007A0: 22 00 D0 0F 36 01 99 22 20 2D 2D 2D 2D 2D 2D 2D |"...6.." -------| 000007B0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 000007C0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 |---------------"| 000007D0: 00 F9 0F 3B 01 99 22 11 11 20 20 20 20 20 20 20 |...;..".. | 000007E0: 31 2E 20 20 20 42 45 47 49 4E 20 44 49 53 4B 20 |1. BEGIN DISK | 000007F0: 43 4F 4D 4D 41 4E 44 53 22 00 23 10 40 01 99 22 |COMMANDS".#.@.."| 00000800: 11 11 20 20 20 20 20 20 20 32 2E 20 20 20 53 54 |.. 2. ST| 00000810: 55 44 45 4E 54 20 49 4E 53 54 52 55 43 54 49 4F |UDENT INSTRUCTIO| 00000820: 4E 53 22 00 4D 10 45 01 99 22 11 11 20 20 20 20 |NS".M.E..".. | 00000830: 20 20 20 33 2E 20 20 20 54 45 41 43 48 45 52 20 | 3. TEACHER | 00000840: 49 4E 53 54 52 55 43 54 49 4F 4E 53 22 00 7A 10 |INSTRUCTIONS".z.| 00000850: 4A 01 99 22 11 11 20 20 20 20 20 20 20 34 2E 20 |J..".. 4. | 00000860: 20 20 4D 4F 44 49 46 49 43 41 54 49 4F 4E 20 4F | MODIFICATION O| 00000870: 46 20 50 52 4F 47 52 41 4D 22 00 96 10 4F 01 99 |F PROGRAM"...O..| 00000880: 22 11 11 20 20 20 20 20 20 20 35 2E 20 20 20 51 |".. 5. Q| 00000890: 55 49 54 11 11 22 00 C5 10 54 01 99 22 20 2D 2D |UIT.."...T.." --| 000008A0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 000008B0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 000008C0: 2D 2D 2D 2D 22 00 F0 10 59 01 99 22 11 11 20 20 |----"...Y..".. | 000008D0: 20 20 20 20 20 50 52 45 53 53 20 41 20 4E 55 4D | PRESS A NUM| 000008E0: 42 45 52 20 4B 45 59 20 28 31 2D 35 29 20 22 3B |BER KEY (1-5) ";| 000008F0: 00 19 11 5E 01 55 4C B2 31 3A 55 53 24 B2 22 31 |...^.UL.1:US$."1| 00000900: 32 33 34 35 22 3A 8D 33 35 3A 8F 20 49 4E 50 55 |2345":.35:. INPU| 00000910: 54 20 52 4F 55 54 49 4E 45 00 24 11 60 01 55 53 |T ROUTINE.$.`.US| 00000920: 24 B2 22 22 00 45 11 63 01 91 C5 28 55 52 24 29 |$."".E.c...(UR$)| 00000930: 8D 31 30 30 30 2C 34 30 30 2C 35 30 30 2C 36 30 |.1000,400,500,60| 00000940: 30 2C 33 39 36 00 4E 11 68 01 89 33 30 30 00 75 |0,396.N.h..300.u| 00000950: 11 8B 01 8F 20 2A 2A 20 52 45 2D 45 4E 41 42 4C |.... ** RE-ENABL| 00000960: 45 20 53 54 4F 50 20 4B 45 59 20 41 4E 44 20 45 |E STOP KEY AND E| 00000970: 4E 44 20 2A 2A 00 A4 11 8C 01 8B C2 28 35 30 30 |ND **.......(500| 00000980: 30 33 29 B3 B1 31 AF C2 28 35 30 30 30 33 29 B3 |03)..1..(50003).| 00000990: B1 31 36 30 AF C2 28 35 30 30 30 33 29 B3 B1 30 |.160..(50003)..0| 000009A0: A7 33 39 39 00 CE 11 8D 01 9E 55 55 AA 37 31 3A |.399......UU.71:| 000009B0: 8B C2 28 35 30 30 30 33 29 B2 30 A7 97 35 33 32 |..(50003).0..532| 000009C0: 38 31 2C 36 3A 97 35 33 32 38 30 2C 31 34 00 DA |81,6:.53280,14..| 000009D0: 11 8E 01 99 22 9A 93 22 3A 80 00 E5 11 8F 01 8D |...."..":.......| 000009E0: 38 37 35 3A 8E 00 06 12 90 01 8F 20 2A 2A 20 53 |875:....... ** S| 000009F0: 54 55 44 45 4E 54 20 49 4E 53 54 52 55 43 54 49 |TUDENT INSTRUCTI| 00000A00: 4F 4E 53 20 2A 2A 00 35 12 95 01 99 22 93 22 3A |ONS **.5....".":| 00000A10: 97 55 54 2C 55 4C 25 3A 8B C2 28 35 30 30 30 33 |.UT,UL%:..(50003| 00000A20: 29 B2 30 A7 97 35 33 32 38 31 2C 30 3A 97 35 33 |).0..53281,0:.53| 00000A30: 32 38 30 2C 30 00 5B 12 9A 01 55 48 B2 31 3A 55 |280,0.[...UH.1:U| 00000A40: 50 B2 30 3A 55 47 24 B2 22 D3 54 55 44 45 4E 54 |P.0:UG$.".TUDENT| 00000A50: 20 C9 4E 53 54 22 3A 8D 38 35 30 00 89 12 9E 01 | .NST":.850.....| 00000A60: 99 22 11 11 11 11 20 20 20 20 20 20 D4 48 49 53 |.".... .HIS| 00000A70: 20 50 52 4F 47 52 41 4D 20 53 48 4F 55 4C 44 20 | PROGRAM SHOULD | 00000A80: 48 45 4C 50 20 59 4F 55 22 00 B4 12 A0 01 99 22 |HELP YOU"......"| 00000A90: 11 20 20 20 20 20 20 54 4F 20 55 4E 44 45 52 53 |. TO UNDERS| 00000AA0: 54 41 4E 44 20 48 4F 57 20 54 4F 20 55 53 45 20 |TAND HOW TO USE | 00000AB0: 54 48 45 22 00 D4 12 A2 01 99 22 11 20 20 20 20 |THE"......". | 00000AC0: 20 20 34 30 34 30 20 C4 C9 D3 CB A0 D3 D9 D3 D4 | 4040 .........| 00000AD0: C5 CD 20 22 00 F3 12 A4 01 99 22 11 20 20 20 20 |.. "......". | 00000AE0: 20 20 D7 49 54 48 20 C4 4F 53 20 32 2E 30 20 41 | .ITH .OS 2.0 A| 00000AF0: 4E 44 22 00 1A 13 A6 01 99 22 11 20 20 20 20 20 |ND"......". | 00000B00: 20 C2 C1 D3 C9 C3 20 34 2E 30 20 C4 49 53 4B 20 | ..... 4.0 .ISK | 00000B10: CC 41 4E 47 55 41 47 45 2E 22 00 4B 13 A7 01 99 |.ANGUAGE.".K....| 00000B20: 22 11 20 28 D4 48 49 53 20 50 52 4F 47 52 41 4D |". (.HIS PROGRAM| 00000B30: 20 57 49 4C 4C 20 4E 4F 54 20 48 41 52 4D 20 59 | WILL NOT HARM Y| 00000B40: 4F 55 52 20 44 49 53 4B 2E 29 22 00 65 13 A8 01 |OUR DISK.)".e...| 00000B50: 8D 20 38 33 35 3A 55 50 B2 31 3A 55 48 B2 31 3A |. 835:UP.1:UH.1:| 00000B60: 8D 20 38 35 30 00 91 13 AA 01 99 22 11 11 11 11 |. 850......"....| 00000B70: 20 20 20 20 20 20 D4 48 45 20 50 52 4F 47 52 41 | .HE PROGRA| 00000B80: 4D 20 57 49 4C 4C 20 47 49 56 45 20 D9 4F 55 20 |M WILL GIVE .OU | 00000B90: 22 00 C0 13 AC 01 99 22 11 20 20 20 20 20 20 54 |"......". T| 00000BA0: 48 45 20 C3 4F 4D 4D 41 4E 44 53 20 46 4F 52 20 |HE .OMMANDS FOR | 00000BB0: 54 48 45 20 C4 49 53 4B 20 C4 52 49 56 45 2C 22 |THE .ISK .RIVE,"| 00000BC0: 00 E2 13 AE 01 99 22 11 20 20 20 20 20 20 D5 53 |......". .S| 00000BD0: 49 4E 47 20 54 48 45 20 57 45 44 47 45 20 28 3E |ING THE WEDGE (>| 00000BE0: 29 22 00 00 14 B0 01 99 22 11 20 20 20 20 20 20 |)"......". | 00000BF0: 20 20 20 20 20 20 20 20 20 20 20 C1 CE C4 20 22 | ... "| 00000C00: 00 27 14 B2 01 99 22 11 20 20 20 20 20 20 C2 C1 |.'....". ..| 00000C10: D3 C9 C3 20 34 2E 30 20 C4 49 53 4B 20 CC 41 4E |... 4.0 .ISK .AN| 00000C20: 47 55 41 47 45 2E 22 00 41 14 B4 01 8D 20 38 33 |GUAGE.".A.... 83| 00000C30: 35 3A 55 50 B2 32 3A 55 48 B2 31 3A 8D 20 38 35 |5:UP.2:UH.1:. 85| 00000C40: 30 00 6A 14 B6 01 99 22 11 11 11 11 11 11 11 11 |0.j...."........| 00000C50: 20 20 20 20 20 20 20 20 20 D4 48 45 20 50 52 45 | .HE PRE| 00000C60: 53 45 4E 54 41 54 49 4F 4E 22 00 94 14 B8 01 99 |SENTATION"......| 00000C70: 22 11 20 20 20 20 20 20 20 20 20 57 49 4C 4C 20 |". WILL | 00000C80: 42 45 20 49 4E 20 54 48 45 20 46 4F 4C 4C 4F 57 |BE IN THE FOLLOW| 00000C90: 49 4E 47 22 00 B1 14 BA 01 99 22 11 20 20 20 20 |ING"......". | 00000CA0: 20 20 20 20 20 4D 41 4E 4E 45 52 20 2E 2E 2E 20 | MANNER ... | 00000CB0: 22 00 CB 14 BC 01 8D 20 38 33 35 3A 55 50 B2 33 |"...... 835:UP.3| 00000CC0: 3A 55 48 B2 31 3A 8D 20 38 35 30 00 E2 14 BE 01 |:UH.1:. 850.....| 00000CD0: 99 22 11 20 12 C3 4F 4D 4D 41 4E 44 20 CE 41 4D |.". ..OMMAND .AM| 00000CE0: 45 22 00 07 15 C0 01 99 22 11 11 11 11 11 11 20 |E"......"...... | 00000CF0: 20 20 20 20 20 20 D4 48 45 20 C9 4E 46 4F 52 4D | .HE .NFORM| 00000D00: 41 54 49 4F 4E 20 22 00 1E 15 C2 01 99 22 11 11 |ATION "......"..| 00000D10: 11 11 11 20 20 20 20 20 D3 59 4E 54 41 58 00 34 |... .YNTAX.4| 00000D20: 15 C4 01 99 22 11 20 C4 4F 53 20 32 2E 30 20 20 |....". .OS 2.0 | 00000D30: 20 3D 20 22 00 4A 15 C6 01 99 22 11 20 C2 C1 D3 | = ".J....". ...| 00000D40: C9 C3 20 34 2E 30 20 3D 20 22 00 64 15 C8 01 8D |.. 4.0 = ".d....| 00000D50: 20 38 33 35 3A 55 50 B2 34 3A 55 48 B2 31 3A 8D | 835:UP.4:UH.1:.| 00000D60: 20 38 35 30 00 94 15 CA 01 99 22 11 11 11 20 CE | 850......"... .| 00000D70: 4F 54 45 20 3A 20 20 D4 4F 20 41 44 56 41 4E 43 |OTE : .O ADVANC| 00000D80: 45 20 46 52 4F 4D 20 4F 4E 45 20 53 43 52 45 45 |E FROM ONE SCREE| 00000D90: 4E 20 20 22 00 B7 15 CC 01 99 22 11 20 20 20 20 |N "......". | 00000DA0: 20 20 20 20 20 54 4F 20 54 48 45 20 4E 45 58 54 | TO THE NEXT| 00000DB0: 20 50 52 45 53 53 22 00 D9 15 CE 01 99 22 11 20 | PRESS"......". | 00000DC0: 20 20 20 20 20 20 20 20 54 48 45 20 3C 53 50 41 | THE <SPA| 00000DD0: 43 45 3E 20 42 41 52 2E 22 00 F3 15 D6 01 8D 20 |CE> BAR."...... | 00000DE0: 38 33 35 3A 55 50 B2 35 3A 55 48 B2 31 3A 8D 20 |835:UP.5:UH.1:. | 00000DF0: 38 35 30 00 1A 16 D8 01 99 22 11 11 20 CE 4F 54 |850......".. .OT| 00000E00: 45 20 3A 20 20 D9 4F 55 20 53 48 4F 55 4C 44 20 |E : .OU SHOULD | 00000E10: 4B 4E 4F 57 20 54 48 45 20 22 00 44 16 DA 01 99 |KNOW THE ".D....| 00000E20: 22 11 20 20 20 20 20 20 20 20 20 46 4F 4C 4C 4F |". FOLLO| 00000E30: 57 49 4E 47 20 41 42 42 52 45 56 49 41 54 49 4F |WING ABBREVIATIO| 00000E40: 4E 53 21 22 00 66 16 DC 01 99 22 11 20 20 20 20 |NS!".f....". | 00000E50: 20 20 20 20 20 28 44 52 29 20 20 20 3A 20 C4 52 | (DR) : .R| 00000E60: 49 56 45 20 23 22 00 94 16 DD 01 99 22 11 20 20 |IVE #"......". | 00000E70: 20 20 20 20 20 20 20 28 44 44 52 29 20 20 3A 20 | (DDR) : | 00000E80: C4 45 53 54 49 4E 41 54 49 4F 4E 20 44 52 49 56 |.ESTINATION DRIV| 00000E90: 45 20 23 22 00 BD 16 DE 01 99 22 11 20 20 20 20 |E #"......". | 00000EA0: 20 20 20 20 20 28 53 44 52 29 20 20 3A 20 D3 4F | (SDR) : .O| 00000EB0: 55 52 43 45 20 C4 52 49 56 45 20 23 22 00 E6 16 |URCE .RIVE #"...| 00000EC0: DF 01 99 22 11 20 20 20 20 20 20 20 20 20 20 46 |...". F| 00000ED0: 4E 20 20 20 20 3A 20 46 49 4C 45 20 4E 41 4D 45 |N : FILE NAME| 00000EE0: 20 20 20 20 20 22 00 13 17 E0 01 99 22 11 20 20 | "......". | 00000EF0: 20 20 20 20 20 20 20 20 4F 46 4E 20 20 20 3A 20 | OFN : | 00000F00: 4F 4C 44 20 46 49 4C 45 20 4E 41 4D 45 20 20 20 |OLD FILE NAME | 00000F10: 20 20 22 00 40 17 E1 01 99 22 11 20 20 20 20 20 | ".@....". | 00000F20: 20 20 20 20 20 4E 46 4E 20 20 20 3A 20 4E 45 57 | NFN : NEW| 00000F30: 20 46 49 4C 45 20 4E 41 4D 45 20 20 20 20 20 22 | FILE NAME "| 00000F40: 00 5A 17 E2 01 8D 20 38 33 35 3A 55 50 B2 36 3A |.Z.... 835:UP.6:| 00000F50: 55 48 B2 31 3A 8D 20 38 35 30 00 82 17 E3 01 99 |UH.1:. 850......| 00000F60: 22 11 20 20 20 20 20 20 20 20 20 28 58 58 29 20 |". (XX) | 00000F70: 20 20 3A 20 C1 4C 50 48 41 2D CE 55 4D 45 52 49 | : .LPHA-.UMERI| 00000F80: 43 22 00 AA 17 E4 01 99 22 20 20 20 20 20 20 20 |C"......" | 00000F90: 20 20 20 20 20 20 20 20 20 20 20 49 44 45 4E 54 | IDENT| 00000FA0: 49 46 49 43 41 54 49 4F 4E 22 00 DE 17 E5 01 99 |IFICATION"......| 00000FB0: 22 11 20 20 20 20 20 20 20 20 20 20 27 27 20 20 |". '' | 00000FC0: 20 20 3A 20 CE CF D4 C5 20 D4 48 45 20 22 3B C7 | : .... .HE ";.| 00000FD0: 28 33 34 29 3B 22 20 22 3B C7 28 33 34 29 00 06 |(34);" ";.(34)..| 00000FE0: 18 E6 01 99 22 20 20 20 20 20 20 20 20 20 20 20 |...." | 00000FF0: 20 20 20 20 20 20 20 49 53 20 55 53 45 44 20 4D | IS USED M| 00001000: 4F 53 54 4C 59 22 00 2E 18 E7 01 99 22 20 20 20 |OSTLY"......" | 00001010: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 57 | W| 00001020: 49 54 48 20 C2 C1 D3 C9 C3 20 34 2E 30 22 00 37 |ITH ..... 4.0".7| 00001030: 18 E8 01 8D 38 33 35 00 4B 18 EA 01 8B 55 5A B2 |....835.K....UZ.| 00001040: 31 A7 9E 55 50 25 3A 89 32 31 37 00 51 18 F3 01 |1..UP%:.217.Q...| 00001050: 8E 00 72 18 F4 01 8F 20 2A 2A 20 54 45 41 43 48 |..r.... ** TEACH| 00001060: 45 52 20 49 4E 53 54 52 55 43 54 49 4F 4E 53 20 |ER INSTRUCTIONS | 00001070: 2A 2A 00 A2 18 F5 01 99 22 93 22 3A 97 55 54 2C |**......".":.UT,| 00001080: 55 4C 25 3A 8B C2 28 35 30 30 30 33 29 B2 30 A7 |UL%:..(50003).0.| 00001090: 97 35 33 32 38 31 2C 32 3A 97 35 33 32 38 30 2C |.53281,2:.53280,| 000010A0: 31 30 00 C3 18 F6 01 55 50 B2 30 3A 55 47 24 B2 |10.....UP.0:UG$.| 000010B0: 22 D4 45 41 43 48 45 52 20 C9 4E 53 54 22 3A 8D |".EACHER .NST":.| 000010C0: 38 35 30 00 F1 18 F7 01 99 22 11 11 20 20 20 20 |850......".. | 000010D0: 20 20 D4 4F 20 54 48 45 20 42 45 53 54 20 4F 46 | .O THE BEST OF| 000010E0: 20 4F 55 52 20 4B 4E 4F 57 4C 45 44 47 45 2C 11 | OUR KNOWLEDGE,.| 000010F0: 22 00 1A 19 F8 01 99 22 20 20 20 54 48 49 53 20 |"......" THIS | 00001100: 50 52 4F 47 52 41 4D 20 49 53 20 49 4E 20 54 48 |PROGRAM IS IN TH| 00001110: 45 20 50 55 42 4C 49 43 11 22 00 46 19 F9 01 99 |E PUBLIC.".F....| 00001120: 22 20 20 20 44 4F 4D 41 49 4E 2E 20 20 C9 46 20 |" DOMAIN. .F | 00001130: 54 48 49 53 20 49 53 20 4E 4F 54 20 54 48 45 20 |THIS IS NOT THE | 00001140: 43 41 53 45 11 22 00 63 19 FA 01 99 22 20 20 20 |CASE.".c...." | 00001150: 50 4C 45 41 53 45 20 43 4F 4E 54 41 43 54 3A 11 |PLEASE CONTACT:.| 00001160: 11 11 22 00 8D 19 FB 01 99 22 20 20 20 20 20 20 |.."......" | 00001170: C3 4F 4D 4D 4F 44 4F 52 45 20 C2 55 53 49 4E 45 |.OMMODORE .USINE| 00001180: 53 53 20 CD 41 43 48 49 4E 45 53 11 22 00 B0 19 |SS .ACHINES."...| 00001190: FC 01 99 22 20 20 20 20 20 20 20 20 20 20 33 33 |..." 33| 000011A0: 37 30 20 D0 48 41 52 4D 41 43 59 20 C1 56 45 2E |70 .HARMACY .VE.| 000011B0: 00 D4 19 FD 01 99 22 20 20 20 20 20 20 20 20 20 |......" | 000011C0: 20 C1 47 49 4E 43 4F 55 52 54 2C 20 CF 4E 54 41 | .GINCOURT, .NTA| 000011D0: 52 49 4F 22 00 F6 19 FE 01 99 22 20 20 20 20 20 |RIO"......" | 000011E0: 20 20 20 20 20 C3 41 4E 41 44 41 20 20 20 CD 31 | .ANADA .1| 000011F0: D7 20 32 CB 34 22 00 16 1A FF 01 99 22 20 20 20 |. 2.4"......" | 00001200: 20 20 20 20 20 20 20 28 34 31 36 29 20 34 39 39 | (416) 499| 00001210: 2D 34 32 39 32 22 00 2C 1A 00 02 55 50 B2 31 3A |-4292".,...UP.1:| 00001220: 8D 20 38 33 35 3A 8D 20 38 35 30 3A 00 56 1A 01 |. 835:. 850:.V..| 00001230: 02 99 22 20 20 20 20 20 11 11 D0 52 4F 47 52 41 |.." ...ROGRA| 00001240: 4D 20 CE 41 4D 45 3A 20 C4 49 53 4B 20 C3 4F 4D |M .AME: .ISK .OM| 00001250: 4D 41 4E 44 53 11 00 7C 1A 02 02 99 22 20 20 20 |MANDS..|...." | 00001260: 20 20 D7 52 49 54 54 45 4E 20 C2 59 20 20 3A 20 | .RITTEN .Y : | 00001270: CA 4F 48 4E 20 D3 49 53 53 4F 4E 11 00 A0 1A 03 |.OHN .ISSON.....| 00001280: 02 99 22 20 20 20 20 20 D5 50 47 52 41 44 45 44 |.." .PGRADED| 00001290: 20 C2 59 20 3A 20 20 20 20 20 20 20 20 20 20 11 | .Y : .| 000012A0: 00 CB 1A 04 02 99 22 20 20 20 20 20 11 D4 48 49 |......" ..HI| 000012B0: 53 20 50 52 4F 47 52 41 4D 20 57 49 4C 4C 20 52 |S PROGRAM WILL R| 000012C0: 55 4E 20 4F 4E 20 41 4E 59 11 11 00 EA 1A 07 02 |UN ON ANY.......| 000012D0: 99 22 20 20 20 20 20 20 20 20 20 D0 C5 D4 20 36 |." ... 6| 000012E0: 34 20 C3 CF CD D0 D5 D4 C5 D2 00 0F 1B 08 02 99 |4 ..............| 000012F0: 22 20 20 20 20 20 20 20 20 20 C3 CF CD CD CF C4 |" ......| 00001300: CF D2 C5 20 36 34 20 C3 CF CD D0 D5 D4 C5 D2 00 |... 64 .........| 00001310: 18 1B 09 02 8D 38 33 35 00 2C 1B 4E 02 8B 55 5A |.....835.,.N..UZ| 00001320: B2 31 A7 9E 55 50 25 3A 89 32 31 37 00 32 1B 57 |.1..UP%:.217.2.W| 00001330: 02 8E 00 58 1B 58 02 8F 20 2A 2A 20 50 52 4F 47 |...X.X.. ** PROG| 00001340: 52 41 4D 20 4D 4F 44 49 46 49 43 41 54 49 4F 4E |RAM MODIFICATION| 00001350: 20 49 4E 53 54 20 2A 2A 00 69 1B 59 02 99 22 93 | INST **.i.Y..".| 00001360: 22 3A 97 55 54 2C 55 4C 25 00 89 1B 5D 02 55 50 |":.UT,UL%...].UP| 00001370: B2 30 3A 55 47 24 B2 22 D0 52 4F 47 52 41 4D 20 |.0:UG$.".ROGRAM | 00001380: CD 4F 44 22 3A 8D 38 35 30 00 B1 1B 60 02 99 22 |.OD":.850...`.."| 00001390: 11 11 11 11 20 20 20 20 20 20 CD 4F 44 49 46 49 |.... .ODIFI| 000013A0: 43 41 54 49 4F 4E 20 49 4E 56 4F 4C 56 45 53 20 |CATION INVOLVES | 000013B0: 22 00 DC 1B 62 02 99 22 11 20 20 20 20 20 20 43 |"...b..". C| 000013C0: 48 41 4E 47 49 4E 47 20 54 48 45 20 C4 C1 D4 C1 |HANGING THE ....| 000013D0: 20 53 54 41 54 45 4D 45 4E 54 53 22 00 FE 1B 64 | STATEMENTS"...d| 000013E0: 02 99 22 11 20 20 20 20 20 20 49 4E 20 CC 49 4E |..". IN .IN| 000013F0: 45 53 20 31 38 30 30 2D 32 35 30 30 20 2E 00 2A |ES 1800-2500 ..*| 00001400: 1C 66 02 99 22 11 20 20 20 20 20 20 C2 55 54 20 |.f..". .UT | 00001410: C9 20 53 55 47 47 45 53 54 20 4C 45 41 56 49 4E |. SUGGEST LEAVIN| 00001420: 47 20 49 54 20 54 48 45 20 22 00 57 1C 68 02 99 |G IT THE ".W.h..| 00001430: 22 11 20 20 20 20 20 20 57 41 59 20 49 54 20 49 |". WAY IT I| 00001440: 53 2C 20 53 49 4E 43 45 20 43 48 41 4E 47 49 4E |S, SINCE CHANGIN| 00001450: 47 20 C4 C1 D4 C1 22 00 7D 1C 6A 02 99 22 11 20 |G ....".}.j..". | 00001460: 20 20 20 20 20 43 41 4E 20 4C 45 41 44 20 54 4F | CAN LEAD TO| 00001470: 20 D0 D2 CF C2 CC C5 CD D3 20 21 20 22 00 9F 1C | ........ ! "...| 00001480: 6C 02 99 22 20 20 20 20 20 20 20 20 20 20 20 20 |l.." | 00001490: 20 20 20 20 20 20 3D 3D 3D 3D 3D 3D 3D 3D 22 00 | ========".| 000014A0: B4 1C 6E 02 8D 20 38 33 35 3A 55 50 B2 32 3A 8D |..n.. 835:UP.2:.| 000014B0: 20 38 35 30 00 DF 1C 70 02 99 22 11 11 20 20 20 | 850...p..".. | 000014C0: 20 20 20 C2 55 54 20 49 46 20 59 4F 55 20 CD D5 | .UT IF YOU ..| 000014D0: D3 D4 2C 20 59 4F 55 20 53 48 4F 55 4C 44 22 00 |.., YOU SHOULD".| 000014E0: 0B 1D 72 02 99 22 11 20 20 20 20 20 20 4B 4E 4F |..r..". KNO| 000014F0: 57 20 54 48 45 20 23 20 4F 46 20 C4 C1 D4 C1 20 |W THE # OF .... | 00001500: 53 54 41 54 45 4D 45 4E 54 53 22 00 2C 1D 74 02 |STATEMENTS".,.t.| 00001510: 99 22 11 20 20 20 20 20 20 46 4F 52 20 45 41 43 |.". FOR EAC| 00001520: 48 20 56 41 52 49 41 42 4C 45 2E 22 00 51 1D 76 |H VARIABLE.".Q.v| 00001530: 02 99 22 11 20 20 20 20 20 20 D4 48 45 59 20 41 |..". .HEY A| 00001540: 52 45 3A 20 20 20 20 53 59 4E 24 28 44 2C 47 29 |RE: SYN$(D,G)| 00001550: 22 00 76 1D 78 02 99 22 20 20 20 20 20 20 20 20 |".v.x.." | 00001560: 20 20 20 20 20 20 20 20 20 20 20 53 45 4E 54 24 | SENT$| 00001570: 28 50 2C 45 29 22 00 94 1D 7A 02 99 22 11 20 20 |(P,E)"...z..". | 00001580: 20 20 20 20 44 20 26 20 50 20 3D 20 31 32 20 AE | D & P = 12 .| 00001590: 20 20 20 22 00 C2 1D 7C 02 99 22 20 20 20 20 20 | "...|.." | 000015A0: 20 20 20 20 20 47 20 3D 20 20 33 20 AB 20 C5 41 | G = 3 . .A| 000015B0: 43 48 20 49 53 20 C4 C9 CD 45 4E 53 49 4F 4E 45 |CH IS ...ENSIONE| 000015C0: 44 22 00 DF 1D 7E 02 99 22 20 20 20 20 20 20 20 |D"...~.." | 000015D0: 20 20 20 45 20 3D 20 20 34 20 BD 20 20 20 22 00 | E = 4 . ".| 000015E0: 0D 1E 80 02 99 22 11 20 20 20 20 20 20 53 4F 20 |.....". SO | 000015F0: 57 49 54 48 20 41 4E 59 20 43 48 41 4E 47 45 20 |WITH ANY CHANGE | 00001600: 49 4E 20 54 48 45 20 C4 C1 D4 C1 2C 22 00 35 1E |IN THE ....,".5.| 00001610: 82 02 99 22 11 20 20 20 20 20 20 54 48 45 53 45 |...". THESE| 00001620: 20 23 27 53 20 4D 55 53 54 20 42 45 20 43 48 41 | #'S MUST BE CHA| 00001630: 4E 47 45 44 2E 00 4A 1E 84 02 8D 20 38 33 35 3A |NGED..J.... 835:| 00001640: 55 50 B2 33 3A 8D 20 38 35 30 00 76 1E 86 02 99 |UP.3:. 850.v....| 00001650: 22 11 11 11 11 20 20 20 20 20 20 D4 48 45 20 56 |".... .HE V| 00001660: 41 52 49 41 42 4C 45 20 2C 20 53 45 4E 54 24 28 |ARIABLE , SENT$(| 00001670: 49 2C 4A 29 2C 22 00 A4 1E 88 02 99 22 11 20 20 |I,J),"......". | 00001680: 20 20 20 20 28 4A 20 47 4F 49 4E 47 20 55 50 20 | (J GOING UP | 00001690: 54 4F 20 35 20 26 20 49 20 55 50 20 54 4F 20 31 |TO 5 & I UP TO 1| 000016A0: 32 29 2C 22 00 CE 1E 8A 02 99 22 11 20 20 20 20 |2),"......". | 000016B0: 20 20 41 52 45 20 46 4F 52 20 54 48 45 20 C4 C1 | ARE FOR THE ..| 000016C0: D4 C1 20 53 54 41 54 45 4D 45 4E 54 53 22 00 F6 |.. STATEMENTS"..| 000016D0: 1E 8C 02 99 22 11 20 20 20 20 20 20 49 4E 56 4F |....". INVO| 000016E0: 4C 56 45 44 20 57 49 54 48 20 54 48 45 20 57 52 |LVED WITH THE WR| 000016F0: 49 54 54 45 4E 22 00 1B 1F 8E 02 99 22 11 20 20 |ITTEN"......". | 00001700: 20 20 20 20 53 45 4E 54 45 4E 43 45 53 20 4F 46 | SENTENCES OF| 00001710: 20 54 48 45 20 50 41 47 45 2E 22 00 45 1F 90 02 | THE PAGE.".E...| 00001720: 99 22 11 20 20 20 20 20 20 53 59 4E 24 28 49 2C |.". SYN$(I,| 00001730: 31 29 2C 20 49 53 20 54 48 45 20 54 49 54 4C 45 |1), IS THE TITLE| 00001740: 20 46 4F 52 22 00 6B 1F 92 02 99 22 11 20 20 20 | FOR".k....". | 00001750: 20 20 20 45 41 43 48 20 50 41 47 45 2C 20 49 45 | EACH PAGE, IE| 00001760: 2E 20 12 D2 45 4E 41 4D 45 92 22 00 80 1F 94 02 |. ..ENAME.".....| 00001770: 8D 20 38 33 35 3A 55 50 B2 34 3A 8D 20 38 35 30 |. 835:UP.4:. 850| 00001780: 00 AE 1F 96 02 99 22 11 11 11 11 20 20 20 20 20 |......".... | 00001790: 20 53 59 4E 24 28 49 2C 32 29 2C 20 49 53 20 54 | SYN$(I,2), IS T| 000017A0: 48 45 20 53 59 4E 54 41 58 20 46 4F 52 22 00 D8 |HE SYNTAX FOR"..| 000017B0: 1F 98 02 99 22 11 20 20 20 20 20 20 54 48 45 20 |....". THE | 000017C0: C2 C1 D3 C9 C3 20 34 2E 30 20 C4 49 53 4B 20 43 |..... 4.0 .ISK C| 000017D0: 4F 4D 4D 41 4E 44 53 22 00 04 20 9A 02 99 22 11 |OMMANDS".. ...".| 000017E0: 11 20 20 20 20 20 20 53 59 4E 24 28 49 2C 33 29 |. SYN$(I,3)| 000017F0: 2C 20 49 53 20 54 48 45 20 53 59 4E 54 41 58 20 |, IS THE SYNTAX | 00001800: 46 4F 52 22 00 2C 20 9C 02 99 22 11 20 20 20 20 |FOR"., ...". | 00001810: 20 20 54 48 45 20 C4 CF D3 20 28 3E 29 20 C4 49 | THE ... (>) .I| 00001820: 53 4B 20 43 4F 4D 4D 41 4E 44 53 22 00 58 20 9E |SK COMMANDS".X .| 00001830: 02 99 22 11 20 20 20 20 20 20 D4 48 45 20 50 52 |..". .HE PR| 00001840: 49 4E 54 4F 55 54 20 41 52 45 41 20 28 31 35 30 |INTOUT AREA (150| 00001850: 30 2D 31 36 33 30 29 22 00 80 20 A0 02 99 22 11 |0-1630)".. ...".| 00001860: 20 20 20 20 20 20 CD D5 D3 D4 20 42 45 20 43 48 | .... BE CH| 00001870: 41 4E 47 45 44 20 54 4F 20 4D 41 54 43 48 2E 22 |ANGED TO MATCH."| 00001880: 00 89 20 A8 02 8D 38 33 35 00 9D 20 B2 02 8B 55 |.. ...835.. ...U| 00001890: 5A B2 31 A7 9E 55 50 25 3A 89 32 31 37 00 A3 20 |Z.1..UP%:.217.. | 000018A0: BB 02 8E 00 C8 20 BC 02 8F 20 2A 2A 20 54 4F 20 |..... ... ** TO | 000018B0: 55 53 45 20 38 30 33 32 20 4C 4F 41 44 20 43 42 |USE 8032 LOAD CB| 000018C0: 4D 34 30 33 32 20 2A 2A 00 FE 20 C6 02 99 22 93 |M4032 **.. ...".| 000018D0: 11 11 11 05 42 45 46 4F 52 45 20 52 55 4E 4E 49 |....BEFORE RUNNI| 000018E0: 4E 47 20 54 48 49 53 20 50 52 4F 47 52 41 4D 20 |NG THIS PROGRAM | 000018F0: 4F 4E 20 41 4E 20 38 30 33 32 20 20 11 11 00 34 |ON AN 8032 ...4| 00001900: 21 D0 02 99 22 20 20 20 20 20 20 4C 4F 41 44 20 |!..." LOAD | 00001910: 54 48 45 20 27 43 42 4D 20 34 30 33 32 27 20 50 |THE 'CBM 4032' P| 00001920: 52 4F 47 52 41 4D 11 11 11 11 11 11 11 11 11 11 |ROGRAM..........| 00001930: 11 11 11 22 00 3F 21 DA 02 9E 55 55 AA 37 31 00 |...".?!...UU.71.| 00001940: 45 21 E4 02 80 00 6A 21 1D 03 8F 20 2A 2A 20 54 |E!....j!... ** T| 00001950: 4F 20 55 53 45 20 38 30 33 32 20 4C 4F 41 44 20 |O USE 8032 LOAD | 00001960: 43 42 4D 34 30 33 32 20 2A 2A 00 B5 21 1E 03 99 |CBM4032 **..!...| 00001970: 22 93 11 11 11 42 45 46 4F 52 45 20 52 55 4E 4E |"....BEFORE RUNN| 00001980: 49 4E 47 20 54 48 49 53 20 50 52 4F 47 52 41 4D |ING THIS PROGRAM| 00001990: 20 4F 4E 20 41 4E 20 38 30 33 32 20 20 11 11 4C | ON AN 8032 ..L| 000019A0: 4F 41 44 20 43 42 4D 20 34 30 33 32 20 50 52 4F |OAD CBM 4032 PRO| 000019B0: 47 52 41 4D 22 00 C1 21 1F 03 9E 31 30 39 33 3A |GRAM"..!...1093:| 000019C0: 80 00 E1 21 20 03 8F 20 2A 2A 20 54 20 49 20 54 |...! .. ** T I T| 000019D0: 20 4C 20 45 20 20 20 50 20 41 20 47 20 45 20 2A | L E P A G E *| 000019E0: 2A 00 15 22 22 03 99 22 93 11 1D 05 22 3B 3A 97 |*.."".."....";:.| 000019F0: 55 54 2C 55 55 25 3A 8B C2 28 35 30 30 30 33 29 |UT,UU%:..(50003)| 00001A00: B2 30 A7 97 35 33 32 38 30 2C 31 34 3A 97 35 33 |.0..53280,14:.53| 00001A10: 32 38 31 2C 36 00 2B 22 24 03 81 49 B2 31 A4 33 |281,6.+"$..I.1.3| 00001A20: 38 3A 99 22 12 A6 92 22 3B 3A 82 00 43 22 26 03 |8:."...";:..C"&.| 00001A30: 81 49 B2 31 A4 32 32 3A 99 22 11 9D 12 A6 92 22 |.I.1.22:."....."| 00001A40: 3B 3A 82 00 5B 22 28 03 81 49 B2 31 A4 33 37 3A |;:..["(..I.1.37:| 00001A50: 99 22 9D 9D 12 A6 92 22 3B 3A 82 00 73 22 2A 03 |.".....";:..s"*.| 00001A60: 81 49 B2 31 A4 32 32 3A 99 22 91 9D 12 A6 92 22 |.I.1.22:."....."| 00001A70: 3B 3A 82 00 98 22 2C 03 99 22 13 11 11 11 11 11 |;:...",.."......| 00001A80: 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................| 00001A90: 1D 1D 1D 12 A9 20 20 92 00 BA 22 2E 03 99 22 1D |..... ..."...".| 00001AA0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................| 00001AB0: 1D 12 20 92 20 20 12 20 92 A9 00 DB 22 30 03 99 |.. . . ...."0..| 00001AC0: 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |"...............| 00001AD0: 1D 1D 1D 12 20 92 20 20 12 A3 DF 00 F9 22 32 03 |.... . ....."2.| 00001AE0: 99 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |."..............| 00001AF0: 1D 1D 1D 1D DF 12 20 20 92 00 21 23 34 03 99 22 |...... ..!#4.."| 00001B00: 11 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 43 20 |..............C | 00001B10: 4F 20 4D 20 4D 20 4F 20 44 20 4F 20 52 20 45 11 |O M M O D O R E.| 00001B20: 11 00 44 23 36 03 99 22 1D 1D 1D 1D 1D 1D 1D 1D |..D#6.."........| 00001B30: 1D 1D 1D 1D 1D 1D 1D 45 44 55 43 41 54 49 4F 4E |.......EDUCATION| 00001B40: 41 4C 11 11 00 63 23 38 03 99 22 1D 1D 1D 1D 1D |AL...c#8..".....| 00001B50: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 53 4F 46 54 57 |...........SOFTW| 00001B60: 41 52 45 00 7E 23 3A 03 8F 20 2A 2A 20 43 4F 4D |ARE.~#:.. ** COM| 00001B70: 4D 4F 44 4F 52 45 20 4C 4F 47 4F 20 2A 2A 00 B6 |MODORE LOGO **..| 00001B80: 23 3B 03 99 C8 28 55 44 24 2C 32 34 29 3B 22 1D |#;...(UD$,24);".| 00001B90: 1D 1D 1D 1D 1D 1D 1D 1D 12 50 52 45 53 53 20 53 |.........PRESS S| 00001BA0: 50 41 43 45 20 42 41 52 20 4F 52 20 57 41 49 54 |PACE BAR OR WAIT| 00001BB0: 92 22 3A 49 B2 30 00 D8 23 3C 03 A1 41 24 3A 8B |.":I.0..#<..A$:.| 00001BC0: 41 24 B3 B1 22 20 22 A7 49 B2 49 AA 31 3A 8B 49 |A$.." ".I.I.1:.I| 00001BD0: B3 32 35 30 A7 38 32 38 00 FC 23 3E 03 54 31 24 |.250.828..#>.T1$| 00001BE0: B2 22 22 3A 54 32 24 B2 22 22 3A 54 33 24 B2 22 |."":T2$."":T3$."| 00001BF0: 22 3A 54 34 24 B2 22 22 3A 49 B2 30 00 05 24 40 |":T4$."":I.0..$@| 00001C00: 03 89 33 30 30 00 21 24 43 03 8F 20 2A 2A 20 53 |..300.!$C.. ** S| 00001C10: 50 41 43 45 20 42 41 52 20 50 52 45 53 53 20 2A |PACE BAR PRESS *| 00001C20: 2A 00 5C 24 48 03 97 55 4F 2C 30 3A 99 C8 28 55 |*.\$H..UO,0:..(U| 00001C30: 44 24 2C 32 34 29 3B 22 1D 1D 1D 1D 1D 1D 12 50 |D$,24);".......P| 00001C40: 52 45 53 53 20 53 50 41 43 45 20 42 41 52 20 54 |RESS SPACE BAR T| 00001C50: 4F 20 43 4F 4E 54 49 4E 55 45 92 22 00 73 24 4C |O CONTINUE.".s$L| 00001C60: 03 A1 55 49 24 3A 8B 55 49 24 B3 B1 22 20 22 A7 |..UI$:.UI$.." ".| 00001C70: 38 34 34 00 79 24 4E 03 8E 00 99 24 52 03 8F 20 |844.y$N....$R.. | 00001C80: 2A 2A 20 50 41 47 45 20 44 45 53 49 47 4E 20 52 |** PAGE DESIGN R| 00001C90: 4F 55 54 49 4E 45 20 2A 2A 00 A5 24 54 03 55 50 |OUTINE **..$T.UP| 00001CA0: B2 55 50 AA 31 00 CF 24 57 03 99 22 93 22 C8 28 |.UP.1..$W..".".(| 00001CB0: 55 54 24 AA 55 50 24 2C 32 31 29 3B C9 28 55 50 |UT$.UP$,21);.(UP| 00001CC0: 24 AA 55 47 24 AA C4 28 55 50 29 2C 31 38 29 00 |$.UG$..(UP),18).| 00001CD0: FE 24 5C 03 99 22 20 2D 2D 2D 2D 2D 2D 2D 2D 2D |.$\.." ---------| 00001CE0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 00001CF0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 00 0D |-------------"..| 00001D00: 25 60 03 8B 55 48 B3 B1 30 A7 38 37 30 00 41 25 |%`..UH..0.870.A%| 00001D10: 61 03 99 C8 28 55 44 24 2C 32 34 29 3B C8 28 55 |a...(UD$,24);.(U| 00001D20: 50 24 2C 37 29 3B 22 48 45 4C 50 20 2D 20 50 52 |P$,7);"HELP - PR| 00001D30: 45 53 53 20 20 20 48 20 3C 52 45 54 55 52 4E 3E |ESS H <RETURN>| 00001D40: 22 00 52 25 66 03 55 48 B2 30 3A 99 22 13 11 22 |".R%f.UH.0:.".."| 00001D50: 3A 8E 00 71 25 6B 03 8F 20 2A 2A 20 50 4C 45 41 |:..q%k.. ** PLEA| 00001D60: 53 45 20 57 41 49 54 20 52 45 4D 41 52 4B 20 2A |SE WAIT REMARK *| 00001D70: 2A 00 A7 25 70 03 99 C8 28 55 44 24 2C 32 34 29 |*..%p...(UD$,24)| 00001D80: 3B 22 20 20 20 20 20 20 20 20 20 20 20 4F 4E 45 |;" ONE| 00001D90: 20 4D 4F 4D 45 4E 54 20 50 4C 45 41 53 45 2E 2E | MOMENT PLEASE..| 00001DA0: 2E 20 20 20 20 20 22 00 AD 25 75 03 8E 00 CA 25 |. "..%u....%| 00001DB0: 84 03 8F 20 2A 2A 20 53 45 54 20 55 50 20 56 41 |... ** SET UP VA| 00001DC0: 52 49 41 42 4C 45 53 20 2A 2A 00 15 26 85 03 55 |RIABLES **..&..U| 00001DD0: 58 24 B2 22 48 22 3A 86 55 51 25 28 31 30 30 30 |X$."H":.UQ%(1000| 00001DE0: 29 3A 55 42 B2 33 32 37 36 38 3A 55 31 B2 31 39 |):UB.32768:U1.19| 00001DF0: 36 3A 55 32 B2 31 39 37 3A 55 33 B2 31 39 38 3A |6:U2.197:U3.198:| 00001E00: 55 34 B2 32 31 36 3A 55 43 B2 31 36 37 3A 55 55 |U4.216:UC.167:UU| 00001E10: B2 31 30 32 34 00 53 26 86 03 55 54 B2 35 39 34 |.1024.S&..UT.594| 00001E20: 36 38 3A 55 55 25 B2 31 32 3A 55 4C 25 B2 31 34 |68:UU%.12:UL%.14| 00001E30: 3A 55 50 25 B2 31 31 34 36 3A 55 4D B2 33 32 37 |:UP%.1146:UM.327| 00001E40: 36 38 3A 55 4F B2 31 35 38 3A 97 20 35 30 30 30 |68:UO.158:. 5000| 00001E50: 33 2C 30 00 96 26 87 03 8B C2 28 35 30 30 30 33 |3,0..&....(50003| 00001E60: 29 B2 30 A7 55 42 B2 31 30 32 34 3A 55 31 B2 32 |).0.UB.1024:U1.2| 00001E70: 30 39 3A 55 32 B2 32 31 30 3A 55 33 B2 32 31 31 |09:U2.210:U3.211| 00001E80: 3A 55 34 B2 32 31 34 3A 55 43 B2 32 30 34 3A 55 |:U4.214:UC.204:U| 00001E90: 55 B2 32 30 34 38 00 D5 26 88 03 8B C2 28 35 30 |U.2048..&....(50| 00001EA0: 30 30 33 29 B2 30 A7 55 54 B2 35 33 32 37 32 3A |003).0.UT.53272:| 00001EB0: 55 55 25 B2 32 31 3A 55 4C 25 B2 32 33 3A 55 50 |UU%.21:UL%.23:UP| 00001EC0: 25 B2 32 31 33 39 3A 55 4D B2 31 30 32 34 3A 55 |%.2139:UM.1024:U| 00001ED0: 4F B2 31 39 38 00 F9 26 89 03 55 44 24 B2 22 13 |O.198..&..UD$.".| 00001EE0: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................| 00001EF0: 11 11 11 11 11 11 11 11 22 00 2B 27 8A 03 55 50 |........".+'..UP| 00001F00: 24 B2 22 20 20 20 20 20 20 20 20 20 20 20 20 20 |$." | 00001F10: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00001F20: 20 20 20 20 20 20 20 20 20 20 22 00 79 27 8B 03 | ".y'..| 00001F30: 55 54 24 B2 22 20 C4 C9 D3 CB A0 C3 CF CD CD C1 |UT$." ..........| 00001F40: CE C4 D3 A0 A0 A0 A0 A0 22 3A 8F 20 50 4C 41 43 |........":. PLAC| 00001F50: 45 20 50 52 4F 47 52 41 4D 20 54 49 54 4C 45 20 |E PROGRAM TITLE | 00001F60: 48 45 52 45 20 21 21 21 21 21 21 21 21 21 21 21 |HERE !!!!!!!!!!!| 00001F70: 21 21 21 21 21 21 2A 2A 2A 00 7F 27 8C 03 8E 00 |!!!!!!***..'....| 00001F80: 99 27 8E 03 8F 20 2A 2A 20 53 45 54 20 56 41 52 |.'... ** SET VAR| 00001F90: 49 41 42 4C 45 53 20 2A 2A 00 A2 27 93 03 8D 39 |IABLES **..'...9| 00001FA0: 30 30 00 BF 27 94 03 86 20 53 59 4E 24 28 31 32 |00..'... SYN$(12| 00001FB0: 2C 33 29 2C 53 45 4E 54 24 28 31 32 2C 35 29 00 |,3),SENT$(12,5).| 00001FC0: DA 27 98 03 8F 20 2A 2A 20 43 48 45 43 4B 20 46 |.'... ** CHECK F| 00001FD0: 4F 52 20 38 30 33 32 20 2A 2A 00 F8 27 9D 03 99 |OR 8032 **..'...| 00001FE0: 22 93 22 3A 99 22 A0 22 3A 8F 20 53 48 49 46 54 |".":.".":. SHIFT| 00001FF0: 45 44 20 53 50 41 43 45 00 0F 28 A2 03 8B C2 28 |ED SPACE..(....(| 00002000: 55 42 AA 34 30 29 B3 B1 39 36 A7 8D 37 30 30 00 |UB.40)..96..700.| 00002010: 28 28 A3 03 8F 20 2A 2A 20 4D 45 4D 4F 52 59 20 |((... ** MEMORY | 00002020: 43 48 45 43 4B 20 2A 2A 00 3C 28 A4 03 8B 20 B8 |CHECK **.<(... .| 00002030: 28 30 29 B1 32 30 30 30 A7 39 33 37 00 6A 28 A5 |(0).2000.937.j(.| 00002040: 03 99 22 93 11 11 05 54 48 49 53 20 4D 41 43 48 |.."....THIS MACH| 00002050: 49 4E 45 20 44 4F 45 53 20 4E 4F 54 20 48 41 56 |INE DOES NOT HAV| 00002060: 45 20 45 4E 4F 55 47 48 11 22 00 8E 28 A6 03 99 |E ENOUGH."..(...| 00002070: 22 4D 45 4D 4F 52 59 20 54 4F 20 52 55 4E 20 54 |"MEMORY TO RUN T| 00002080: 48 49 53 20 50 52 4F 47 52 41 4D 20 21 22 00 99 |HIS PROGRAM !"..| 00002090: 28 A7 03 9E 55 55 AA 37 31 00 9F 28 A8 03 80 00 |(...UU.71..(....| 000020A0: B9 28 A9 03 99 22 93 05 22 3A 8B C2 28 35 30 30 |.(..."..":..(500| 000020B0: 30 33 29 B2 30 A7 39 36 32 00 E8 28 AC 03 8F 20 |03).0.962..(... | 000020C0: 2A 2A 20 42 41 53 49 43 20 32 2E 30 20 20 4F 52 |** BASIC 2.0 OR| 000020D0: 20 20 34 2E 30 20 20 4F 52 20 20 43 2D 36 34 20 | 4.0 OR C-64 | 000020E0: 53 45 54 55 50 20 2A 2A 00 26 29 AD 03 97 31 30 |SETUP **.&)...10| 000020F0: 37 35 2C 31 33 33 3A 97 31 30 37 36 2C 31 34 34 |75,133:.1076,144| 00002100: 3A 97 31 30 37 37 2C 32 33 34 3A 97 31 30 37 39 |:.1077,234:.1079| 00002110: 2C 34 3A 97 31 30 38 30 2C 31 33 33 3A 97 31 30 |,4:.1080,133:.10| 00002120: 38 31 2C 31 34 35 00 5C 29 AE 03 97 31 30 39 31 |81,145.\)...1091| 00002130: 2C 31 35 35 3A 97 31 30 39 38 2C 31 33 33 3A 97 |,155:.1098,133:.| 00002140: 31 30 39 39 2C 31 34 34 3A 97 31 31 30 30 2C 32 |1099,144:.1100,2| 00002150: 33 34 3A 97 31 31 30 33 2C 31 33 33 00 7E 29 AF |34:.1103,133.~).| 00002160: 03 97 31 31 30 34 2C 31 34 35 3A 97 31 31 30 35 |..1104,145:.1105| 00002170: 2C 32 33 34 3A 97 31 30 38 32 2C 32 33 34 00 95 |,234:.1082,234..| 00002180: 29 B1 03 8B C2 28 35 30 30 30 33 29 B3 B1 31 36 |)....(50003)..16| 00002190: 30 A7 39 35 35 00 C4 29 B6 03 97 31 30 39 33 2C |0.955..)...1093,| 000021A0: 38 38 3A 97 31 30 39 34 2C 32 32 38 3A 97 31 30 |88:.1094,228:.10| 000021B0: 39 37 2C 38 35 3A 97 31 31 30 32 2C 32 32 38 3A |97,85:.1102,228:| 000021C0: 89 39 36 35 00 D9 29 BB 03 8B C2 28 35 30 30 30 |.965..)....(5000| 000021D0: 33 29 B3 B1 31 A7 39 39 30 00 08 2A C0 03 97 31 |3)..1.990..*...1| 000021E0: 30 39 33 2C 34 39 3A 97 31 30 39 34 2C 32 33 30 |093,49:.1094,230| 000021F0: 3A 97 31 30 39 37 2C 34 36 3A 97 31 31 30 32 2C |:.1097,46:.1102,| 00002200: 32 33 30 3A 89 39 36 35 00 42 2A C2 03 97 32 30 |230:.965.B*...20| 00002210: 39 39 2C 31 34 31 3A 97 32 31 30 30 2C 32 30 3A |99,141:.2100,20:| 00002220: 97 32 31 30 31 2C 33 3A 97 32 31 30 33 2C 38 3A |.2101,3:.2103,8:| 00002230: 97 32 31 30 34 2C 31 34 31 3A 97 32 31 30 35 2C |.2104,141:.2105,| 00002240: 32 31 00 7E 2A C3 03 97 32 31 30 36 2C 33 3A 97 |21.~*...2106,3:.| 00002250: 32 31 31 35 2C 31 34 35 3A 97 32 31 31 37 2C 35 |2115,145:.2117,5| 00002260: 32 3A 97 32 31 31 38 2C 32 33 34 3A 97 32 31 32 |2:.2118,234:.212| 00002270: 31 2C 34 39 3A 97 32 31 32 32 2C 31 34 31 00 B8 |1,49:.2122,141..| 00002280: 2A C4 03 97 32 31 32 33 2C 32 30 3A 97 32 31 32 |*...2123,20:.212| 00002290: 34 2C 33 3A 97 32 31 32 36 2C 32 33 34 3A 97 32 |4,3:.2126,234:.2| 000022A0: 31 32 37 2C 31 34 31 3A 97 32 31 32 38 2C 32 31 |127,141:.2128,21| 000022B0: 3A 97 32 31 32 39 2C 33 00 D6 2A C5 03 9E 55 55 |:.2129,3..*...UU| 000022C0: AA 34 38 3A 8F 20 44 49 53 41 42 4C 45 20 53 54 |.48:. DISABLE ST| 000022D0: 4F 50 20 4B 45 59 00 E7 2A CA 03 8D 38 30 30 3A |OP KEY..*...800:| 000022E0: 8F 20 54 49 54 4C 45 00 F7 2A D4 03 89 33 30 30 |. TITLE..*...300| 000022F0: 3A 8F 20 4D 45 4E 55 00 28 2B DE 03 99 22 93 54 |:. MENU.(+...".T| 00002300: 48 45 20 50 47 4D 20 57 49 4C 4C 20 4E 4F 54 20 |HE PGM WILL NOT | 00002310: 57 4F 52 4B 20 4F 4E 20 54 48 49 53 20 4D 41 43 |WORK ON THIS MAC| 00002320: 48 49 4E 45 21 22 3A 80 00 5D 2B E8 03 8B 55 5A |HINE!":..]+...UZ| 00002330: B2 31 A7 9E 55 50 25 3A 9E 55 50 25 3A 55 5A B2 |.1..UP%:.UP%:UZ.| 00002340: 30 3A 8F 20 2A 2A 20 50 52 4F 47 52 41 4D 20 53 |0:. ** PROGRAM S| 00002350: 54 41 52 54 53 20 48 45 52 45 20 2A 2A 00 89 2B |TARTS HERE **..+| 00002360: E9 03 99 22 93 05 22 3B 3A 8C 3A 8B C2 28 35 30 |..."..";:.:..(50| 00002370: 30 30 33 29 B2 30 A7 97 35 33 32 38 31 2C 36 3A |003).0..53281,6:| 00002380: 97 35 33 32 38 30 2C 31 34 00 AB 2B ED 03 8F 20 |.53280,14..+... | 00002390: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 000023A0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 CA 2B F2 03 |-----------..+..| 000023B0: 8F 20 57 52 49 54 54 45 4E 20 42 59 3A 20 4A 2E |. WRITTEN BY: J.| 000023C0: 20 4D 2E 20 53 49 53 53 4F 4E 00 E7 2B F3 03 8F | M. SISSON..+...| 000023D0: 20 42 52 41 4E 54 46 4F 52 44 2C 4F 4E 54 2E 2C | BRANTFORD,ONT.,| 000023E0: 43 41 4E 41 44 41 2E 00 F5 2B F4 03 8F 20 4E 33 |CANADA...+... N3| 000023F0: 52 20 32 43 35 00 12 2C F5 03 8F 20 53 54 55 44 |R 2C5..,... STUD| 00002400: 45 4E 54 20 4F 46 20 42 2E 43 2E 49 2E 26 56 2E |ENT OF B.C.I.&V.| 00002410: 53 2E 00 30 2C F6 03 8F 20 52 45 56 49 53 45 44 |S..0,... REVISED| 00002420: 20 42 59 20 4A 2E 20 4D 2E 20 53 49 53 53 4F 4E | BY J. M. SISSON| 00002430: 00 52 2C F7 03 8F 20 2D 2D 2D 2D 2D 2D 2D 2D 2D |.R,... ---------| 00002440: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 00002450: 2D 2D 00 58 2C FC 03 8F 00 5E 2C 1A 04 3A 00 64 |--.X,....^,..:.d| 00002460: 2C 24 04 3A 00 73 2C 2E 04 97 20 35 39 35 30 30 |,$.:.s,... 59500| 00002470: 2C 31 34 00 8A 2C 38 04 99 22 93 11 11 11 11 11 |,14..,8.."......| 00002480: 11 22 3A 97 55 54 2C 55 4C 25 00 B3 2C 42 04 99 |.":.UT,UL%..,B..| 00002490: 22 20 20 20 20 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 |" ...........| 000024A0: A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 |................| 000024B0: A4 A4 22 00 DD 2C 4C 04 99 22 20 20 20 20 12 D7 |.."..,L.." ..| 000024C0: 4F 52 4B 49 4E 47 20 D7 49 54 48 20 D4 48 45 20 |ORKING .ITH .HE | 000024D0: C4 49 53 4B 20 D3 59 53 54 45 4D 20 22 00 15 2D |.ISK .YSTEM "..-| 000024E0: 56 04 99 22 11 11 11 11 11 11 11 11 11 20 20 20 |V.."......... | 000024F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00002500: 20 20 20 20 20 20 20 20 20 20 CA 2E CD 2E D3 49 | .....I| 00002510: 53 53 4F 4E 22 00 45 2D 60 04 99 22 20 20 20 20 |SSON".E-`.." | 00002520: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00002530: 20 20 20 20 20 20 20 20 20 20 20 38 31 2D 31 31 | 81-11| 00002540: 2D 32 35 20 22 00 4F 2D 6A 04 8D 20 38 33 35 00 |-25 ".O-j.. 835.| 00002550: 7F 2D 74 04 99 22 93 11 11 11 11 11 11 11 11 11 |.-t.."..........| 00002560: 11 11 11 20 20 20 20 20 20 20 20 20 20 20 20 20 |... | 00002570: D2 45 41 44 49 4E 47 20 C4 41 54 41 20 21 22 00 |.EADING .ATA !".| 00002580: 89 2D 7E 04 8D 20 33 39 39 00 8F 2D 5A 05 20 00 |.-~.. 399..-Z. .| 00002590: AF 2D 64 05 8F 20 52 45 41 44 49 4E 47 20 41 4E |.-d.. READING AN| 000025A0: 44 20 50 52 49 4E 54 49 4E 47 20 44 41 54 41 00 |D PRINTING DATA.| 000025B0: C0 2D 6E 05 81 20 44 20 B2 20 31 20 A4 20 31 32 |.-n.. D . 1 . 12| 000025C0: 00 D0 2D 78 05 81 20 47 20 B2 20 31 20 A4 20 33 |..-x.. G . 1 . 3| 000025D0: 00 E0 2D 82 05 87 20 53 59 4E 24 28 44 2C 47 29 |..-... SYN$(D,G)| 000025E0: 00 E6 2D 8C 05 82 00 EC 2D 96 05 82 00 FD 2D A0 |..-.....-.....-.| 000025F0: 05 81 20 50 20 B2 20 31 20 A4 20 31 32 00 0D 2E |.. P . 1 . 12...| 00002600: AA 05 81 20 45 20 B2 20 31 20 A4 20 35 00 1E 2E |... E . 1 . 5...| 00002610: B4 05 87 20 53 45 4E 54 24 28 50 2C 45 29 00 24 |... SENT$(P,E).$| 00002620: 2E BE 05 82 00 2A 2E C8 05 82 00 30 2E D2 05 8C |.....*.....0....| 00002630: 00 53 2E DC 05 8F 20 2A 2A 2A 20 50 52 49 4E 54 |.S.... *** PRINT| 00002640: 4F 55 54 20 49 4E 46 4F 52 4D 41 54 49 4F 4E 20 |OUT INFORMATION | 00002650: 2A 2A 2A 00 6A 2E E1 05 55 47 24 B2 22 20 20 20 |***.j...UG$." | 00002660: 20 20 20 D0 41 47 45 20 23 22 00 70 2E E6 05 3A | .AGE #".p...:| 00002670: 00 81 2E F0 05 81 20 49 20 B2 20 31 20 A4 20 31 |...... I . 1 . 1| 00002680: 32 00 91 2E F5 05 55 50 B2 49 AB 31 3A 8D 38 35 |2.....UP.I.1:.85| 00002690: 30 00 AA 2E FA 05 99 22 11 20 12 22 3B 53 59 4E |0......". .";SYN| 000026A0: 24 28 49 2C 31 29 3B 22 92 22 00 B0 2E 04 06 3A |$(I,1);".".....:| 000026B0: 00 C0 2E 0E 06 81 20 4A 20 B2 20 31 20 A4 20 35 |...... J . 1 . 5| 000026C0: 00 D5 2E 18 06 99 22 11 20 22 3B 53 45 4E 54 24 |......". ";SENT$| 000026D0: 28 49 2C 4A 29 00 DC 2E 22 06 82 4A 00 EE 2E 2C |(I,J)..."..J...,| 000026E0: 06 99 22 11 20 D3 D9 CE D4 C1 D8 20 3A 22 00 0E |..". ...... :"..| 000026F0: 2F 36 06 99 22 11 20 C4 CF D3 20 28 3E 29 20 20 |/6..". ... (>) | 00002700: 20 3D 20 22 3B 53 59 4E 24 28 49 2C 33 29 00 2E | = ";SYN$(I,3)..| 00002710: 2F 40 06 99 22 11 20 C2 C1 D3 C9 C3 20 34 2E 30 |/@..". ..... 4.0| 00002720: 20 3D 20 22 3B 53 59 4E 24 28 49 2C 32 29 00 37 | = ";SYN$(I,2).7| 00002730: 2F 4A 06 8D 38 33 35 00 3D 2F 5E 06 82 00 43 2F |/J..835.=/^...C/| 00002740: 86 06 3A 00 52 2F 9F 06 55 50 B2 31 32 3A 8D 38 |..:.R/..UP.12:.8| 00002750: 35 30 00 88 2F A4 06 99 22 11 11 11 11 11 11 11 |50../...".......| 00002760: 11 11 11 11 20 20 20 20 C8 4F 50 45 20 59 4F 55 |.... .OPE YOU| 00002770: 20 48 41 56 45 20 4C 45 41 52 4E 45 44 20 53 4F | HAVE LEARNED SO| 00002780: 4D 45 54 48 49 4E 47 22 00 91 2F AE 06 8D 38 33 |METHING"../...83| 00002790: 35 00 9D 2F B8 06 8F 20 44 45 4C 41 59 00 A3 2F |5../... DELAY../| 000027A0: CC 06 8E 00 BC 2F 08 07 8F 20 2A 2A 2A 2A 2A 2A |...../... ******| 000027B0: 20 44 41 54 41 20 2A 2A 2A 2A 2A 2A 00 D3 2F 12 | DATA ******../.| 000027C0: 07 8F 22 20 C4 41 54 41 20 46 4F 52 20 53 59 4E |.." .ATA FOR SYN| 000027D0: 24 20 22 00 11 30 1C 07 83 20 22 C6 4F 52 4D 41 |$ "..0... ".ORMA| 000027E0: 54 54 49 4E 47 22 2C 22 48 45 41 44 45 52 27 46 |TTING","HEADER'F| 000027F0: 4E 27 2C 44 28 44 52 29 2C 49 28 58 58 29 22 2C |N',D(DR),I(XX)",| 00002800: 22 3E 4E 28 44 52 29 3A 46 4E 2C 49 28 58 58 29 |">N(DR):FN,I(XX)| 00002810: 22 00 44 30 26 07 83 20 22 C9 4E 49 54 49 41 4C |".D0&.. ".NITIAL| 00002820: 49 5A 49 4E 47 22 2C 22 C4 4F 4E 45 20 C1 55 54 |IZING",".ONE .UT| 00002830: 4F 4D 41 54 49 43 41 4C 4C 59 22 2C 22 3E 49 28 |OMATICALLY",">I(| 00002840: 44 52 29 22 00 8E 30 30 07 83 20 22 C4 49 52 45 |DR)"..00.. ".IRE| 00002850: 43 54 4F 52 59 22 2C 22 44 49 52 45 43 54 4F 52 |CTORY","DIRECTOR| 00002860: 59 20 44 28 44 52 29 20 4F 52 20 20 20 20 20 20 |Y D(DR) OR | 00002870: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00002880: 43 41 54 41 4C 4F 47 20 44 28 44 52 29 22 00 9C |CATALOG D(DR)"..| 00002890: 30 3A 07 83 22 3E 24 28 44 52 29 22 00 C5 30 44 |0:..">$(DR)"..0D| 000028A0: 07 83 20 22 D6 41 4C 49 44 41 54 45 22 2C 22 43 |.. ".ALIDATE","C| 000028B0: 4F 4C 4C 45 43 54 44 28 44 52 29 22 2C 22 3E 56 |OLLECTD(DR)",">V| 000028C0: 28 44 52 29 22 00 F7 30 4E 07 83 20 22 D3 43 52 |(DR)"..0N.. ".CR| 000028D0: 41 54 43 48 22 2C 22 53 43 52 41 54 43 48 44 28 |ATCH","SCRATCHD(| 000028E0: 44 52 29 2C 27 46 4E 27 22 2C 22 3E 53 28 44 52 |DR),'FN'",">S(DR| 000028F0: 29 3A 27 46 4E 27 22 00 3D 31 58 07 83 20 22 D2 |):'FN'".=1X.. ".| 00002900: 45 4E 41 4D 45 22 2C 22 52 45 4E 41 4D 45 44 28 |ENAME","RENAMED(| 00002910: 44 52 29 2C 27 4F 46 4E 27 20 54 4F 20 27 4E 46 |DR),'OFN' TO 'NF| 00002920: 4E 27 22 2C 22 3E 52 28 44 52 29 3A 27 4E 46 4E |N'",">R(DR):'NFN| 00002930: 27 3D 28 44 52 29 3A 27 4F 46 4E 27 22 00 56 31 |'=(DR):'OFN'".V1| 00002940: 62 07 83 20 22 C3 4F 50 59 20 D3 49 4E 47 4C 45 |b.. ".OPY .INGLE| 00002950: 20 46 49 4C 45 22 00 91 31 6C 07 83 22 43 4F 50 | FILE"..1l.."COP| 00002960: 59 20 44 28 53 44 52 29 2C 27 53 46 4E 27 20 54 |Y D(SDR),'SFN' T| 00002970: 4F 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |O | 00002980: 20 20 20 20 20 44 28 44 52 29 2C 27 44 46 4E 27 | D(DR),'DFN'| 00002990: 22 00 AE 31 76 07 83 22 3E 43 28 44 44 52 29 3A |"..1v..">C(DDR):| 000029A0: 44 46 4E 3D 28 53 44 52 29 3A 53 46 4E 22 00 E7 |DFN=(SDR):SFN"..| 000029B0: 31 80 07 83 20 22 C3 4F 50 59 20 C1 CC CC 22 2C |1... ".OPY ...",| 000029C0: 22 43 4F 50 59 20 44 28 53 44 52 29 20 54 4F 20 |"COPY D(SDR) TO | 000029D0: 44 28 44 44 52 29 22 2C 22 3E 43 28 53 44 52 29 |D(DDR)",">C(SDR)| 000029E0: 3D 28 44 44 52 29 22 00 2C 32 8A 07 83 22 C3 4F |=(DDR)".,2...".O| 000029F0: 4E 43 41 54 22 2C 22 43 4F 4E 43 41 54 44 28 53 |NCAT","CONCATD(S| 00002A00: 44 52 29 2C 27 53 46 4E 27 20 54 4F 20 20 20 20 |DR),'SFN' TO | 00002A10: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 44 | D| 00002A20: 28 44 44 52 29 2C 27 44 46 4E 27 22 00 44 32 94 |(DDR),'DFN'".D2.| 00002A30: 07 83 22 CE 4F 20 D3 55 43 48 A0 C6 55 4E 43 54 |..".O .UCH..UNCT| 00002A40: 49 4F 4E 22 00 7E 32 9E 07 83 22 C2 41 43 4B 55 |ION".~2...".ACKU| 00002A50: 50 22 2C 22 42 41 43 4B 55 50 44 28 53 44 52 29 |P","BACKUPD(SDR)| 00002A60: 20 54 4F 20 44 28 44 44 52 29 22 2C 22 CE 4F 20 | TO D(DDR)",".O | 00002A70: D3 55 43 48 20 C6 55 4E 43 54 49 4F 4E 22 00 A9 |.UCH .UNCTION"..| 00002A80: 32 A8 07 83 22 CC 4F 41 44 20 41 20 46 49 4C 45 |2...".OAD A FILE| 00002A90: 22 2C 22 44 4C 4F 41 44 27 46 4E 27 2C 44 28 44 |","DLOAD'FN',D(D| 00002AA0: 52 29 22 2C 22 2F 46 4E 22 00 DB 32 B2 07 83 22 |R)","/FN"..2..."| 00002AB0: CC 4F 41 44 20 26 20 D2 55 4E 20 41 20 46 49 4C |.OAD & .UN A FIL| 00002AC0: 45 22 2C 22 CE 4F 20 D3 55 43 48 20 C6 55 4E 43 |E",".O .UCH .UNC| 00002AD0: 54 49 4F 4E 22 2C 22 5E 46 4E 22 00 F3 32 BC 07 |TION","^FN"..2..| 00002AE0: 8F 22 44 41 54 41 20 46 4F 52 20 53 45 4E 54 24 |."DATA FOR SENT$| 00002AF0: 20 20 22 00 21 33 C6 07 83 22 D4 48 49 53 20 45 | ".!3...".HIS E| 00002B00: 52 41 53 45 53 20 41 4C 4C 20 50 52 4F 47 52 41 |RASES ALL PROGRA| 00002B10: 4D 53 20 4F 46 46 20 54 48 45 20 44 49 53 4B 2E |MS OFF THE DISK.| 00002B20: 22 00 48 33 D0 07 83 22 41 4E 44 20 53 45 54 53 |".H3..."AND SETS| 00002B30: 20 49 54 20 55 50 20 52 45 41 44 59 20 46 4F 52 | IT UP READY FOR| 00002B40: 20 55 53 45 2E 20 20 22 00 71 33 DA 07 83 22 CE | USE. ".q3...".| 00002B50: CF D4 C5 3A 20 54 48 45 20 46 4F 52 4D 41 54 54 |...: THE FORMATT| 00002B60: 45 44 20 44 49 53 4B 53 20 41 52 45 20 4E 4F 54 |ED DISKS ARE NOT| 00002B70: 22 00 A3 33 E4 07 83 22 49 4E 54 45 52 43 48 41 |"..3..."INTERCHA| 00002B80: 4E 47 45 41 42 4C 45 20 57 49 54 48 20 52 45 47 |NGEABLE WITH REG| 00002B90: 41 52 44 53 20 54 4F 22 2C 22 D3 C1 D6 C5 49 4E |ARDS TO","....IN| 00002BA0: 47 2E 22 00 CD 33 EE 07 83 22 D4 48 49 53 20 53 |G."..3...".HIS S| 00002BB0: 45 54 53 20 54 48 45 20 44 45 56 49 43 45 20 55 |ETS THE DEVICE U| 00002BC0: 50 2C 20 52 45 41 44 59 20 46 4F 52 22 00 F8 33 |P, READY FOR"..3| 00002BD0: F8 07 83 22 55 53 45 2E 20 D7 49 54 48 20 54 48 |..."USE. .ITH TH| 00002BE0: 45 20 4E 45 57 20 44 49 53 4B 20 4C 41 4E 47 55 |E NEW DISK LANGU| 00002BF0: 41 47 45 20 54 48 45 22 00 20 34 02 08 83 22 44 |AGE THE". 4..."D| 00002C00: 45 56 49 43 45 20 48 41 53 20 42 45 43 4F 4D 45 |EVICE HAS BECOME| 00002C10: 20 41 4E 20 49 4E 54 45 4C 4C 49 47 45 4E 54 22 | AN INTELLIGENT"| 00002C20: 00 51 34 0C 08 83 22 53 59 53 54 45 4D 20 53 4F |.Q4..."SYSTEM SO| 00002C30: 20 54 48 49 53 20 49 53 20 44 4F 4E 45 20 41 55 | THIS IS DONE AU| 00002C40: 54 4F 4D 41 54 49 43 41 4C 59 20 21 20 22 2C 22 |TOMATICALY ! ","| 00002C50: 22 00 7F 34 16 08 83 22 C7 49 56 45 53 20 59 4F |"..4...".IVES YO| 00002C60: 55 20 41 20 4C 49 53 54 20 4F 46 20 49 4E 46 4F |U A LIST OF INFO| 00002C70: 52 4D 41 54 49 4F 4E 20 4F 4E 20 54 48 45 22 00 |RMATION ON THE".| 00002C80: A7 34 20 08 83 22 44 49 53 4B 2E 20 C9 54 20 54 |.4 .."DISK. .T T| 00002C90: 45 4C 4C 53 20 59 4F 55 20 20 20 20 46 49 4C 45 |ELLS YOU FILE| 00002CA0: 20 4E 41 4D 45 53 22 00 D1 34 2A 08 83 22 20 20 | NAMES"..4*.." | 00002CB0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00002CC0: 20 20 20 20 54 59 50 45 20 4F 46 20 46 49 4C 45 | TYPE OF FILE| 00002CD0: 22 00 01 35 34 08 83 22 20 20 20 20 20 20 20 20 |"..54.." | 00002CE0: 20 54 48 45 20 23 20 4F 46 20 42 4C 4F 43 4B 53 | THE # OF BLOCKS| 00002CF0: 20 4F 46 20 45 41 43 48 20 46 49 4C 45 22 2C 22 | OF EACH FILE","| 00002D00: 22 00 30 35 3E 08 83 22 D2 45 43 4F 4E 53 54 52 |".05>..".ECONSTR| 00002D10: 55 43 54 53 20 54 48 45 20 12 C2 92 4C 4F 43 4B |UCTS THE ...LOCK| 00002D20: 20 12 C1 92 56 41 49 4C 49 42 49 4C 49 54 59 22 | ...VAILIBILITY"| 00002D30: 00 5E 35 48 08 83 22 12 CD 92 41 50 2E 20 C9 54 |.^5H.."...AP. .T| 00002D40: 20 49 53 20 55 53 45 44 20 54 4F 20 43 4F 52 52 | IS USED TO CORR| 00002D50: 45 43 54 20 50 52 4F 42 4C 45 4D 53 2E 22 00 8C |ECT PROBLEMS."..| 00002D60: 35 52 08 83 22 D0 52 4F 42 4C 45 4D 53 20 41 52 |5R..".ROBLEMS AR| 00002D70: 45 20 49 44 45 4E 54 49 46 49 45 44 20 42 59 20 |E IDENTIFIED BY | 00002D80: 41 4E 20 41 53 54 45 52 49 53 4B 22 00 B7 35 5C |AN ASTERISK"..5\| 00002D90: 08 83 22 57 48 49 43 48 20 41 50 50 45 41 52 53 |.."WHICH APPEARS| 00002DA0: 20 4C 45 46 54 20 4F 46 20 54 48 45 20 46 49 4C | LEFT OF THE FIL| 00002DB0: 45 20 54 59 50 45 22 00 DF 35 66 08 83 22 43 4F |E TYPE"..5f.."CO| 00002DC0: 4C 55 4D 4E 20 28 41 54 20 54 48 45 20 41 52 45 |LUMN (AT THE ARE| 00002DD0: 41 20 4F 46 20 50 52 4F 42 4C 45 4D 53 29 22 00 |A OF PROBLEMS)".| 00002DE0: 0A 36 70 08 83 22 D2 45 4D 4F 56 45 53 20 41 20 |.6p..".EMOVES A | 00002DF0: 46 49 4C 45 20 4F 52 20 41 20 53 45 52 49 45 53 |FILE OR A SERIES| 00002E00: 20 4F 46 20 46 49 4C 45 53 22 00 32 36 7A 08 83 | OF FILES".26z..| 00002E10: 22 4F 46 46 20 54 48 45 20 44 49 53 4B 2E 20 C2 |"OFF THE DISK. .| 00002E20: C5 D7 C1 D2 C5 20 49 46 20 4E 4F 20 46 4E 20 49 |..... IF NO FN I| 00002E30: 53 22 00 5C 36 84 08 83 22 53 54 41 54 45 44 20 |S".\6..."STATED | 00002E40: 49 54 20 57 49 4C 4C 20 45 52 41 53 45 20 41 4C |IT WILL ERASE AL| 00002E50: 4C 20 50 52 4F 47 52 41 4D 53 2E 22 00 86 36 8E |L PROGRAMS."..6.| 00002E60: 08 83 22 C2 C1 D3 C9 C3 20 34 2E 30 20 43 48 45 |.."..... 4.0 CHE| 00002E70: 43 4B 53 20 54 4F 20 53 45 45 20 49 46 20 59 4F |CKS TO SEE IF YO| 00002E80: 55 20 41 52 45 22 00 B0 36 98 08 83 22 53 55 52 |U ARE"..6..."SUR| 00002E90: 45 3B 49 46 20 27 59 27 20 49 53 20 4E 4F 54 20 |E;IF 'Y' IS NOT | 00002EA0: 55 53 45 44 20 49 54 20 41 42 4F 52 54 53 2E 22 |USED IT ABORTS."| 00002EB0: 00 DE 36 A2 08 83 22 C1 4C 4C 4F 57 53 20 54 48 |..6...".LLOWS TH| 00002EC0: 45 20 55 53 45 52 20 54 4F 20 D2 45 4E 41 4D 45 |E USER TO .ENAME| 00002ED0: 20 41 20 46 49 4C 45 20 57 49 54 48 20 22 00 F9 | A FILE WITH "..| 00002EE0: 36 AC 08 83 22 41 20 4E 45 57 20 4E 41 4D 45 22 |6..."A NEW NAME"| 00002EF0: 2C 22 22 2C 22 22 2C 22 22 00 24 37 B6 08 83 22 |,"","","".$7..."| 00002F00: CD 41 4B 45 53 20 41 4E 20 45 58 41 43 54 20 43 |.AKES AN EXACT C| 00002F10: 4F 50 59 20 4F 46 20 4F 4E 45 20 50 52 4F 47 52 |OPY OF ONE PROGR| 00002F20: 41 4D 2C 22 00 5B 37 C0 08 83 22 54 41 4B 49 4E |AM,".[7..."TAKIN| 00002F30: 47 20 49 54 20 46 52 4F 4D 20 4F 4E 45 20 44 52 |G IT FROM ONE DR| 00002F40: 49 56 45 20 54 4F 20 54 48 45 20 4F 54 48 45 52 |IVE TO THE OTHER| 00002F50: 2E 22 2C 22 22 2C 22 22 2C 22 22 00 84 37 CA 08 |.","","",""..7..| 00002F60: 83 22 C3 4F 50 49 45 53 20 41 4C 4C 20 46 49 4C |.".OPIES ALL FIL| 00002F70: 45 53 20 46 52 4F 4D 20 4F 4E 45 20 44 49 53 4B |ES FROM ONE DISK| 00002F80: 20 54 4F 22 00 A4 37 D4 08 83 22 41 4E 4F 54 48 | TO"..7..."ANOTH| 00002F90: 45 52 2E 20 C3 4F 4E 53 49 53 54 49 4E 47 20 4F |ER. .ONSISTING O| 00002FA0: 46 20 3A 22 00 B3 37 DE 08 83 22 20 20 20 4E 41 |F :"..7..." NA| 00002FB0: 4D 45 22 00 C3 37 E8 08 83 22 20 20 20 46 49 4C |ME"..7..." FIL| 00002FC0: 45 53 22 00 D7 37 F2 08 83 22 20 20 20 53 45 43 |ES"..7..." SEC| 00002FD0: 54 4F 52 49 4E 47 22 00 03 38 FC 08 83 22 D4 48 |TORING"..8...".H| 00002FE0: 49 53 20 57 49 4C 4C 20 4D 45 52 47 45 20 4F 4E |IS WILL MERGE ON| 00002FF0: 45 20 46 49 4C 45 20 54 4F 20 41 4E 4F 54 48 45 |E FILE TO ANOTHE| 00003000: 52 2E 22 00 14 38 06 09 83 22 22 2C 22 22 2C 22 |R."..8..."","","| 00003010: 22 2C 22 22 00 3D 38 10 09 83 22 D4 48 49 53 20 |","".=8...".HIS | 00003020: 41 4C 4C 4F 57 53 20 54 48 45 20 55 53 45 52 20 |ALLOWS THE USER | 00003030: 54 4F 20 4D 41 4B 45 20 41 4E 20 20 22 00 5B 38 |TO MAKE AN ".[8| 00003040: 1A 09 83 22 45 58 41 43 54 20 43 4F 50 59 20 4F |..."EXACT COPY O| 00003050: 46 20 41 20 44 49 53 4B 20 2E 22 00 69 38 24 09 |F A DISK .".i8$.| 00003060: 83 22 22 2C 22 22 2C 22 22 00 97 38 2E 09 83 22 |."","",""..8..."| 00003070: C1 4C 4C 4F 57 53 20 54 48 45 20 55 53 45 52 20 |.LLOWS THE USER | 00003080: 54 4F 20 4C 4F 41 44 20 41 20 50 52 4F 47 52 41 |TO LOAD A PROGRA| 00003090: 4D 20 4F 46 46 20 22 00 B1 38 38 09 83 22 54 48 |M OFF "..88.."TH| 000030A0: 45 20 44 49 53 4B 2E 22 2C 22 22 2C 22 22 2C 22 |E DISK.","","","| 000030B0: 22 00 DE 38 42 09 83 22 D4 48 49 53 20 41 4C 4C |"..8B..".HIS ALL| 000030C0: 4F 57 53 20 54 48 45 20 55 53 45 52 20 54 4F 20 |OWS THE USER TO | 000030D0: CC 4F 41 44 20 41 4E 44 20 D2 55 4E 20 22 00 01 |.OAD AND .UN "..| 000030E0: 39 4C 09 83 22 41 20 50 52 4F 47 52 41 4D 20 4F |9L.."A PROGRAM O| 000030F0: 46 20 C4 49 53 4B 2E 22 2C 22 22 2C 22 22 2C 22 |F .ISK.","","","| 00003100: 22 00 1B 39 C4 09 8F 20 2A 2A 2A 20 45 4E 44 20 |"..9... *** END | 00003110: 4F 46 20 44 41 54 41 20 2A 2A 2A 00 00 00 |OF DATA ***... |
.......910.*.... ** ML STOP KEY DISABLE
**.U...."X.=........X` ......L4.X.1.....
...X`.T...."XHHH.H.HHHHHHH.H.HX`111"....
.."HHHHHHH`1"...... ** 4 - POP ML SUBROU
TINE **.H.... **GENERAL INPUT ROUTINE **
.N...:...... ** TO OUR BEST KNOWLEDGE TH
IS...... PROGRAM IS FREE FOR./....
DUPLICATION IN CANADA..L.... IF YOU
HAVE CONTARY.I.... INFORMATION, PLEAS
E...... CONTACT COMMODORE CANADA AND.
..... EVERY EFFORT WILL BE MADE TO.V.
... WITHDRAW COPIES OF THIS......
PROGRAM......:...#.. +++ INPUT SECTION +
++.".(..UO,0:UR$."":UI$."".2.*..UL.0.UL.
80.E.-.." ..";:.UC,0.Y.2..UI$:.UI$."".5
0...7..UI$.G(13).C(UR$)..1..UC,1:." .";:
.85...<..UI$.G(20).105...>.. C(UR$)..UL.
50.O.A..120:. CHECK FOR VALID CHARACTER.
..F.UR$.UR$.UI$...K..UI$;...P..50...U..
+++ CHECK FOR HELP REQUEST +++.>.Z..UR$.
UX$.195:. EXIT TO HELP ROUTINE.M._..UF.1
..240.Z.D.UF.0:.:..S.F.. ++ CHECK DELETE
++...I..C(UR$).1.50...N.UR$.H(UR$,C(UR$
).1)...S..". ..";:.50.U.X.. ++ CHECK FO
R VALID CHARACTERS ++...}..C(US$).0.150.
.....US.1.C(US$)......UI$.J(US$,US,1)...
......"...UI$."":..=.... ** STANDARD INP
UT **.N....F(UI$).46..._....UI$.G(32)...
|. ..F(UI$).48.F(UI$).57.170............
F(UI$).65.F(UI$).90.180.......I....F(UI$
).193.F(UI$).218.UI$."":.......B(UT).UU%
.UI$.G(F(UI$).128):............UI$."":..
$.C.UF.1:. +++ HELP ROUTINE EXIT +++.-.E
..250.6.H..245.U.M..UQ.UB.(U2%.256.U1%.U
3%.2).Q.R.UQ%(UQ.UB).B(UQ):.:."."...W.UZ
.1:UV%.B(UT)...X..300...Y.UZ.0:US$.UJ$:U
G$.UK$:UP.UJ:UL.UK...Z..B(50003).0..5328
1,1:.".";:.53281,6:.53280,14:.220......"
.";."...UT$.UL$:.UT,UV%:.UQ.UB.(U2%.256.
U1%.U3%.3).7....UQ,UQ%(UQ.UB):..C....U1,
U1%.O....U2,U2%.[....U4,U4%.I....U3,U3%.
1.Q....35.....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(U
4).2...UJ$.US$:UK$.UG$:UL$.UT$:UJ.UP:UK.
UL.8.....I.,.. ** MENU **.O.-.:.~...."."
:.UT,UU%:.B(50003).0..53281,9:.53280,8..
./.:...1..". MENU".P.6.."
--------------------------------------"
...;..".. 1. BEGIN DISK COMMANDS
".#.@..".. 2. STUDENT INSTRUCTIO
NS".M.E..".. 3. TEACHER INSTRUCT
IONS".Z.J..".. 4. MODIFICATION O
F PROGRAM"...O..".. 5. QUIT..".E
.T.." ----------------------------------
----"...Y..".. PRESS A NUMBER KEY
(1-5) ";...^.UL.1:US$."12345":.35:. INPU
T ROUTINE.$.`.US$."".E.C..E(UR$).1000,40
0,500,600,396.N.H..300.U.... ** RE-ENABL
E STOP KEY AND END **......B(50003)..1.B
(50003)..160.B(50003)..0.399.N....UU.71:
.B(50003).0..53281,6:.53280,14.Z....".."
:.......875:....... ** STUDENT INSTRUCTI
ONS **.5....".":.UT,UL%:.B(50003).0..532
81,0:.53280,0.[...UH.1:UP.0:UG$."STUDENT
INST":.850......".... THIS PROGRAM
SHOULD HELP YOU"... ..". TO UNDERS
TAND HOW TO USE THE".T....". 4040 D
ISK SYSTEM "......". WITH DOS 2.0 A
ND"......". BASIC 4.0 DISK LANGUAGE
.".K....". (THIS PROGRAM WILL NOT HARM Y
OUR DISK.)".E.... 835:UP.1:UH.1:. 850...
...".... THE PROGRAM WILL GIVE YOU
"......". THE COMMANDS FOR THE DISK
DRIVE,"......". USING THE WEDGE (>
)"......". AND ".'....".
BASIC 4.0 DISK LANGUAGE.".A.... 83
5:UP.2:UH.1:. 850.J...."........
THE PRESENTATION"......". WILL
BE IN THE FOLLOWING"......". MAN
NER ... ".K.... 835:UP.3:UH.1:. 850.....
.". .COMMAND NAME"......"...... TH
E INFORMATION "...B.."..... SYNTAX.4
.D..". DOS 2.0 = ".J.F..". BASIC 4.0 =
".D.H.. 835:UP.4:UH.1:. 850...J.."... N
OTE : TO ADVANCE FROM ONE SCREEN "...L
..". TO THE NEXT PRESS".Y.N..".
THE <SPACE> BAR."...V.. 835:UP.5
:UH.1:. 850...X..".. NOTE : YOU SHOULD
KNOW THE ".D.Z..". FOLLOWING ABB
REVIATIONS!".F....". (DR) : DR
IVE #"......". (DDR) : DESTINAT
ION DRIVE #"......". (SDR) : SO
URCE DRIVE #"......". FN : F
ILE NAME "......". OFN :
OLD FILE NAME ".@....". NFN
: NEW FILE NAME ".Z.... 835:UP.6:
UH.1:. 850......". (XX) : ALPH
A-NUMERIC"......" IDENT
IFICATION"......". '' : NOTE
THE ";G(34);" ";G(34)......"
IS USED MOSTLY"......"
WITH BASIC 4.0".7....835.K....UZ.
1..UP%:.217.Q.....R.... ** TEACHER INSTR
UCTIONS **......".":.UT,UL%:.B(50003).0.
.53281,2:.53280,10.C...UP.0:UG$."TEACHER
INST":.850......".. TO THE BEST OF
OUR KNOWLEDGE,."......" THIS PROGRAM
IS IN THE PUBLIC.".F...." DOMAIN. IF
THIS IS NOT THE CASE.".C...." PLEASE C
ONTACT:..."......" COMMODORE BUSINE
SS MACHINES."......" 3370 PHARM
ACY AVE..T...." AGINCOURT, ONTA
RIO"......" CANADA M1W 2K4"..
...." (416) 499-4292".,...UP.1:
. 835:. 850:.V...." ..PROGRAM NAME:
DISK COMMANDS..|...." WRITTEN BY :
JOHN SISSON.. ...." UPGRADED BY :
..K...." .THIS PROGRAM WILL R
UN ON ANY........" PET 64 COMPUT
ER......" COMMODORE 64 COMPUTER.
.....835.,.N..UZ.1..UP%:.217.2.W...X.X..
** PROGRAM MODIFICATION INST **.I.Y..".
":.UT,UL%...].UP.0:UG$."PROGRAM MOD":.85
0...`..".... MODIFICATION INVOLVES
"...B..". CHANGING THE DATA STATEME
NTS"...D..". IN LINES 1800-2500 ..*
.F..". BUT I SUGGEST LEAVING IT THE
".W.H..". WAY IT IS, SINCE CHANGIN
G DATA".}.J..". CAN LEAD TO PROBLEM
S ! "...L.." ========".
..N.. 835:UP.2:. 850...P..".. BUT I
F YOU MUST, YOU SHOULD"...R..". KNO
W THE # OF DATA STATEMENTS".,.T..".
FOR EACH VARIABLE.".Q.V..". THEY A
RE: SYN$(D,G)".V.X.."
SENT$(P,E)"...Z..". D & P = 12 .
".B.|.." G = 3 . EACH IS DI
MENSIONED"...~.." E = 4 . ".
.....". SO WITH ANY CHANGE IN THE D
ATA,".5....". THESE #'S MUST BE CHA
NGED..J.... 835:UP.3:. 850.V...."....
THE VARIABLE , SENT$(I,J),"......".
(J GOING UP TO 5 & I UP TO 12),".N..
..". ARE FOR THE DATA STATEMENTS"..
....". INVOLVED WITH THE WRITTEN"..
....". SENTENCES OF THE PAGE.".E...
.". SYN$(I,1), IS THE TITLE FOR".K.
...". EACH PAGE, IE. .RENAME.".....
. 835:UP.4:. 850......".... SYN$(I,
2), IS THE SYNTAX FOR".X....". THE
BASIC 4.0 DISK COMMANDS".. ...".. S
YN$(I,3), IS THE SYNTAX FOR"., ...".
THE DOS (>) DISK COMMANDS".X ...".
THE PRINTOUT AREA (1500-1630)".. ..".
MUST BE CHANGED TO MATCH.".. ...83
5.. ...UZ.1..UP%:.217.. ....H ... ** TO
USE 8032 LOAD CBM4032 **.. F..".....BEFO
RE RUNNING THIS PROGRAM ON AN 8032 ...4
!P.." LOAD THE 'CBM 4032' PROGRAM..
...........".?!Z..UU.71.E!....J!... ** T
O USE 8032 LOAD CBM4032 **..!..."....BEF
ORE RUNNING THIS PROGRAM ON AN 8032 ..L
OAD CBM 4032 PROGRAM".A!...1093:...! ..
** 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:.".....";:..S"*..I.1.22:
.".....";:...",.."......................
..... ..."..."................... . .
...."0.."................... . ....."2.
.".................... ..!#4.."........
......C O M M O D O R E...D#6.."........
.......EDUCATIONAL...C#8..".............
...SOFTWARE.~#:.. ** COMMODORE LOGO **..
#;..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.".S$L..UI$:.UI$.." ".
844.Y$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:."..":..Q%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..&..UD$.".................
........".+'..UP$."
".Y'..UT$." DISK COMMA
NDS ":. PLACE PROGRAM TITLE HERE !!!
!!!!!!!!!!!!!!***.'.....'... ** SET VAR
IABLES **..'...900..'... SYN$(12,3),SENT
$(12,5).Z'... ** CHECK FOR 8032 **..'...
".":." ":. SHIFTED SPACE..(...B(UB.40)..
96..700.((... ** MEMORY CHECK **.<(... .
(0).2000.937.J(..."....THIS MACHINE DOES
NOT HAVE ENOUGH."..(..."MEMORY TO RUN T
HIS PROGRAM !"..(...UU.71..(.....(..."..
":.B(50003).0.962..(... ** BASIC 2.0 OR
4.0 OR C-64 SETUP **.&)...1075,133:.
1076,144:.1077,234:.1079,4:.1080,133:.10
81,145.\)...1091,155:.1098,133:.1099,144
:.1100,234:.1103,133.~)...1104,145:.1105
,234:.1082,234..)...B(50003)..160.955.D)
...1093,88:.1094,228:.1097,85:.1102,228:
.965.Y)...B(50003)..1.990..*...1093,49:.
1094,230:.1097,46:.1102,230:.965.B*B..20
99,141:.2100,20:.2101,3:.2103,8:.2104,14
1:.2105,21.~*C..2106,3:.2115,145:.2117,5
2:.2118,234:.2121,49:.2122,141..*D..2123
,20:.2124,3:.2126,234:.2127,141:.2128,21
:.2129,3.V*E..UU.48:. DISABLE STOP KEY..
*J..800:. TITLE..*T..300:. MENU.(+...".T
HE PGM WILL NOT WORK ON THIS MACHINE!":.
.]+...UZ.1..UP%:.UP%:UZ.0:. ** PROGRAM S
TARTS HERE **..+..."..";:.:.B(50003).0..
53281,6:.53280,14..+... ----------------
-----------.J+... WRITTEN BY: J. M. SISS
ON..+... BRANTFORD,ONT.,CANADA...+... N3
R 2C5..,... STUDENT OF B.C.I.&V.S..0,...
REVISED BY J. M. SISSON.R,... ---------
------------------.X,....^,..:.D,$.:.S,.
.. 59500,14..,8..".......":.UT,UL%..,B..
" ............................."..,L.
." .WORKING WITH THE DISK SYSTEM "..-
V..".........
J.M.SISSON".E-`.."
81-11-25 ".O-J.. 835.-T.."..
........... READING DATA !".
.-~.. 399..-Z. ..-D.. READING AND PRINTI
NG DATA..-N.. D . 1 . 12.P-X.. G . 1 . 3
..-... SYN$(D,G)..-.....-.....- .. P . 1
. 12...... E . 1 . 5...... SENT$(P,E).$
.....*.H...0.R...S.... *** PRINTOUT INFO
RMATION ***.J...UG$." PAGE #".P...:
...... I . 1 . 12.....UP.I.1:.850......"
. .";SYN$(I,1);".".....:...... J . 1 . 5
.U....". ";SENT$(I,J)..."..J...,..". SYN
TAX :"../6..". DOS (>) = ";SYN$(I,3)..
/@..". BASIC 4.0 = ";SYN$(I,2).7/J..835.
=/^...C/..:.R/..UP.12:.850../...".......
.... HOPE YOU HAVE LEARNED SOMETHING"
../...835../... DELAY../L..../... ******
DATA ******.S/..." DATA FOR SYN$ "..0..
. "FORMATTING","HEADER'FN',D(DR),I(XX)",
">N(DR):FN,I(XX)".D0&.. "INITIALIZING","
DONE AUTOMATICALLY",">I(DR)"..00.. "DIRE
CTORY","DIRECTORY D(DR) OR
CATALOG D(DR)"..0:..">$(DR)".E0D
.. "VALIDATE","COLLECTD(DR)",">V(DR)"..0
N.. "SCRATCH","SCRATCHD(DR),'FN'",">S(DR
):'FN'".=1X.. "RENAME","RENAMED(DR),'OFN
' TO 'NFN'",">R(DR):'NFN'=(DR):'OFN'".V1
B.. "COPY SINGLE FILE"..1L.."COPY D(SDR)
,'SFN' TO D(DR),'DFN'
"..1V..">C(DDR):DFN=(SDR):SFN"..1... "CO
PY ALL","COPY D(SDR) TO D(DDR)",">C(SDR)
=(DDR)".,2..."CONCAT","CONCATD(SDR),'SFN
' TO D(DDR),'DFN'".D2.
.."NO SUCH FUNCTION".~2..."BACKUP","BACK
UPD(SDR) TO D(DDR)","NO SUCH FUNCTION"..
2..."LOAD A FILE","DLOAD'FN',D(DR)","/FN
"..2..."LOAD & RUN A FILE","NO SUCH FUNC
TION","^FN"..2..."DATA FOR SENT$ ".!3F.
."THIS ERASES ALL PROGRAMS OFF THE DISK.
".H3P.."AND SETS IT UP READY FOR USE. "
.Q3Z.."NOTE: THE FORMATTED DISKS ARE NOT
"..3..."INTERCHANGEABLE WITH REGARDS TO"
,"SAVEING.".M3..."THIS SETS THE DEVICE U
P, READY FOR"..3..."USE. WITH THE NEW DI
SK LANGUAGE THE". 4..."DEVICE HAS BECOME
AN INTELLIGENT".Q4..."SYSTEM SO THIS IS
DONE AUTOMATICALY ! ","".4..."GIVES YO
U A LIST OF INFORMATION ON THE"..4 .."DI
SK. IT TELLS YOU FILE NAMES".Q4*.."
TYPE OF FILE"..54.."
THE # OF BLOCKS OF EACH FILE","
".05>.."RECONSTRUCTS THE .B.LOCK .A.VAIL
IBILITY".^5H..".M.AP. IT IS USED TO CORR
ECT PROBLEMS."..5R.."PROBLEMS ARE IDENTI
FIED BY AN ASTERISK"..5\.."WHICH APPEARS
LEFT OF THE FILE TYPE"..5F.."COLUMN (AT
THE AREA OF PROBLEMS)"..6P.."REMOVES A
FILE OR A SERIES OF FILES".26Z.."OFF THE
DISK. BEWARE IF NO FN IS".\6..."STATED
IT WILL ERASE ALL PROGRAMS."..6..."BASIC
4.0 CHECKS TO SEE IF YOU ARE"..6..."SUR
E;IF 'Y' IS NOT USED IT ABORTS."..6..."A
LLOWS THE USER TO RENAME A FILE WITH "..
6..."A NEW NAME","","","".$7..."MAKES AN
EXACT COPY OF ONE PROGRAM,".[7..."TAKIN
G IT FROM ONE DRIVE TO THE OTHER.","",""
,""..7J.."COPIES ALL FILES FROM ONE DISK
TO"..7T.."ANOTHER. CONSISTING OF :"..7.
.." NAME".C7..." FILES".W7..." SEC
TORING"..8..."THIS WILL MERGE ONE FILE T
O ANOTHER."..8..."","","","".=8..."THIS
ALLOWS THE USER TO MAKE AN ".[8..."EXAC
T COPY OF A DISK .".I8$.."","",""..8..."
ALLOWS THE USER TO LOAD A PROGRAM OFF ".
.88.."THE DISK.","","",""..8B.."THIS ALL
OWS THE USER TO LOAD AND RUN "..9L.."A P
ROGRAM OF DISK.","","",""..9D.. *** END
OF DATA ***...
> CLICK IMAGE PREVIEW FOR FULL MODAL