USING 64 WEDGE.C
FILE INFORMATION
FILENAME(S): USING 64 WEDGE.C
FILE TYPE(S): PRG
FILE SIZE: 9.8K
FIRST SEEN: 2025-10-20 14:30:16
APPEARS ON: 4 disk(s)
FILE HASH
fd47721b3bbcf82d95d9d50f144448f0737a2e38d1357d1cf359a2d446f2e99e
FOUND ON DISKS (4 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| MASTERMMSOFT | USING 64 WEDGE.C | PRG | Treasure Chest - Klaus Der Suhler | 16 | 1 | DOWNLOAD FILE |
| A NWENDER | USING 64 WEDGE.C | PRG | Treasure Chest - Wolfgang Rauprich | 14 | 1 | DOWNLOAD FILE |
| FREESOFT DISK NR | USING 64 WEDGE.C | PRG | Treasure Chest - Wolfgang Rauprich | 14 | 1 | DOWNLOAD FILE |
| TPUG JAN 84 C | USING 64 WEDGE.C | PRG | Sailor, Ganheden | 5 | 1 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 24 08 0A 00 8F 3A 20 50 52 45 50 41 52 45 |..$....: PREPARE|
00000010: 44 20 42 59 20 44 55 4E 43 41 4E 20 4A 20 4D 43 |D BY DUNCAN J MC|
00000020: 52 41 45 2C 00 43 08 14 00 8F 3A 20 57 49 54 48 |RAE,.C....: WITH|
00000030: 20 48 45 4C 50 20 46 52 4F 4D 20 41 52 54 49 43 | HELP FROM ARTIC|
00000040: 4C 45 53 00 66 08 1E 00 8F 3A 20 57 52 49 54 54 |LES.f....: WRITT|
00000050: 45 4E 20 42 59 20 4A 49 4D 20 42 55 54 54 45 52 |EN BY JIM BUTTER|
00000060: 46 49 45 4C 44 2C 00 88 08 28 00 8F 3A 20 54 48 |FIELD,...(..: TH|
00000070: 45 20 31 35 34 31 20 55 53 45 52 27 53 20 4D 41 |E 1541 USER'S MA|
00000080: 4E 55 41 4C 20 41 4E 44 00 AA 08 32 00 8F 3A 20 |NUAL AND...2..: |
00000090: 41 20 53 48 4F 52 54 20 50 52 4F 47 52 41 4D 20 |A SHORT PROGRAM |
000000A0: 46 52 4F 4D 20 54 50 55 47 2E 00 CD 08 3C 00 8F |FROM TPUG....<..|
000000B0: 3A 20 49 20 41 4D 20 53 55 52 45 20 53 4F 4D 45 |: I AM SURE SOME|
000000C0: 4F 4E 45 20 57 49 4C 4C 20 46 49 4E 44 00 F4 08 |ONE WILL FIND...|
000000D0: 46 00 8F 3A 20 45 52 52 4F 52 53 20 41 4E 44 20 |F..: ERRORS AND |
000000E0: 4F 4D 4D 49 53 53 49 4F 4E 53 20 2D 20 49 46 20 |OMMISSIONS - IF |
000000F0: 54 48 45 59 00 19 09 50 00 8F 3A 20 44 4F 2C 20 |THEY...P..: DO, |
00000100: 49 20 57 4F 55 4C 44 20 48 49 47 48 4C 59 20 41 |I WOULD HIGHLY A|
00000110: 50 50 52 45 43 49 41 54 45 00 3B 09 5A 00 8F 3A |PPRECIATE.;.Z..:|
00000120: 20 41 20 43 41 4C 4C 20 41 54 20 28 34 31 36 29 | A CALL AT (416)|
00000130: 32 39 31 2D 38 37 38 35 20 4F 52 00 51 09 64 00 |291-8785 OR.Q.d.|
00000140: 8F 3A 20 28 34 31 36 29 38 36 33 2D 32 35 30 34 |.: (416)863-2504|
00000150: 2E 00 7B 09 C8 00 99 22 93 11 11 11 22 A3 39 29 |..{...."....".9)|
00000160: 22 12 20 55 53 45 20 4F 46 20 54 48 45 20 43 2D |". USE OF THE C-|
00000170: 36 34 20 57 45 44 47 45 20 92 22 00 93 09 D2 00 |64 WEDGE .".....|
00000180: 99 22 11 11 1D 1D 48 41 53 20 46 4F 55 52 20 55 |."....HAS FOUR U|
00000190: 53 45 53 00 BD 09 DC 00 99 22 1D 1D 1D 1D 28 31 |SES......"....(1|
000001A0: 29 20 4C 4F 41 44 2C 20 52 55 4E 20 41 4E 44 20 |) LOAD, RUN AND |
000001B0: 53 41 56 45 20 50 52 4F 47 52 41 4D 53 00 E4 09 |SAVE PROGRAMS...|
000001C0: E6 00 99 22 1D 1D 1D 1D 28 32 29 20 4F 42 54 41 |..."....(2) OBTA|
000001D0: 49 4E 20 44 49 52 45 43 54 4F 52 59 20 57 49 54 |IN DIRECTORY WIT|
000001E0: 48 4F 55 54 00 0C 0A F0 00 99 22 1D 1D 1D 1D 1D |HOUT......".....|
000001F0: 1D 1D 1D 44 49 53 54 55 52 42 49 4E 47 20 41 4C |...DISTURBING AL|
00000200: 52 45 41 44 59 20 4C 4F 41 44 45 44 00 1F 0A FA |READY LOADED....|
00000210: 00 99 22 1D 1D 1D 1D 1D 1D 1D 1D 46 49 4C 45 00 |.."........FILE.|
00000220: 44 0A 04 01 99 22 1D 1D 1D 1D 28 33 29 20 54 52 |D...."....(3) TR|
00000230: 41 4E 53 4D 49 54 20 44 49 53 4B 20 43 4F 4D 4D |ANSMIT DISK COMM|
00000240: 41 4E 44 53 00 6A 0A 0E 01 99 22 1D 1D 1D 1D 28 |ANDS.j...."....(|
00000250: 34 29 20 43 48 45 43 4B 20 44 49 53 4B 20 45 52 |4) CHECK DISK ER|
00000260: 52 4F 52 20 53 54 41 54 55 53 00 A4 0A 18 01 99 |ROR STATUS......|
00000270: 22 11 1D 1D 54 4F 20 4C 4F 41 44 20 54 59 50 45 |"...TO LOAD TYPE|
00000280: 3A 20 4C 4F 41 44 22 3B C7 28 33 34 29 3B 22 43 |: LOAD";.(34);"C|
00000290: 2D 36 34 20 57 45 44 47 45 22 3B C7 28 33 34 29 |-64 WEDGE";.(34)|
000002A0: 3B 22 2C 38 00 DE 0A 22 01 99 22 1D 1D 2D 20 41 |;",8...".."..- A|
000002B0: 4E 44 20 12 20 52 45 54 55 52 4E 20 92 20 2D 20 |ND . RETURN . - |
000002C0: 54 48 45 4E 20 54 59 50 45 3A 20 22 3B C7 28 33 |THEN TYPE: ";.(3|
000002D0: 34 29 3B 22 52 55 4E 22 3B C7 28 33 34 29 00 F7 |4);"RUN";.(34)..|
000002E0: 0A 2C 01 99 22 1D 1D 2D 20 41 4E 44 20 12 20 52 |.,.."..- AND . R|
000002F0: 45 54 55 52 4E 20 92 00 23 0B 36 01 99 22 11 1D |ETURN ..#.6.."..|
00000300: 1D 54 48 45 20 57 45 44 47 45 20 4C 4F 41 44 53 |.THE WEDGE LOADS|
00000310: 20 44 4F 53 20 35 2E 31 20 28 44 4F 53 20 4D 45 | DOS 5.1 (DOS ME|
00000320: 41 4E 53 00 42 0B 40 01 99 22 1D 1D 44 49 53 4B |ANS.B.@.."..DISK|
00000330: 20 4F 50 45 52 41 54 49 4E 47 20 53 59 53 54 45 | OPERATING SYSTE|
00000340: 4D 29 00 82 0B 4A 01 99 22 11 1D 1D 59 4F 55 20 |M)...J.."...YOU |
00000350: 4D 41 59 20 4E 4F 57 20 54 59 50 45 20 22 3B C7 |MAY NOW TYPE ";.|
00000360: 28 33 34 29 3B 22 4E 45 57 22 3B C7 28 33 34 29 |(34);"NEW";.(34)|
00000370: 3B 22 20 4F 52 20 12 20 52 45 53 54 4F 52 45 20 |;" OR . RESTORE |
00000380: 92 22 00 A8 0B 54 01 99 22 1D 1D 57 49 54 48 4F |."...T.."..WITHO|
00000390: 55 54 20 44 49 53 54 55 52 42 49 4E 47 20 54 48 |UT DISTURBING TH|
000003A0: 45 20 57 45 44 47 45 22 00 B2 0B 5E 01 8D 34 30 |E WEDGE"...^..40|
000003B0: 30 30 00 D8 0B 90 01 99 22 11 1D 1D 57 48 45 4E |00......"...WHEN|
000003C0: 45 56 45 52 20 49 20 46 4F 52 4D 41 54 20 41 20 |EVER I FORMAT A |
000003D0: 44 49 53 4B 20 28 41 53 00 01 0C 9A 01 99 22 1D |DISK (AS......".|
000003E0: 1D 44 45 53 43 52 49 42 45 44 20 4C 41 54 45 52 |.DESCRIBED LATER|
000003F0: 29 20 49 20 41 4C 57 41 59 53 20 45 4E 53 55 52 |) I ALWAYS ENSUR|
00000400: 45 00 2C 0C A4 01 99 22 1D 1D 54 48 41 54 20 54 |E.,...."..THAT T|
00000410: 48 45 20 46 49 52 53 54 20 54 57 4F 20 50 52 4F |HE FIRST TWO PRO|
00000420: 47 52 41 4D 53 20 4F 4E 20 54 48 45 00 54 0C AE |GRAMS ON THE.T..|
00000430: 01 99 22 1D 1D 44 49 53 4B 20 41 52 45 20 54 48 |.."..DISK ARE TH|
00000440: 45 20 57 45 44 47 45 20 41 4E 44 20 44 4F 53 20 |E WEDGE AND DOS |
00000450: 35 2E 31 22 00 7F 0C B8 01 99 22 11 1D 1D 54 4F |5.1"......"...TO|
00000460: 20 54 52 41 4E 53 46 45 52 20 54 48 45 20 57 45 | TRANSFER THE WE|
00000470: 44 47 45 2C 20 49 20 4C 4F 41 44 20 54 48 45 00 |DGE, I LOAD THE.|
00000480: B7 0C C2 01 99 22 1D 1D 43 2D 36 34 20 57 45 44 |....."..C-64 WED|
00000490: 47 45 20 41 4E 44 20 53 41 56 45 20 49 54 20 41 |GE AND SAVE IT A|
000004A0: 53 20 22 3B C7 28 33 34 29 3B 22 57 45 44 47 45 |S ";.(34);"WEDGE|
000004B0: 22 3B C7 28 33 34 29 00 DF 0C CC 01 99 22 1D 1D |";.(34)......"..|
000004C0: 49 4E 20 54 48 45 20 4E 4F 52 4D 41 4C 20 4D 41 |IN THE NORMAL MA|
000004D0: 4E 4E 45 52 20 2D 20 42 59 20 55 53 49 4E 47 00 |NNER - BY USING.|
000004E0: 17 0D D6 01 99 22 1D 1D 41 20 50 52 4F 47 52 41 |....."..A PROGRA|
000004F0: 4D 20 4E 41 4D 45 20 4F 46 20 22 3B C7 28 33 34 |M NAME OF ";.(34|
00000500: 29 3B 22 57 45 44 47 45 22 3B C7 28 33 34 29 3B |);"WEDGE";.(34);|
00000510: 22 20 49 54 20 49 53 00 3B 0D E0 01 99 22 1D 1D |" IT IS.;...."..|
00000520: 45 41 53 49 45 52 20 54 4F 20 54 59 50 45 20 41 |EASIER TO TYPE A|
00000530: 4E 44 20 52 45 4D 45 4D 42 45 52 00 68 0D EA 01 |ND REMEMBER.h...|
00000540: 99 22 11 1D 1D 54 4F 20 54 52 41 4E 53 46 45 52 |."...TO TRANSFER|
00000550: 20 44 4F 53 20 35 2E 31 20 49 54 20 49 53 20 4E | DOS 5.1 IT IS N|
00000560: 45 43 45 53 53 41 52 59 00 94 0D F4 01 99 22 1D |ECESSARY......".|
00000570: 1D 45 49 54 48 45 52 20 54 4F 20 55 53 45 20 41 |.EITHER TO USE A|
00000580: 20 46 49 4C 45 20 43 4F 50 49 45 52 20 50 52 4F | FILE COPIER PRO|
00000590: 47 52 41 4D 00 B9 0D FE 01 99 22 1D 1D 4F 52 20 |GRAM......"..OR |
000005A0: 54 4F 20 4C 4F 41 44 20 41 4E 44 20 52 55 4E 20 |TO LOAD AND RUN |
000005B0: 41 20 4D 41 43 48 49 4E 45 00 E5 0D 08 02 99 22 |A MACHINE......"|
000005C0: 1D 1D 4C 41 4E 47 55 41 47 45 20 4D 4F 4E 49 54 |..LANGUAGE MONIT|
000005D0: 4F 52 20 53 55 43 48 20 41 53 20 53 55 50 45 52 |OR SUCH AS SUPER|
000005E0: 4D 4F 4E 36 34 00 0D 0E 12 02 99 22 1D 1D 20 2D |MON64......".. -|
000005F0: 20 54 4F 20 4C 4F 41 44 20 54 4F 20 54 48 45 20 | TO LOAD TO THE |
00000600: 4D 4F 4E 49 54 4F 52 20 54 59 50 45 3A 00 44 0E |MONITOR TYPE:.D.|
00000610: 1C 02 99 22 1D 1D 4C 22 3B C7 28 33 34 29 3B 22 |..."..L";.(34);"|
00000620: 44 4F 53 20 35 2E 31 22 3B C7 28 33 34 29 3B 22 |DOS 5.1";.(34);"|
00000630: 2C 30 38 20 2D 20 41 4E 44 20 12 20 52 45 54 55 |,08 - AND . RETU|
00000640: 52 4E 20 92 00 6F 0E 26 02 99 22 1D 1D 20 2D 20 |RN ..o.&..".. - |
00000650: 54 4F 20 53 41 56 45 20 46 52 4F 4D 20 54 48 45 |TO SAVE FROM THE|
00000660: 20 4D 4F 4E 49 54 4F 52 20 54 4F 20 54 48 45 00 | MONITOR TO THE.|
00000670: 86 0E 30 02 99 22 1D 1D 4E 45 57 20 44 49 53 4B |..0.."..NEW DISK|
00000680: 20 54 59 50 45 3A 00 C7 0E 3A 02 99 22 1D 1D 53 | TYPE:...:.."..S|
00000690: 22 3B C7 28 33 34 29 3B 22 44 4F 53 20 35 2E 31 |";.(34);"DOS 5.1|
000006A0: 22 3B C7 28 33 34 29 3B 22 2C 30 38 2C 43 43 30 |";.(34);",08,CC0|
000006B0: 30 2C 43 46 35 41 20 2D 20 41 4E 44 20 12 20 52 |0,CF5A - AND . R|
000006C0: 45 54 55 52 4E 20 92 00 DD 0E 44 02 8D 35 30 30 |ETURN ....D..500|
000006D0: 30 3A 8B 41 24 B2 22 4C 22 89 32 30 30 00 FE 0E |0:.A$."L".200...|
000006E0: 58 02 99 22 11 1D 1D 12 20 52 55 4C 45 53 20 4F |X..".... RULES O|
000006F0: 46 20 54 48 45 20 57 45 44 47 45 20 92 22 00 38 |F THE WEDGE .".8|
00000700: 0F 62 02 99 22 11 1D 1D 43 4F 4D 4D 41 4E 44 53 |.b.."...COMMANDS|
00000710: 20 4D 55 53 54 20 42 45 20 44 49 52 45 43 54 20 | MUST BE DIRECT |
00000720: 2D 20 4E 4F 54 20 49 4E 20 41 20 20 20 20 20 20 |- NOT IN A |
00000730: 50 52 4F 47 52 41 4D 22 00 7E 0F 6C 02 99 22 11 |PROGRAM".~.l..".|
00000740: 1D 1D 43 4F 4D 4D 41 4E 44 53 20 4D 55 53 54 20 |..COMMANDS MUST |
00000750: 53 54 41 52 54 20 49 4E 20 54 48 45 20 46 49 52 |START IN THE FIR|
00000760: 53 54 20 20 20 20 20 20 20 20 43 4F 4C 55 4D 4E |ST COLUMN|
00000770: 20 4F 46 20 54 48 45 20 53 43 52 45 45 4E 00 A5 | OF THE SCREEN..|
00000780: 0F 76 02 99 22 11 1D 1D 49 54 20 49 53 20 4E 4F |.v.."...IT IS NO|
00000790: 54 20 4E 45 43 45 53 53 41 52 59 20 54 4F 20 41 |T NECESSARY TO A|
000007A0: 44 44 20 2C 38 00 CA 0F 80 02 99 22 1D 1D 54 4F |DD ,8......"..TO|
000007B0: 20 46 49 4C 45 20 4E 41 4D 45 53 20 57 48 45 4E | FILE NAMES WHEN|
000007C0: 20 55 53 49 4E 47 20 54 48 45 00 F0 0F 8A 02 99 | USING THE......|
000007D0: 22 1D 1D 57 45 44 47 45 20 43 4F 4D 4D 41 4E 44 |"..WEDGE COMMAND|
000007E0: 53 20 2D 20 54 48 45 20 43 4F 4D 50 55 54 45 52 |S - THE COMPUTER|
000007F0: 00 13 10 94 02 99 22 1D 1D 44 45 46 41 55 4C 54 |......"..DEFAULT|
00000800: 53 20 54 4F 20 54 48 45 20 44 49 53 4B 20 44 52 |S TO THE DISK DR|
00000810: 49 56 45 00 3D 10 9E 02 99 22 11 1D 1D 46 49 4C |IVE.=...."...FIL|
00000820: 45 20 4E 41 4D 45 20 4E 45 45 44 20 4E 4F 54 20 |E NAME NEED NOT |
00000830: 42 45 20 49 4E 20 51 55 4F 54 45 53 22 00 67 10 |BE IN QUOTES".g.|
00000840: A8 02 99 22 11 1D 1D 44 49 53 4B 20 43 4F 4D 4D |..."...DISK COMM|
00000850: 41 4E 44 53 20 41 52 45 20 50 52 45 43 45 45 44 |ANDS ARE PRECEED|
00000860: 45 44 20 57 49 54 48 00 86 10 B2 02 99 22 1D 1D |ED WITH......"..|
00000870: 40 20 4F 52 20 3E 20 2D 20 28 49 20 50 52 45 46 |@ OR > - (I PREF|
00000880: 45 52 20 40 29 22 00 B0 10 BC 02 99 22 11 1D 1D |ER @)"......"...|
00000890: 53 4F 4D 45 20 50 52 4F 47 52 41 4D 53 20 43 4F |SOME PROGRAMS CO|
000008A0: 4E 54 41 49 4E 49 4E 47 20 4D 41 43 48 49 4E 45 |NTAINING MACHINE|
000008B0: 00 D7 10 C6 02 99 22 1D 1D 4C 41 4E 47 55 41 47 |......"..LANGUAG|
000008C0: 45 20 57 49 4C 4C 20 4E 4F 54 20 52 55 4E 20 57 |E WILL NOT RUN W|
000008D0: 49 54 48 20 54 48 45 00 EE 10 D0 02 99 22 1D 1D |ITH THE......"..|
000008E0: 57 45 44 47 45 20 49 4E 20 50 4C 41 43 45 00 04 |WEDGE IN PLACE..|
000008F0: 11 DA 02 8D 35 30 30 30 3A 8B 41 24 B2 22 4C 22 |....5000:.A$."L"|
00000900: 89 34 30 30 00 27 11 20 03 99 22 11 1D 1D 12 20 |.400.'. ..".... |
00000910: 28 31 29 20 50 52 4F 47 52 41 4D 20 43 4F 4D 4D |(1) PROGRAM COMM|
00000920: 41 4E 44 53 20 92 22 00 47 11 2A 03 99 22 11 1D |ANDS .".G.*.."..|
00000930: 1D 50 52 4F 47 52 41 4D 20 43 4F 4D 4D 41 4E 44 |.PROGRAM COMMAND|
00000940: 53 20 41 52 45 3A 22 00 68 11 34 03 99 22 1D 1D |S ARE:".h.4.."..|
00000950: 1D 1D 2F 20 2D 20 54 4F 20 4C 4F 41 44 20 41 20 |../ - TO LOAD A |
00000960: 50 52 4F 47 52 41 4D 22 00 91 11 3E 03 99 22 1D |PROGRAM"...>..".|
00000970: 1D 1D 1D 5E 20 2D 20 54 4F 20 4C 4F 41 44 20 41 |...^ - TO LOAD A|
00000980: 4E 44 20 52 55 4E 20 41 20 50 52 4F 47 52 41 4D |ND RUN A PROGRAM|
00000990: 22 00 B1 11 48 03 99 22 1D 1D 1D 1D 5F 20 2D 20 |"...H.."...._ - |
000009A0: 54 4F 20 53 41 56 45 20 41 20 50 52 4F 47 52 41 |TO SAVE A PROGRA|
000009B0: 4D 00 D7 11 52 03 99 22 1D 1D 1D 1D 25 20 2D 20 |M...R.."....% - |
000009C0: 54 4F 20 4C 4F 41 44 20 41 20 50 52 4F 47 52 41 |TO LOAD A PROGRA|
000009D0: 4D 20 54 4F 20 41 22 00 F7 11 5C 03 99 22 1D 1D |M TO A"...\.."..|
000009E0: 1D 1D 1D 1D 1D 1D 53 50 45 43 49 46 49 43 20 41 |......SPECIFIC A|
000009F0: 44 44 52 45 53 53 22 00 18 12 66 03 99 22 11 1D |DDRESS"...f.."..|
00000A00: 1D 45 58 41 4D 50 4C 45 53 20 4F 46 20 54 48 45 |.EXAMPLES OF THE|
00000A10: 20 50 52 4F 47 52 41 4D 00 2F 12 70 03 99 22 1D | PROGRAM./.p..".|
00000A20: 1D 43 4F 4D 4D 41 4E 44 53 20 41 52 45 3A 22 00 |.COMMANDS ARE:".|
00000A30: 65 12 7A 03 99 22 1D 1D 1D 1D 2F 50 52 4F 47 52 |e.z.."..../PROGR|
00000A40: 41 4D 20 3D 20 4C 4F 41 44 22 3B C7 28 33 34 29 |AM = LOAD";.(34)|
00000A50: 3B 22 50 52 4F 47 52 41 4D 22 3B C7 28 33 34 29 |;"PROGRAM";.(34)|
00000A60: 3B 22 2C 38 22 00 A2 12 84 03 99 22 1D 1D 1D 1D |;",8"......"....|
00000A70: 5E 50 52 4F 47 52 41 4D 20 3D 20 4C 4F 41 44 22 |^PROGRAM = LOAD"|
00000A80: 3B C7 28 33 34 29 3B 22 50 52 4F 47 52 41 4D 22 |;.(34);"PROGRAM"|
00000A90: 3B C7 28 33 34 29 3B 22 2C 38 20 41 4E 44 20 52 |;.(34);",8 AND R|
00000AA0: 55 4E 00 D7 12 8E 03 99 22 1D 1D 1D 1D 5F 50 52 |UN......"...._PR|
00000AB0: 4F 47 52 41 4D 20 3D 20 53 41 56 45 22 3B C7 28 |OGRAM = SAVE";.(|
00000AC0: 33 34 29 3B 22 50 52 4F 47 52 41 4D 22 3B C7 28 |34);"PROGRAM";.(|
00000AD0: 33 34 29 3B 22 2C 38 00 0E 13 98 03 99 22 1D 1D |34);",8......"..|
00000AE0: 1D 1D 25 50 52 4F 47 52 41 4D 20 3D 20 4C 4F 41 |..%PROGRAM = LOA|
00000AF0: 44 22 3B C7 28 33 34 29 3B 22 50 52 4F 47 52 41 |D";.(34);"PROGRA|
00000B00: 4D 22 3B C7 28 33 34 29 3B 22 2C 38 2C 31 00 3C |M";.(34);",8,1.<|
00000B10: 13 A2 03 99 22 11 1D 1D 54 4F 20 52 45 53 41 56 |...."...TO RESAV|
00000B20: 45 20 41 4E 20 45 58 49 53 54 49 4E 47 20 50 52 |E AN EXISTING PR|
00000B30: 4F 47 52 41 4D 2C 20 57 48 45 52 45 00 67 13 AC |OGRAM, WHERE.g..|
00000B40: 03 99 22 1D 1D 46 4F 52 20 45 58 41 4D 50 4C 45 |.."..FOR EXAMPLE|
00000B50: 20 59 4F 55 20 48 41 56 45 20 4D 41 44 45 20 43 | YOU HAVE MADE C|
00000B60: 48 41 4E 47 45 53 2C 00 7F 13 B6 03 99 22 1D 1D |HANGES,......"..|
00000B70: 54 48 45 20 43 4F 4D 4D 41 4E 44 20 49 53 3A 00 |THE COMMAND IS:.|
00000B80: 9A 13 C0 03 99 22 1D 1D 1D 1D 5F 40 30 3A 50 52 |....."...._@0:PR|
00000B90: 4F 47 52 41 4D 20 2D 20 4F 52 00 AF 13 CA 03 99 |OGRAM - OR......|
00000BA0: 22 1D 1D 1D 1D 5F 40 3A 50 52 4F 47 52 41 4D 00 |"...._@:PROGRAM.|
00000BB0: C5 13 D4 03 8D 35 30 30 30 3A 8B 41 24 B2 22 4C |.....5000:.A$."L|
00000BC0: 22 89 36 30 30 00 07 14 E8 03 99 22 11 1D 1D 50 |".600......"...P|
00000BD0: 41 54 54 45 52 4E 20 4D 41 54 43 48 49 4E 47 20 |ATTERN MATCHING |
00000BE0: 4D 41 59 20 42 45 20 55 53 45 44 20 2D 20 54 48 |MAY BE USED - TH|
00000BF0: 45 20 20 20 20 20 20 43 48 41 52 41 43 54 45 52 |E CHARACTER|
00000C00: 53 20 41 52 45 3A 22 00 31 14 F2 03 99 22 1D 1D |S ARE:".1...."..|
00000C10: 1D 1D 3F 20 2D 20 54 4F 20 4D 41 54 43 48 20 41 |..? - TO MATCH A|
00000C20: 20 53 49 4E 47 4C 45 20 43 48 41 52 41 43 54 45 | SINGLE CHARACTE|
00000C30: 52 00 5F 14 FC 03 99 22 1D 1D 1D 1D 2A 20 2D 20 |R._...."....* - |
00000C40: 54 4F 20 4D 41 54 43 48 20 41 20 53 54 52 45 41 |TO MATCH A STREA|
00000C50: 4D 20 4F 46 20 43 48 41 52 41 43 54 45 52 53 00 |M OF CHARACTERS.|
00000C60: 81 14 06 04 99 22 1D 1D 2F 4E 3F 54 20 57 49 4C |....."../N?T WIL|
00000C70: 4C 20 4C 4F 41 44 20 4E 4F 54 20 4F 52 20 4E 55 |L LOAD NOT OR NU|
00000C80: 54 00 AB 14 10 04 99 22 1D 1D 2F 4E 4F 54 2A 20 |T......"../NOT* |
00000C90: 57 49 4C 4C 20 4C 4F 41 44 20 4E 4F 54 48 49 4E |WILL LOAD NOTHIN|
00000CA0: 47 20 4F 52 20 4E 4F 54 20 4F 52 00 BA 14 1A 04 |G OR NOT OR.....|
00000CB0: 99 22 1D 1D 4E 4F 54 49 43 45 00 E2 14 24 04 99 |."..NOTICE...$..|
00000CC0: 22 11 1D 1D 49 4E 20 41 44 44 49 54 49 4F 4E 20 |"...IN ADDITION |
00000CD0: 59 4F 55 20 4D 41 59 20 4F 42 54 41 49 4E 20 54 |YOU MAY OBTAIN T|
00000CE0: 48 45 00 0D 15 2E 04 99 22 1D 1D 44 49 52 45 43 |HE......"..DIREC|
00000CF0: 54 4F 52 59 20 28 41 53 20 44 45 53 43 52 49 42 |TORY (AS DESCRIB|
00000D00: 45 44 20 4E 45 58 54 29 20 4D 4F 56 45 00 35 15 |ED NEXT) MOVE.5.|
00000D10: 38 04 99 22 1D 1D 54 48 45 20 43 55 52 53 4F 52 |8.."..THE CURSOR|
00000D20: 20 4F 50 50 4F 53 49 54 45 20 54 48 45 20 50 52 | OPPOSITE THE PR|
00000D30: 4F 47 52 41 4D 00 5F 15 42 04 99 22 1D 1D 59 4F |OGRAM._.B.."..YO|
00000D40: 55 20 57 49 53 48 20 54 4F 20 4C 4F 41 44 20 4F |U WISH TO LOAD O|
00000D50: 52 20 4C 4F 41 44 20 41 4E 44 20 52 55 4E 2C 00 |R LOAD AND RUN,.|
00000D60: 8F 15 4C 04 99 22 1D 1D 54 59 50 45 20 49 4E 20 |..L.."..TYPE IN |
00000D70: 54 48 45 20 53 59 4D 42 4F 4C 20 41 4E 44 20 12 |THE SYMBOL AND .|
00000D80: 20 52 45 54 55 52 4E 20 92 20 2D A0 A0 A0 A0 00 | RETURN . -.....|
00000D90: B9 15 56 04 99 22 1D 1D 54 48 45 20 50 52 4F 47 |..V.."..THE PROG|
00000DA0: 52 41 4D 20 57 49 4C 4C 20 4C 4F 41 44 20 4F 52 |RAM WILL LOAD OR|
00000DB0: 20 4C 4F 41 44 20 41 4E 44 00 E4 15 60 04 99 22 | LOAD AND...`.."|
00000DC0: 1D 1D 52 55 4E 20 2D 20 4F 54 48 45 52 20 43 48 |..RUN - OTHER CH|
00000DD0: 41 52 41 43 54 45 52 53 20 4F 4E 20 54 48 45 20 |ARACTERS ON THE |
00000DE0: 4C 49 4E 45 00 FB 15 6A 04 99 22 1D 1D 43 41 4E |LINE...j.."..CAN|
00000DF0: 20 42 45 20 49 47 4E 4F 52 45 44 00 21 16 74 04 | BE IGNORED.!.t.|
00000E00: 99 22 11 1D 1D 54 48 45 20 4E 4F 52 4D 41 4C 20 |."...THE NORMAL |
00000E10: 56 45 52 49 46 59 20 43 4F 4D 4D 41 4E 44 20 49 |VERIFY COMMAND I|
00000E20: 53 00 47 16 7E 04 99 22 1D 1D 55 53 45 44 20 57 |S.G.~.."..USED W|
00000E30: 49 54 48 20 54 48 45 20 57 45 44 47 45 20 2D 20 |ITH THE WEDGE - |
00000E40: 54 48 41 54 20 49 53 00 7A 16 88 04 99 22 1D 1D |THAT IS.z...."..|
00000E50: 54 4F 20 53 41 59 3A 20 56 45 52 49 46 59 22 3B |TO SAY: VERIFY";|
00000E60: C7 28 33 34 29 3B 22 50 52 4F 47 52 41 4D 22 3B |.(34);"PROGRAM";|
00000E70: C7 28 33 34 29 3B 22 2C 38 22 00 90 16 92 04 8D |.(34);",8"......|
00000E80: 35 30 30 30 3A 8B 41 24 B2 22 4C 22 89 38 30 30 |5000:.A$."L".800|
00000E90: 00 AC 16 B0 04 99 22 11 1D 1D 12 20 28 32 29 20 |......".... (2) |
00000EA0: 44 49 52 45 43 54 4F 52 59 20 92 22 00 D9 16 BA |DIRECTORY ."....|
00000EB0: 04 99 22 11 1D 1D 54 48 45 20 44 49 52 45 43 54 |.."...THE DIRECT|
00000EC0: 4F 52 59 20 49 53 20 4F 42 54 41 49 4E 45 44 20 |ORY IS OBTAINED |
00000ED0: 42 59 20 54 59 50 49 4E 47 00 03 17 C4 04 99 22 |BY TYPING......"|
00000EE0: 1D 1D 40 24 20 28 4F 52 20 3E 24 29 20 46 4F 4C |..@$ (OR >$) FOL|
00000EF0: 4C 4F 57 45 44 20 42 59 20 12 20 52 45 54 55 52 |LOWED BY . RETUR|
00000F00: 4E 20 92 00 29 17 CE 04 99 22 11 1D 1D 54 48 49 |N ..)...."...THI|
00000F10: 53 20 57 49 4C 4C 20 4E 4F 54 20 44 49 53 54 55 |S WILL NOT DISTU|
00000F20: 52 42 20 41 20 46 49 4C 45 00 40 17 D8 04 99 22 |RB A FILE.@...."|
00000F30: 1D 1D 41 4C 52 45 41 44 59 20 4C 4F 41 44 45 44 |..ALREADY LOADED|
00000F40: 00 6B 17 E2 04 99 22 11 1D 1D 50 41 54 54 45 52 |.k...."...PATTER|
00000F50: 4E 20 4D 41 54 43 48 49 4E 47 20 4D 41 59 20 41 |N MATCHING MAY A|
00000F60: 4C 53 4F 20 42 45 20 55 53 45 44 00 96 17 EC 04 |LSO BE USED.....|
00000F70: 99 22 1D 1D 2D 20 46 4F 52 20 45 58 41 4D 50 4C |."..- FOR EXAMPL|
00000F80: 45 20 40 24 3A 44 2A 20 57 49 4C 4C 20 47 49 56 |E @$:D* WILL GIV|
00000F90: 45 20 4F 4E 4C 59 00 B4 17 F6 04 99 22 1D 1D 46 |E ONLY......"..F|
00000FA0: 49 4C 45 53 20 53 54 41 52 54 49 4E 47 20 57 49 |ILES STARTING WI|
00000FB0: 54 48 20 44 00 DC 17 00 05 99 22 11 1D 1D 49 46 |TH D......"...IF|
00000FC0: 20 59 4F 55 20 57 49 53 48 20 54 4F 20 4F 42 54 | YOU WISH TO OBT|
00000FD0: 41 49 4E 20 4F 4E 4C 59 20 54 48 45 00 04 18 0A |AIN ONLY THE....|
00000FE0: 05 99 22 1D 1D 44 49 53 4B 20 4E 41 4D 45 20 41 |.."..DISK NAME A|
00000FF0: 4E 44 20 54 48 45 20 49 44 45 4E 54 49 54 59 20 |ND THE IDENTITY |
00001000: 43 4F 44 45 00 24 18 14 05 99 22 1D 1D 54 48 45 |CODE.$...."..THE|
00001010: 4E 20 54 48 45 20 43 4F 4D 4D 41 4E 44 20 49 53 |N THE COMMAND IS|
00001020: 20 40 24 3A 00 3B 18 1E 05 8D 35 30 30 30 3A 8B | @$:.;....5000:.|
00001030: 41 24 B2 22 4C 22 89 31 30 30 30 00 62 18 78 05 |A$."L".1000.b.x.|
00001040: 99 22 11 1D 1D 49 4E 20 54 48 49 53 20 43 4F 4D |."...IN THIS COM|
00001050: 4D 41 4E 44 20 41 53 20 57 45 4C 4C 20 41 53 20 |MAND AS WELL AS |
00001060: 49 4E 00 8B 18 82 05 99 22 1D 1D 53 4F 4D 45 20 |IN......"..SOME |
00001070: 4F 46 20 54 48 45 20 45 58 41 4D 50 4C 45 53 20 |OF THE EXAMPLES |
00001080: 4F 46 20 54 48 45 20 44 49 53 4B 00 B0 18 8C 05 |OF THE DISK.....|
00001090: 99 22 1D 1D 43 4F 4D 4D 41 4E 44 53 20 57 48 49 |."..COMMANDS WHI|
000010A0: 43 48 20 46 4F 4C 4C 4F 57 20 49 20 48 41 56 45 |CH FOLLOW I HAVE|
000010B0: 00 D7 18 96 05 99 22 1D 1D 44 52 4F 50 50 45 44 |......"..DROPPED|
000010C0: 20 41 20 30 20 46 52 4F 4D 20 54 48 45 20 43 4F | A 0 FROM THE CO|
000010D0: 4D 4D 41 4E 44 20 2D 00 00 19 A0 05 99 22 1D 1D |MMAND -......"..|
000010E0: 54 48 49 53 20 4D 41 59 20 42 45 20 55 53 45 44 |THIS MAY BE USED|
000010F0: 20 4F 4E 4C 59 20 57 48 45 4E 20 54 48 45 52 45 | ONLY WHEN THERE|
00001100: 00 28 19 AA 05 99 22 1D 1D 49 53 20 4F 4E 45 20 |.(...."..IS ONE |
00001110: 53 49 4E 47 4C 45 20 44 52 49 56 45 20 49 4E 20 |SINGLE DRIVE IN |
00001120: 55 53 45 20 2D 20 49 46 00 4F 19 B4 05 99 22 1D |USE - IF.O....".|
00001130: 1D 54 48 45 52 45 20 41 52 45 20 54 57 4F 20 44 |.THERE ARE TWO D|
00001140: 52 49 56 45 53 20 4F 52 20 41 20 44 55 41 4C 00 |RIVES OR A DUAL.|
00001150: 75 19 BE 05 99 22 1D 1D 44 52 49 56 45 20 54 48 |u...."..DRIVE TH|
00001160: 45 4E 20 54 48 45 20 46 49 52 53 54 20 44 52 49 |EN THE FIRST DRI|
00001170: 56 45 20 49 53 00 9E 19 C8 05 99 22 1D 1D 44 45 |VE IS......"..DE|
00001180: 53 49 47 4E 41 54 45 44 20 57 49 54 48 20 30 20 |SIGNATED WITH 0 |
00001190: 41 4E 44 20 54 48 45 20 53 45 43 4F 4E 44 00 B3 |AND THE SECOND..|
000011A0: 19 D2 05 99 22 1D 1D 44 52 49 56 45 20 57 49 54 |...."..DRIVE WIT|
000011B0: 48 20 31 00 DC 19 DC 05 99 22 11 1D 1D 46 4F 52 |H 1......"...FOR|
000011C0: 20 45 58 41 4D 50 4C 45 2C 20 49 46 20 54 48 45 | EXAMPLE, IF THE|
000011D0: 52 45 20 49 53 20 41 20 44 55 41 4C 00 05 1A E6 |RE IS A DUAL....|
000011E0: 05 99 22 1D 1D 44 52 49 56 45 2C 20 54 48 45 20 |.."..DRIVE, THE |
000011F0: 43 4F 4D 4D 41 4E 44 20 54 4F 20 4F 42 54 41 49 |COMMAND TO OBTAI|
00001200: 4E 20 54 48 45 00 2C 1A F0 05 99 22 1D 1D 44 49 |N THE.,...."..DI|
00001210: 52 45 43 54 4F 52 59 20 46 52 4F 4D 20 54 48 45 |RECTORY FROM THE|
00001220: 20 46 49 52 53 54 20 44 52 49 56 45 00 55 1A FA | FIRST DRIVE.U..|
00001230: 05 99 22 1D 1D 57 4F 55 4C 44 20 42 45 20 40 24 |.."..WOULD BE @$|
00001240: 30 20 41 4E 44 20 46 52 4F 4D 20 54 48 45 20 53 |0 AND FROM THE S|
00001250: 45 43 4F 4E 44 00 70 1A 04 06 99 22 1D 1D 44 52 |ECOND.p...."..DR|
00001260: 49 56 45 20 57 4F 55 4C 44 20 42 45 20 40 24 31 |IVE WOULD BE @$1|
00001270: 00 87 1A 0E 06 8D 35 30 30 30 3A 8B 41 24 B2 22 |......5000:.A$."|
00001280: 4C 22 89 31 32 30 30 00 A6 1A 40 06 99 22 11 1D |L".1200...@.."..|
00001290: 1D 12 20 28 33 29 20 44 49 53 4B 20 43 4F 4D 4D |.. (3) DISK COMM|
000012A0: 41 4E 44 53 20 92 00 D1 1A 4A 06 99 22 11 1D 1D |ANDS ....J.."...|
000012B0: 54 48 45 20 44 49 53 4B 20 43 4F 4D 4D 41 4E 44 |THE DISK COMMAND|
000012C0: 53 20 49 4E 43 4C 55 44 45 20 46 4F 52 4D 41 54 |S INCLUDE FORMAT|
000012D0: 2C 00 FF 1A 54 06 99 22 1D 1D 52 45 4E 41 4D 45 |,...T.."..RENAME|
000012E0: 2C 20 53 43 52 41 54 43 48 2C 20 56 41 4C 49 44 |, SCRATCH, VALID|
000012F0: 41 54 45 2C 20 49 4E 49 54 49 41 4C 49 5A 45 00 |ATE, INITIALIZE.|
00001300: 10 1B 5E 06 99 22 1D 1D 41 4E 44 20 43 4F 50 59 |..^.."..AND COPY|
00001310: 00 3D 1B 68 06 99 22 11 1D 1D 45 41 43 48 20 43 |.=.h.."...EACH C|
00001320: 4F 4D 4D 41 4E 44 20 49 53 20 50 52 45 43 45 45 |OMMAND IS PRECEE|
00001330: 44 45 44 20 42 59 20 40 20 4F 52 20 3E 00 66 1B |DED BY @ OR >.f.|
00001340: 72 06 99 22 1D 1D 2D 20 49 4E 20 54 48 45 20 46 |r.."..- IN THE F|
00001350: 4F 4C 4C 4F 57 49 4E 47 20 49 20 53 48 41 4C 4C |OLLOWING I SHALL|
00001360: 20 55 53 45 20 40 00 92 1B 7C 06 99 22 11 1D 1D | USE @...|.."...|
00001370: 49 4E 20 41 44 44 49 54 49 4F 4E 20 54 48 45 52 |IN ADDITION THER|
00001380: 45 20 49 53 20 54 48 45 20 44 55 50 4C 49 43 41 |E IS THE DUPLICA|
00001390: 54 45 00 BF 1B 86 06 99 22 1D 1D 43 4F 4D 4D 41 |TE......"..COMMA|
000013A0: 4E 44 20 46 4F 52 20 55 53 45 20 57 48 45 4E 20 |ND FOR USE WHEN |
000013B0: 54 48 45 52 45 20 49 53 20 41 20 44 55 41 4C 00 |THERE IS A DUAL.|
000013C0: EA 1B 90 06 99 22 1D 1D 44 52 49 56 45 20 4F 52 |....."..DRIVE OR|
000013D0: 20 54 57 4F 20 44 52 49 56 45 53 20 2D 20 54 48 | TWO DRIVES - TH|
000013E0: 49 53 20 43 4F 4D 4D 41 4E 44 00 16 1C 9A 06 99 |IS COMMAND......|
000013F0: 22 1D 1D 43 4F 50 49 45 53 20 41 20 44 49 53 4B |"..COPIES A DISK|
00001400: 20 46 52 4F 4D 20 4F 4E 45 20 44 52 49 56 45 20 | FROM ONE DRIVE |
00001410: 54 4F 20 54 48 45 00 36 1C A4 06 99 22 1D 1D 4F |TO THE.6...."..O|
00001420: 54 48 45 52 20 2D 20 54 48 45 20 43 4F 4D 4D 41 |THER - THE COMMA|
00001430: 4E 44 20 49 53 3A 00 46 1C AE 06 99 22 1D 1D 1D |ND IS:.F...."...|
00001440: 1D 40 44 31 3D 30 00 70 1C B8 06 99 22 1D 1D 57 |.@D1=0.p...."..W|
00001450: 48 49 43 48 20 57 49 4C 4C 20 43 4F 50 59 20 54 |HICH WILL COPY T|
00001460: 48 45 20 44 49 53 4B 20 49 4E 20 44 52 49 56 45 |HE DISK IN DRIVE|
00001470: 00 99 1C C2 06 99 22 1D 1D 30 20 54 4F 20 54 48 |......"..0 TO TH|
00001480: 45 20 44 49 53 4B 20 49 4E 20 44 52 49 56 45 20 |E DISK IN DRIVE |
00001490: 31 20 2D 20 49 54 20 49 53 00 C3 1C CC 06 99 22 |1 - IT IS......"|
000014A0: 1D 1D 50 52 4F 42 41 42 4C 59 20 42 45 54 54 45 |..PROBABLY BETTE|
000014B0: 52 20 54 4F 20 55 53 45 20 4F 4E 45 20 4F 46 20 |R TO USE ONE OF |
000014C0: 54 48 45 00 D9 1C D6 06 99 22 1D 1D 43 4F 50 59 |THE......"..COPY|
000014D0: 20 50 52 4F 47 52 41 4D 53 00 F0 1C E0 06 8D 35 | PROGRAMS......5|
000014E0: 30 30 30 3A 8B 41 24 B2 22 4C 22 89 31 34 30 30 |000:.A$."L".1400|
000014F0: 00 1E 1D 08 07 99 22 11 1D 1D 12 20 46 4F 52 4D |......".... FORM|
00001500: 41 54 20 92 20 49 53 20 55 53 45 44 20 57 48 45 |AT . IS USED WHE|
00001510: 4E 20 55 53 49 4E 47 20 41 20 44 49 53 4B 00 4A |N USING A DISK.J|
00001520: 1D 12 07 99 22 1D 1D 46 4F 52 20 54 48 45 20 46 |...."..FOR THE F|
00001530: 49 52 53 54 20 54 49 4D 45 20 4F 52 20 57 48 45 |IRST TIME OR WHE|
00001540: 4E 20 43 4C 45 41 52 49 4E 47 00 59 1D 1C 07 99 |N CLEARING.Y....|
00001550: 22 1D 1D 41 20 44 49 53 4B 00 71 1D 26 07 99 22 |"..A DISK.q.&.."|
00001560: 11 1D 1D 54 4F 20 4E 45 57 20 41 20 44 49 53 4B |...TO NEW A DISK|
00001570: 3A 00 94 1D 30 07 99 22 1D 1D 1D 1D 40 4E 45 57 |:...0.."....@NEW|
00001580: 30 3A 44 49 53 4B 20 4E 41 4D 45 2C 49 44 20 2D |0:DISK NAME,ID -|
00001590: 20 4F 52 22 00 B0 1D 3A 07 99 22 1D 1D 1D 1D 40 | OR"...:.."....@|
000015A0: 4E 30 3A 44 49 53 4B 20 4E 41 4D 45 2C 49 44 22 |N0:DISK NAME,ID"|
000015B0: 00 E5 1D 44 07 99 22 1D 1D 57 48 45 52 45 20 22 |...D.."..WHERE "|
000015C0: 3B C7 28 33 34 29 3B 22 49 44 22 3B C7 28 33 34 |;.(34);"ID";.(34|
000015D0: 29 3B 22 20 49 53 20 41 4E 59 20 54 57 4F 20 55 |);" IS ANY TWO U|
000015E0: 4E 49 51 55 45 00 0C 1E 4E 07 99 22 1D 1D 43 48 |NIQUE...N.."..CH|
000015F0: 41 52 41 43 54 45 52 53 20 2D 20 4E 4F 54 45 20 |ARACTERS - NOTE |
00001600: 54 48 45 20 30 20 53 48 4F 55 4C 44 00 33 1E 58 |THE 0 SHOULD.3.X|
00001610: 07 99 22 1D 1D 4E 4F 54 20 42 45 20 44 52 4F 50 |.."..NOT BE DROP|
00001620: 50 45 44 20 49 4E 20 54 48 49 53 20 43 4F 4D 4D |PED IN THIS COMM|
00001630: 41 4E 44 00 4D 1E 62 07 99 22 11 1D 1D 54 4F 20 |AND.M.b.."...TO |
00001640: 43 4C 45 41 52 20 41 20 44 49 53 4B 3A 00 70 1E |CLEAR A DISK:.p.|
00001650: 6C 07 99 22 1D 1D 1D 1D 40 4E 30 3A 30 2C 30 30 |l.."....@N0:0,00|
00001660: 20 46 4F 4C 4C 4F 57 45 44 20 42 59 20 40 4E 3A | FOLLOWED BY @N:|
00001670: 00 96 1E 76 07 99 22 11 1D 1D 54 4F 20 43 4C 45 |...v.."...TO CLE|
00001680: 41 52 20 4F 4E 4C 59 20 54 48 45 20 44 49 52 45 |AR ONLY THE DIRE|
00001690: 43 54 4F 52 59 3A 00 A4 1E 80 07 99 22 1D 1D 1D |CTORY:......"...|
000016A0: 1D 40 4E 3A 00 D0 1E 8A 07 99 22 11 1D 1D 41 20 |.@N:......"...A |
000016B0: 44 49 53 4B 20 43 41 4E 4E 4F 54 20 42 45 20 55 |DISK CANNOT BE U|
000016C0: 53 45 44 20 55 4E 54 49 4C 20 49 54 20 48 41 53 |SED UNTIL IT HAS|
000016D0: 00 00 1F 94 07 99 22 1D 1D 42 45 45 4E 20 46 4F |......"..BEEN FO|
000016E0: 52 4D 41 54 54 45 44 20 4F 52 20 22 3B C7 28 33 |RMATTED OR ";.(3|
000016F0: 34 29 3B 22 4E 45 57 45 44 22 3B C7 28 33 34 29 |4);"NEWED";.(34)|
00001700: 00 29 1F 9E 07 99 22 11 1D 1D 28 41 4E 4F 54 48 |.)...."...(ANOTH|
00001710: 45 52 20 54 45 52 4D 20 43 4F 4D 4D 4F 4E 4C 59 |ER TERM COMMONLY|
00001720: 20 55 53 45 44 20 46 4F 52 00 4B 1F A8 07 99 22 | USED FOR.K...."|
00001730: 1D 1D 46 4F 52 4D 41 54 20 4F 52 20 4E 45 57 20 |..FORMAT OR NEW |
00001740: 49 53 20 48 45 41 44 45 52 29 22 00 62 1F B2 07 |IS HEADER)".b...|
00001750: 8D 35 30 30 30 3A 8B 41 24 B2 22 4C 22 89 31 36 |.5000:.A$."L".16|
00001760: 30 30 00 91 1F D0 07 99 22 11 1D 1D 12 20 52 45 |00......".... RE|
00001770: 4E 41 4D 45 20 92 20 49 53 20 55 53 45 44 20 54 |NAME . IS USED T|
00001780: 4F 20 43 48 41 4E 47 45 20 54 48 45 20 4E 41 4D |O CHANGE THE NAM|
00001790: 45 00 B5 1F DA 07 99 22 1D 1D 4F 46 20 41 20 46 |E......"..OF A F|
000017A0: 49 4C 45 20 4F 4E 43 45 20 49 54 20 49 53 20 49 |ILE ONCE IT IS I|
000017B0: 4E 20 54 48 45 00 C7 1F E4 07 99 22 1D 1D 44 49 |N THE......"..DI|
000017C0: 52 45 43 54 4F 52 59 00 DB 1F EE 07 99 22 11 1D |RECTORY......"..|
000017D0: 1D 54 4F 20 52 45 4E 41 4D 45 3A 00 03 20 F8 07 |.TO RENAME:.. ..|
000017E0: 99 22 1D 1D 1D 1D 40 52 45 4E 41 4D 45 30 3A 4E |."....@RENAME0:N|
000017F0: 45 57 4E 41 4D 45 3D 4F 4C 44 4E 41 4D 45 20 2D |EWNAME=OLDNAME -|
00001800: 20 4F 52 00 26 20 02 08 99 22 1D 1D 1D 1D 40 52 | OR.& ..."....@R|
00001810: 30 3A 4E 45 57 4E 41 4D 45 3D 4F 4C 44 4E 41 4D |0:NEWNAME=OLDNAM|
00001820: 45 20 2D 20 4F 52 00 43 20 0C 08 99 22 1D 1D 1D |E - OR.C ..."...|
00001830: 1D 40 52 3A 4E 45 57 4E 41 4D 45 3D 4F 4C 44 4E |.@R:NEWNAME=OLDN|
00001840: 41 4D 45 00 71 20 16 08 99 22 11 1D 1D 52 45 4E |AME.q ..."...REN|
00001850: 41 4D 45 20 57 49 4C 4C 20 4E 4F 54 20 57 4F 52 |AME WILL NOT WOR|
00001860: 4B 20 4F 4E 20 41 4E 20 4F 50 45 4E 20 46 49 4C |K ON AN OPEN FIL|
00001870: 45 00 88 20 20 08 8D 35 30 30 30 3A 8B 41 24 B2 |E.. ..5000:.A$.|
00001880: 22 4C 22 89 31 38 30 30 00 B7 20 98 08 99 22 11 |"L".1800.. ...".|
00001890: 1D 1D 12 20 53 43 52 41 54 43 48 20 92 20 52 45 |... SCRATCH . RE|
000018A0: 4D 4F 56 45 53 20 4F 4E 45 20 4F 52 20 4D 4F 52 |MOVES ONE OR MOR|
000018B0: 45 20 46 49 4C 45 53 00 E3 20 A2 08 99 22 1D 1D |E FILES.. ..."..|
000018C0: 46 52 4F 4D 20 41 20 44 49 53 4B 20 41 4E 44 20 |FROM A DISK AND |
000018D0: 46 52 45 45 53 20 54 48 45 20 44 49 52 45 43 54 |FREES THE DIRECT|
000018E0: 4F 52 59 00 FA 20 AC 08 99 22 1D 1D 41 4E 44 20 |ORY.. ..."..AND |
000018F0: 44 49 53 4B 20 53 50 41 43 45 00 0F 21 B6 08 99 |DISK SPACE..!...|
00001900: 22 11 1D 1D 54 4F 20 53 43 52 41 54 43 48 3A 00 |"...TO SCRATCH:.|
00001910: 31 21 C0 08 99 22 1D 1D 1D 1D 40 53 43 52 41 54 |1!..."....@SCRAT|
00001920: 43 48 30 3A 46 49 4C 45 4E 41 4D 45 20 2D 20 4F |CH0:FILENAME - O|
00001930: 52 00 4D 21 CA 08 99 22 1D 1D 1D 1D 40 53 30 3A |R.M!..."....@S0:|
00001940: 46 49 4C 45 4E 41 4D 45 20 2D 20 4F 52 00 63 21 |FILENAME - OR.c!|
00001950: D4 08 99 22 1D 1D 1D 1D 40 53 3A 46 49 4C 45 4E |..."....@S:FILEN|
00001960: 41 4D 45 00 91 21 DE 08 99 22 11 1D 1D 50 41 54 |AME..!..."...PAT|
00001970: 54 45 52 4E 20 4D 41 54 43 48 49 4E 47 20 4D 41 |TERN MATCHING MA|
00001980: 59 20 42 45 20 55 53 45 44 20 48 4F 57 45 56 45 |Y BE USED HOWEVE|
00001990: 52 00 BD 21 E8 08 99 22 1D 1D 57 41 54 43 48 20 |R..!..."..WATCH |
000019A0: 49 54 20 53 49 4E 43 45 20 59 4F 55 20 4D 41 59 |IT SINCE YOU MAY|
000019B0: 20 57 45 4C 4C 20 53 43 52 41 54 43 48 00 E2 21 | WELL SCRATCH..!|
000019C0: F2 08 99 22 1D 1D 4D 4F 52 45 20 46 49 4C 45 53 |..."..MORE FILES|
000019D0: 20 54 48 41 4E 20 59 4F 55 20 49 4E 54 45 4E 44 | THAN YOU INTEND|
000019E0: 45 44 00 10 22 FC 08 99 22 11 1D 1D 49 46 20 59 |ED.."..."...IF Y|
000019F0: 4F 55 20 43 41 4C 4C 20 46 4F 52 20 45 52 52 4F |OU CALL FOR ERRO|
00001A00: 52 20 53 54 41 54 55 53 20 28 49 2E 45 2E 20 40 |R STATUS (I.E. @|
00001A10: 00 3B 22 06 09 99 22 1D 1D 41 4E 44 20 12 20 52 |.;"..."..AND . R|
00001A20: 45 54 55 52 4E 20 92 29 20 54 48 45 4E 20 54 48 |ETURN .) THEN TH|
00001A30: 45 20 4E 55 4D 42 45 52 20 4F 46 00 64 22 10 09 |E NUMBER OF.d"..|
00001A40: 99 22 1D 1D 46 49 4C 45 53 20 53 43 52 41 54 43 |."..FILES SCRATC|
00001A50: 48 45 44 20 57 49 4C 4C 20 42 45 20 52 45 54 55 |HED WILL BE RETU|
00001A60: 52 4E 45 44 00 8F 22 1A 09 99 22 11 1D 1D 42 59 |RNED.."..."...BY|
00001A70: 20 54 48 45 20 57 41 59 2C 20 49 46 20 59 4F 55 | THE WAY, IF YOU|
00001A80: 20 48 41 56 45 20 53 43 52 41 54 43 48 45 44 00 | HAVE SCRATCHED.|
00001A90: B7 22 24 09 99 22 1D 1D 41 20 46 49 4C 45 20 57 |."$.."..A FILE W|
00001AA0: 48 49 43 48 20 59 4F 55 20 44 49 44 4E 27 54 20 |HICH YOU DIDN'T |
00001AB0: 4D 45 41 4E 20 54 4F 00 DC 22 2E 09 99 22 1D 1D |MEAN TO.."..."..|
00001AC0: 41 4E 44 20 59 4F 55 20 48 41 56 4E 27 54 20 53 |AND YOU HAVN'T S|
00001AD0: 41 56 45 44 20 41 4E 4F 54 48 45 52 00 07 23 38 |AVED ANOTHER..#8|
00001AE0: 09 99 22 1D 1D 46 49 4C 45 20 4F 4E 20 54 4F 50 |.."..FILE ON TOP|
00001AF0: 20 4F 46 20 49 54 2C 20 59 4F 55 20 43 41 4E 20 | OF IT, YOU CAN |
00001B00: 52 45 43 4F 56 45 52 00 3A 23 42 09 99 22 1D 1D |RECOVER.:#B.."..|
00001B10: 49 54 20 57 49 54 48 20 54 48 45 20 50 52 4F 47 |IT WITH THE PROG|
00001B20: 52 41 4D 20 22 3B C7 28 33 34 29 3B 22 52 45 56 |RAM ";.(34);"REV|
00001B30: 49 56 45 22 3B C7 28 33 34 29 00 51 23 4C 09 8D |IVE";.(34).Q#L..|
00001B40: 35 30 30 30 3A 8B 41 24 B2 22 4C 22 89 32 30 30 |5000:.A$."L".200|
00001B50: 30 00 81 23 60 09 99 22 11 1D 1D 12 20 56 41 4C |0..#`..".... VAL|
00001B60: 49 44 41 54 45 20 92 20 57 49 4C 4C 20 54 49 44 |IDATE . WILL TID|
00001B70: 59 20 55 50 20 41 20 44 49 53 4B 20 57 48 45 52 |Y UP A DISK WHER|
00001B80: 45 00 AF 23 6A 09 99 22 1D 1D 54 48 45 52 45 20 |E..#j.."..THERE |
00001B90: 48 41 56 45 20 42 45 45 4E 20 41 20 4E 55 4D 42 |HAVE BEEN A NUMB|
00001BA0: 45 52 20 4F 46 20 53 43 52 41 54 43 48 45 53 00 |ER OF SCRATCHES.|
00001BB0: DD 23 74 09 99 22 1D 1D 41 4E 44 20 4E 45 57 20 |.#t.."..AND NEW |
00001BC0: 46 49 4C 45 53 20 41 44 44 45 44 20 2D 20 49 54 |FILES ADDED - IT|
00001BD0: 20 4D 41 59 20 47 49 56 45 20 59 4F 55 00 07 24 | MAY GIVE YOU..$|
00001BE0: 7E 09 99 22 1D 1D 41 44 44 49 54 49 4F 4E 41 4C |~.."..ADDITIONAL|
00001BF0: 20 53 50 41 43 45 20 4F 4E 20 54 48 45 20 44 49 | SPACE ON THE DI|
00001C00: 53 4B 20 2D 20 49 54 00 31 24 88 09 99 22 1D 1D |SK - IT.1$..."..|
00001C10: 57 49 4C 4C 20 41 4E 44 20 53 48 4F 55 4C 44 20 |WILL AND SHOULD |
00001C20: 42 45 20 55 53 45 44 20 54 4F 20 52 45 4D 4F 56 |BE USED TO REMOV|
00001C30: 45 00 5A 24 92 09 99 22 1D 1D 41 4E 59 20 49 4E |E.Z$..."..ANY IN|
00001C40: 43 4F 4D 50 4C 45 54 45 20 46 49 4C 45 53 20 28 |COMPLETE FILES (|
00001C50: 49 2E 45 2E 20 57 48 45 52 45 00 86 24 9C 09 99 |I.E. WHERE..$...|
00001C60: 22 1D 1D 41 20 2A 20 41 50 50 45 41 52 53 20 42 |"..A * APPEARS B|
00001C70: 45 53 49 44 45 20 54 48 45 20 54 59 50 45 20 4F |ESIDE THE TYPE O|
00001C80: 46 20 46 49 4C 45 00 A0 24 A6 09 99 22 1D 1D 4F |F FILE..$..."..O|
00001C90: 4E 20 54 48 45 20 44 49 52 45 43 54 4F 52 59 29 |N THE DIRECTORY)|
00001CA0: 00 B6 24 B0 09 99 22 11 1D 1D 54 4F 20 56 41 4C |..$..."...TO VAL|
00001CB0: 49 44 41 54 45 3A 00 D0 24 BA 09 99 22 1D 1D 1D |IDATE:..$..."...|
00001CC0: 1D 40 56 41 4C 49 44 41 54 45 30 20 2D 20 4F 52 |.@VALIDATE0 - OR|
00001CD0: 00 E3 24 C4 09 99 22 1D 1D 1D 1D 40 56 30 20 2D |..$..."....@V0 -|
00001CE0: 20 4F 52 00 F0 24 CE 09 99 22 1D 1D 1D 1D 40 56 | OR..$..."....@V|
00001CF0: 00 1B 25 D8 09 99 22 11 1D 1D 54 48 49 53 20 43 |..%..."...THIS C|
00001D00: 4F 4D 4D 41 4E 44 20 53 48 4F 55 4C 44 20 4E 45 |OMMAND SHOULD NE|
00001D10: 56 45 52 20 42 45 20 55 53 45 44 00 46 25 E2 09 |VER BE USED.F%..|
00001D20: 99 22 1D 1D 57 48 45 4E 20 54 48 45 52 45 20 41 |."..WHEN THERE A|
00001D30: 52 45 20 52 41 4E 44 4F 4D 20 46 49 4C 45 53 20 |RE RANDOM FILES |
00001D40: 4F 4E 20 54 48 45 00 6F 25 EC 09 99 22 1D 1D 44 |ON THE.o%..."..D|
00001D50: 49 53 4B 20 41 53 20 49 54 20 57 49 4C 4C 20 44 |ISK AS IT WILL D|
00001D60: 45 2D 41 4C 4C 4F 43 41 54 45 20 54 48 45 4D 00 |E-ALLOCATE THEM.|
00001D70: 98 25 F6 09 99 22 11 1D 1D 49 20 55 53 45 20 56 |.%..."...I USE V|
00001D80: 41 4C 49 44 41 54 45 20 51 55 49 54 45 20 46 52 |ALIDATE QUITE FR|
00001D90: 45 51 55 45 4E 54 4C 59 00 C0 25 00 0A 99 22 1D |EQUENTLY..%...".|
00001DA0: 1D 57 48 45 4E 20 49 20 41 4D 20 43 4F 50 59 49 |.WHEN I AM COPYI|
00001DB0: 4E 47 20 41 4E 44 20 47 45 4E 45 52 41 4C 4C 59 |NG AND GENERALLY|
00001DC0: 00 E3 25 0A 0A 99 22 1D 1D 4D 55 43 4B 49 4E 47 |..%..."..MUCKING|
00001DD0: 20 41 52 4F 55 4E 44 20 57 49 54 48 20 41 20 44 | AROUND WITH A D|
00001DE0: 49 53 4B 00 FA 25 14 0A 8D 35 30 30 30 3A 8B 41 |ISK..%...5000:.A|
00001DF0: 24 B2 22 4C 22 89 32 32 30 30 00 29 26 28 0A 99 |$."L".2200.)&(..|
00001E00: 22 11 1D 1D 12 20 49 4E 49 54 49 41 4C 49 5A 45 |".... INITIALIZE|
00001E10: 20 92 20 52 45 54 55 52 4E 53 20 54 48 45 20 44 | . RETURNS THE D|
00001E20: 49 53 4B 20 44 52 49 56 45 00 56 26 32 0A 99 22 |ISK DRIVE.V&2.."|
00001E30: 1D 1D 54 4F 20 54 48 45 20 53 41 4D 45 20 43 4F |..TO THE SAME CO|
00001E40: 4E 44 49 54 49 4F 4E 20 41 53 20 57 48 45 4E 20 |NDITION AS WHEN |
00001E50: 49 54 20 57 41 53 00 82 26 3C 0A 99 22 1D 1D 50 |IT WAS..&<.."..P|
00001E60: 4F 57 45 52 45 44 20 55 50 20 2D 20 49 54 20 49 |OWERED UP - IT I|
00001E70: 53 20 41 4C 53 4F 20 55 53 45 44 20 49 46 20 59 |S ALSO USED IF Y|
00001E80: 4F 55 00 BE 26 46 0A 99 22 1D 1D 45 4E 43 4F 55 |OU..&F.."..ENCOU|
00001E90: 4E 54 45 52 20 22 3B C7 28 33 34 29 3B 22 44 52 |NTER ";.(34);"DR|
00001EA0: 49 56 45 20 4E 4F 54 20 52 45 41 44 59 22 3B C7 |IVE NOT READY";.|
00001EB0: 28 33 34 29 3B 22 20 45 52 52 4F 52 53 22 00 D6 |(34);" ERRORS"..|
00001EC0: 26 50 0A 99 22 11 1D 1D 54 4F 20 49 4E 49 54 49 |&P.."...TO INITI|
00001ED0: 41 4C 49 5A 45 3A 00 F2 26 5A 0A 99 22 1D 1D 1D |ALIZE:..&Z.."...|
00001EE0: 1D 40 49 4E 49 54 49 41 4C 49 5A 45 30 20 2D 20 |.@INITIALIZE0 - |
00001EF0: 4F 52 00 05 27 64 0A 99 22 1D 1D 1D 1D 40 49 30 |OR..'d.."....@I0|
00001F00: 20 2D 20 4F 52 00 12 27 6E 0A 99 22 1D 1D 1D 1D | - OR..'n.."....|
00001F10: 40 49 00 29 27 78 0A 8D 35 30 30 30 3A 8B 41 24 |@I.)'x..5000:.A$|
00001F20: B2 22 4C 22 89 32 34 30 30 00 56 27 F0 0A 99 22 |."L".2400.V'..."|
00001F30: 11 1D 1D 12 20 43 4F 50 59 20 92 20 41 4C 4C 4F |.... COPY . ALLO|
00001F40: 57 53 20 59 4F 55 20 54 4F 20 4D 41 4B 45 20 41 |WS YOU TO MAKE A|
00001F50: 4E 4F 54 48 45 52 00 7B 27 FA 0A 99 22 1D 1D 43 |NOTHER.{'..."..C|
00001F60: 4F 50 59 20 4F 46 20 54 48 45 20 53 41 4D 45 20 |OPY OF THE SAME |
00001F70: 46 49 4C 45 20 4F 4E 20 54 48 45 00 A8 27 04 0B |FILE ON THE..'..|
00001F80: 99 22 1D 1D 53 41 4D 45 20 44 49 53 4B 20 42 55 |."..SAME DISK BU|
00001F90: 54 20 55 4E 44 45 52 20 41 20 44 49 46 46 45 52 |T UNDER A DIFFER|
00001FA0: 45 4E 54 20 4E 41 4D 45 00 BA 27 0E 0B 99 22 11 |ENT NAME..'...".|
00001FB0: 1D 1D 54 4F 20 43 4F 50 59 3A 00 E2 27 18 0B 99 |..TO COPY:..'...|
00001FC0: 22 1D 1D 1D 1D 40 43 4F 50 59 30 3A 4E 45 57 46 |"....@COPY0:NEWF|
00001FD0: 49 4C 45 3D 30 3A 4F 4C 44 46 49 4C 45 20 2D 20 |ILE=0:OLDFILE - |
00001FE0: 4F 52 00 07 28 22 0B 99 22 1D 1D 1D 1D 40 43 30 |OR..(".."....@C0|
00001FF0: 3A 4E 45 57 46 49 4C 45 3D 30 3A 4F 4C 44 46 49 |:NEWFILE=0:OLDFI|
00002000: 4C 45 20 2D 20 4F 52 00 2A 28 2C 0B 99 22 1D 1D |LE - OR.*(,.."..|
00002010: 1D 1D 40 43 3A 4E 45 57 46 49 4C 45 3D 3A 4F 4C |..@C:NEWFILE=:OL|
00002020: 44 46 49 4C 45 20 2D 20 4F 52 00 47 28 36 0B 99 |DFILE - OR.G(6..|
00002030: 22 1D 1D 1D 1D 40 43 3A 4E 45 57 46 49 4C 45 3D |"....@C:NEWFILE=|
00002040: 4F 4C 44 46 49 4C 45 00 6F 28 40 0B 99 22 11 1D |OLDFILE.o(@.."..|
00002050: 1D 59 4F 55 20 43 41 4E 20 41 4C 53 4F 20 53 54 |.YOU CAN ALSO ST|
00002060: 49 43 4B 20 54 4F 47 45 54 48 45 52 20 4F 52 00 |ICK TOGETHER OR.|
00002070: 95 28 4A 0B 99 22 1D 1D 43 4F 4E 43 41 54 45 4E |.(J.."..CONCATEN|
00002080: 41 54 45 20 54 57 4F 20 54 4F 20 46 4F 55 52 20 |ATE TWO TO FOUR |
00002090: 46 49 4C 45 53 00 B1 28 54 0B 99 22 1D 1D 57 49 |FILES..(T.."..WI|
000020A0: 54 48 20 54 48 45 20 46 4F 4C 4C 4F 57 49 4E 47 |TH THE FOLLOWING|
000020B0: 3A 00 DE 28 5E 0B 99 22 1D 1D 1D 1D 40 43 30 3A |:..(^.."....@C0:|
000020C0: 4E 45 57 46 49 4C 45 3D 30 3A 4F 4C 44 46 49 4C |NEWFILE=0:OLDFIL|
000020D0: 45 31 2C 30 3A 4F 4C 44 46 49 4C 45 32 2C 00 FE |E1,0:OLDFILE2,..|
000020E0: 28 68 0B 99 22 1D 1D 1D 1D 30 3A 4F 4C 44 46 49 |(h.."....0:OLDFI|
000020F0: 4C 45 33 2C 30 3A 4F 4C 44 46 49 4C 45 34 00 29 |LE3,0:OLDFILE4.)|
00002100: 29 72 0B 99 22 11 1D 1D 49 20 41 4D 20 54 4F 4C |)r.."...I AM TOL|
00002110: 44 20 54 48 41 54 20 43 4F 4E 43 41 54 45 4E 41 |D THAT CONCATENA|
00002120: 54 49 4F 4E 20 57 49 4C 4C 00 51 29 7C 0B 99 22 |TION WILL.Q)|.."|
00002130: 1D 1D 57 4F 52 4B 20 57 49 54 48 20 50 52 4F 47 |..WORK WITH PROG|
00002140: 52 41 4D 20 46 49 4C 45 53 20 53 4F 20 4C 4F 4E |RAM FILES SO LON|
00002150: 47 00 7C 29 86 0B 99 22 1D 1D 41 53 20 54 48 45 |G.|)..."..AS THE|
00002160: 20 4C 49 4E 45 20 4E 55 4D 42 45 52 53 20 44 4F | LINE NUMBERS DO|
00002170: 4E 27 54 20 43 4F 4E 46 4C 49 43 54 00 A7 29 90 |N'T CONFLICT..).|
00002180: 0B 99 22 1D 1D 48 4F 57 45 56 45 52 20 49 54 20 |.."..HOWEVER IT |
00002190: 48 41 53 20 4E 45 56 45 52 20 57 4F 52 4B 45 44 |HAS NEVER WORKED|
000021A0: 20 46 4F 52 20 4D 45 00 CF 29 9A 0B 99 22 1D 1D | FOR ME..)..."..|
000021B0: 2D 20 49 20 55 53 45 20 41 20 4D 45 52 47 45 20 |- I USE A MERGE |
000021C0: 50 52 4F 47 52 41 4D 20 49 4E 53 54 45 41 44 00 |PROGRAM INSTEAD.|
000021D0: E6 29 A4 0B 8D 35 30 30 30 3A 8B 41 24 B2 22 4C |.)...5000:.A$."L|
000021E0: 22 89 32 36 30 30 00 04 2A B8 0B 99 22 11 1D 1D |".2600..*..."...|
000021F0: 12 20 28 34 29 20 44 49 53 4B 20 53 54 41 54 55 |. (4) DISK STATU|
00002200: 53 20 92 22 00 2F 2A C2 0B 99 22 11 1D 1D 44 49 |S ."./*..."...DI|
00002210: 53 4B 20 53 54 41 54 55 53 20 49 53 20 4F 42 54 |SK STATUS IS OBT|
00002220: 41 49 4E 45 44 20 42 59 20 54 59 50 49 4E 47 00 |AINED BY TYPING.|
00002230: 58 2A CC 0B 99 22 1D 1D 40 20 28 4F 52 20 3E 29 |X*..."..@ (OR >)|
00002240: 20 46 4F 4C 4C 4F 57 45 44 20 42 59 20 12 20 52 | FOLLOWED BY . R|
00002250: 45 54 55 52 4E 20 92 22 00 87 2A D6 0B 99 22 11 |ETURN ."..*...".|
00002260: 1D 1D 49 46 20 4E 4F 20 45 52 52 4F 52 2C 20 54 |..IF NO ERROR, T|
00002270: 48 45 4E 20 54 48 45 20 4D 45 53 53 41 47 45 20 |HEN THE MESSAGE |
00002280: 57 49 4C 4C 20 42 45 00 AB 2A E0 0B 99 22 1D 1D |WILL BE..*..."..|
00002290: 22 3B C7 28 33 34 29 3B 22 30 30 2C 4F 4B 2C 30 |";.(34);"00,OK,0|
000022A0: 30 2C 30 30 22 3B C7 28 33 34 29 00 DA 2A EA 0B |0,00";.(34)..*..|
000022B0: 99 22 11 1D 1D 54 48 45 52 45 20 57 49 4C 4C 20 |."...THERE WILL |
000022C0: 42 45 20 41 20 44 49 46 46 45 52 45 4E 54 20 4D |BE A DIFFERENT M|
000022D0: 45 53 53 41 47 45 20 49 46 22 00 06 2B F4 0B 99 |ESSAGE IF"..+...|
000022E0: 22 1D 1D 54 48 45 52 45 20 49 53 20 41 4E 20 45 |"..THERE IS AN E|
000022F0: 52 52 4F 52 20 4F 52 2C 20 41 53 20 4D 45 4E 54 |RROR OR, AS MENT|
00002300: 49 4F 4E 45 44 22 00 2D 2B FE 0B 99 22 1D 1D 45 |IONED".-+..."..E|
00002310: 41 52 4C 49 45 52 2C 20 49 46 20 54 48 45 52 45 |ARLIER, IF THERE|
00002320: 20 49 53 20 41 20 53 43 52 41 54 43 48 00 3E 2B | IS A SCRATCH.>+|
00002330: 08 0C 99 22 1D 1D 43 4F 4D 4D 41 4E 44 22 00 55 |..."..COMMAND".U|
00002340: 2B 12 0C 8D 35 30 30 30 3A 8B 41 24 B2 22 4C 22 |+...5000:.A$."L"|
00002350: 89 32 38 30 30 00 7C 2B 80 0C 99 22 11 11 11 11 |.2800.|+..."....|
00002360: 11 11 11 11 11 22 3B A3 31 34 29 3B 22 12 20 47 |.....";.14);". G|
00002370: 4F 4F 44 20 4C 55 43 4B 21 20 92 22 00 93 2B 8A |OOD LUCK! ."..+.|
00002380: 0C 8D 36 30 30 30 3A 8B 41 24 B2 22 4C 22 89 33 |..6000:.A$."L".3|
00002390: 30 30 30 00 99 2B 94 0C 80 00 CF 2B A0 0F 99 22 |000..+.....+..."|
000023A0: 13 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
000023B0: 11 11 11 11 11 11 11 11 11 12 20 20 20 4E 3D 4E |.......... N=N|
000023C0: 45 58 54 3A 50 3D 50 52 49 4E 54 20 92 22 3B 00 |EXT:P=PRINT .";.|
000023D0: E9 2B AA 0F 41 24 B2 22 22 3A A1 41 24 3A 8B 41 |.+..A$."":.A$:.A|
000023E0: 24 B2 22 22 A7 34 30 31 30 00 FB 2B B4 0F 8B 41 |$."".4010..+...A|
000023F0: 24 B2 22 50 22 A7 8D 37 30 31 30 00 0C 2C BE 0F |$."P"..7010..,..|
00002400: 8B 41 24 B2 22 4E 22 89 34 30 35 30 00 16 2C C8 |.A$."N".4050..,.|
00002410: 0F 89 34 30 31 30 00 20 2C D2 0F 99 22 93 22 3B |..4010. ,...".";|
00002420: 00 26 2C DC 0F 8E 00 63 2C 88 13 99 22 13 11 11 |.&,....c,..."...|
00002430: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
00002440: 11 11 11 11 11 11 12 20 20 20 4E 3D 4E 45 58 54 |....... N=NEXT|
00002450: 3A 4C 3D 4C 41 53 54 3A 50 3D 50 52 49 4E 54 20 |:L=LAST:P=PRINT |
00002460: 92 22 3B 00 7D 2C 92 13 41 24 B2 22 22 3A A1 41 |.";.},..A$."":.A|
00002470: 24 3A 8B 41 24 B2 22 22 A7 35 30 31 30 00 8F 2C |$:.A$."".5010..,|
00002480: 9C 13 8B 41 24 B2 22 50 22 A7 8D 37 30 31 30 00 |...A$."P"..7010.|
00002490: A0 2C A6 13 8B 41 24 B2 22 4E 22 89 35 30 36 30 |.,...A$."N".5060|
000024A0: 00 B1 2C B0 13 8B 41 24 B2 22 4C 22 89 35 30 36 |..,...A$."L".506|
000024B0: 30 00 BB 2C BA 13 89 35 30 31 30 00 C5 2C C4 13 |0..,...5010..,..|
000024C0: 99 22 93 22 3B 00 CB 2C CE 13 8E 00 07 2D 70 17 |.".";..,.....-p.|
000024D0: 99 22 13 11 11 11 11 11 11 11 11 11 11 11 11 11 |."..............|
000024E0: 11 11 11 11 11 11 11 11 11 11 11 12 20 20 20 4E |............ N|
000024F0: 3D 45 4E 44 3A 4C 3D 4C 41 53 54 3A 50 3D 50 52 |=END:L=LAST:P=PR|
00002500: 49 4E 54 20 92 22 3B 00 11 2D 7A 17 89 35 30 31 |INT .";..-z..501|
00002510: 30 00 23 2D 58 1B 8F 20 53 43 52 45 45 4E 20 43 |0.#-X.. SCREEN C|
00002520: 4F 50 59 00 44 2D 62 1B 53 49 24 B2 C7 28 31 35 |OPY.D-b.SI$..(15|
00002530: 29 3A 42 53 24 B2 C7 28 38 29 3A 50 4F 24 B2 C7 |):BS$..(8):PO$..|
00002540: 28 31 36 29 00 67 2D 6C 1B 52 56 24 B2 C7 28 31 |(16).g-l.RV$..(1|
00002550: 38 29 3A 52 4F 24 B2 C7 28 31 34 36 29 3A 51 54 |8):RO$..(146):QT|
00002560: 24 B2 C7 28 33 34 29 00 84 2D 76 1B 4D 46 24 B2 |$..(34)..-v.MF$.|
00002570: C7 28 31 34 35 29 3A 56 52 B2 C2 28 36 34 38 29 |.(145):VR..(648)|
00002580: AC 32 35 36 00 90 2D 80 1B 9F 34 2C 34 3A 98 34 |.256..-...4,4:.4|
00002590: 00 B3 2D 8A 1B 81 43 4C B2 30 A4 32 34 3A 51 46 |..-...CL.0.24:QF|
000025A0: B2 30 3A 41 53 24 B2 4D 46 24 3A 81 52 4F B2 30 |.0:AS$.MF$:.RO.0|
000025B0: A4 33 39 00 C9 2D 94 1B 53 43 B2 C2 28 56 52 AA |.39..-..SC..(VR.|
000025C0: 34 30 AC 43 4C AA 52 4F 29 00 DC 2D 9E 1B 8B 53 |40.CL.RO)..-...S|
000025D0: 43 B2 33 34 A7 51 46 B2 31 AB 51 46 00 EE 2D A8 |C.34.QF.1.QF..-.|
000025E0: 1B 8B 53 43 B3 B1 31 36 32 A7 37 31 31 30 00 16 |..SC..162.7110..|
000025F0: 2E B2 1B 51 46 B2 31 AB 51 46 3A 8B 51 46 B2 31 |...QF.1.QF:.QF.1|
00002600: A7 41 53 24 B2 41 53 24 AA 52 56 24 AA 51 54 24 |.AS$.AS$.RV$.QT$|
00002610: 3A 89 37 31 37 30 00 36 2E BC 1B 41 53 24 B2 41 |:.7170.6...AS$.A|
00002620: 53 24 AA 51 54 24 AA 52 4F 24 3A 89 37 31 37 30 |S$.QT$.RO$:.7170|
00002630: 3A 89 37 31 33 30 00 5A 2E C6 1B 8B 51 46 B2 31 |:.7130.Z....QF.1|
00002640: AF 28 53 43 B1 B2 31 32 38 29 A7 53 43 B2 53 43 |.(SC..128).SC.SC|
00002650: AB 31 32 38 3A 89 37 31 33 30 00 82 2E D0 1B 8B |.128:.7130......|
00002660: 53 43 B1 B2 31 32 38 A7 53 43 B2 53 43 AB 31 32 |SC..128.SC.SC.12|
00002670: 38 3A 52 46 B2 31 3A 41 53 24 B2 41 53 24 AA 52 |8:RF.1:AS$.AS$.R|
00002680: 56 24 00 A2 2E DA 1B 8B 53 43 B3 33 32 B0 53 43 |V$......SC.32.SC|
00002690: B1 39 35 A7 41 53 B2 53 43 AA 36 34 3A 89 37 31 |.95.AS.SC.64:.71|
000026A0: 36 30 00 BF 2E E4 1B 8B 53 43 B1 33 31 AF 53 43 |60......SC.31.SC|
000026B0: B3 36 34 A7 41 53 B2 53 43 3A 89 37 31 36 30 00 |.64.AS.SC:.7160.|
000026C0: DF 2E EE 1B 8B 53 43 B1 36 33 AF 53 43 B3 39 36 |.....SC.63.SC.96|
000026D0: A7 41 53 B2 53 43 AA 33 32 3A 89 37 31 36 30 00 |.AS.SC.32:.7160.|
000026E0: F1 2E F8 1B 41 53 24 B2 41 53 24 AA C7 28 41 53 |....AS$.AS$..(AS|
000026F0: 29 00 0C 2F 02 1C 8B 52 46 B2 31 A7 41 53 24 B2 |)../...RF.1.AS$.|
00002700: 41 53 24 AA 52 4F 24 3A 52 46 B2 30 00 14 2F 0C |AS$.RO$:RF.0../.|
00002710: 1C 82 52 4F 00 31 2F 16 1C 8B 51 46 B2 30 A7 98 |..RO.1/...QF.0..|
00002720: 34 2C 53 49 24 50 4F 24 41 53 24 3A 89 37 32 31 |4,SI$PO$AS$:.721|
00002730: 30 00 48 2F 20 1C 98 34 2C 53 49 24 AA 50 4F 24 |0.H/ ..4,SI$.PO$|
00002740: AA 41 53 24 AA 51 54 24 00 5C 2F 2A 1C 82 43 4C |.AS$.QT$.\/*..CL|
00002750: 3A 98 34 2C 53 49 24 3A A0 34 3A 8E 00 00 00 |:.4,SI$:.4:.... |
..$....: PREPARED BY DUNCAN J MCRAE,.C..
..: WITH HELP FROM ARTICLES.F....: WRITT
EN BY JIM BUTTERFIELD,...(..: THE 1541 U
SER'S MANUAL AND...2..: A SHORT PROGRAM
FROM TPUG..M.<..: I AM SURE SOMEONE WILL
FIND...F..: ERRORS AND OMMISSIONS - IF
THEY...P..: DO, I WOULD HIGHLY APPRECIAT
E.;.Z..: A CALL AT (416)291-8785 OR.Q.D.
.: (416)863-2504..{.H.."....".9)". USE O
F THE C-64 WEDGE ."...R.."....HAS FOUR U
SES......"....(1) LOAD, RUN AND SAVE PRO
GRAMS......"....(2) OBTAIN DIRECTORY WIT
HOUT......"........DISTURBING ALREADY LO
ADED......"........FILE.D...."....(3) TR
ANSMIT DISK COMMANDS.J...."....(4) CHECK
DISK ERROR STATUS......"...TO LOAD TYPE
: LOAD";G(34);"C-64 WEDGE";G(34);",8..."
.."..- AND . RETURN . - THEN TYPE: ";G(3
4);"RUN";G(34)...,.."..- AND . RETURN ..
#.6.."...THE WEDGE LOADS DOS 5.1 (DOS ME
ANS.B.@.."..DISK OPERATING SYSTEM)...J..
"...YOU MAY NOW TYPE ";G(34);"NEW";G(34)
;" OR . RESTORE ."...T.."..WITHOUT DISTU
RBING THE WEDGE"...^..4000.X...."...WHEN
EVER I FORMAT A DISK (AS......"..DESCRIB
ED LATER) I ALWAYS ENSURE.,...."..THAT T
HE FIRST TWO PROGRAMS ON THE.T...."..DIS
K ARE THE WEDGE AND DOS 5.1"....."...TO
TRANSFER THE WEDGE, I LOAD THE...B.."..
C-64 WEDGE AND SAVE IT AS ";G(34);"WEDGE
";G(34)...L.."..IN THE NORMAL MANNER - B
Y USING...V.."..A PROGRAM NAME OF ";G(34
);"WEDGE";G(34);" IT IS.;...."..EASIER T
O TYPE AND REMEMBER.H...."...TO TRANSFER
DOS 5.1 IT IS NECESSARY......"..EITHER
TO USE A FILE COPIER PROGRAM......"..OR
TO LOAD AND RUN A MACHINE......"..LANGUA
GE MONITOR SUCH AS SUPERMON64......".. -
TO LOAD TO THE MONITOR TYPE:.D...."..L"
;G(34);"DOS 5.1";G(34);",08 - AND . RETU
RN ..O.&..".. - TO SAVE FROM THE MONITOR
TO THE...0.."..NEW DISK TYPE:.G.:.."..S
";G(34);"DOS 5.1";G(34);",08,CC00,CF5A -
AND . RETURN ....D..5000:.A$."L".200...
X..".... RULES OF THE WEDGE .".8.B.."...
COMMANDS MUST BE DIRECT - NOT IN A
PROGRAM".~.L.."...COMMANDS MUST START IN
THE FIRST COLUMN OF THE SCREEN..
.V.."...IT IS NOT NECESSARY TO ADD ,8.J.
..."..TO FILE NAMES WHEN USING THE......
"..WEDGE COMMANDS - THE COMPUTER......".
.DEFAULTS TO THE DISK DRIVE.=...."...FIL
E NAME NEED NOT BE IN QUOTES".G...."...D
ISK COMMANDS ARE PRECEEDED WITH......"..
@ OR > - (I PREFER @)"......"...SOME PRO
GRAMS CONTAINING MACHINE.W.F.."..LANGUAG
E WILL NOT RUN WITH THE...P.."..WEDGE IN
PLACE...Z..5000:.A$."L".400.'. .."....
(1) PROGRAM COMMANDS .".G.*.."...PROGRAM
COMMANDS ARE:".H.4.."..../ - TO LOAD A
PROGRAM"...>.."....^ - TO LOAD AND RUN A
PROGRAM"...H.."...._ - TO SAVE A PROGRA
M.W.R.."....% - TO LOAD A PROGRAM TO A".
..\.."........SPECIFIC ADDRESS"...F.."..
.EXAMPLES OF THE PROGRAM./.P.."..COMMAND
S ARE:".E.Z.."..../PROGRAM = LOAD";G(34)
;"PROGRAM";G(34);",8"......"....^PROGRAM
= LOAD";G(34);"PROGRAM";G(34);",8 AND R
UN.W...."...._PROGRAM = SAVE";G(34);"PRO
GRAM";G(34);",8......"....%PROGRAM = LOA
D";G(34);"PROGRAM";G(34);",8,1.<...."...
TO RESAVE AN EXISTING PROGRAM, WHERE.G..
.."..FOR EXAMPLE YOU HAVE MADE CHANGES,.
...."..THE COMMAND IS:......"...._@0:PR
OGRAM - OR...J.."...._@:PROGRAM.E.T..500
0:.A$."L".600......"...PATTERN MATCHING
MAY BE USED - THE CHARACTERS ARE:".
1...."....? - TO MATCH A SINGLE CHARACTE
R._...."....* - TO MATCH A STREAM OF CHA
RACTERS......"../N?T WILL LOAD NOT OR NU
T......"../NOT* WILL LOAD NOTHING OR NOT
OR......"..NOTICE...$.."...IN ADDITION
YOU MAY OBTAIN THE......"..DIRECTORY (AS
DESCRIBED NEXT) MOVE.5.8.."..THE CURSOR
OPPOSITE THE PROGRAM._.B.."..YOU WISH T
O LOAD OR LOAD AND RUN,...L.."..TYPE IN
THE SYMBOL AND . RETURN . - ...V.."..
THE PROGRAM WILL LOAD OR LOAD AND...`.."
..RUN - OTHER CHARACTERS ON THE LINE...J
.."..CAN BE IGNORED.!.T.."...THE NORMAL
VERIFY COMMAND IS.G.~.."..USED WITH THE
WEDGE - THAT IS.Z...."..TO SAY: VERIFY";
G(34);"PROGRAM";G(34);",8"......5000:.A$
."L".800......".... (2) DIRECTORY .".Y..
.."...THE DIRECTORY IS OBTAINED BY TYPIN
G...D.."..@$ (OR >$) FOLLOWED BY . RETUR
N ..).N.."...THIS WILL NOT DISTURB A FIL
E.@.X.."..ALREADY LOADED.K...."...PATTER
N MATCHING MAY ALSO BE USED......"..- FO
R EXAMPLE @$:D* WILL GIVE ONLY......"..F
ILES STARTING WITH D......"...IF YOU WIS
H TO OBTAIN ONLY THE......"..DISK NAME A
ND THE IDENTITY CODE.$...."..THEN THE CO
MMAND IS @$:.;....5000:.A$."L".1000.B.X.
."...IN THIS COMMAND AS WELL AS IN......
"..SOME OF THE EXAMPLES OF THE DISK.....
."..COMMANDS WHICH FOLLOW I HAVE.W....".
.DROPPED A 0 FROM THE COMMAND -... .."..
THIS MAY BE USED ONLY WHEN THERE.(....".
.IS ONE SINGLE DRIVE IN USE - IF.O....".
.THERE ARE TWO DRIVES OR A DUAL.U...."..
DRIVE THEN THE FIRST DRIVE IS...H.."..DE
SIGNATED WITH 0 AND THE SECOND...R.."..D
RIVE WITH 1......"...FOR EXAMPLE, IF THE
RE IS A DUAL......"..DRIVE, THE COMMAND
TO OBTAIN THE.,...."..DIRECTORY FROM THE
FIRST DRIVE.U...."..WOULD BE @$0 AND FR
OM THE SECOND.P...."..DRIVE WOULD BE @$1
......5000:.A$."L".1200...@..".... (3) D
ISK COMMANDS ..Q.J.."...THE DISK COMMAND
S INCLUDE FORMAT,...T.."..RENAME, SCRATC
H, VALIDATE, INITIALIZE...^.."..AND COPY
.=.H.."...EACH COMMAND IS PRECEEDED BY @
OR >.F.R.."..- IN THE FOLLOWING I SHALL
USE @...|.."...IN ADDITION THERE IS THE
DUPLICATE......"..COMMAND FOR USE WHEN
THERE IS A DUAL......"..DRIVE OR TWO DRI
VES - THIS COMMAND......"..COPIES A DISK
FROM ONE DRIVE TO THE.6...."..OTHER - T
HE COMMAND IS:.F...."....@D1=0.P...."..W
HICH WILL COPY THE DISK IN DRIVE...B..".
.0 TO THE DISK IN DRIVE 1 - IT IS.C.L.."
..PROBABLY BETTER TO USE ONE OF THE.Y.V.
."..COPY PROGRAMS......5000:.A$."L".1400
......".... FORMAT . IS USED WHEN USING
A DISK.J...."..FOR THE FIRST TIME OR WHE
N CLEARING.Y...."..A DISK.Q.&.."...TO NE
W A DISK:...0.."....@NEW0:DISK NAME,ID -
OR"...:.."....@N0:DISK NAME,ID"...D..".
.WHERE ";G(34);"ID";G(34);" IS ANY TWO U
NIQUE...N.."..CHARACTERS - NOTE THE 0 SH
OULD.3.X.."..NOT BE DROPPED IN THIS COMM
AND.M.B.."...TO CLEAR A DISK:.P.L.."....
@N0:0,00 FOLLOWED BY @N:...V.."...TO CLE
AR ONLY THE DIRECTORY:......"....@N:.P..
.."...A DISK CANNOT BE USED UNTIL IT HAS
......"..BEEN FORMATTED OR ";G(34);"NEWE
D";G(34).)...."...(ANOTHER TERM COMMONLY
USED FOR.K...."..FORMAT OR NEW IS HEADE
R)".B....5000:.A$."L".1600...P..".... RE
NAME . IS USED TO CHANGE THE NAME...Z.."
..OF A FILE ONCE IT IS IN THE.G...."..DI
RECTORY......"...TO RENAME:.. ..."....@R
ENAME0:NEWNAME=OLDNAME - OR.& ..."....@R
0:NEWNAME=OLDNAME - OR.C ..."....@R:NEWN
AME=OLDNAME.Q ..."...RENAME WILL NOT WOR
K ON AN OPEN FILE.. ..5000:.A$."L".1800
.. ...".... SCRATCH . REMOVES ONE OR MOR
E FILES.. ..."..FROM A DISK AND FREES TH
E DIRECTORY.. ..."..AND DISK SPACE..!...
"...TO SCRATCH:.1!..."....@SCRATCH0:FILE
NAME - OR.M!J.."....@S0:FILENAME - OR.C!
T.."....@S:FILENAME..!..."...PATTERN MAT
CHING MAY BE USED HOWEVER..!..."..WATCH
IT SINCE YOU MAY WELL SCRATCH..!..."..MO
RE FILES THAN YOU INTENDED.."..."...IF Y
OU CALL FOR ERROR STATUS (I.E. @.;"...".
.AND . RETURN .) THEN THE NUMBER OF.D"..
."..FILES SCRATCHED WILL BE RETURNED..".
.."...BY THE WAY, IF YOU HAVE SCRATCHED.
."$.."..A FILE WHICH YOU DIDN'T MEAN TO.
."..."..AND YOU HAVN'T SAVED ANOTHER..#8
.."..FILE ON TOP OF IT, YOU CAN RECOVER.
:#B.."..IT WITH THE PROGRAM ";G(34);"REV
IVE";G(34).Q#L..5000:.A$."L".2000..#`.."
.... VALIDATE . WILL TIDY UP A DISK WHER
E..#J.."..THERE HAVE BEEN A NUMBER OF SC
RATCHES..#T.."..AND NEW FILES ADDED - IT
MAY GIVE YOU..$~.."..ADDITIONAL SPACE O
N THE DISK - IT.1$..."..WILL AND SHOULD
BE USED TO REMOVE.Z$..."..ANY INCOMPLETE
FILES (I.E. WHERE..$..."..A * APPEARS B
ESIDE THE TYPE OF FILE. $..."..ON THE DI
RECTORY)..$..."...TO VALIDATE:.P$..."...
.@VALIDATE0 - OR..$D.."....@V0 - OR..$N.
."....@V..%X.."...THIS COMMAND SHOULD NE
VER BE USED.F%..."..WHEN THERE ARE RANDO
M FILES ON THE.O%..."..DISK AS IT WILL D
E-ALLOCATE THEM..%..."...I USE VALIDATE
QUITE FREQUENTLY..%..."..WHEN I AM COPYI
NG AND GENERALLY..%..."..MUCKING AROUND
WITH A DISK..%...5000:.A$."L".2200.)&(..
".... INITIALIZE . RETURNS THE DISK DRIV
E.V&2.."..TO THE SAME CONDITION AS WHEN
IT WAS..&<.."..POWERED UP - IT IS ALSO U
SED IF YOU..&F.."..ENCOUNTER ";G(34);"DR
IVE NOT READY";G(34);" ERRORS".V&P.."...
TO INITIALIZE:..&Z.."....@INITIALIZE0 -
OR..'D.."....@I0 - OR..'N.."....@I.)'X..
5000:.A$."L".2400.V'...".... COPY . ALLO
WS YOU TO MAKE ANOTHER.{'..."..COPY OF T
HE SAME FILE ON THE..'..."..SAME DISK BU
T UNDER A DIFFERENT NAME..'..."...TO COP
Y:..'..."....@COPY0:NEWFILE=0:OLDFILE -
OR..(".."....@C0:NEWFILE=0:OLDFILE - OR.
*(,.."....@C:NEWFILE=:OLDFILE - OR.G(6..
"....@C:NEWFILE=OLDFILE.O(@.."...YOU CAN
ALSO STICK TOGETHER OR..(J.."..CONCATEN
ATE TWO TO FOUR FILES..(T.."..WITH THE F
OLLOWING:..(^.."....@C0:NEWFILE=0:OLDFIL
E1,0:OLDFILE2,..(H.."....0:OLDFILE3,0:OL
DFILE4.))R.."...I AM TOLD THAT CONCATENA
TION WILL.Q)|.."..WORK WITH PROGRAM FILE
S SO LONG.|)..."..AS THE LINE NUMBERS DO
N'T CONFLICT..)..."..HOWEVER IT HAS NEVE
R WORKED FOR ME.O)..."..- I USE A MERGE
PROGRAM INSTEAD..)...5000:.A$."L".2600..
*...".... (4) DISK STATUS ."./*B.."...DI
SK STATUS IS OBTAINED BY TYPING.X*L.."..
@ (OR >) FOLLOWED BY . RETURN ."..*V..".
..IF NO ERROR, THEN THE MESSAGE WILL BE.
.*..."..";G(34);"00,OK,00,00";G(34).Z*..
."...THERE WILL BE A DIFFERENT MESSAGE I
F"..+..."..THERE IS AN ERROR OR, AS MENT
IONED".-+..."..EARLIER, IF THERE IS A SC
RATCH.>+..."..COMMAND".U+...5000:.A$."L"
.2800.|+...".........";.14);". GOOD LUCK
! ."..+...6000:.A$."L".3000..+....O+ .."
.......................... N=NEXT:P=PR
INT .";..+..A$."":.A$:.A$."".4010..+...A
$."P"..7010..,...A$."N".4050..,H..4010.
,R..".";.&,....C,..."...................
....... N=NEXT:L=LAST:P=PRINT .";.},..
A$."":.A$:.A$."".5010..,...A$."P"..7010.
,...A$."N".5060..,...A$."L".5060..,...5
010.E,D..".";.K,N....-P.."..............
............ N=END:L=LAST:P=PRINT .";.
.-Z..5010.#-X.. SCREEN COPY.D-B.SI$.G(15
):BS$.G(8):PO$.G(16).G-L.RV$.G(18):RO$.G
(146):QT$.G(34)..-V.MF$.G(145):VR.B(648)
.256..-...4,4:.4..-...CL.0.24:QF.0:AS$.M
F$:.RO.0.39.I-..SC.B(VR.40.CL.RO)..-...S
C.34.QF.1.QF..-...SC..162.7110.....QF.1.
QF:.QF.1.AS$.AS$.RV$.QT$:.7170.6...AS$.A
S$.QT$.RO$:.7170:.7130.Z.F..QF.1.(SC..12
8).SC.SC.128:.7130...P..SC..128.SC.SC.12
8:RF.1:AS$.AS$.RV$...Z..SC.32.SC.95.AS.S
C.64:.7160......SC.31.SC.64.AS.SC:.7160.
.....SC.63.SC.96.AS.SC.32:.7160.....AS$.
AS$.G(AS)../...RF.1.AS$.AS$.RO$:RF.0../.
..RO.1/...QF.0..4,SI$PO$AS$:.7210.H/ ..4
,SI$.PO$.AS$.QT$.\/*..CL:.4,SI$: 4:....
> CLICK IMAGE PREVIEW FOR FULL MODAL