/ 8bitfiles.net/archives / archives.tar / archives / genie-commodore-file-library / C128Toolkit / 2DIR128

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 01 1c 43 1c dc 05 8f 20 | 32 20 44 49 52 20 43 2d |..C.... |2 DIR C-|
|00000010| 31 32 38 20 44 49 52 45 | 43 54 4f 52 59 20 55 54 |128 DIRE|CTORY UT|
|00000020| 49 4c 49 54 59 20 42 59 | 20 2d 3d 5b 43 48 55 43 |ILITY BY| -=[CHUC|
|00000030| 4b 2e 57 41 47 4f 4e 5d | 3d 2d 20 30 36 2d 31 39 |K.WAGON]|=- 06-19|
|00000040| 2d 38 37 00 4a 1c e6 05 | fe 25 00 90 1c f0 05 e8 |-87.J...|.%......|
|00000050| 3a fe 15 3a 9e 35 31 37 | 34 38 3a 8f 20 43 4c 45 |:..:.517|48:. CLE|
|00000060| 41 52 20 53 43 52 45 45 | 4e 2c 44 45 56 49 43 45 |AR SCREE|N,DEVICE|
|00000070| 20 43 4c 45 41 52 2c 53 | 59 53 20 43 41 4c 4c 20 | CLEAR,S|YS CALL |
|00000080| 54 4f 20 43 4c 45 41 52 | 20 57 49 4e 44 4f 57 53 |TO CLEAR| WINDOWS|
|00000090| 00 a2 1c fa 05 8f 20 2d | 20 53 45 43 54 49 4f 4e |...... -| SECTION|
|000000a0| 20 31 00 e5 1c 04 06 41 | 24 b2 22 12 20 20 32 44 | 1.....A|$.".  2D|
|000000b0| 49 52 2d 31 32 38 20 20 | 20 20 20 20 20 42 59 3a |IR-128  |     BY:|
|000000c0| 20 43 48 55 43 4b 2e 57 | 41 47 4f 4e 20 20 20 20 | CHUCK.W|AGON    |
|000000d0| 20 20 56 45 52 20 32 2e | 30 20 30 36 2d 31 39 2d |  VER 2.|0 06-19-|
|000000e0| 38 37 20 20 22 00 1e 1d | 0e 06 8d 31 37 31 30 3a |87  "...|...1710:|
|000000f0| 99 2c 41 24 3a 8f 20 20 | 43 41 4c 4c 20 53 55 42 |.,A$:.  |CALL SUB|
|00000100| 52 4f 55 54 49 4e 45 20 | 41 4e 44 20 50 52 49 4e |ROUTINE |AND PRIN|
|00000110| 54 20 54 4f 20 57 49 4e | 44 4f 57 20 23 31 00 b4 |T TO WIN|DOW #1..|
|00000120| 1d 18 06 8d 20 31 37 34 | 30 3a 99 22 20 20 20 20 |.... 174|0:."    |
|00000130| 20 20 20 20 20 20 20 20 | 20 20 9e 49 4e 53 45 52 |        |  .INSER|
|00000140| 54 20 44 49 53 4b 23 31 | 20 49 4e 20 44 52 49 56 |T DISK#1| IN DRIV|
|00000150| 45 20 30 20 50 52 45 53 | 53 20 41 4e 59 20 4b 45 |E 0 PRES|S ANY KE|
|00000160| 59 20 54 4f 20 50 52 4f | 43 45 45 44 20 20 20 20 |Y TO PRO|CEED    |
|00000170| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000180| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000190| 20 12 20 55 53 45 20 4e | 4f 20 53 43 52 4f 4c 4c | . USE N|O SCROLL|
|000001a0| 20 54 4f 20 50 41 55 53 | 45 20 44 49 52 45 43 54 | TO PAUS|E DIRECT|
|000001b0| 4f 52 59 22 00 ce 1d 22 | 06 a1 f9 20 5a 24 3a 8b |ORY"..."|... Z$:.|
|000001c0| 20 5a 24 b3 b1 22 22 20 | a7 20 31 35 38 30 00 17 | Z$.."" |. 1580..|
|000001d0| 1e 2c 06 8d 31 37 32 30 | 3a fe 26 3a ee 3a 8f 20 |.,..1720|:.&:.:. |
|000001e0| 43 41 4c 4c 20 53 55 42 | 52 4f 55 54 49 4e 45 20 |CALL SUB|ROUTINE |
|000001f0| 41 4e 44 20 50 52 49 4e | 54 20 54 4f 20 49 53 54 |AND PRIN|T TO IST|
|00000200| 20 34 30 43 4f 4c 55 4d | 4e 53 20 4f 46 20 57 49 | 40COLUM|NS OF WI|
|00000210| 4e 44 4f 57 20 23 32 00 | ad 1e 36 06 8d 20 31 37 |NDOW #2.|..6.. 17|
|00000220| 34 30 3a 99 22 20 20 20 | 20 20 20 20 20 20 20 20 |40:."   |        |
|00000230| 20 20 20 9e 49 4e 53 45 | 52 54 20 44 49 53 4b 23 |   .INSE|RT DISK#|
|00000240| 32 20 49 4e 20 44 52 49 | 56 45 20 30 20 50 52 45 |2 IN DRI|VE 0 PRE|
|00000250| 53 53 20 41 4e 59 20 4b | 45 59 20 54 4f 20 50 52 |SS ANY K|EY TO PR|
|00000260| 4f 43 45 45 44 20 20 20 | 20 20 20 20 20 20 20 20 |OCEED   |        |
|00000270| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000280| 20 20 20 20 20 20 20 20 | 20 20 12 20 55 53 45 20 |        |  . USE |
|00000290| 4e 4f 20 53 43 52 4f 4c | 4c 20 54 4f 20 50 41 55 |NO SCROL|L TO PAU|
|000002a0| 53 45 20 44 49 52 45 43 | 54 4f 52 59 22 00 c7 1e |SE DIREC|TORY"...|
|000002b0| 40 06 a1 f9 20 5a 24 3a | 8b 20 5a 24 b3 b1 22 22 |@... Z$:|. Z$..""|
|000002c0| 20 a7 20 31 36 31 30 00 | 10 1f 4a 06 8d 31 37 33 | . 1610.|..J..173|
|000002d0| 30 3a fe 26 3a ee 3a 8f | 20 43 41 4c 4c 20 53 55 |0:.&:.:.| CALL SU|
|000002e0| 42 52 4f 55 54 49 4e 45 | 20 41 4e 44 20 50 52 49 |BROUTINE| AND PRI|
|000002f0| 4e 54 20 54 4f 20 32 4e | 44 20 34 30 43 4f 4c 55 |NT TO 2N|D 40COLU|
|00000300| 4d 4e 53 20 4f 46 20 57 | 49 4e 44 4f 57 20 23 32 |MNS OF W|INDOW #2|
|00000310| 00 9d 1f 54 06 8d 31 37 | 34 30 3a 99 22 05 43 48 |...T..17|40:.".CH|
|00000320| 4f 4f 53 45 3a 20 20 20 | 20 20 20 28 9e 4d 05 29 |OOSE:   |   (.M.)|
|00000330| 4f 52 45 20 44 49 52 45 | 43 54 4f 52 49 45 53 20 |ORE DIRE|CTORIES |
|00000340| 20 28 9c 44 05 29 4f 53 | 20 52 4f 55 54 49 4e 45 | (.D.)OS| ROUTINE|
|00000350| 53 20 28 96 56 05 29 49 | 45 57 20 41 20 46 49 4c |S (.V.)I|EW A FIL|
|00000360| 45 20 4f 52 20 28 51 29 | 55 49 54 20 20 20 20 20 |E OR (Q)|UIT     |
|00000370| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000380| 20 20 20 20 20 20 12 20 | 50 52 45 53 53 20 20 4d |      . |PRESS  M|
|00000390| 20 20 44 20 20 56 20 20 | 4f 52 20 20 51 00 b7 1f |  D  V  |OR  Q...|
|000003a0| 5e 06 a1 f9 20 44 24 3a | 8b 20 44 24 b2 22 4d 22 |^... D$:|. D$."M"|
|000003b0| 20 89 20 31 35 35 30 00 | cb 1f 68 06 8b 20 44 24 | . 1550.|..h.. D$|
|000003c0| b2 22 51 22 20 a7 20 32 | 32 35 30 00 df 1f 72 06 |."Q" . 2|250...r.|
|000003d0| 8b 20 44 24 b2 22 44 22 | 20 89 20 31 37 37 30 00 |. D$."D"| . 1770.|
|000003e0| f3 1f 7c 06 8b 20 44 24 | b2 22 56 22 20 a7 20 32 |..|.. D$|."V" . 2|
|000003f0| 31 30 30 00 2b 20 86 06 | 8b 20 44 24 b3 b1 22 22 |100.+ ..|. D$..""|
|00000400| 20 a7 99 22 55 48 20 4f | 48 21 20 57 52 4f 4e 47 | .."UH O|H! WRONG|
|00000410| 20 4b 45 59 2c 20 54 52 | 59 20 41 47 41 49 4e 22 | KEY, TR|Y AGAIN"|
|00000420| 3a fe 0b 32 3a 89 20 31 | 36 32 30 00 4e 20 90 06 |:..2:. 1|620.N ..|
|00000430| 8f 20 53 45 43 54 49 4f | 4e 20 33 20 20 2d 20 57 |. SECTIO|N 3  - W|
|00000440| 49 4e 44 4f 57 20 52 4f | 55 54 49 4e 45 53 00 98 |INDOW RO|UTINES..|
|00000450| 20 9a 06 8f 20 57 49 4e | 44 4f 57 53 20 2d 20 54 | ... WIN|DOWS - T|
|00000460| 48 49 53 20 49 53 20 54 | 48 45 20 4d 45 41 54 20 |HIS IS T|HE MEAT |
|00000470| 52 49 47 48 54 20 48 45 | 52 45 20 55 53 45 20 54 |RIGHT HE|RE USE T|
|00000480| 48 45 53 45 20 49 4e 20 | 59 4f 55 20 4f 57 4e 20 |HESE IN |YOU OWN |
|00000490| 50 52 4f 47 52 41 4d 53 | 00 17 21 a4 06 8f 20 46 |PROGRAMS|..!... F|
|000004a0| 52 4f 4d 20 4c 45 46 54 | 20 54 4f 20 52 49 47 48 |ROM LEFT| TO RIGH|
|000004b0| 54 20 2d 20 54 4f 50 20 | 4c 45 46 54 20 43 4f 4c |T - TOP |LEFT COL|
|000004c0| 2c 20 54 4f 50 20 4c 45 | 46 54 20 52 4f 57 2c 20 |, TOP LE|FT ROW, |
|000004d0| 42 4f 54 4f 4d 20 52 49 | 47 48 54 20 43 4f 4c 2c |BOTOM RI|GHT COL,|
|000004e0| 20 42 4f 54 4f 4d 20 52 | 49 47 48 54 20 52 4f 57 | BOTOM R|IGHT ROW|
|000004f0| 2c 5b 43 4c 45 41 52 20 | 57 49 4e 44 4f 57 20 4f |,[CLEAR |WINDOW O|
|00000500| 50 54 49 4f 4e 41 4c 20 | 53 50 45 43 49 46 49 45 |PTIONAL |SPECIFIE|
|00000510| 44 20 42 59 20 31 5d 00 | 3b 21 ae 06 fe 1a 20 30 |D BY 1].|;!.... 0|
|00000520| 2c 30 2c 37 39 2c 31 2c | 31 3a e7 36 2c 37 3a 8e |,0,79,1,|1:.6,7:.|
|00000530| 3a 8f 20 57 49 4e 44 4f | 57 23 31 00 5b 21 b8 06 |:. WINDO|W#1.[!..|
|00000540| fe 1a 20 30 2c 32 2c 33 | 39 2c 32 31 2c 31 3a 8e |.. 0,2,3|9,21,1:.|
|00000550| 3a 8f 20 57 49 4e 44 4f | 57 23 32 00 7d 21 c2 06 |:. WINDO|W#2.}!..|
|00000560| fe 1a 20 34 30 2c 32 2c | 37 39 2c 32 31 2c 31 3a |.. 40,2,|79,21,1:|
|00000570| 8e 3a 8f 20 57 49 4e 44 | 4f 57 23 32 41 00 a1 21 |.:. WIND|OW#2A..!|
|00000580| cc 06 fe 1a 20 30 2c 32 | 32 2c 37 39 2c 32 34 2c |.... 0,2|2,79,24,|
|00000590| 31 3a fe 15 3a 8e 3a 8f | 20 57 49 4e 44 4f 57 23 |1:..:.:.| WINDOW#|
|000005a0| 33 00 a7 21 d6 06 8f 00 | c6 21 e0 06 8f 20 2d 20 |3..!....|.!... - |
|000005b0| 53 45 43 54 49 4f 4e 20 | 34 20 44 4f 53 20 52 4f |SECTION |4 DOS RO|
|000005c0| 55 54 49 4e 45 53 00 f6 | 21 ea 06 8f 20 46 49 4c |UTINES..|!... FIL|
|000005d0| 45 20 53 43 52 41 54 43 | 48 45 52 20 42 59 20 43 |E SCRATC|HER BY C|
|000005e0| 41 52 4c 20 46 2e 20 48 | 4f 57 41 52 44 20 30 35 |ARL F. H|OWARD 05|
|000005f0| 2d 31 37 2d 38 37 00 6c | 22 f4 06 8d 31 37 34 30 |-17-87.l|"...1740|
|00000600| 3a 99 22 43 48 4f 4f 53 | 45 3a 20 28 44 29 45 4c |:."CHOOS|E: (D)EL|
|00000610| 45 54 45 20 20 28 52 29 | 45 4e 41 4d 45 20 41 20 |ETE  (R)|ENAME A |
|00000620| 46 49 4c 45 20 28 46 29 | 4f 52 4d 41 54 20 41 20 |FILE (F)|ORMAT A |
|00000630| 44 49 53 4b 20 20 4f 52 | 20 20 28 51 29 20 20 20 |DISK  OR|  (Q)   |
|00000640| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000650| 20 20 20 20 20 20 20 20 | 12 20 50 52 45 53 53 3a |        |. PRESS:|
|00000660| 20 20 44 20 52 20 46 20 | 4f 52 20 51 00 84 22 fe |  D R F |OR Q..".|
|00000670| 06 a1 f9 55 24 3a 8b 20 | 55 24 b2 22 51 22 a7 20 |...U$:. |U$."Q". |
|00000680| 32 32 35 30 00 98 22 08 | 07 8b 20 55 24 b2 22 44 |2250..".|.. U$."D|
|00000690| 22 20 a7 20 31 38 34 30 | 00 ac 22 12 07 8b 20 55 |" . 1840|.."... U|
|000006a0| 24 b2 22 52 22 20 a7 20 | 31 39 32 30 00 c0 22 1c |$."R" . |1920..".|
|000006b0| 07 8b 20 55 24 b2 22 46 | 22 20 a7 20 32 30 32 30 |.. U$."F|" . 2020|
|000006c0| 00 f6 22 26 07 8b 55 24 | b3 b1 22 22 20 a7 20 99 |.."&..U$|.."" . .|
|000006d0| 22 55 48 20 4f 48 21 20 | 57 52 4f 4e 47 20 4b 45 |"UH OH! |WRONG KE|
|000006e0| 59 20 54 52 59 20 41 47 | 41 49 4e 22 3a fe 0b 32 |Y TRY AG|AIN":..2|
|000006f0| 3a 89 31 37 38 30 00 28 | 23 30 07 8d 20 31 37 31 |:.1780.(|#0.. 171|
|00000700| 30 3a 99 22 09 09 09 43 | 48 55 43 4b 27 53 20 31 |0:."...C|HUCK'S 1|
|00000710| 32 38 20 46 41 53 54 20 | 46 49 4c 45 20 53 43 52 |28 FAST |FILE SCR|
|00000720| 41 54 43 48 45 52 22 3a | 00 4a 23 3a 07 8d 31 37 |ATCHER":|.J#:..17|
|00000730| 34 30 3a 85 22 44 45 4c | 45 54 45 20 57 48 49 43 |40:."DEL|ETE WHIC|
|00000740| 48 20 46 49 4c 45 22 3b | 41 24 00 54 23 44 07 f2 |H FILE";|A$.T#D..|
|00000750| 28 41 24 29 00 97 23 4e | 07 8d 31 37 34 30 3a 99 |(A$)..#N|..1740:.|
|00000760| 22 44 4f 20 59 4f 55 20 | 57 41 4e 54 20 54 4f 20 |"DO YOU |WANT TO |
|00000770| 53 43 52 41 54 43 48 20 | 41 4e 4f 54 48 45 52 20 |SCRATCH |ANOTHER |
|00000780| 46 49 4c 45 3f 20 59 3d | 59 45 53 20 4e 3d 4e 4f |FILE? Y=|YES N=NO|
|00000790| 22 3a a1 f9 53 53 24 00 | ad 23 58 07 8b 53 53 24 |":..SS$.|.#X..SS$|
|000007a0| b2 22 59 22 20 a7 20 89 | 20 31 38 35 30 00 c2 23 |."Y" . .| 1850..#|
|000007b0| 62 07 8b 53 53 24 b2 22 | 4e 22 a7 20 89 20 31 37 |b..SS$."|N". . 17|
|000007c0| 38 30 00 ee 23 6c 07 8b | 53 53 24 b3 b1 22 22 20 |80..#l..|SS$.."" |
|000007d0| a7 20 99 22 57 52 4f 4e | 47 20 4b 45 59 20 54 52 |. ."WRON|G KEY TR|
|000007e0| 59 20 41 47 41 49 4e 22 | 3a 89 31 38 37 30 00 25 |Y AGAIN"|:.1870.%|
|000007f0| 24 76 07 8b 53 53 24 b3 | b1 22 22 20 a7 20 99 22 |$v..SS$.|."" . ."|
|00000800| 55 48 20 4f 48 21 20 57 | 52 4f 4e 47 20 4b 45 59 |UH OH! W|RONG KEY|
|00000810| 20 54 52 59 20 41 47 41 | 49 4e 22 3a fe 0b 31 3a | TRY AGA|IN":..1:|
|00000820| 89 31 38 35 30 00 52 24 | 80 07 8d 31 37 31 30 3a |.1850.R$|...1710:|
|00000830| 99 22 11 11 43 48 55 43 | 4b 53 20 31 32 38 20 46 |."..CHUC|KS 128 F|
|00000840| 41 53 54 20 46 49 4c 45 | 20 52 45 4e 41 4d 45 52 |AST FILE| RENAMER|
|00000850| 22 3a 00 90 24 8a 07 8d | 31 37 34 30 3a 85 22 45 |":..$...|1740:."E|
|00000860| 4e 54 45 52 20 54 48 45 | 20 4e 41 4d 45 20 4f 46 |NTER THE| NAME OF|
|00000870| 20 54 48 45 20 46 49 4c | 45 20 59 4f 55 20 57 41 | THE FIL|E YOU WA|
|00000880| 4e 54 20 54 4f 20 52 45 | 4e 41 4d 45 22 3b 4e 24 |NT TO RE|NAME";N$|
|00000890| 00 e2 24 94 07 8d 31 37 | 34 30 3a 85 22 4e 4f 57 |..$...17|40:."NOW|
|000008a0| 20 45 4e 54 45 52 20 54 | 48 45 20 4e 45 57 20 4e | ENTER T|HE NEW N|
|000008b0| 41 4d 45 22 3b 4e 4e 24 | 3a 8f 20 50 52 4f 4d 50 |AME";NN$|:. PROMP|
|000008c0| 54 20 46 4f 52 20 4e 45 | 57 20 46 49 4c 45 20 4e |T FOR NE|W FILE N|
|000008d0| 41 4d 45 2c 20 44 45 46 | 49 4e 45 20 53 54 52 49 |AME, DEF|INE STRI|
|000008e0| 4e 47 00 f3 24 9e 07 f5 | 20 28 4e 24 29 a4 28 4e |NG..$...| (N$).(N|
|000008f0| 4e 24 29 00 35 25 a8 07 | 8d 31 37 34 30 3a 99 20 |N$).5%..|.1740:. |
|00000900| 22 44 4f 20 59 4f 55 20 | 57 41 4e 54 20 54 4f 20 |"DO YOU |WANT TO |
|00000910| 52 45 4e 41 4d 45 20 41 | 4e 4f 54 48 45 52 20 46 |RENAME A|NOTHER F|
|00000920| 49 4c 45 3f 20 59 3d 59 | 45 53 20 4e 3d 4e 4f 22 |ILE? Y=Y|ES N=NO"|
|00000930| 3a a1 f9 42 24 00 71 25 | b2 07 8f 20 50 52 49 4e |:..B$.q%|... PRIN|
|00000940| 54 20 50 52 4f 4d 50 54 | 20 46 4f 52 20 41 4e 4f |T PROMPT| FOR ANO|
|00000950| 54 48 45 52 20 46 49 4c | 45 20 4d 45 53 53 41 47 |THER FIL|E MESSAG|
|00000960| 45 2c 4c 4f 4f 4b 20 46 | 4f 52 20 4b 45 59 20 42 |E,LOOK F|OR KEY B|
|00000970| 24 00 a5 25 bc 07 8b 20 | 42 24 b2 22 59 22 20 a7 |$..%... |B$."Y" .|
|00000980| 20 89 20 31 39 32 30 3a | 8f 20 49 46 20 4b 45 59 | . 1920:|. IF KEY|
|00000990| 20 42 24 20 3d 20 59 45 | 53 20 4c 4f 4f 50 20 54 | B$ = YE|S LOOP T|
|000009a0| 4f 20 33 38 30 00 d7 25 | c6 07 8b 20 42 24 b2 22 |O 380..%|... B$."|
|000009b0| 4e 22 a7 20 89 20 31 37 | 38 30 3a 20 8f 20 49 46 |N". . 17|80: . IF|
|000009c0| 20 4b 45 59 20 42 24 20 | 3d 20 4e 4f 20 20 47 4f | KEY B$ |= NO  GO|
|000009d0| 20 54 4f 20 33 30 30 00 | 0e 26 d0 07 8b 53 53 24 | TO 300.|.&...SS$|
|000009e0| b3 b1 22 22 20 a7 20 99 | 22 55 48 20 4f 48 21 20 |.."" . .|"UH OH! |
|000009f0| 57 52 4f 4e 47 20 4b 45 | 59 20 54 52 59 20 41 47 |WRONG KE|Y TRY AG|
|00000a00| 41 49 4e 22 3a fe 0b 31 | 3a 89 31 39 36 30 00 4c |AIN":..1|:.1960.L|
|00000a10| 26 da 07 8f 20 43 2d 31 | 32 38 20 38 30 20 43 4f |&... C-1|28 80 CO|
|00000a20| 4c 55 4d 4e 20 51 55 49 | 43 4b 2d 46 4f 52 4d 41 |LUMN QUI|CK-FORMA|
|00000a30| 54 20 42 59 20 43 41 52 | 4c 20 46 2e 20 48 4f 57 |T BY CAR|L F. HOW|
|00000a40| 41 52 44 20 30 35 2d 31 | 38 2d 38 37 00 7d 26 e4 |ARD 05-1|8-87.}&.|
|00000a50| 07 8d 31 37 31 30 3a 99 | 22 11 11 11 11 09 09 09 |..1710:.|".......|
|00000a60| 20 20 43 48 55 43 4b 53 | 20 31 32 38 20 51 55 49 |  CHUCKS| 128 QUI|
|00000a70| 43 4b 20 46 4f 52 4d 41 | 54 45 52 20 22 00 dc 26 |CK FORMA|TER "..&|
|00000a80| ee 07 8d 31 37 34 30 3a | 99 22 11 11 11 20 20 20 |...1740:|."...   |
|00000a90| 50 55 54 20 41 20 4e 45 | 57 20 44 49 53 4b 20 49 |PUT A NE|W DISK I|
|00000aa0| 4e 20 59 4f 55 52 20 44 | 52 49 56 45 20 41 4e 44 |N YOUR D|RIVE AND|
|00000ab0| 20 50 52 45 53 53 20 50 | 20 54 4f 20 43 4f 4e 54 | PRESS P| TO CONT|
|00000ac0| 49 4e 55 45 22 3a a1 f9 | 20 50 24 3a 8b 50 24 b2 |INUE":..| P$:.P$.|
|00000ad0| 22 50 22 20 a7 20 89 20 | 32 30 34 30 00 17 27 f8 |"P" . . |2040..'.|
|00000ae0| 07 8d 31 37 34 30 3a 85 | 22 11 11 11 11 09 09 20 |..1740:.|"...... |
|00000af0| 20 50 4c 45 41 53 45 20 | 45 4e 54 45 52 20 41 20 | PLEASE |ENTER A |
|00000b00| 4e 41 4d 45 20 46 4f 52 | 20 54 48 49 53 20 44 49 |NAME FOR| THIS DI|
|00000b10| 53 4b 20 22 3b 41 24 00 | 4f 27 02 08 85 22 11 11 |SK ";A$.|O'..."..|
|00000b20| 09 09 20 4e 4f 57 20 45 | 4e 54 45 52 20 41 20 32 |.. NOW E|NTER A 2|
|00000b30| 20 44 49 47 49 54 20 49 | 44 23 20 46 4f 52 20 54 | DIGIT I|D# FOR T|
|00000b40| 48 49 53 20 20 44 49 53 | 4b 20 20 22 3b 42 24 00 |HIS  DIS|K  ";B$.|
|00000b50| 64 27 0c 08 f1 28 41 24 | 29 aa c7 28 34 34 29 aa |d'...(A$|)..(44).|
|00000b60| 28 42 24 29 00 ad 27 16 | 08 8d 31 37 34 30 3a 99 |(B$)..'.|..1740:.|
|00000b70| 20 22 11 11 09 09 20 44 | 4f 20 59 4f 55 20 57 41 | ".... D|O YOU WA|
|00000b80| 4e 54 20 46 4f 52 4d 41 | 54 20 41 4e 4f 54 48 45 |NT FORMA|T ANOTHE|
|00000b90| 52 20 44 49 53 4b 20 20 | 59 3d 59 45 53 20 4e 3d |R DISK  |Y=YES N=|
|00000ba0| 4e 4f 22 3b 43 24 3a a1 | f9 20 43 24 3a 00 c3 27 |NO";C$:.|. C$:..'|
|00000bb0| 20 08 8b 20 43 24 b2 22 | 59 22 20 a7 20 89 20 32 | .. C$."|Y" . . 2|
|00000bc0| 30 34 30 00 d8 27 2a 08 | 8b 20 43 24 b2 22 4e 22 |040..'*.|. C$."N"|
|00000bd0| a7 20 89 20 31 37 38 30 | 00 f2 27 34 08 8f 20 46 |. . 1780|..'4.. F|
|00000be0| 49 4c 45 20 52 45 41 44 | 45 52 20 52 4f 55 54 49 |ILE READ|ER ROUTI|
|00000bf0| 4e 45 00 07 28 3e 08 9e | 34 39 34 37 34 3a e7 36 |NE..(>..|49474:.6|
|00000c00| 2c 37 3a e7 35 2c 38 00 | 5b 28 48 08 9e 35 31 33 |,7:.5,8.|[(H..513|
|00000c10| 34 36 3a fe 1a 20 30 2c | 32 33 2c 37 39 2c 32 34 |46:.. 0,|23,79,24|
|00000c20| 2c 31 3a 99 22 45 4e 54 | 45 52 20 28 56 29 20 54 |,1:."ENT|ER (V) T|
|00000c30| 4f 20 56 49 45 57 20 41 | 20 46 49 4c 45 20 4f 52 |O VIEW A| FILE OR|
|00000c40| 20 28 52 29 20 54 4f 20 | 52 45 54 55 52 4e 20 54 | (R) TO |RETURN T|
|00000c50| 4f 20 4d 41 49 4e 20 4d | 45 4e 55 00 83 28 52 08 |O MAIN M|ENU..(R.|
|00000c60| a1 f9 41 24 3a 8b 41 24 | b2 22 52 22 20 a7 20 9e |..A$:.A$|."R" . .|
|00000c70| 34 39 34 37 34 3a 9e 35 | 31 33 34 36 3a 89 20 31 |49474:.5|1346:. 1|
|00000c80| 36 32 30 00 94 28 5c 08 | 8b 41 24 b2 22 56 22 89 |620..(\.|.A$."V".|
|00000c90| 32 31 36 30 00 cc 28 66 | 08 8b 20 41 24 b3 b1 22 |2160..(f|.. A$.."|
|00000ca0| 22 20 a7 99 22 55 48 20 | 4f 48 21 20 57 52 4f 4e |" .."UH |OH! WRON|
|00000cb0| 47 20 4b 45 59 2c 20 54 | 52 59 20 41 47 41 49 4e |G KEY, T|RY AGAIN|
|00000cc0| 22 3a fe 0b 32 3a 89 20 | 32 31 32 30 00 e6 28 70 |":..2:. |2120..(p|
|00000cd0| 08 85 22 45 4e 54 45 52 | 20 46 49 4c 45 20 4e 41 |.."ENTER| FILE NA|
|00000ce0| 4d 45 22 3b 42 24 00 fe | 28 7a 08 9e 34 39 34 37 |ME";B$..|(z..4947|
|00000cf0| 34 3a fe 1a 20 30 2c 30 | 2c 37 39 2c 32 32 00 23 |4:.. 0,0|,79,22.#|
|00000d00| 29 84 08 e8 3a 9e 35 31 | 33 32 38 3a 9f 33 2c 38 |)...:.51|328:.3,8|
|00000d10| 2c 33 2c 28 42 24 29 3a | 9f 31 35 2c 38 2c 31 35 |,3,(B$):|.15,8,15|
|00000d20| 3a fe 25 00 42 29 8e 08 | 81 49 b2 30 a4 31 3a 49 |:.%.B)..|.I.0.1:I|
|00000d30| b2 53 54 3a a1 23 33 2c | 42 24 3a 99 42 24 3b 3a |.ST:.#3,|B$:.B$;:|
|00000d40| 82 3a 00 53 29 98 08 8b | 20 44 53 b2 30 20 89 32 |.:.S)...| DS.0 .2|
|00000d50| 32 33 30 00 ca 29 a2 08 | 8b 20 44 53 b1 30 20 a7 |230..)..|. DS.0 .|
|00000d60| 20 9e 35 31 33 34 36 3a | fe 1a 20 30 2c 32 33 2c | .51346:|.. 0,23,|
|00000d70| 37 39 2c 32 34 2c 31 3a | 99 22 41 20 44 49 53 4b |79,24,1:|."A DISK|
|00000d80| 20 45 52 52 4f 52 20 48 | 41 53 20 4f 43 43 55 52 | ERROR H|AS OCCUR|
|00000d90| 45 44 20 2d 20 54 48 45 | 20 53 59 53 54 45 4d 20 |ED - THE| SYSTEM |
|00000da0| 49 4e 44 49 43 41 54 45 | 53 20 54 48 45 20 46 4f |INDICATE|S THE FO|
|00000db0| 4c 4c 4f 57 49 4e 47 20 | 45 52 52 4f 52 20 4d 45 |LLOWING |ERROR ME|
|00000dc0| 53 53 41 47 45 22 3a fe | 0b 34 00 f8 29 ac 08 9e |SSAGE":.|.4..)...|
|00000dd0| 35 31 33 34 36 3a fe 1a | 20 30 2c 32 33 2c 37 39 |51346:..| 0,23,79|
|00000de0| 2c 32 34 2c 31 3a 99 20 | 44 53 24 3a fe 0b 32 3a |,24,1:. |DS$:..2:|
|00000df0| fe 15 3a 89 32 31 36 30 | 00 07 2a b6 08 fe 15 3a |..:.2160|..*....:|
|00000e00| a0 33 3a a0 31 35 3a 00 | 36 2a c0 08 99 22 11 11 |.3:.15:.|6*..."..|
|00000e10| 11 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |.       |        |
|00000e20| 20 20 20 20 2a 2a 20 44 | 4f 4e 45 20 2a 2a 22 3a |    ** D|ONE **":|
|00000e30| 89 20 32 31 32 30 00 57 | 2a ca 08 8f 20 2d 20 45 |. 2120.W|*... - E|
|00000e40| 4e 44 20 50 52 4f 47 52 | 41 4d 20 20 53 43 52 45 |ND PROGR|AM  SCRE|
|00000e50| 45 4e 20 54 49 44 59 00 | 7b 2a d4 08 81 20 41 b2 |EN TIDY.|{*... A.|
|00000e60| 30 a4 33 39 3a fe 1a 20 | 33 39 ab 41 2c 30 2c 34 |0.39:.. |39.A,0,4|
|00000e70| 30 aa 41 2c 32 34 2c 31 | 3a 82 3a 00 8a 2a de 08 |0.A,24,1|:.:..*..|
|00000e80| e8 3a 9e 35 31 37 34 38 | 3a 80 00 00 1a 1a 1a 1a |.:.51748|:.......|
|00000e90| 1a 1a 1a 1a 1a 1a 1a 1a | 1a 1a 1a 1a 1a 1a 1a 1a |........|........|
|00000ea0| 1a 1a 1a 1a 1a 1a 1a 1a | 1a 1a 1a 1a 1a 1a 1a 1a |........|........|
|00000eb0| 1a 1a 1a 1a 1a 1a 1a 1a | 1a 1a 1a 1a 1a 1a 1a 1a |........|........|
|00000ec0| 1a 1a 1a 1a 1a 1a 1a 1a | 1a 1a 1a 1a 1a 1a 1a 1a |........|........|
|00000ed0| 1a 1a 1a 1a 1a 1a 1a 1a | 1a 1a 1a 1a 1a 1a 1a 1a |........|........|
|00000ee0| 1a 1a 1a 1a 1a 1a 1a 1a | 1a 1a 1a 1a 1a 1a 1a 1a |........|........|
|00000ef0| 1a 1a 1a 1a 1a 1a 1a 1a | 1a 1a 1a 1a 1a 1a 1a 1a |........|........|
+--------+-------------------------+-------------------------+--------+--------+