26.TRACK/SECTOR
FILE INFORMATION
FILENAME(S): 26.TRACK/SECTOR
FILE TYPE(S): PRG
FILE SIZE: 9.4K
FIRST SEEN: 2025-11-30 01:08:05
APPEARS ON: 2 disk(s)
FILE HASH
939fe3503d4704171cc852b585c762d2ae085c1a538137fdd80e0ddbc9e8d1ea
FOUND ON DISKS (2 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| U TILITEIS | 26.TRACK/SECTOR | PRG | Treasure Chest - Wolfgang Rauprich | 2 | 1 | DOWNLOAD FILE |
| FREEWARE DISK NR | 26.TRACK/SECTOR | PRG | Treasure Chest - Wolfgang Rauprich | 2 | 1 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 14 08 00 00 56 53 24 B2 22 39 37 30 31 31 |......VS$."97011|
00000010: 37 2E 41 22 00 38 08 01 00 8F 20 53 48 4F 57 20 |7.A".8.... SHOW |
00000020: 54 52 41 43 4B 2C 20 53 45 43 54 4F 52 2C 20 4E |TRACK, SECTOR, N|
00000030: 4F 20 42 49 4E 41 52 59 00 51 08 02 00 4E 54 B2 |O BINARY.Q...NT.|
00000040: 33 3A 8F 20 45 52 52 4F 52 20 52 45 54 52 49 45 |3:. ERROR RETRIE|
00000050: 53 00 69 08 03 00 4F 50 24 B2 22 91 12 50 22 3A |S.i...OP$."..P":|
00000060: 4F 53 24 B2 22 91 12 53 22 00 7F 08 64 00 99 C7 |OS$."..S"...d...|
00000070: 28 31 34 32 29 3A 97 35 39 34 36 38 2C 31 32 00 |(142):.59468,12.|
00000080: 91 08 67 00 99 22 93 11 11 22 A3 31 30 29 22 20 |..g.."...".10)" |
00000090: 22 00 BC 08 69 00 99 22 11 20 20 20 20 2A 2A 2A |"...i..". ***|
000000A0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000000B0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 22 00 E6 08 6E |***********"...n|
000000C0: 00 99 22 20 20 20 20 2A 20 44 49 53 50 4C 41 59 |.." * DISPLAY|
000000D0: 20 41 4E 59 20 54 52 41 43 4B 20 26 20 53 45 43 | ANY TRACK & SEC|
000000E0: 54 4F 52 20 2A 22 00 10 09 78 00 99 22 20 20 20 |TOR *"...x.." |
000000F0: 20 2A 20 4F 46 20 32 30 33 31 2C 20 32 30 34 30 | * OF 2031, 2040|
00000100: 2C 20 34 30 34 30 2C 20 38 30 35 30 2C 20 2A 22 |, 4040, 8050, *"|
00000110: 00 3A 09 82 00 99 22 20 20 20 20 2A 20 20 4F 52 |.:...." * OR|
00000120: 20 38 32 35 30 20 4F 4E 20 50 52 49 4E 54 45 52 | 8250 ON PRINTER|
00000130: 20 4F 52 20 4F 4E 20 20 2A 22 00 64 09 84 00 99 | OR ON *".d....|
00000140: 22 20 20 20 20 2A 20 20 20 43 4F 4D 50 55 54 45 |" * COMPUTE|
00000150: 52 20 53 43 52 45 45 4E 20 4F 55 54 50 55 54 A0 |R SCREEN OUTPUT.|
00000160: A0 20 2A 22 00 8E 09 85 00 99 22 20 20 20 20 2A |. *"......" *|
00000170: 20 20 4D 41 59 20 42 45 20 43 48 41 4E 47 45 44 | MAY BE CHANGED|
00000180: 20 42 59 20 54 59 50 49 4E 47 20 20 2A 22 00 B8 | BY TYPING *"..|
00000190: 09 86 00 99 22 20 20 20 20 2A 20 20 20 20 20 20 |...." * |
000001A0: 20 27 50 27 20 20 4F 52 20 20 27 53 27 20 20 20 | 'P' OR 'S' |
000001B0: 20 20 20 20 20 20 2A 22 00 E2 09 89 00 99 22 20 | *"......" |
000001C0: 20 20 20 2A 20 20 20 20 20 20 20 20 20 20 20 20 | * |
000001D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000001E0: 2A 22 00 0C 0A 8A 00 99 22 20 20 20 20 2A 20 20 |*"......" * |
000001F0: 20 53 45 54 54 49 4E 47 20 54 52 41 43 4B 20 3D | SETTING TRACK =|
00000200: 20 30 20 57 49 4C 4C 20 20 20 2A 22 00 36 0A 8B | 0 WILL *".6..|
00000210: 00 99 22 20 20 20 20 2A 20 20 20 54 45 52 4D 49 |.." * TERMI|
00000220: 4E 41 54 45 20 54 48 45 20 50 52 4F 47 52 41 4D |NATE THE PROGRAM|
00000230: 20 20 20 20 2A 22 00 61 0A 8C 00 99 22 20 20 20 | *".a...." |
00000240: 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A | ***************|
00000250: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 11 |***************.|
00000260: 22 00 85 0A AA 00 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A |"......*********|
00000270: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000280: 2A 2A 2A 2A 2A 00 A9 0A B4 00 8F 2A 20 53 45 54 |*****......* SET|
00000290: 20 50 52 4F 47 52 41 4D 20 43 4F 4E 53 54 41 4E | PROGRAM CONSTAN|
000002A0: 54 20 20 20 20 20 20 20 2A 00 CD 0A BE 00 8F 2A |T *......*|
000002B0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000002C0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 F9 0A |*************...|
000002D0: C8 00 53 50 24 B2 22 20 22 3A 4E 4C 24 B2 C7 28 |..SP$." ":NL$..(|
000002E0: 30 29 3A 48 58 24 B2 22 30 31 32 33 34 35 36 37 |0):HX$."01234567|
000002F0: 38 39 41 42 43 44 45 46 22 00 28 0B D2 00 46 53 |89ABCDEF".(...FS|
00000300: 24 B2 22 22 3A 81 49 B2 36 34 20 A4 20 39 35 3A |$."":.I.64 . 95:|
00000310: 46 53 24 B2 46 53 24 AA 22 12 22 AA C7 28 49 29 |FS$.FS$."."..(I)|
00000320: AA 22 92 22 3A 82 20 49 00 5C 0B DC 00 53 53 24 |.".":. I.\...SS$|
00000330: B2 22 20 20 22 3A 81 20 49 B2 31 39 32 20 A4 20 |." ":. I.192 . |
00000340: 32 32 33 3A 53 53 24 B2 53 53 24 AA 22 12 22 AA |223:SS$.SS$.".".|
00000350: C7 28 49 29 AA 22 92 22 3A 82 20 49 00 6F 0B F0 |.(I).".":. I.o..|
00000360: 00 86 20 41 24 28 31 35 29 2C 4E 42 28 32 29 00 |.. A$(15),NB(2).|
00000370: 83 0B F5 00 A1 41 24 3A 8B 41 24 B3 B1 22 22 A7 |.....A$:.A$.."".|
00000380: 32 34 35 00 B5 0B FA 00 85 22 20 20 20 20 20 53 |245......" S|
00000390: 59 53 54 45 4D 20 41 44 44 52 45 53 53 2C 20 44 |YSTEM ADDRESS, D|
000003A0: 52 49 56 45 20 20 38 2C 30 9D 9D 9D 9D 9D 22 3B |RIVE 8,0.....";|
000003B0: 43 48 2C 44 24 00 C9 0B FB 00 A1 41 24 3A 8B 41 |CH,D$......A$:.A|
000003C0: 24 B3 B1 22 22 A7 32 35 31 00 FE 0B FC 00 85 22 |$.."".251......"|
000003D0: 11 20 20 20 4F 55 54 50 55 54 20 54 4F 20 12 53 |. OUTPUT TO .S|
000003E0: 92 43 52 45 45 4E 20 4F 52 20 12 50 92 52 49 4E |.CREEN OR .P.RIN|
000003F0: 54 45 52 20 20 53 9D 9D 9D 22 3B 4A 4A 24 00 22 |TER S...";JJ$."|
00000400: 0C FD 00 8B 20 4A 4A 24 B3 B1 22 50 22 AF 4A 4A |.... JJ$.."P".JJ|
00000410: 24 B3 B1 22 53 22 A7 99 22 91 91 91 22 3A 89 32 |$.."S".."...":.2|
00000420: 35 32 00 3C 0C FF 00 9F 34 2C 33 3A 8B 4A 4A 24 |52.<....4,3:.JJ$|
00000430: B2 22 50 22 A7 A0 34 3A 9F 34 2C 34 00 57 0C 04 |."P"..4:.4,4.W..|
00000440: 01 9F 31 35 2C 43 48 2C 31 35 2C 22 49 22 AA 44 |..15,CH,15,"I".D|
00000450: 24 3A 8D 20 36 35 30 00 6F 0C 0E 01 9F 20 32 2C |$:. 650.o.... 2,|
00000460: 43 48 2C 32 2C 22 23 30 22 3A 8D 20 36 35 30 00 |CH,2,"#0":. 650.|
00000470: 93 0C 18 01 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.....***********|
00000480: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000490: 2A 2A 2A 00 B7 0C 22 01 8F 2A 20 4C 4F 41 44 20 |***..."..* LOAD |
000004A0: 54 52 41 43 4B 20 41 4E 44 20 53 45 43 54 4F 52 |TRACK AND SECTOR|
000004B0: 20 20 20 20 20 20 2A 00 DB 0C 2C 01 8F 2A 20 49 | *...,..* I|
000004C0: 4E 54 4F 20 44 49 53 4B 20 42 55 46 46 45 52 20 |NTO DISK BUFFER |
000004D0: 20 20 20 20 20 20 20 20 20 20 2A 00 FF 0C 36 01 | *...6.|
000004E0: 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.***************|
000004F0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 |***************.|
00000500: 34 0D 40 01 85 22 11 20 20 20 54 52 41 43 4B 2C |4.@..". TRACK,|
00000510: 20 53 45 43 54 4F 52 20 28 54 52 41 43 4B 3D 30 | SECTOR (TRACK=0|
00000520: 3D 45 4E 44 29 20 20 30 2C 30 9D 9D 9D 9D 9D 22 |=END) 0,0....."|
00000530: 3B 54 2C 53 00 53 0D 4A 01 8B 20 54 B2 30 20 A7 |;T,S.S.J.. T.0 .|
00000540: 20 A0 32 3A A0 34 3A A0 31 35 3A 99 22 45 4E 44 | .2:.4:.15:."END|
00000550: 22 3A 80 00 73 0D 54 01 98 34 3A 98 34 2C 22 54 |":..s.T..4:.4,"T|
00000560: 52 41 43 4B 22 54 22 20 53 45 43 54 4F 52 22 53 |RACK"T" SECTOR"S|
00000570: 3A 98 34 00 8E 0D 5E 01 98 31 35 2C 22 55 31 3A |:.4...^..15,"U1:|
00000580: 32 2C 22 44 24 3B 54 3B 53 3A 8D 36 36 30 00 9A |2,"D$;T;S:.660..|
00000590: 0D 63 01 8B 52 54 A7 33 35 30 00 BE 0D 68 01 8F |.c..RT.350...h..|
000005A0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000005B0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 E2 |**************..|
000005C0: 0D 72 01 8F 2A 20 52 45 41 44 20 42 59 54 45 20 |.r..* READ BYTE |
000005D0: 30 26 31 20 4F 46 20 44 49 53 4B 20 20 20 20 20 |0&1 OF DISK |
000005E0: 20 2A 00 06 0E 86 01 8F 2A 2A 2A 2A 2A 2A 2A 2A | *......********|
000005F0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000600: 2A 2A 2A 2A 2A 2A 00 18 0E 90 01 98 31 35 2C 22 |******......15,"|
00000610: 42 2D 50 3A 32 2C 30 22 00 45 0E A4 01 A1 23 32 |B-P:2,0".E....#2|
00000620: 2C 41 24 28 30 29 3A 41 24 28 30 29 B2 41 24 28 |,A$(0):A$(0).A$(|
00000630: 30 29 AA 4E 4C 24 3A 4E 42 28 30 29 B2 C6 28 41 |0).NL$:NB(0)..(A|
00000640: 24 28 30 29 29 00 72 0E A5 01 A1 23 32 2C 41 24 |$(0)).r....#2,A$|
00000650: 28 31 29 3A 41 24 28 31 29 B2 41 24 28 31 29 AA |(1):A$(1).A$(1).|
00000660: 4E 4C 24 3A 4E 42 28 31 29 B2 C6 28 41 24 28 31 |NL$:NB(1)..(A$(1|
00000670: 29 29 00 96 0E AE 01 8F 2A 2A 2A 2A 2A 2A 2A 2A |))......********|
00000680: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000690: 2A 2A 2A 2A 2A 2A 00 BA 0E B8 01 8F 2A 20 52 45 |******......* RE|
000006A0: 41 44 20 26 20 44 49 53 50 4C 41 59 20 54 48 45 |AD & DISPLAY THE|
000006B0: 20 52 45 53 54 20 4F 46 20 2A 00 DE 0E C2 01 8F | REST OF *......|
000006C0: 2A 20 54 48 45 20 44 49 53 4B 20 42 55 46 46 45 |* THE DISK BUFFE|
000006D0: 52 20 20 20 20 20 20 20 20 20 20 20 20 2A 00 02 |R *..|
000006E0: 0F CC 01 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |....************|
000006F0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000700: 2A 2A 00 0A 0F D6 01 4B B2 32 00 3D 0F E0 01 81 |**.....K.2.=....|
00000710: 20 4A B2 30 20 A4 20 33 31 3A 8B 20 4A B2 31 36 | J.0 . 31:. J.16|
00000720: 20 A7 20 8D 20 37 31 30 3A 8B 20 5A 24 B2 22 4E | . . 710:. Z$."N|
00000730: 22 A7 20 4A B2 34 30 3A 89 20 33 32 30 00 4B 0F |". J.40:. 320.K.|
00000740: EA 01 81 20 49 B2 4B 20 A4 20 37 00 69 0F F4 01 |... I.K . 7.i...|
00000750: A1 23 32 2C 41 24 28 49 29 3A 41 24 28 49 29 B2 |.#2,A$(I):A$(I).|
00000760: 41 24 28 49 29 AA 4E 4C 24 00 75 0F 08 02 82 20 |A$(I).NL$.u.... |
00000770: 49 3A 4B B2 30 00 9E 0F 12 02 41 24 B2 22 22 3A |I:K.0.....A$."":|
00000780: 42 24 B2 22 3A 20 22 3A 4E B2 4A AC 38 3A 8D 20 |B$.": ":N.J.8:. |
00000790: 37 39 30 3A 41 24 B2 41 24 AA 22 3A 20 22 00 BD |790:A$.A$.": "..|
000007A0: 0F 1C 02 81 20 49 B2 30 20 A4 20 37 3A 4E B2 C6 |.... I.0 . 7:N..|
000007B0: 28 41 24 28 49 29 29 3A 8D 20 37 39 30 00 ED 0F |(A$(I)):. 790...|
000007C0: 26 02 8B 20 C6 28 41 24 28 49 29 29 B3 33 32 20 |&.. .(A$(I)).32 |
000007D0: B0 20 C6 28 41 24 28 49 29 29 B1 31 32 37 20 A7 |. .(A$(I)).127 .|
000007E0: 20 41 24 28 49 29 B2 C7 28 31 31 30 29 00 1B 10 | A$(I)..(110)...|
000007F0: 27 02 8B 20 C6 28 41 24 28 49 29 29 B2 33 34 20 |'.. .(A$(I)).34 |
00000800: B0 20 C6 28 41 24 28 49 29 29 B2 39 38 20 A7 20 |. .(A$(I)).98 . |
00000810: 41 24 28 49 29 B2 C7 28 33 32 29 00 2B 10 28 02 |A$(I)..(32).+.(.|
00000820: 42 24 B2 42 24 AA 41 24 28 49 29 00 33 10 30 02 |B$.B$.A$(I).3.0.|
00000830: 82 20 49 00 3F 10 31 02 98 34 2C 41 24 42 24 00 |. I.?.1..4,A$B$.|
00000840: 47 10 3A 02 82 20 4A 00 6B 10 3B 02 8F 2A 2A 2A |G.:.. J.k.;..***|
00000850: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000860: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 8F 10 3C 02 |***********...<.|
00000870: 8F 2A 20 4E 45 58 54 20 54 52 41 43 4B 20 41 4E |.* NEXT TRACK AN|
00000880: 44 20 53 45 43 54 4F 52 20 20 20 20 20 20 2A 00 |D SECTOR *.|
00000890: B3 10 3D 02 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |..=..***********|
000008A0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000008B0: 2A 2A 2A 00 EF 10 44 02 8B 20 4E 42 28 30 29 B2 |***...D.. NB(0).|
000008C0: 30 20 B0 20 4E 42 28 31 29 B2 32 35 35 A7 99 22 |0 . NB(1).255.."|
000008D0: 11 12 4E 4F 20 43 4F 4E 54 49 4E 55 41 54 49 4F |..NO CONTINUATIO|
000008E0: 4E 20 4F 46 20 46 49 4C 45 22 3A 89 33 32 30 00 |N OF FILE":.320.|
000008F0: 1E 11 46 02 99 22 11 12 4E 45 58 54 20 54 52 41 |..F.."..NEXT TRA|
00000900: 43 4B 20 41 4E 44 20 53 45 43 54 4F 52 3A 92 22 |CK AND SECTOR:."|
00000910: 4E 42 28 30 29 3B 4E 42 28 31 29 22 11 22 00 4B |NB(0);NB(1)".".K|
00000920: 11 49 02 99 22 57 41 4E 54 20 4E 45 58 54 20 54 |.I.."WANT NEXT T|
00000930: 52 41 43 4B 20 41 4E 44 20 53 45 43 54 4F 52 3F |RACK AND SECTOR?|
00000940: 20 28 59 2F 4E 2F 50 2F 53 29 22 00 62 11 4C 02 | (Y/N/P/S)".b.L.|
00000950: A1 20 5A 24 3A 8B 20 5A 24 B3 B1 22 22 20 A7 35 |. Z$:. Z$.."" .5|
00000960: 38 38 00 78 11 4E 02 A1 20 5A 24 3A 8B 20 5A 24 |88.x.N.. Z$:. Z$|
00000970: B2 22 22 20 A7 35 39 30 00 9C 11 58 02 8B 20 5A |."" .590...X.. Z|
00000980: 24 B2 22 59 22 20 A7 20 54 B2 4E 42 28 30 29 3A |$."Y" . T.NB(0):|
00000990: 53 B2 4E 42 28 31 29 3A 89 33 33 30 00 B1 11 62 |S.NB(1):.330...b|
000009A0: 02 8B 20 5A 24 B2 22 4E 22 20 A7 20 89 20 33 32 |.. Z$."N" . . 32|
000009B0: 30 00 CA 11 67 02 8B 5A 24 B3 B1 22 53 22 AF 5A |0...g..Z$.."S".Z|
000009C0: 24 B3 B1 22 50 22 A7 35 39 30 00 F0 11 6C 02 A0 |$.."P".590...l..|
000009D0: 34 3A 9F 34 2C 33 3A 8B 5A 24 B2 22 50 22 A7 20 |4:.4,3:.Z$."P". |
000009E0: 99 A3 33 37 29 4F 50 24 3A A0 34 3A 9F 34 2C 34 |..37)OP$:.4:.4,4|
000009F0: 00 07 12 6F 02 8B 20 5A 24 B2 22 53 22 A7 20 99 |...o.. Z$."S". .|
00000A00: A3 33 37 29 4F 53 24 00 10 12 71 02 89 35 39 30 |.37)OS$...q..590|
00000A10: 00 34 12 76 02 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.4.v..**********|
00000A20: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000A30: 2A 2A 2A 2A 00 58 12 80 02 8F 2A 20 53 55 42 52 |****.X....* SUBR|
00000A40: 4F 55 54 49 4E 45 53 20 20 20 20 20 20 20 20 20 |OUTINES |
00000A50: 20 20 20 20 20 20 20 2A 00 7C 12 81 02 8F 2A 2A | *.|....**|
00000A60: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000A70: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 A0 12 8A |************....|
00000A80: 02 8F 2A 20 45 52 52 4F 52 20 52 4F 55 54 49 4E |..* ERROR ROUTIN|
00000A90: 45 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2A |E *|
00000AA0: 00 C4 12 8B 02 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |......**********|
00000AB0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000AC0: 2A 2A 2A 2A 00 DE 12 8C 02 84 31 35 2C 45 4E 2C |****......15,EN,|
00000AD0: 45 4D 24 3A 8B 20 45 4E B2 30 20 A7 20 8E 00 09 |EM$:. EN.0 . ...|
00000AE0: 13 8D 02 99 22 93 11 11 53 59 53 54 45 4D 20 4F |...."...SYSTEM O|
00000AF0: 52 20 44 52 49 56 45 20 4E 4F 54 20 52 45 53 50 |R DRIVE NOT RESP|
00000B00: 4F 4E 44 49 4E 47 22 3A 80 00 2E 13 94 02 84 31 |ONDING":.......1|
00000B10: 35 2C 45 4E 2C 45 4D 24 2C 45 54 2C 45 53 3A 8B |5,EN,EM$,ET,ES:.|
00000B20: 20 45 4E B2 30 20 A7 20 52 54 B2 30 3A 8E 00 46 | EN.0 . RT.0:..F|
00000B30: 13 99 02 52 54 B2 52 54 AA 31 3A 8B 20 52 54 B3 |...RT.RT.1:. RT.|
00000B40: 4E 54 20 A7 20 8E 00 84 13 9E 02 99 22 11 11 12 |NT . ......."...|
00000B50: 44 49 53 4B 20 45 52 52 4F 52 2C 20 43 4F 44 45 |DISK ERROR, CODE|
00000B60: 3A 22 45 4E 22 92 20 20 22 45 4D 24 3A 99 22 11 |:"EN". "EM$:.".|
00000B70: 20 54 52 41 43 4B 22 45 54 22 20 53 45 43 54 4F | TRACK"ET" SECTO|
00000B80: 52 22 45 53 00 B4 13 A3 02 99 22 11 48 41 56 45 |R"ES......".HAVE|
00000B90: 20 54 52 49 45 44 22 4E 54 22 54 49 4D 45 53 2E | TRIED"NT"TIMES.|
00000BA0: 20 20 4D 4F 53 54 20 50 52 4F 42 41 42 4C 59 20 | MOST PROBABLY |
00000BB0: 54 48 45 22 00 DC 13 A4 02 99 22 53 45 43 54 4F |THE"......"SECTO|
00000BC0: 52 20 43 41 4E 4E 4F 54 20 42 45 20 52 45 41 44 |R CANNOT BE READ|
00000BD0: 20 43 4F 52 52 45 43 54 4C 59 2E 22 00 0D 14 A5 | CORRECTLY."....|
00000BE0: 02 85 22 11 57 41 4E 54 20 54 4F 20 56 49 45 57 |..".WANT TO VIEW|
00000BF0: 20 57 48 41 54 20 48 41 53 20 42 45 45 4E 20 52 | WHAT HAS BEEN R|
00000C00: 45 41 44 20 20 59 9D 9D 9D 22 3B 59 24 00 20 14 |EAD Y...";Y$. .|
00000C10: A6 02 8B 59 24 B2 22 59 22 A7 52 54 B2 30 3A 8E |...Y$."Y".RT.0:.|
00000C20: 00 29 14 A7 02 89 33 32 30 00 4D 14 C6 02 8F 2A |.)....320.M....*|
00000C30: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000C40: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 71 14 |*************.q.|
00000C50: D0 02 8F 2A 20 53 43 52 45 45 4E 20 43 4F 4E 54 |...* SCREEN CONT|
00000C60: 49 4E 55 45 20 4D 53 53 47 20 20 20 20 20 20 20 |INUE MSSG |
00000C70: 2A 00 95 14 DA 02 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A |*......*********|
00000C80: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000C90: 2A 2A 2A 2A 2A 00 C3 14 E4 02 99 22 11 12 43 4F |*****......"..CO|
00000CA0: 4E 54 49 4E 55 45 20 57 49 54 48 20 54 48 49 53 |NTINUE WITH THIS|
00000CB0: 20 53 45 43 54 4F 52 3F 20 28 59 2F 4E 2F 50 2F | SECTOR? (Y/N/P/|
00000CC0: 53 29 22 00 D7 14 E9 02 A1 5A 24 3A 8B 5A 24 B3 |S)"......Z$:.Z$.|
00000CD0: B1 22 22 A7 37 34 35 00 EA 14 EA 02 A1 5A 24 3A |."".745......Z$:|
00000CE0: 8B 5A 24 B2 22 22 A7 37 34 36 00 13 15 EC 02 8B |.Z$."".746......|
00000CF0: 5A 24 B2 22 59 22 A7 99 22 11 54 52 41 43 4B 22 |Z$."Y"..".TRACK"|
00000D00: 20 54 20 22 20 53 45 43 54 4F 52 22 53 20 22 11 | T " SECTOR"S ".|
00000D10: 22 3A 8E 00 23 15 EE 02 8B 5A 24 B2 22 4E 22 A7 |":..#....Z$."N".|
00000D20: 37 36 30 00 3C 15 F3 02 8B 5A 24 B3 B1 22 53 22 |760.<....Z$.."S"|
00000D30: AF 5A 24 B3 B1 22 50 22 A7 37 34 36 00 62 15 F4 |.Z$.."P".746.b..|
00000D40: 02 A0 34 3A 9F 34 2C 33 3A 8B 5A 24 B2 22 50 22 |..4:.4,3:.Z$."P"|
00000D50: A7 20 99 A3 33 37 29 4F 50 24 3A A0 34 3A 9F 34 |. ..37)OP$:.4:.4|
00000D60: 2C 34 00 79 15 F5 02 8B 20 5A 24 B2 22 53 22 A7 |,4.y.... Z$."S".|
00000D70: 20 99 A3 33 37 29 4F 53 24 00 82 15 F6 02 89 37 | ..37)OS$......7|
00000D80: 34 36 00 BB 15 F8 02 8B 20 4E 42 28 30 29 B2 30 |46...... NB(0).0|
00000D90: 20 B0 20 4E 42 28 31 29 B2 32 35 35 A7 99 22 11 | . NB(1).255..".|
00000DA0: 12 4E 4F 20 43 4F 4E 54 49 4E 55 41 54 49 4F 4E |.NO CONTINUATION|
00000DB0: 20 4F 46 20 46 49 4C 45 22 3A 8E 00 EC 15 F9 02 | OF FILE":......|
00000DC0: 99 22 11 12 4E 45 58 54 20 54 52 41 43 4B 20 41 |."..NEXT TRACK A|
00000DD0: 4E 44 20 53 45 43 54 4F 52 20 49 53 3A 92 22 4E |ND SECTOR IS:."N|
00000DE0: 42 28 30 29 3B 4E 42 28 31 29 3A 8E 00 10 16 16 |B(0);NB(1):.....|
00000DF0: 03 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |..**************|
00000E00: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000E10: 00 34 16 20 03 8F 2A 20 44 49 53 4B 20 42 59 54 |.4. ..* DISK BYT|
00000E20: 45 20 54 4F 20 48 45 58 20 50 52 49 4E 54 20 20 |E TO HEX PRINT |
00000E30: 20 20 20 2A 00 58 16 2A 03 8F 2A 2A 2A 2A 2A 2A | *.X.*..******|
00000E40: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000E50: 2A 2A 2A 2A 2A 2A 2A 2A 00 7B 16 34 03 41 31 B2 |********.{.4.A1.|
00000E60: B5 28 4E AD 31 36 29 3A 41 24 B2 41 24 AA CA 28 |.(N.16):A$.A$..(|
00000E70: 48 58 24 2C 41 31 AA 31 2C 31 29 00 A1 16 3E 03 |HX$,A1.1,1)...>.|
00000E80: 41 32 B2 B5 28 4E AB 31 36 AC 41 31 29 3A 41 24 |A2..(N.16.A1):A$|
00000E90: B2 41 24 AA CA 28 48 58 24 2C 41 32 AA 31 2C 31 |.A$..(HX$,A2.1,1|
00000EA0: 29 00 B1 16 48 03 41 24 B2 41 24 AA 53 50 24 3A |)...H.A$.A$.SP$:|
00000EB0: 8E 00 00 00 D3 06 0A 04 00 00 4E 54 82 40 00 00 |..........NT.@..|
00000EC0: 00 53 D0 01 7E 06 00 00 4E CC 01 FD 7F 00 00 48 |.S..~...N......H|
00000ED0: D8 10 8F 06 00 00 46 D3 60 AD 6C 00 00 49 00 88 |......F.`.l..I..|
00000EE0: 60 00 00 00 53 D3 62 9D 58 00 00 41 80 00 00 00 |`...S.b.X..A....|
00000EF0: 00 00 43 48 84 00 00 00 00 44 80 01 97 58 00 00 |..CH.....D...X..|
00000F00: 4A CA 01 91 58 00 00 41 80 37 00 01 00 10 00 00 |J...X..A.7......|
00000F10: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
00000F20: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
00000F30: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 4E 42 |..............NB|
00000F40: 16 00 01 00 03 00 00 00 00 00 00 00 00 00 00 00 |................|
00000F50: 00 00 00 00 6E 00 00 41 80 37 00 01 00 10 01 92 |....n..A.7......|
00000F60: 70 02 F5 70 02 EE 70 02 E7 70 01 91 6F 01 34 6F |p..p..p..p..o.4o|
00000F70: 01 CD 6E 01 5C 6E 00 00 00 00 00 00 00 00 00 00 |..n.\n..........|
00000F80: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 4E 42 |..............NB|
00000F90: 16 00 01 00 03 86 18 00 00 00 84 30 00 00 00 00 |...........0....|
00000FA0: 00 00 00 00 AA AA AA AA 44 6E 40 12 43 38 20 3A |........Dn@.C8 :|
00000FB0: 20 39 44 20 39 44 20 39 44 20 32 32 20 33 42 20 | 9D 9D 9D 22 3B |
00000FC0: 35 34 20 30 30 20 FF 11 43 38 20 3A 20 39 44 20 |54 00 ..C8 : 9D |
00000FD0: 39 44 20 39 44 20 32 32 20 33 42 20 35 34 20 30 |9D 9D 22 3B 54 0|
00000FE0: 30 19 FF 30 01 FF 43 38 20 3A 20 39 44 20 39 44 |0..0..C8 : 9D 9D|
00000FF0: 20 39 44 20 32 32 20 33 42 20 35 34 20 30 18 FF | 9D 22 3B 54 0..|
00001000: 30 01 FF 3A 20 6E 6E 6E 20 3B 00 54 00 06 12 43 |0..: nnn ;.T...C|
00001010: 38 20 3A 20 39 44 20 39 44 20 39 44 20 32 32 20 |8 : 9D 9D 9D 22 |
00001020: 33 42 20 35 34 20 17 FF 43 38 20 3A 20 39 44 20 |3B 54 ..C8 : 9D |
00001030: 39 44 20 39 44 20 32 32 20 33 42 20 35 34 16 FF |9D 9D 22 3B 54..|
00001040: 34 01 FF 43 38 20 3A 20 39 44 20 39 44 20 39 44 |4..C8 : 9D 9D 9D|
00001050: 20 32 32 20 33 42 20 35 15 FF 35 01 FF 3A 20 6E | 22 3B 5..5..: n|
00001060: 6E 6E 20 3B 00 08 FF 43 38 20 3A 20 39 44 20 39 |nn ;...C8 : 9D 9|
00001070: 44 20 39 44 20 32 32 20 33 42 20 14 FF 43 38 20 |D 9D 22 3B ..C8 |
00001080: 3A 20 39 44 20 39 44 20 39 44 20 32 32 20 33 42 |: 9D 9D 9D 22 3B|
00001090: 13 FF 42 01 FF 43 38 20 3A 20 39 44 20 39 44 20 |..B..C8 : 9D 9D |
000010A0: 39 44 20 32 32 20 33 12 FF 33 01 FF 3A 20 6E 6E |9D 22 3..3..: nn|
000010B0: 6E 20 06 FF 20 37 12 43 38 20 3A 20 39 44 20 39 |n .. 7.C8 : 9D 9|
000010C0: 44 20 39 44 20 32 32 20 11 FF 43 38 20 3A 20 39 |D 9D 22 ..C8 : 9|
000010D0: 44 20 39 44 20 39 44 20 32 32 10 FF 32 01 FF 43 |D 9D 9D 22..2..C|
000010E0: 38 20 3A 20 39 44 20 39 44 20 39 44 20 32 0F FF |8 : 9D 9D 9D 2..|
000010F0: 32 01 FF 3A 20 6E 6E 6E 05 FF 6E 34 12 43 38 20 |2..: nnn..n4.C8 |
00001100: 3A 20 39 44 20 39 44 20 39 44 20 0E FF 43 38 20 |: 9D 9D 9D ..C8 |
00001110: 3A 20 39 44 20 39 44 20 39 44 0D FF 44 01 FF 43 |: 9D 9D 9D..D..C|
00001120: 38 20 3A 20 39 44 20 39 44 20 39 0C FF 39 01 FF |8 : 9D 9D 9..9..|
00001130: 3A 20 6E 6E 04 FF 6E 31 12 43 38 20 3A 20 39 44 |: nn..n1.C8 : 9D|
00001140: 20 39 44 20 0B FF 43 38 20 3A 20 39 44 20 39 44 | 9D ..C8 : 9D 9D|
00001150: 0A FF 44 01 FF 43 38 20 3A 20 39 44 20 39 09 FF |..D..C8 : 9D 9..|
00001160: 39 01 FF 3A 20 6E 03 FF 6E 2E 12 43 38 20 3A 20 |9..: n..n..C8 : |
00001170: 39 44 20 08 FF 43 38 20 3A 20 39 44 07 FF 44 01 |9D ..C8 : 9D..D.|
00001180: FF 43 38 20 3A 20 39 06 FF 39 01 FF 43 38 20 3A |.C8 : 9..9..C8 :|
00001190: 20 05 FF 43 38 20 03 FF 43 38 02 FF 38 01 FF 43 | ..C8 ..C8..8..C|
000011A0: 01 FF 43 01 FF D5 00 43 12 D5 01 FF 00 01 FF 54 |..C....C.......T|
000011B0: 00 3D 12 54 01 FF 3B 00 3A 12 3B 01 FF 22 00 02 |.=.T..;.:.;.."..|
000011C0: FF 22 01 FF 9D 00 02 FF 9D 01 FF 9D 00 02 FF 9D |."..............|
000011D0: 01 FF 9D 00 02 FF 9D 01 FF 3A 20 20 00 55 00 4E |.........: .U.N|
000011E0: 00 49 00 54 00 20 00 20 00 39 00 12 FF 43 30 20 |.I.T. . .9...C0 |
000011F0: 3A 20 32 30 20 35 35 20 34 45 20 34 39 20 35 34 |: 20 55 4E 49 54|
00001200: 20 32 30 20 32 30 20 33 39 20 1D FF 43 30 20 3A | 20 20 39 ..C0 :|
00001210: 20 32 30 20 35 35 20 34 45 20 34 39 20 35 34 20 | 20 55 4E 49 54 |
00001220: 32 30 20 32 30 20 33 39 1C FF 39 01 FF 43 30 20 |20 20 39..9..C0 |
00001230: 3A 20 32 30 20 35 35 20 34 45 20 34 39 20 35 34 |: 20 55 4E 49 54|
00001240: 20 32 30 20 32 30 20 33 1B FF 33 01 FF 3A 20 20 | 20 20 3..3..: |
00001250: 00 55 00 4E 00 49 00 54 00 20 00 20 00 10 FF 43 |.U.N.I.T. . ...C|
00001260: 30 20 3A 20 32 30 20 35 35 20 34 45 20 34 39 20 |0 : 20 55 4E 49 |
00001270: 35 34 20 32 30 20 32 30 20 1A FF 43 30 20 3A 20 |54 20 20 ..C0 : |
00001280: 32 30 20 35 35 20 34 45 20 34 39 20 35 34 20 32 |20 55 4E 49 54 2|
00001290: 30 20 32 30 19 FF 30 01 FF 43 30 20 3A 20 32 30 |0 20..0..C0 : 20|
000012A0: 20 35 35 20 34 45 20 34 39 20 35 34 20 32 30 20 | 55 4E 49 54 20 |
000012B0: 32 18 FF 32 01 FF 3A 20 20 00 55 00 4E 00 49 00 |2..2..: .U.N.I.|
000012C0: 54 00 20 00 0E FF 43 30 20 3A 20 32 30 20 35 35 |T. ...C0 : 20 55|
000012D0: 20 34 45 20 34 39 20 35 34 20 32 30 20 17 FF 43 | 4E 49 54 20 ..C|
000012E0: 30 20 3A 20 32 30 20 35 35 20 34 45 20 34 39 20 |0 : 20 55 4E 49 |
000012F0: 35 34 20 32 30 16 FF 30 01 FF 43 30 20 3A 20 32 |54 20..0..C0 : 2|
00001300: 30 20 35 35 20 34 45 20 34 39 20 35 34 20 32 15 |0 55 4E 49 54 2.|
00001310: FF 32 01 FF 3A 20 20 00 55 00 4E 00 49 00 54 00 |.2..: .U.N.I.T.|
00001320: 0C FF 43 30 20 3A 20 32 30 20 35 35 20 34 45 20 |..C0 : 20 55 4E |
00001330: 34 39 20 35 34 20 14 FF 43 30 20 3A 20 32 30 20 |49 54 ..C0 : 20 |
00001340: 35 35 20 34 45 20 34 39 20 35 34 13 FF 34 01 FF |55 4E 49 54..4..|
00001350: 43 30 20 3A 20 32 30 20 35 35 20 34 45 20 34 39 |C0 : 20 55 4E 49|
00001360: 20 35 12 FF 35 01 FF 3A 20 20 00 55 00 4E 00 49 | 5..5..: .U.N.I|
00001370: 00 0A FF 43 30 20 3A 20 32 30 20 35 35 20 34 45 |...C0 : 20 55 4E|
00001380: 20 34 39 20 11 FF 43 30 20 3A 20 32 30 20 35 35 | 49 ..C0 : 20 55|
00001390: 20 34 45 20 34 39 10 FF 39 01 FF 43 30 20 3A 20 | 4E 49..9..C0 : |
000013A0: 32 30 20 35 35 20 34 45 20 34 0F FF 34 01 FF 3A |20 55 4E 4..4..:|
000013B0: 20 20 00 55 00 4E 00 08 FF 43 30 20 3A 20 32 30 | .U.N...C0 : 20|
000013C0: 20 35 35 20 34 45 20 0E FF 43 30 20 3A 20 32 30 | 55 4E ..C0 : 20|
000013D0: 20 35 35 20 34 45 0D FF 45 01 FF 43 30 20 3A 20 | 55 4E..E..C0 : |
000013E0: 32 30 20 35 35 20 34 0C FF 34 01 FF 3A 20 20 00 |20 55 4..4..: .|
000013F0: 55 00 06 FF 43 30 20 3A 20 32 30 20 35 35 20 0B |U...C0 : 20 55 .|
00001400: FF 43 30 20 3A 20 32 30 20 35 35 0A FF 35 01 FF |.C0 : 20 55..5..|
00001410: 43 30 20 3A 20 32 30 20 35 09 FF 35 01 FF 3A 20 |C0 : 20 5..5..: |
00001420: 20 00 04 FF 43 30 20 3A 20 32 30 20 08 FF 43 30 | ...C0 : 20 ..C0|
00001430: 20 3A 20 32 30 07 FF 30 01 FF 43 30 20 3A 20 32 | : 20..0..C0 : 2|
00001440: 06 FF 32 01 FF 43 30 20 3A 20 05 FF 43 30 20 03 |..2..C0 : ..C0 .|
00001450: FF 43 30 02 FF 30 01 FF 43 01 FF 43 01 FF 39 00 |.C0..0..C..C..9.|
00001460: 02 FF 39 01 FF 20 00 02 FF 20 01 FF 20 00 02 FF |..9.. ... .. ...|
00001470: 20 01 FF 54 00 02 FF 54 01 FF 49 00 02 FF 49 01 | ..T...T..I...I.|
00001480: FF 4E 00 02 FF 4E 01 FF 55 00 02 FF 55 01 FF 20 |.N...N..U...U.. |
00001490: 00 02 FF 20 01 FF 3A 20 6E 6E 6E 6E 6E 20 54 00 |... ..: nnnnn T.|
000014A0: 4F 00 0C FF 42 38 20 3A 20 43 43 20 30 34 20 41 |O...B8 : CC 04 A|
000014B0: 41 20 30 30 20 38 35 20 32 32 20 35 34 20 34 46 |A 00 85 22 54 4F|
000014C0: 20 1D FF 42 38 20 3A 20 43 43 20 30 34 20 41 41 | ..B8 : CC 04 AA|
000014D0: 20 30 30 20 38 35 20 32 32 20 35 34 20 34 46 1C | 00 85 22 54 4F.|
000014E0: FF 46 01 FF 42 38 20 3A 20 43 43 20 30 34 20 41 |.F..B8 : CC 04 A|
000014F0: 41 20 30 30 20 38 35 20 32 32 20 35 34 20 34 1B |A 00 85 22 54 4.|
00001500: FF 34 01 FF 3A 20 6E 6E 6E 6E 6E 20 54 00 0A FF |.4..: nnnnn T...|
00001510: 42 38 20 3A 20 43 43 20 30 34 20 41 41 20 30 30 |B8 : CC 04 AA 00|
00001520: 20 38 35 20 32 32 20 35 34 20 1A FF 42 38 20 3A | 85 22 54 ..B8 :|
00001530: 20 43 43 20 30 34 20 41 41 20 30 30 20 38 35 20 | CC 04 AA 00 85 |
00001540: 32 32 20 35 34 19 FF 34 01 FF 42 38 20 3A 20 43 |22 54..4..B8 : C|
00001550: 43 20 30 34 20 41 41 20 30 30 20 38 35 20 32 32 |C 04 AA 00 85 22|
00001560: 20 35 18 FF 35 01 FF 3A 20 6E 6E 6E 6E 6E 20 08 | 5..5..: nnnnn .|
00001570: FF 20 01 FF 42 38 20 3A 20 43 43 20 30 34 20 41 |. ..B8 : CC 04 A|
00001580: 41 20 30 30 20 38 35 20 32 32 20 17 FF 42 38 20 |A 00 85 22 ..B8 |
00001590: 3A 20 43 43 20 30 34 20 41 41 20 30 30 20 38 35 |: CC 04 AA 00 85|
000015A0: 20 32 32 16 FF 32 01 FF 42 38 20 3A 20 43 43 20 | 22..2..B8 : CC |
000015B0: 30 34 20 41 41 20 30 30 20 38 35 20 32 15 FF 32 |04 AA 00 85 2..2|
000015C0: 01 FF 3A 20 6E 6E 6E 6E 6E 07 FF 6E 01 FF 42 38 |..: nnnnn..n..B8|
000015D0: 20 3A 20 43 43 20 30 34 20 41 41 20 30 30 20 38 | : CC 04 AA 00 8|
000015E0: 35 20 14 FF 42 38 20 3A 20 43 43 20 30 34 20 41 |5 ..B8 : CC 04 A|
000015F0: 41 20 30 30 20 38 35 13 FF 35 01 FF 42 38 20 3A |A 00 85..5..B8 :|
00001600: 20 43 43 20 30 34 20 41 41 20 30 30 20 38 12 FF | CC 04 AA 00 8..|
00001610: 38 01 FF 3A 20 6E 6E 6E 6E 06 FF 6E 01 FF 42 38 |8..: nnnn..n..B8|
00001620: 20 3A 20 43 43 20 30 34 20 41 41 20 30 30 20 11 | : CC 04 AA 00 .|
00001630: FF 42 38 20 3A 20 43 43 20 30 34 20 41 41 20 30 |.B8 : CC 04 AA 0|
00001640: 30 10 FF 30 01 FF 42 38 20 3A 20 43 43 20 30 34 |0..0..B8 : CC 04|
00001650: 20 41 41 20 30 0F FF 30 01 FF 3A 20 6E 6E 6E 05 | AA 0..0..: nnn.|
00001660: FF 6E 01 FF 42 38 20 3A 20 43 43 20 30 34 20 41 |.n..B8 : CC 04 A|
00001670: 41 20 0E FF 42 38 20 3A 20 43 43 20 30 34 20 41 |A ..B8 : CC 04 A|
00001680: 41 0D FF 41 01 FF 42 38 20 3A 20 43 43 20 30 34 |A..A..B8 : CC 04|
00001690: 20 41 0C FF 41 01 FF 3A 20 6E 6E 04 FF 6E 01 FF | A..A..: nn..n..|
000016A0: 42 38 20 3A 20 43 43 20 30 34 20 0B FF 42 38 20 |B8 : CC 04 ..B8 |
000016B0: 3A 20 43 43 20 30 34 0A FF 34 01 FF 42 38 20 3A |: CC 04..4..B8 :|
000016C0: 20 43 43 20 30 09 FF 30 01 FF 3A 20 6E 03 FF 6E | CC 0..0..: n..n|
000016D0: 01 FF 42 38 20 3A 20 43 43 20 08 FF 42 38 20 3A |..B8 : CC ..B8 :|
000016E0: 20 43 43 07 FF 43 01 FF 42 38 20 3A 20 43 06 FF | CC..C..B8 : C..|
000016F0: 43 01 FF 42 38 20 3A 20 05 FF 42 38 20 03 FF 42 |C..B8 : ..B8 ..B|
00001700: 38 02 FF 38 01 FF 42 01 FF 42 01 FF 4F 00 02 FF |8..8..B..B..O...|
00001710: 4F 01 FF 54 00 02 FF 54 01 FF 22 00 02 FF 22 01 |O..T...T.."...".|
00001720: FF 85 00 02 FF 85 01 FF 00 01 FF AA 00 02 FF AA |................|
00001730: 01 FF 04 00 02 FF 04 01 FF CC 00 02 FF CC 01 FF |................|
00001740: 3A 20 6E 6E 46 00 24 00 6E 44 00 24 00 6E 0E FF |: nnF.$.nD.$.n..|
00001750: 6E 01 FF 42 30 20 3A 20 41 30 20 30 30 20 34 36 |n..B0 : A0 00 46|
00001760: 20 32 34 20 42 32 20 34 34 20 32 34 20 30 30 20 | 24 B2 44 24 00 |
00001770: 1D FF 42 30 20 3A 20 41 30 20 30 30 20 34 36 20 |..B0 : A0 00 46 |
00001780: 32 34 20 42 32 20 34 34 20 32 34 20 30 30 1C FF |24 B2 44 24 00..|
00001790: 30 01 FF 42 30 20 3A 20 41 30 20 30 30 20 34 36 |0..B0 : A0 00 46|
000017A0: 20 32 34 20 42 32 20 34 34 20 32 34 20 30 1B FF | 24 B2 44 24 0..|
000017B0: 30 01 FF 3A 20 6E 6E 46 00 24 00 6E 44 00 24 00 |0..: nnF.$.nD.$.|
000017C0: 0D FF 42 30 20 3A 20 41 30 20 30 30 20 34 36 20 |..B0 : A0 00 46 |
000017D0: 32 34 20 42 32 20 34 34 20 32 34 20 1A FF 42 30 |24 B2 44 24 ..B0|
000017E0: 20 3A 20 41 30 20 30 30 20 34 36 20 32 34 20 42 | : A0 00 46 24 B|
000017F0: 32 20 34 34 20 32 34 19 FF 34 01 FF 42 30 20 3A |2 44 24..4..B0 :|
00001800: 20 41 30 20 30 30 20 34 36 20 32 34 20 42 32 20 | A0 00 46 24 B2 |
00001810: 34 34 20 32 18 FF 32 01 FF 3A 20 6E 6E 46 00 24 |44 2..2..: nnF.$|
00001820: 00 6E 44 00 0B FF 42 30 20 3A 20 41 30 20 30 30 |.nD...B0 : A0 00|
00001830: 20 34 36 20 32 34 20 42 32 20 34 34 20 17 FF 42 | 46 24 B2 44 ..B|
00001840: 30 20 3A 20 41 30 20 30 30 20 34 36 20 32 34 20 |0 : A0 00 46 24 |
00001850: 42 32 20 34 34 16 FF 34 01 FF 42 30 20 3A 20 41 |B2 44..4..B0 : A|
00001860: 30 20 30 30 20 34 36 20 32 34 20 42 32 20 34 15 |0 00 46 24 B2 4.|
00001870: FF 34 01 FF 3A 20 6E 6E 46 00 24 00 6E 09 FF 6E |.4..: nnF.$.n..n|
00001880: 01 FF 42 30 20 3A 20 41 30 20 30 30 20 34 36 20 |..B0 : A0 00 46 |
00001890: 32 34 20 42 32 20 14 FF 42 30 20 3A 20 41 30 20 |24 B2 ..B0 : A0 |
000018A0: 30 30 20 34 36 20 32 34 20 42 32 13 FF 32 01 FF |00 46 24 B2..2..|
000018B0: 42 30 20 3A 20 41 30 20 30 30 20 34 36 20 32 34 |B0 : A0 00 46 24|
000018C0: 20 42 12 FF 42 01 FF 3A 20 6E 6E 46 00 24 00 08 | B..B..: nnF.$..|
000018D0: FF 42 30 20 3A 20 41 30 20 30 30 20 34 36 20 32 |.B0 : A0 00 46 2|
000018E0: 34 20 11 FF 42 30 20 3A 20 41 30 20 30 30 20 34 |4 ..B0 : A0 00 4|
000018F0: 36 20 32 34 10 FF 34 01 FF 42 30 20 3A 20 41 30 |6 24..4..B0 : A0|
00001900: 20 30 30 20 34 36 20 32 0F FF 32 01 FF 3A 20 6E | 00 46 2..2..: n|
00001910: 6E 46 00 06 FF 42 30 20 3A 20 41 30 20 30 30 20 |nF...B0 : A0 00 |
00001920: 34 36 20 0E FF 42 30 20 3A 20 41 30 20 30 30 20 |46 ..B0 : A0 00 |
00001930: 34 36 0D FF 36 01 FF 42 30 20 3A 20 41 30 20 30 |46..6..B0 : A0 0|
00001940: 30 20 34 0C FF 34 01 FF 3A 20 6E 6E 04 FF 6E 01 |0 4..4..: nn..n.|
00001950: FF 42 30 20 3A 20 41 30 20 30 30 20 0B FF 42 30 |.B0 : A0 00 ..B0|
00001960: 20 3A 20 41 30 20 30 30 0A FF 30 01 FF 42 30 20 | : A0 00..0..B0 |
00001970: 3A 20 41 30 20 30 09 FF 30 01 FF 3A 20 6E 03 FF |: A0 0..0..: n..|
00001980: 6E 01 FF 42 30 20 3A 20 41 30 20 08 FF 42 30 20 |n..B0 : A0 ..B0 |
00001990: 3A 20 41 30 07 FF 30 01 FF 42 30 20 3A 20 41 06 |: A0..0..B0 : A.|
000019A0: FF 41 01 FF 42 30 20 3A 20 05 FF 42 30 20 03 FF |.A..B0 : ..B0 ..|
000019B0: 42 30 02 FF 30 01 FF 42 01 FF 42 01 FF 00 01 FF |B0..0..B..B.....|
000019C0: 24 00 02 FF 24 01 FF 44 00 02 FF 44 01 FF B2 00 |$...$..D...D....|
000019D0: 02 FF B2 01 FF 24 00 02 FF 24 01 FF 46 00 02 FF |.....$...$..F...|
000019E0: 46 01 FF 00 01 FF A0 00 02 FF A0 01 FF 3A 20 6E |F............: n|
000019F0: 6E 38 00 30 00 30 00 6E 6E 6E 0D FF 6E 01 FF 41 |n8.0.0.nnn..n..A|
00001A00: 38 20 3A 20 30 30 20 38 44 20 33 38 20 33 30 20 |8 : 00 8D 38 30 |
00001A10: 33 30 20 30 30 20 42 35 20 30 34 20 1D FF 41 38 |30 00 B5 04 ..A8|
00001A20: 20 3A 20 30 30 20 38 44 20 33 38 20 33 30 20 33 | : 00 8D 38 30 3|
00001A30: 30 20 30 30 20 42 35 20 30 34 1C FF 34 01 FF 41 |0 00 B5 04..4..A|
00001A40: 38 20 3A 20 30 30 20 38 44 20 33 38 20 33 30 20 |8 : 00 8D 38 30 |
00001A50: 33 30 20 30 30 20 42 35 20 30 1B FF 30 01 FF 3A |30 00 B5 0..0..:|
00001A60: 20 6E 6E 38 00 30 00 30 00 6E 6E 0C FF 6E 01 FF | nn8.0.0.nn..n..|
00001A70: 41 38 20 3A 20 30 30 20 38 44 20 33 38 20 33 30 |A8 : 00 8D 38 30|
00001A80: 20 33 30 20 30 30 20 42 35 20 1A FF 41 38 20 3A | 30 00 B5 ..A8 :|
00001A90: 20 30 30 20 38 44 20 33 38 20 33 30 20 33 30 20 | 00 8D 38 30 30 |
00001AA0: 30 30 20 42 35 19 FF 35 01 FF 41 38 20 3A 20 30 |00 B5..5..A8 : 0|
00001AB0: 30 20 38 44 20 33 38 20 33 30 20 33 30 20 30 30 |0 8D 38 30 30 00|
00001AC0: 20 42 18 FF 42 01 FF 3A 20 6E 6E 38 00 30 00 30 | B..B..: nn8.0.0|
00001AD0: 00 6E 0B FF 6E 01 FF 41 38 20 3A 20 30 30 20 38 |.n..n..A8 : 00 8|
00001AE0: 44 20 33 38 20 33 30 20 33 30 20 30 30 20 17 FF |D 38 30 30 00 ..|
00001AF0: 41 38 20 3A 20 30 30 20 38 44 20 33 38 20 33 30 |A8 : 00 8D 38 30|
00001B00: 20 33 30 20 30 30 16 FF 30 01 FF 41 38 20 3A 20 | 30 00..0..A8 : |
00001B10: 30 30 20 38 44 20 33 38 20 33 30 20 33 30 20 30 |00 8D 38 30 30 0|
00001B20: 15 FF 30 01 FF 3A 20 6E 6E 38 00 30 00 30 00 0A |..0..: nn8.0.0..|
00001B30: FF 41 38 20 3A 20 30 30 20 38 44 20 33 38 20 33 |.A8 : 00 8D 38 3|
00001B40: 30 20 33 30 20 14 FF 41 38 20 3A 20 30 30 20 38 |0 30 ..A8 : 00 8|
00001B50: 44 20 33 38 20 33 30 20 33 30 13 FF 30 01 FF 41 |D 38 30 30..0..A|
00001B60: 38 20 3A 20 30 30 20 38 44 20 33 38 20 33 30 20 |8 : 00 8D 38 30 |
00001B70: 33 12 FF 33 01 FF 3A 20 6E 6E 38 00 30 00 08 FF |3..3..: nn8.0...|
00001B80: 41 38 20 3A 20 30 30 20 38 44 20 33 38 20 33 30 |A8 : 00 8D 38 30|
00001B90: 20 11 FF 41 38 20 3A 20 30 30 20 38 44 20 33 38 | ..A8 : 00 8D 38|
00001BA0: 20 33 30 10 FF 30 01 FF 41 38 20 3A 20 30 30 20 | 30..0..A8 : 00 |
00001BB0: 38 44 20 33 38 20 33 0F FF 33 01 FF 3A 20 6E 6E |8D 38 3..3..: nn|
00001BC0: 38 00 06 FF 41 38 20 3A 20 30 30 20 38 44 20 33 |8...A8 : 00 8D 3|
00001BD0: 38 20 0E FF 41 38 20 3A 20 30 30 20 38 44 20 33 |8 ..A8 : 00 8D 3|
00001BE0: 38 0D FF 38 01 FF 41 38 20 3A 20 30 30 20 38 44 |8..8..A8 : 00 8D|
00001BF0: 20 33 0C FF 33 01 FF 3A 20 6E 6E 04 FF 6E 01 FF | 3..3..: nn..n..|
00001C00: 41 38 20 3A 20 30 30 20 38 44 20 0B FF 41 38 20 |A8 : 00 8D ..A8 |
00001C10: 3A 20 30 30 20 38 44 0A FF 44 01 FF 41 38 20 3A |: 00 8D..D..A8 :|
00001C20: 20 30 30 20 38 09 FF 38 01 FF 3A 20 6E 03 FF 6E | 00 8..8..: n..n|
00001C30: 01 FF 41 38 20 3A 20 30 30 20 08 FF 41 38 20 3A |..A8 : 00 ..A8 :|
00001C40: 20 30 30 07 FF 30 01 FF 41 38 20 3A 20 30 06 FF | 00..0..A8 : 0..|
00001C50: 30 01 FF 41 38 20 3A 20 05 FF 41 38 20 03 FF 41 |0..A8 : ..A8 ..A|
00001C60: 38 02 FF 38 01 FF 41 01 FF 41 01 FF 04 00 02 FF |8..8..A..A......|
00001C70: 04 01 FF B5 00 02 FF B5 01 FF 00 01 FF 30 00 02 |.............0..|
00001C80: FF 30 01 FF 30 00 02 FF 30 01 FF 38 00 02 FF 38 |.0..0...0..8...8|
00001C90: 01 FF 8D 00 02 FF 8D 01 FF 00 01 FF 3A 20 6E 20 |............: n |
00001CA0: 3B 00 46 00 6E 6E 6E 6E 0C FF 6E 01 FF 41 30 20 |;.F.nnnn..n..A0 |
00001CB0: 3A 20 39 44 20 32 32 20 33 42 20 34 36 20 30 30 |: 9D 22 3B 46 00|
00001CC0: 20 41 42 20 30 34 20 39 36 20 1D FF 41 30 20 3A | AB 04 96 ..A0 :|
00001CD0: 20 39 44 20 32 32 20 33 42 20 34 36 20 30 30 20 | 9D 22 3B 46 00 |
00001CE0: 41 42 20 30 34 20 39 36 1C FF 36 01 FF 41 30 20 |AB 04 96..6..A0 |
00001CF0: 3A 20 39 44 20 32 32 20 33 42 20 34 36 20 30 30 |: 9D 22 3B 46 00|
00001D00: 20 41 42 20 30 34 20 39 1B FF 39 01 FF 3A 20 6E | AB 04 9..9..: n|
00001D10: 20 3B 00 46 00 6E 6E 6E 0B FF 6E 01 FF 41 30 20 | ;.F.nnn..n..A0 |
00001D20: 3A 20 39 44 20 32 32 20 33 42 20 34 36 20 30 30 |: 9D 22 3B 46 00|
00001D30: 20 41 42 20 30 34 20 1A FF 41 30 20 3A 20 39 44 | AB 04 ..A0 : 9D|
00001D40: 20 32 32 20 33 42 20 34 36 20 30 30 20 41 42 20 | 22 3B 46 00 AB |
00001D50: 3A 8F 20 4F 50 45 4E 20 46 49 4C 45 20 54 4F 20 |:. OPEN FILE TO |
00001D60: 52 45 41 44 00 18 0B D2 00 81 49 B2 32 36 A4 31 |READ......I.26.1|
00001D70: 20 A9 AB 31 00 55 0B DC 00 CF 23 31 2C 28 49 29 | ..1.U....#1,(I)|
00001D80: 3A 8D 31 30 30 30 20 20 20 20 20 20 20 20 20 20 |:.1000 |
00001D90: 3A 8F 20 53 54 41 52 54 20 57 49 54 48 20 4C 41 |:. START WITH LA|
00001DA0: 53 54 20 52 45 43 4F 52 44 20 49 4E 20 46 49 4C |ST RECORD IN FIL|
00001DB0: 45 00 8F 0B E6 00 84 31 2C 41 2C 42 24 3A 8D 31 |E......1,A,B$:.1|
00001DC0: 30 30 30 20 20 20 20 20 20 20 20 20 20 3A 8F 20 |000 :. |
00001DD0: 52 45 41 44 20 42 41 43 4B 20 52 45 43 4F 52 44 |READ BACK RECORD|
00001DE0: 20 23 20 41 4E 44 20 57 4F 52 44 00 BF 0B F0 00 | # AND WORD.....|
00001DF0: 99 20 41 2C 42 24 20 20 20 20 20 20 20 20 20 20 |. A,B$ |
00001E00: 20 20 20 20 20 20 20 20 20 20 20 20 3A 8F 20 44 | :. D|
00001E10: 49 53 50 4C 41 59 20 44 41 54 41 00 C6 0B FA 00 |ISPLAY DATA.....|
00001E20: 82 49 00 FE 0B 04 01 8D 31 30 30 30 20 20 20 20 |.I......1000 |
00001E30: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001E40: 20 20 20 3A 8F 20 43 48 45 43 4B 20 46 4F 52 20 | :. CHECK FOR |
00001E50: 44 49 53 4B 20 45 52 52 4F 52 00 2B 0C 0E 01 CE |DISK ERROR.+....|
00001E60: 23 31 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |#1 |
00001E70: 20 20 20 20 20 20 20 20 20 20 3A 8F 20 43 4C 4F | :. CLO|
00001E80: 53 45 20 46 49 4C 45 00 31 0C 26 01 8F 00 4D 0C |SE FILE.1.&...M.|
00001E90: 27 01 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |'.. ************|
00001EA0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 69 0C 28 01 8F 20 |*********.i.(.. |
00001EB0: 2A 20 20 43 48 41 4E 47 45 20 41 20 52 45 43 4F |* CHANGE A RECO|
00001EC0: 52 44 20 20 2A 00 85 0C 29 01 8F 20 2A 2A 2A 2A |RD *...).. ****|
00001ED0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001EE0: 2A 00 8B 0C 2A 01 8F 00 C6 0C 2C 01 CD 23 31 2C |*...*.....,..#1,|
00001EF0: 22 52 41 4E 44 4F 4D 22 3A 8D 31 30 30 30 20 20 |"RANDOM":.1000 |
00001F00: 20 20 20 20 3A 8F 20 52 45 2D 4F 50 45 4E 20 46 | :. RE-OPEN F|
00001F10: 49 4C 45 2C 20 52 45 41 44 20 4F 52 20 57 52 49 |ILE, READ OR WRI|
00001F20: 54 45 00 09 0D 36 01 CF 23 31 2C 31 30 2C 36 3A |TE...6..#1,10,6:|
00001F30: 8D 31 30 30 30 20 20 20 20 20 20 20 20 20 3A 8F |.1000 :.|
00001F40: 20 50 4F 53 49 54 49 4F 4E 20 54 4F 20 4D 49 44 | POSITION TO MID|
00001F50: 44 4C 45 20 52 45 43 4F 52 44 2C 20 32 4E 44 20 |DLE RECORD, 2ND |
00001F60: 46 49 45 4C 44 00 38 0D 40 01 98 31 2C 22 4E 45 |FIELD.8.@..1,"NE|
00001F70: 57 20 44 41 54 41 22 3A 8D 31 30 30 30 20 20 20 |W DATA":.1000 |
00001F80: 20 3A 8F 20 57 52 49 54 45 20 4E 45 57 20 52 45 | :. WRITE NEW RE|
00001F90: 43 4F 52 44 00 7B 0D 4A 01 CF 23 31 2C 31 30 3A |CORD.{.J..#1,10:|
00001FA0: 8D 31 30 30 30 20 20 20 20 20 20 20 20 20 20 20 |.1000 |
00001FB0: 3A 8F 20 50 4F 53 49 54 49 4F 4E 20 42 41 43 4B |:. POSITION BACK|
00001FC0: 20 54 4F 20 42 45 47 49 4E 4E 49 4E 47 20 4F 46 | TO BEGINNING OF|
00001FD0: 20 52 45 43 4F 52 44 00 AC 0D 54 01 84 31 2C 41 | RECORD...T..1,A|
00001FE0: 2C 42 24 3A 8D 31 30 30 30 20 20 20 20 20 20 20 |,B$:.1000 |
00001FF0: 20 20 20 3A 8F 20 52 45 41 44 20 4D 49 44 44 4C | :. READ MIDDL|
00002000: 45 20 52 45 43 4F 52 44 00 E6 0D 5E 01 99 3A 99 |E RECORD...^..:.|
00002010: 20 41 2C 20 42 24 20 20 20 20 20 20 20 20 20 20 | A, B$ |
00002020: 20 20 20 20 20 3A 8F 20 44 49 53 50 4C 41 59 20 | :. DISPLAY |
00002030: 20 20 20 20 31 30 20 20 20 20 4E 45 57 20 44 41 | 10 NEW DA|
00002040: 54 41 00 18 0E 68 01 CE 20 20 20 20 20 20 20 20 |TA...h.. |
00002050: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002060: 20 20 3A 8F 20 43 4C 4F 53 45 20 41 4C 4C 20 46 | :. CLOSE ALL F|
00002070: 49 4C 45 53 00 22 0E 90 01 89 32 30 30 30 00 43 |ILES."....2000.C|
00002080: 0E E3 03 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.... ***********|
00002090: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 |***************.|
000020A0: 64 0E E4 03 8F 20 2A 20 20 43 48 45 43 4B 20 46 |d.... * CHECK F|
000020B0: 4F 52 20 44 49 53 4B 20 45 52 52 4F 52 20 20 2A |OR DISK ERROR *|
000020C0: 00 85 0E E5 03 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A |...... *********|
000020D0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000020E0: 2A 00 C3 0E E8 03 8B 20 44 53 B3 32 30 20 A7 20 |*...... DS.20 . |
000020F0: 8E 20 20 20 20 20 20 20 20 20 20 20 3A 8F 20 45 |. :. E|
00002100: 52 52 4F 52 20 23 20 4C 45 53 53 20 54 48 41 4E |RROR # LESS THAN|
00002110: 20 32 30 20 49 53 20 4E 4F 20 45 52 52 4F 52 00 | 20 IS NO ERROR.|
00002120: FD 0E F2 03 99 44 53 24 20 20 20 20 20 20 20 20 |.....DS$ |
00002130: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3A | :|
00002140: 8F 20 50 52 49 4E 54 20 54 48 45 20 45 52 52 4F |. PRINT THE ERRO|
00002150: 52 20 4D 45 53 53 41 47 45 00 2A 0F FC 03 CE 20 |R MESSAGE.*.... |
00002160: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002170: 20 20 20 20 20 20 20 20 3A 8F 20 43 4C 4F 53 45 | :. CLOSE|
00002180: 20 46 49 4C 45 53 00 30 0F 06 04 80 00 60 0F D0 | FILES.0.....`..|
00002190: 07 99 22 11 57 4F 55 4C 44 20 59 4F 55 20 4C 49 |..".WOULD YOU LI|
000021A0: 4B 45 20 54 4F 20 43 48 41 4E 47 45 20 41 20 52 |KE TO CHANGE A R|
000021B0: 45 43 4F 52 44 20 3F 20 59 2F 4E 22 00 76 0F D5 |ECORD ? Y/N".v..|
000021C0: 07 A1 41 24 3A 8B 20 41 24 B3 B1 22 22 A7 32 30 |..A$:. A$.."".20|
000021D0: 30 35 00 8C 0F DA 07 A1 41 24 3A 8B 20 41 24 B2 |05......A$:. A$.|
000021E0: 22 59 22 A7 32 31 30 30 00 9C 0F DF 07 8B 20 41 |"Y".2100...... A|
000021F0: 24 B2 22 4E 22 A7 20 80 00 A6 0F E4 07 89 32 30 |$."N". .......20|
00002200: 31 30 00 D4 0F 34 08 85 22 57 48 49 43 48 20 52 |10...4.."WHICH R|
00002210: 45 43 4F 52 44 20 23 20 28 31 2D 32 36 29 20 3F |ECORD # (1-26) ?|
00002220: 20 31 20 20 20 9D 9D 9D 9D 9D 9D 22 3B 46 53 24 | 1 ......";FS$|
00002230: 00 EF 0F 39 08 8B 20 C3 28 46 53 24 29 B1 32 A7 |...9.. .(FS$).2.|
00002240: 99 22 91 91 22 3A 89 32 31 30 30 00 0B 10 3A 08 |."..":.2100...:.|
00002250: 57 B2 36 3A 58 B2 C5 28 46 53 24 29 3A 8B 20 58 |W.6:X..(FS$):. X|
00002260: B3 31 30 A7 57 B2 35 00 28 10 3B 08 8B 58 B3 31 |.10.W.5.(.;..X.1|
00002270: 20 B0 20 58 B1 32 36 20 A7 99 22 91 91 22 3A 89 | . X.26 .."..":.|
00002280: 32 31 30 30 00 55 10 3E 08 99 22 11 4E 45 57 20 |2100.U.>..".NEW |
00002290: 44 41 54 41 20 54 4F 20 42 45 20 50 55 54 20 49 |DATA TO BE PUT I|
000022A0: 4E 54 4F 20 52 45 43 4F 52 44 20 22 58 22 20 20 |NTO RECORD "X" |
000022B0: 22 00 79 10 43 08 85 22 28 20 31 35 20 43 48 41 |".y.C.."( 15 CHA|
000022C0: 52 41 43 54 45 52 53 20 4D 41 58 2E 20 29 20 3A |RACTERS MAX. ) :|
000022D0: 22 3B 43 53 24 00 8B 10 48 08 4E 44 24 B2 C8 28 |";CS$...H.ND$..(|
000022E0: 43 53 24 2C 31 35 29 00 AC 10 66 08 99 20 22 11 |CS$,15)...f.. ".|
000022F0: 20 57 52 49 54 49 4E 47 20 46 49 4C 45 20 54 4F | WRITING FILE TO|
00002300: 20 44 49 53 4B 20 11 22 00 E7 10 6B 08 CD 23 31 | DISK ."...k..#1|
00002310: 2C 22 52 41 4E 44 4F 4D 22 3A 8D 31 30 30 30 20 |,"RANDOM":.1000 |
00002320: 20 20 20 20 20 3A 8F 20 52 45 2D 4F 50 45 4E 20 | :. RE-OPEN |
00002330: 46 49 4C 45 2C 20 52 45 41 44 20 4F 52 20 57 52 |FILE, READ OR WR|
00002340: 49 54 45 00 2A 11 70 08 CF 23 31 2C 28 58 29 2C |ITE.*.p..#1,(X),|
00002350: 28 57 29 3A 8D 31 30 30 30 20 20 20 20 20 20 3A |(W):.1000 :|
00002360: 8F 20 50 4F 53 49 54 49 4F 4E 20 54 4F 20 4D 49 |. POSITION TO MI|
00002370: 44 44 4C 45 20 52 45 43 4F 52 44 2C 20 32 4E 44 |DDLE RECORD, 2ND|
00002380: 20 46 49 45 4C 44 00 59 11 75 08 98 31 2C 28 4E | FIELD.Y.u..1,(N|
00002390: 44 24 29 3A 8D 31 30 30 30 20 20 20 20 20 20 20 |D$):.1000 |
000023A0: 20 20 3A 8F 20 57 52 49 54 45 20 4E 45 57 20 52 | :. WRITE NEW R|
000023B0: 45 43 4F 52 44 00 7A 11 7A 08 99 22 11 11 20 52 |ECORD.z.z..".. R|
000023C0: 45 41 44 49 4E 47 20 46 49 4C 45 20 4F 4E 20 44 |EADING FILE ON D|
000023D0: 49 53 4B 20 11 22 00 8A 11 7F 08 81 49 B2 32 36 |ISK ."......I.26|
000023E0: A4 31 20 A9 AB 31 00 C7 11 84 08 CF 23 31 2C 28 |.1 ..1......#1,(|
000023F0: 49 29 3A 8D 31 30 30 30 20 20 20 20 20 20 20 20 |I):.1000 |
00002400: 20 20 3A 8F 20 53 54 41 52 54 20 57 49 54 48 20 | :. START WITH |
00002410: 4C 41 53 54 20 52 45 43 4F 52 44 20 49 4E 20 46 |LAST RECORD IN F|
00002420: 49 4C 45 00 01 12 89 08 84 31 2C 41 2C 42 24 3A |ILE......1,A,B$:|
00002430: 8D 31 30 30 30 20 20 20 20 20 20 20 20 20 20 3A |.1000 :|
00002440: 8F 20 52 45 41 44 20 42 41 43 4B 20 52 45 43 4F |. READ BACK RECO|
00002450: 52 44 20 23 20 41 4E 44 20 57 4F 52 44 00 31 12 |RD # AND WORD.1.|
00002460: 8E 08 99 20 41 2C 42 24 20 20 20 20 20 20 20 20 |... A,B$ |
00002470: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3A 8F | :.|
00002480: 20 44 49 53 50 4C 41 59 20 44 41 54 41 00 38 12 | DISPLAY DATA.8.|
00002490: 93 08 82 49 00 70 12 98 08 8D 31 30 30 30 20 20 |...I.p....1000 |
000024A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000024B0: 20 20 20 20 20 3A 8F 20 43 48 45 43 4B 20 46 4F | :. CHECK FO|
000024C0: 52 20 44 49 53 4B 20 45 52 52 4F 52 00 B3 12 A7 |R DISK ERROR....|
000024D0: 08 CF 23 31 2C 28 58 29 3A 8D 31 30 30 30 20 20 |..#1,(X):.1000 |
000024E0: 20 20 20 20 20 20 20 20 3A 8F 20 50 4F 53 49 54 | :. POSIT|
000024F0: 49 4F 4E 20 42 41 43 4B 20 54 4F 20 42 45 47 49 |ION BACK TO BEGI|
00002500: 4E 4E 49 4E 47 20 4F 46 20 52 45 43 4F 52 44 00 |NNING OF RECORD.|
00002510: E4 12 AC 08 84 31 2C 41 2C 42 24 3A 8D 31 30 30 |.....1,A,B$:.100|
00002520: 30 20 20 20 20 20 20 20 20 20 20 3A 8F 20 52 45 |0 :. RE|
00002530: 41 44 20 4D 49 44 44 4C 45 20 52 45 43 4F 52 44 |AD MIDDLE RECORD|
00002540: 00 03 13 B1 08 99 3A 99 3A 99 20 41 20 2C 20 42 |......:.:. A , B|
00002550: 24 20 3A 99 20 3A 8F 20 44 49 53 50 4C 41 59 00 |$ :. :. DISPLAY.|
00002560: 30 13 FC 08 CE 23 31 20 20 20 20 20 20 20 20 20 |0....#1 |
00002570: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3A | :|
00002580: 8F 20 43 4C 4F 53 45 20 46 49 4C 45 00 36 13 01 |. CLOSE FILE.6..|
00002590: 09 CE 00 40 13 06 09 89 32 30 30 30 00 00 00 |...@....2000... |
......VS$."970117.A".8.... SHOW TRACK, S
ECTOR, NO BINARY.Q...NT.3:. ERROR RETRIE
S.I...OP$."..P":OS$."..S"..D..G(142):.5
9468,12...G.."...".10)" "...I..". ***
***************************"...N.." *
DISPLAY ANY TRACK & SECTOR *"...X.."
* OF 2031, 2040, 4040, 8050, *".:...."
* OR 8250 ON PRINTER OR ON *".D....
" * COMPUTER SCREEN OUTPUT *"....
.." * MAY BE CHANGED BY TYPING *"..
...." * 'P' OR 'S' *"
......" *
*"......" * SETTING TRACK = 0 WILL
*".6...." * TERMINATE THE PROGRAM
*".A...." ***********************
*******."......*************************
*****......* SET PROGRAM CONSTANT
*.M....******************************...
H.SP$." ":NL$.G(0):HX$."0123456789ABCDEF
".(.R.FS$."":.I.64 . 95:FS$.FS$.".".G(I)
.".":. I.\...SS$." ":. I.192 . 223:SS$.
SS$.".".G(I).".":. I.O.... A$(15),NB(2).
.....A$:.A$.."".245......" SYSTEM AD
DRESS, DRIVE 8,0.....";CH,D$.I....A$:.A
$.."".251......". OUTPUT TO .S.CREEN O
R .P.RINTER S...";JJ$.".... JJ$.."P".JJ
$.."S".."...":.252.<....4,3:.JJ$."P". 4:
.4,4.W....15,CH,15,"I".D$:. 650.O.... 2,
CH,2,"#0":. 650......*******************
***********..."..* LOAD TRACK AND SECTOR
*...,..* INTO DISK BUFFER
*...6..******************************.
4.@..". TRACK, SECTOR (TRACK=0=END) 0
,0.....";T,S.S.J.. T.0 . 2: 4: 15:."END
":..S.T..4:.4,"TRACK"T" SECTOR"S:.4...^.
.15,"U1:2,"D$;T;S:.660...C..RT.350...H..
******************************...R..* RE
AD BYTE 0&1 OF DISK *......********
**********************......15,"B-P:2,0"
.E....#2,A$(0):A$(0).A$(0).NL$:NB(0).F(A
$(0)).R....#2,A$(1):A$(1).A$(1).NL$:NB(1
).F(A$(1))......************************
******......* READ & DISPLAY THE REST OF
*...B..* THE DISK BUFFER *..
.L..******************************...V.K
.2.=.... J.0 . 31:. J.16 . . 710:. Z$."N
". J.40:. 320.K.... I.K . 7.I....#2,A$(I
):A$(I).A$(I).NL$.U.... I:K.0.....A$."":
B$.": ":N.J.8:. 790:A$.A$.": "...... I.0
. 7:N.F(A$(I)):. 790...&.. F(A$(I)).32
. F(A$(I)).127 . A$(I).G(110)...'.. F(A$
(I)).34 . F(A$(I)).98 . A$(I).G(32).+.(.
B$.B$.A$(I).3.0.. I.?.1..4,A$B$.G.:.. J.
K.;..******************************...<.
.* NEXT TRACK AND SECTOR *...=..***
***************************...D.. NB(0).
0 . NB(1).255.."..NO CONTINUATION OF FIL
E":.320...F.."..NEXT TRACK AND SECTOR:."
NB(0);NB(1)".".K.I.."WANT NEXT TRACK AND
SECTOR? (Y/N/P/S)".B.L.. Z$:. Z$.."" .5
88.X.N.. Z$:. Z$."" .590...X.. Z$."Y" .
T.NB(0):S.NB(1):.330...B.. Z$."N" . . 32
0.J.G..Z$.."S".Z$.."P".590...L. 4:.4,3:.
Z$."P". ..37)OP$: 4:.4,4...O.. Z$."S". .
.37)OS$...Q..590.4.V..******************
************.X....* SUBROUTINES
*.|....**************************
****. ....* ERROR ROUTINE *
.D....******************************....
..15,EN,EM$:. EN.0 . ......."...SYSTEM O
R DRIVE NOT RESPONDING":.......15,EN,EM$
,ET,ES:. EN.0 . RT.0:..F...RT.RT.1:. RT.
NT . ......."...DISK ERROR, CODE:"EN".
"EM$:.". TRACK"ET" SECTOR"ES......".HAVE
TRIED"NT"TIMES. MOST PROBABLY THE"....
.."SECTOR CANNOT BE READ CORRECTLY."....
..".WANT TO VIEW WHAT HAS BEEN READ Y..
.";Y$. ....Y$."Y".RT.0:..)....320.M.F..*
*****************************.Q.P..* SCR
EEN CONTINUE MSSG *...Z..*********
*********************.C...."..CONTINUE W
ITH THIS SECTOR? (Y/N/P/S)".W....Z$:.Z$.
."".745......Z$:.Z$."".746......Z$."Y"..
".TRACK" T " SECTOR"S ".":..#....Z$."N".
760.<....Z$.."S".Z$.."P".746.B... 4:.4,3
:.Z$."P". ..37)OP$: 4:.4,4.Y.... Z$."S".
..37)OS$......746...... NB(0).0 . NB(1)
.255.."..NO CONTINUATION OF FILE":......
."..NEXT TRACK AND SECTOR IS:."NB(0);NB(
1):.......******************************
.4. ..* DISK BYTE TO HEX PRINT *.X.*
..******************************.{.4.A1.
.(N.16):A$.A$.J(HX$,A1.1,1)...>.A2..(N.1
6.A1):A$.A$.J(HX$,A2.1,1)...H.A$.A$.SP$:
....S.....NT.@...SP.~...NL....HX.....FS
`.L..I..`...SSB.X..A......CH.....D...X..
JJ..X..A.7..............................
......................NB................
....N..A.7......P..P..P..P..O.4O.MN.\N..
......................NB...........0....
........DN@.C8 : 9D 9D 9D 22 3B 54 00 ..
C8 : 9D 9D 9D 22 3B 54 00..0..C8 : 9D 9D
9D 22 3B 54 0..0..: NNN ;.T...C8 : 9D 9
D 9D 22 3B 54 ..C8 : 9D 9D 9D 22 3B 54..
4..C8 : 9D 9D 9D 22 3B 5..5..: NNN ;...C
8 : 9D 9D 9D 22 3B ..C8 : 9D 9D 9D 22 3B
..B..C8 : 9D 9D 9D 22 3..3..: NNN .. 7.C
8 : 9D 9D 9D 22 ..C8 : 9D 9D 9D 22..2..C
8 : 9D 9D 9D 2..2..: NNN..N4.C8 : 9D 9D
9D ..C8 : 9D 9D 9D..D..C8 : 9D 9D 9..9..
: NN..N1.C8 : 9D 9D ..C8 : 9D 9D..D..C8
: 9D 9..9..: N..N..C8 : 9D ..C8 : 9D..D.
.C8 : 9..9..C8 : ..C8 ..C8..8..C..C..U.C
.U.....T.=.T..;.:.;.."..."..............
.........: .U.N.I.T. . .9...C0 : 20 55
4E 49 54 20 20 39 ..C0 : 20 55 4E 49 54
20 20 39..9..C0 : 20 55 4E 49 54 20 20 3
..3..: .U.N.I.T. . ...C0 : 20 55 4E 49
54 20 20 ..C0 : 20 55 4E 49 54 20 20..0.
.C0 : 20 55 4E 49 54 20 2..2..: .U.N.I.
T. ...C0 : 20 55 4E 49 54 20 ..C0 : 20 5
5 4E 49 54 20..0..C0 : 20 55 4E 49 54 2.
.2..: .U.N.I.T...C0 : 20 55 4E 49 54 ..
C0 : 20 55 4E 49 54..4..C0 : 20 55 4E 49
5..5..: .U.N.I...C0 : 20 55 4E 49 ..C0
: 20 55 4E 49..9..C0 : 20 55 4E 4..4..:
.U.N...C0 : 20 55 4E ..C0 : 20 55 4E..
E..C0 : 20 55 4..4..: .U...C0 : 20 55 .
.C0 : 20 55..5..C0 : 20 5..5..: ...C0 :
20 ..C0 : 20..0..C0 : 2..2..C0 : ..C0 .
.C0..0..C..C..9...9.. ... .. ... ..T...T
..I...I..N...N..U...U.. ... ..: NNNNN T.
O...B8 : CC 04 AA 00 85 22 54 4F ..B8 :
CC 04 AA 00 85 22 54 4F..F..B8 : CC 04 A
A 00 85 22 54 4..4..: NNNNN T...B8 : CC
04 AA 00 85 22 54 ..B8 : CC 04 AA 00 85
22 54..4..B8 : CC 04 AA 00 85 22 5..5..:
NNNNN .. ..B8 : CC 04 AA 00 85 22 ..B8
: CC 04 AA 00 85 22..2..B8 : CC 04 AA 00
85 2..2..: NNNNN..N..B8 : CC 04 AA 00 8
5 ..B8 : CC 04 AA 00 85..5..B8 : CC 04 A
A 00 8..8..: NNNN..N..B8 : CC 04 AA 00 .
.B8 : CC 04 AA 00..0..B8 : CC 04 AA 0..0
..: NNN..N..B8 : CC 04 AA ..B8 : CC 04 A
A..A..B8 : CC 04 A..A..: NN..N..B8 : CC
04 ..B8 : CC 04..4..B8 : CC 0..0..: N..N
..B8 : CC ..B8 : CC..C..B8 : C..C..B8 :
..B8 ..B8..8..B..B..O...O..T...T.."...".
.........................L...L..: NNF.$.
ND.$.N..N..B0 : A0 00 46 24 B2 44 24 00
..B0 : A0 00 46 24 B2 44 24 00..0..B0 :
A0 00 46 24 B2 44 24 0..0..: NNF.$.ND.$.
..B0 : A0 00 46 24 B2 44 24 ..B0 : A0 00
46 24 B2 44 24..4..B0 : A0 00 46 24 B2
44 2..2..: NNF.$.ND...B0 : A0 00 46 24 B
2 44 ..B0 : A0 00 46 24 B2 44..4..B0 : A
0 00 46 24 B2 4..4..: NNF.$.N..N..B0 : A
0 00 46 24 B2 ..B0 : A0 00 46 24 B2..2..
B0 : A0 00 46 24 B..B..: NNF.$...B0 : A0
00 46 24 ..B0 : A0 00 46 24..4..B0 : A0
00 46 2..2..: NNF...B0 : A0 00 46 ..B0
: A0 00 46..6..B0 : A0 00 4..4..: NN..N.
.B0 : A0 00 ..B0 : A0 00..0..B0 : A0 0..
0..: N..N..B0 : A0 ..B0 : A0..0..B0 : A.
.A..B0 : ..B0 ..B0..0..B..B.....$...$..D
...D.........$...$..F...F..... ... ..: N
N8.0.0.NNN..N..A8 : 00 8D 38 30 30 00 B5
04 ..A8 : 00 8D 38 30 30 00 B5 04..4..A
8 : 00 8D 38 30 30 00 B5 0..0..: NN8.0.0
.NN..N..A8 : 00 8D 38 30 30 00 B5 ..A8 :
00 8D 38 30 30 00 B5..5..A8 : 00 8D 38
30 30 00 B..B..: NN8.0.0.N..N..A8 : 00 8
D 38 30 30 00 ..A8 : 00 8D 38 30 30 00..
0..A8 : 00 8D 38 30 30 0..0..: NN8.0.0..
.A8 : 00 8D 38 30 30 ..A8 : 00 8D 38 30
30..0..A8 : 00 8D 38 30 3..3..: NN8.0...
A8 : 00 8D 38 30 ..A8 : 00 8D 38 30..0..
A8 : 00 8D 38 3..3..: NN8...A8 : 00 8D 3
8 ..A8 : 00 8D 38..8..A8 : 00 8D 3..3..:
NN..N..A8 : 00 8D ..A8 : 00 8D..D..A8 :
00 8..8..: N..N..A8 : 00 ..A8 : 00..0..
A8 : 0..0..A8 : ..A8 ..A8..8..A..A......
.............0...0..0...0..8...8........
....: N ;.F.NNNN..N..A0 : 9D 22 3B 46 00
AB 04 96 ..A0 : 9D 22 3B 46 00 AB 04 96
..6..A0 : 9D 22 3B 46 00 AB 04 9..9..: N
;.F.NNN..N..A0 : 9D 22 3B 46 00 AB 04 .
.A0 : 9D 22 3B 46 00 AB :. OPEN FILE TO
READ...R..I.26.1 ..1.U...O#1,(I):.1000
:. START WITH LAST RECORD IN FIL
E......1,A,B$:.1000 :. READ BAC
K RECORD # AND WORD...... A,B$
:. DISPLAY DATA.F....I......
1000 :. CHECK FOR
DISK ERROR.+...N#1
:. CLOSE FILE.1.&...M.'.. ************
*********.I.(.. * CHANGE A RECORD *...
).. *********************...*...F.,.M#1,
"RANDOM":.1000 :. RE-OPEN FILE, REA
D OR WRITE...6.O#1,10,6:.1000 :.
POSITION TO MIDDLE RECORD, 2ND FIELD.8.
@..1,"NEW DATA":.1000 :. WRITE NEW RE
CORD.{.J.O#1,10:.1000 :. POSIT
ION BACK TO BEGINNING OF RECORD...T..1,A
,B$:.1000 :. READ MIDDLE RECORD
...^..:. A, B$ :. DISPLAY
10 NEW DATA...H.N
:. CLOSE ALL FILES."....2000.C
.... **************************.D.... *
CHECK FOR DISK ERROR *...... *********
*****************.C.... DS.20 . .
:. ERROR # LESS THAN 20 IS NO ERROR.
.....DS$ :. PRINT
THE ERROR MESSAGE.*...N
:. CLOSE FILES.0.....`.P..".WOUL
D YOU LIKE TO CHANGE A RECORD ? Y/N".V.U
..A$:. A$.."".2005...Z..A$:. A$."Y".2100
...... A$."N". .......2010.T.4.."WHICH R
ECORD # (1-26) ? 1 ......";FS$...9.. C
(FS$).2.."..":.2100...:.W.6:X.E(FS$):. X
.10.W.5.(.;..X.1 . X.26 .."..":.2100.U.>
..".NEW DATA TO BE PUT INTO RECORD "X"
".Y.C.."( 15 CHARACTERS MAX. ) :";CS$...
H.ND$.H(CS$,15)...F.. ". WRITING FILE TO
DISK ."...K.M#1,"RANDOM":.1000 :.
RE-OPEN FILE, READ OR WRITE.*.P.O#1,(X),
(W):.1000 :. POSITION TO MIDDLE REC
ORD, 2ND FIELD.Y.U..1,(ND$):.1000
:. WRITE NEW RECORD.Z.Z..".. READING F
ILE ON DISK .".....I.26.1 ..1.G...O#1,(
I):.1000 :. START WITH LAST REC
ORD IN FILE......1,A,B$:.1000 :
. READ BACK RECORD # AND WORD.1.... A,B$
:. DISPLAY DATA.8.
...I.P....1000 :.
CHECK FOR DISK ERROR.....O#1,(X):.1000
:. POSITION BACK TO BEGINNING OF
RECORD......1,A,B$:.1000 :. RE
AD MIDDLE RECORD......:.:. A , B$ :. :.
DISPLAY.0...N#1 :
. CLOSE FILE.6...N.@....2000...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL