UNSCRATCH
FILE INFORMATION
FILENAME(S): UNSCRATCH
FILE TYPE(S): PRG
FILE SIZE: 5.5K
FIRST SEEN: 2025-10-19 22:48:37
APPEARS ON: 2 disk(s)
FILE HASH
9dd16fef60c06b393e8cded4e608549604c5864dfb409811e315c59a71d7f1f6
FOUND ON DISKS (2 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| PRG AND UTE DISK | UNSCRATCH | PRG | Radd Maxx | 17 | 0 | DOWNLOAD FILE |
| PRG AND UTE DISK | UNSCRATCH | PRG | High Voltage Complete C64 Collection | 17 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 14 08 84 03 8B 20 52 51 25 B2 31 20 A7 20 |....... RQ%.1 . | 00000010: 34 37 30 30 00 37 08 E8 03 99 22 93 05 22 AA C7 |4700.7....".."..| 00000020: 28 31 34 29 3A 97 35 33 32 38 31 2C 30 3A 97 35 |(14):.53281,0:.5| 00000030: 33 32 38 30 2C 30 3A 00 3E 08 4C 04 99 22 00 45 |3280,0:.>.L..".E| 00000040: 08 B0 04 99 22 00 4C 08 14 05 99 22 00 53 08 78 |....".L....".S.x| 00000050: 05 99 22 00 5A 08 DC 05 99 22 00 7C 08 40 06 99 |..".Z....".|.@..| 00000060: 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 46 |" F| 00000070: 52 4F 4D 20 54 48 45 20 42 4F 4F 4B 00 83 08 A4 |ROM THE BOOK....| 00000080: 06 99 22 00 AB 08 08 07 99 22 9E 20 20 20 20 20 |.."......". | 00000090: 20 20 20 20 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 | ............| 000000A0: B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 00 D2 08 6C 07 |..............l.| 000000B0: 99 22 20 20 20 20 20 20 20 20 20 C8 4F 57 20 54 |." .OW T| 000000C0: 4F 20 C7 45 54 20 54 48 45 20 CD 4F 53 54 20 CF |O .ET THE .OST .| 000000D0: 55 54 00 EE 08 D0 07 99 22 20 20 20 20 20 20 20 |UT......" | 000000E0: 20 20 20 20 20 20 20 20 20 20 20 20 4F 46 00 0B | OF..| 000000F0: 09 34 08 99 22 20 20 20 20 20 20 20 20 20 20 20 |.4.." | 00000100: 20 20 20 20 20 20 20 C7 C5 CF D3 00 32 09 98 08 | .....2...| 00000110: 99 22 20 20 20 20 20 20 20 20 20 B9 B9 B9 B9 B9 |." .....| 00000120: B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 |................| 00000130: B9 B9 00 39 09 FC 08 99 22 00 5E 09 60 09 99 22 |...9....".^.`.."| 00000140: 05 20 20 20 20 20 20 20 20 20 20 20 20 D4 48 45 |. .HE| 00000150: 20 CD 49 44 4E 49 54 45 20 D0 52 45 53 53 00 86 | .IDNITE .RESS..| 00000160: 09 C4 09 99 22 20 20 20 20 20 20 20 20 20 CD 49 |...." .I| 00000170: 44 4E 49 54 45 20 D3 4F 46 54 57 41 52 45 20 C7 |DNITE .OFTWARE .| 00000180: 41 5A 45 54 54 45 00 8D 09 28 0A 99 22 00 AC 09 |AZETTE...(.."...| 00000190: 8C 0A 99 22 20 20 20 20 20 20 20 20 20 20 20 20 |..." | 000001A0: 20 20 20 20 50 52 45 53 45 4E 54 53 00 B3 09 F0 | PRESENTS....| 000001B0: 0A 99 22 00 C5 09 54 0B 81 20 58 B2 31 A4 33 30 |.."...T.. X.1.30| 000001C0: 30 30 20 3A 82 00 D1 09 B8 0B 99 22 93 11 11 11 |00 :......."....| 000001D0: 22 00 F2 09 1C 0C 99 22 20 20 20 20 20 20 20 20 |"......" | 000001E0: 20 20 20 20 20 20 20 20 20 D5 4E 53 43 52 41 54 | .NSCRAT| 000001F0: 43 48 00 0F 0A 80 0C 99 22 20 20 20 20 20 20 20 |CH......" | 00000200: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 41 00 | A.| 00000210: 34 0A E4 0C 99 22 20 20 20 20 20 20 20 20 20 20 |4...." | 00000220: 20 20 20 D4 52 41 53 48 2D 43 41 4E 4E 45 44 20 | .RASH-CANNED | 00000230: 46 49 4C 45 00 3A 0A 48 0D 99 00 5F 0A 7A 0D 99 |FILE.:.H..._.z..| 00000240: 22 20 20 20 20 20 20 20 20 20 20 20 20 42 59 20 |" BY | 00000250: D2 49 43 48 41 52 44 20 D2 4F 4C 4C 49 4E 53 00 |.ICHARD .OLLINS.| 00000260: 65 0A AC 0D 99 00 88 0A 10 0E 99 22 20 20 20 20 |e.........." | 00000270: 20 20 20 20 20 20 20 20 20 20 43 4F 50 59 52 49 | COPYRI| 00000280: 47 48 54 20 31 39 38 36 00 8E 0A 74 0E 99 00 B3 |GHT 1986...t....| 00000290: 0A D8 0E 99 22 20 20 20 20 20 20 20 20 20 20 20 |...." | 000002A0: 20 20 D4 48 45 20 CD 49 44 4E 49 54 45 20 D0 52 | .HE .IDNITE .R| 000002B0: 45 53 53 00 DE 0A 3C 0F 99 22 20 20 20 20 20 20 |ESS...<.." | 000002C0: 20 20 D4 48 45 20 CD 49 44 4E 49 54 45 20 D3 4F | .HE .IDNITE .O| 000002D0: 46 54 57 41 52 45 20 C7 41 5A 45 54 54 45 00 E5 |FTWARE .AZETTE..| 000002E0: 0A A0 0F 99 22 00 0B 0B 04 10 99 22 20 20 20 20 |...."......" | 000002F0: 20 20 20 20 20 20 20 20 41 4C 4C 20 52 49 47 48 | ALL RIGH| 00000300: 54 53 20 52 45 53 45 52 56 45 44 00 11 0B 68 10 |TS RESERVED...h.| 00000310: 99 00 17 0B CC 10 99 00 1D 0B 30 11 99 00 4A 0B |..........0...J.| 00000320: 94 11 99 22 20 20 20 20 20 20 D0 2E CF 2E 20 C2 |..." .... .| 00000330: 4F 58 20 31 37 34 37 20 C3 48 41 4D 50 41 49 47 |OX 1747 .HAMPAIG| 00000340: 4E 20 C9 CC 20 36 31 38 32 30 00 5D 0B F8 11 81 |N .. 61820.]....| 00000350: 20 58 B2 31 20 A4 20 32 30 30 30 3A 82 00 67 0B | X.1 . 2000:..g.| 00000360: 2A 12 52 51 25 B2 31 00 78 0B 5C 12 8B 46 46 B2 |*.RQ%.1.x.\..FF.| 00000370: 31 A7 9E 32 34 35 37 36 00 94 0B C0 12 81 58 B2 |1..24576......X.| 00000380: 30 A4 32 3A 87 4D 3A 97 28 38 32 38 AA 58 29 2C |0.2:.M:.(828.X),| 00000390: 4D 3A 82 58 00 B9 0B 24 13 86 20 4E 4D 24 28 35 |M:.X...$.. NM$(5| 000003A0: 30 29 2C 53 28 35 30 29 2C 50 50 28 35 30 29 2C |0),S(50),PP(50),| 000003B0: 42 41 4D 25 28 32 35 36 29 00 F2 0B 88 13 47 53 |BAM%(256).....GS| 000003C0: 24 B2 22 47 45 4F 53 20 22 AA C7 28 31 30 32 29 |$."GEOS "..(102)| 000003D0: AA C7 28 31 31 31 29 AA C7 28 31 31 34 29 AA C7 |..(111)..(114)..| 000003E0: 28 31 30 39 29 AA C7 28 39 37 29 AA C7 28 31 31 |(109)..(97)..(11| 000003F0: 36 29 00 FD 0B EC 13 99 C7 28 31 34 29 00 1C 0C |6).......(14)...| 00000400: 50 14 97 35 33 32 38 30 2C 30 3A 97 35 33 32 38 |P..53280,0:.5328| 00000410: 31 2C 31 35 3A 97 36 34 36 2C 31 31 00 4E 0C B4 |1,15:.646,11.N..| 00000420: 14 99 22 93 11 11 11 11 11 20 20 20 20 20 C9 4E |.."...... .N| 00000430: 53 45 52 54 20 44 49 53 4B 20 57 49 54 48 20 53 |SERT DISK WITH S| 00000440: 43 52 41 54 43 48 45 44 20 46 49 4C 45 22 00 76 |CRATCHED FILE".v| 00000450: 0C 18 15 99 22 20 20 20 20 20 20 20 20 49 4E 54 |...." INT| 00000460: 4F 20 44 49 53 4B 20 44 52 49 56 45 20 4E 55 4D |O DISK DRIVE NUM| 00000470: 42 45 52 20 38 22 00 9F 0C 7C 15 99 22 11 20 20 |BER 8"...|..". | 00000480: 20 20 20 20 20 D0 52 45 53 53 20 41 4E 59 20 4B | .RESS ANY K| 00000490: 45 59 20 54 4F 20 43 4F 4E 54 49 4E 55 45 22 00 |EY TO CONTINUE".| 000004A0: B6 0C E0 15 A1 41 24 3A 8B 20 41 24 B2 22 22 20 |.....A$:. A$."" | 000004B0: A7 20 35 36 30 30 00 DC 0C 44 16 99 22 11 11 11 |. 5600...D.."...| 000004C0: 20 20 20 20 20 20 20 20 20 20 20 20 12 20 D0 4C | . .L| 000004D0: 45 41 53 45 20 D7 41 49 54 20 92 22 00 EE 0C A8 |EASE .AIT ."....| 000004E0: 16 9F 31 35 2C 38 2C 31 35 2C 22 49 30 22 00 FA |..15,8,15,"I0"..| 000004F0: 0C 0C 17 8D 20 31 38 35 30 30 00 09 0D 70 17 9F |.... 18500...p..| 00000500: 32 2C 38 2C 32 2C 22 23 22 00 15 0D D4 17 8D 20 |2,8,2,"#"...... | 00000510: 31 38 35 30 30 00 2B 0D 38 18 98 31 35 2C 22 55 |18500.+.8..15,"U| 00000520: 31 3A 32 20 30 20 31 38 20 30 22 00 37 0D 9C 18 |1:2 0 18 0".7...| 00000530: 8D 20 31 38 35 30 30 00 4B 0D 00 19 98 31 35 2C |. 18500.K....15,| 00000540: 22 42 2D 50 3A 32 20 31 37 33 22 00 56 0D 64 19 |"B-P:2 173".V.d.| 00000550: 8D 31 38 35 30 30 00 64 0D C8 19 42 24 B2 22 22 |.18500.d...B$.""| 00000560: 3A 58 B2 30 00 80 0D 2C 1A A1 23 32 2C 41 24 3A |:X.0...,..#2,A$:| 00000570: 8B 20 41 24 B2 22 22 A7 20 41 24 B2 C7 28 30 29 |. A$."". A$..(0)| 00000580: 00 8D 0D 90 1A 42 24 B2 42 24 AA 41 24 00 97 0D |.....B$.B$.A$...| 00000590: F4 1A 58 B2 58 AA 31 00 A9 0D 58 1B 8B 20 58 B3 |..X.X.1...X.. X.| 000005A0: 31 31 20 A7 20 36 37 30 30 00 BD 0D BC 1B 8B 20 |11 . 6700...... | 000005B0: 42 24 B3 B1 47 53 24 A7 31 39 32 30 30 00 D2 0D |B$..GS$.19200...| 000005C0: 20 1C 54 B2 31 38 3A 53 B2 31 3A 58 B2 30 3A 5A | .T.18:S.1:X.0:Z| 000005D0: B2 30 00 E7 0D 84 1C 98 31 35 2C 22 55 31 3A 22 |.0......15,"U1:"| 000005E0: 32 3B 30 3B 54 3B 53 00 F0 0D E8 1C 53 50 B2 53 |2;0;T;S.....SP.S| 000005F0: 00 03 0E 4C 1D 8D 31 39 35 30 30 3A 54 B2 C6 28 |...L..19500:T..(| 00000600: 41 24 29 00 16 0E B0 1D 8D 31 39 35 30 30 3A 53 |A$)......19500:S| 00000610: B2 C6 28 41 24 29 00 25 0E 14 1E 8B 20 54 B2 30 |..(A$).%.... T.0| 00000620: A7 20 58 B2 31 00 2D 0E 78 1E 46 B2 32 00 3F 0E |. X.1.-.x.F.2.?.| 00000630: DC 1E 98 31 35 2C 22 42 2D 50 3A 22 32 3B 46 00 |...15,"B-P:"2;F.| 00000640: 4B 0E 40 1F 8D 20 31 38 35 30 30 00 57 0E A4 1F |K.@.. 18500.W...| 00000650: 8D 20 31 39 35 30 30 00 6B 0E 08 20 8B 20 C6 28 |. 19500.k.. . .(| 00000660: 41 24 29 B2 30 A7 31 39 37 30 30 00 76 0E 6C 20 |A$).0.19700.v.l | 00000670: 46 B2 46 AA 33 32 00 8D 0E D0 20 8B 20 58 B2 31 |F.F.32.... . X.1| 00000680: 20 AF 20 46 B1 53 20 A7 20 38 37 30 30 00 A0 0E | . F.S . 8700...| 00000690: 34 21 8B 20 46 B3 32 33 30 20 A7 20 37 39 30 30 |4!. F.230 . 7900| 000006A0: 00 AA 0E 98 21 89 37 33 30 30 00 BB 0E FC 21 8B |....!.7300....!.| 000006B0: 20 5A B2 30 A7 20 32 31 31 30 30 00 C1 0E 60 22 | Z.0. 21100...`"| 000006C0: 8F 00 D9 0E C4 22 41 B2 30 3A 42 B2 30 3A 43 B2 |....."A.0:B.0:C.| 000006D0: 30 3A 44 B2 30 3A 45 B2 5A 00 EF 0E 28 23 41 B2 |0:D.0:E.Z...(#A.| 000006E0: 5A 3A 8B 20 41 B1 B2 31 30 A7 20 41 B2 31 30 00 |Z:. A..10. A.10.| 000006F0: 21 0F 8C 23 99 22 93 11 11 11 20 20 D4 48 45 20 |!..#.".... .HE | 00000700: 46 49 4C 45 53 20 53 43 52 41 43 48 45 44 20 4F |FILES SCRACHED O| 00000710: 4E 20 54 48 49 53 20 44 49 53 4B 20 41 52 45 11 |N THIS DISK ARE.| 00000720: 22 00 3C 0F F0 23 99 22 CE 55 4D 42 45 52 20 20 |".<..#.".UMBER | 00000730: 20 20 C6 49 4C 45 20 CE 41 4D 45 22 00 57 0F 54 | .ILE .AME".W.T| 00000740: 24 99 22 2D 2D 2D 2D 2D 2D 20 20 20 20 2D 2D 2D |$."------ ---| 00000750: 2D 2D 2D 2D 2D 2D 22 00 66 0F B8 24 81 59 B2 42 |------".f..$.Y.B| 00000760: A4 28 41 AB 31 29 00 83 0F 1C 25 8B 20 59 B1 35 |.(A.1)....%. Y.5| 00000770: 30 20 A7 20 20 59 B2 41 3A 45 B2 5A 3A 89 31 30 |0 . Y.A:E.Z:.10| 00000780: 31 30 30 00 A0 0F 80 25 8B 20 44 AA 31 B1 5A 20 |100....%. D.1.Z | 00000790: A7 20 59 B2 41 3A 45 B2 5A 3A 89 31 30 31 30 30 |. Y.A:E.Z:.10100| 000007A0: 00 B4 0F E4 25 99 22 20 22 43 3B 22 20 20 20 20 |....%." "C;" | 000007B0: 20 20 22 3B 00 C9 0F 48 26 99 CA 28 4E 4D 24 28 | ";...H&..(NM$(| 000007C0: 59 29 2C 33 2C 31 36 29 3A 00 D3 0F AC 26 43 B2 |Y),3,16):....&C.| 000007D0: 43 AA 31 00 DD 0F 10 27 44 B2 44 AA 31 00 E4 0F |C.1....'D.D.1...| 000007E0: 74 27 82 59 00 1D 10 D8 27 8B 20 45 B1 39 20 A7 |t'.Y....'. E.9 .| 000007F0: 20 99 22 11 D4 48 45 52 45 20 41 52 45 20 4D 4F | ."..HERE ARE MO| 00000800: 52 45 20 46 49 4C 45 53 2E 20 D4 59 50 45 20 27 |RE FILES. .YPE '| 00000810: 59 27 20 53 45 45 20 54 48 45 4D 2E 22 00 4B 10 |Y' SEE THEM.".K.| 00000820: 3C 28 99 22 11 20 20 D3 45 4C 45 43 54 20 54 48 |<(.". .ELECT TH| 00000830: 45 20 46 49 4C 45 20 4E 55 4D 42 45 52 20 54 4F |E FILE NUMBER TO| 00000840: 20 55 4E 53 43 52 41 54 43 48 22 00 7C 10 A0 28 | UNSCRATCH".|..(| 00000850: 99 22 11 20 D3 45 4C 45 43 54 20 12 20 4F 4E 4C |.". .ELECT . ONL| 00000860: 59 20 92 20 54 48 45 20 4C 41 53 54 20 46 49 4C |Y . THE LAST FIL| 00000870: 45 20 53 43 52 41 54 43 48 45 44 22 00 93 10 04 |E SCRATCHED"....| 00000880: 29 A1 41 24 3A 8B 20 41 24 B2 22 22 A7 20 31 30 |).A$:. A$."". 10| 00000890: 35 30 30 00 AC 10 68 29 8B 20 41 24 B2 22 59 22 |500...h). A$."Y"| 000008A0: AF 20 45 B1 39 20 A7 31 30 39 30 30 00 CC 10 CC |. E.9 .10900....| 000008B0: 29 8B 20 41 24 B3 22 30 22 B0 C6 28 41 24 29 B1 |). A$."0"..(A$).| 000008C0: 43 AA 34 37 20 A7 20 31 30 35 30 30 00 D8 10 30 |C.47 . 10500...0| 000008D0: 2A 89 20 31 31 34 30 30 00 EA 10 94 2A 8B 20 59 |*. 11400....*. Y| 000008E0: B2 B1 35 30 A7 20 38 38 30 30 00 FC 10 F8 2A 8B |..50. 8800....*.| 000008F0: 20 44 B2 B1 5A 20 A7 20 38 38 30 30 00 19 11 5C | D..Z . 8800...\| 00000900: 2B 41 B2 41 AA 31 30 3A 42 B2 42 AA 31 30 3A 43 |+A.A.10:B.B.10:C| 00000910: B2 30 3A 45 B2 45 AB 31 30 00 2C 11 C0 2B 8B 20 |.0:E.E.10.,..+. | 00000920: 41 AB 5A B1 30 20 A7 20 39 31 30 30 00 37 11 24 |A.Z.0 . 9100.7.$| 00000930: 2C 89 20 38 39 30 30 00 54 11 88 2C 47 B2 28 B5 |,. 8900.T..,G.(.| 00000940: 28 28 44 AB 31 29 AD 31 30 29 AC 31 30 29 AA C5 |((D.1).10).10)..| 00000950: 28 41 24 29 00 8E 11 EC 2C 99 22 93 11 11 11 11 |(A$)....,.".....| 00000960: 11 20 20 20 20 20 20 20 20 20 20 20 20 22 3B 3A |. ";:| 00000970: 99 22 12 20 20 22 3B CA 28 4E 4D 24 28 47 29 2C |.". ";.(NM$(G),| 00000980: 33 2C 31 36 29 3A 99 22 20 92 20 20 22 3B 00 DF |3,16):." . ";..| 00000990: 11 50 2D 99 22 11 11 20 20 20 20 20 C9 53 20 54 |.P-.".. .S T| 000009A0: 48 49 53 20 54 48 45 20 46 49 4C 45 20 59 4F 55 |HIS THE FILE YOU| 000009B0: 20 57 41 4E 54 3F 22 3A 99 22 20 20 20 20 20 D0 | WANT?":." .| 000009C0: 52 45 53 53 20 27 59 27 20 46 4F 52 20 59 45 53 |RESS 'Y' FOR YES| 000009D0: 20 41 4E 44 20 27 4E 27 46 4F 52 20 4E 4F 22 00 | AND 'N'FOR NO".| 000009E0: F4 11 B4 2D A1 41 24 3A 8B 41 24 B2 22 22 A7 31 |...-.A$:.A$."".1| 000009F0: 31 37 30 30 00 08 12 18 2E 8B 20 41 24 B2 22 4E |1700...... A$."N| 00000A00: 22 20 A7 20 38 38 30 30 00 1C 12 7C 2E 8B 20 41 |" . 8800...|.. A| 00000A10: 24 B3 B1 22 59 22 A7 31 31 37 30 30 00 4E 12 E0 |$.."Y".11700.N..| 00000A20: 2E 99 22 93 11 11 11 11 11 11 11 11 20 20 20 20 |.."......... | 00000A30: 20 20 20 20 20 20 12 20 55 4E 53 43 52 41 54 43 | . UNSCRATC| 00000A40: 48 45 52 20 57 4F 52 4B 49 4E 47 20 92 22 00 79 |HER WORKING .".y| 00000A50: 12 44 2F 99 22 11 11 11 20 20 20 20 20 20 20 20 |.D/."... | 00000A60: 20 20 20 20 20 20 12 20 50 4C 45 41 53 45 20 57 | . PLEASE W| 00000A70: 41 49 54 20 92 11 11 11 22 00 86 12 A8 2F 98 31 |AIT ...."..../.1| 00000A80: 35 2C 22 49 30 22 00 91 12 0C 30 8D 31 38 35 30 |5,"I0"....0.1850| 00000A90: 30 00 98 12 70 30 A0 32 00 A7 12 D4 30 9F 32 2C |0...p0.2....0.2,| 00000AA0: 38 2C 32 2C 22 23 22 00 B3 12 38 31 8D 20 31 38 |8,2,"#"...81. 18| 00000AB0: 35 30 30 00 CF 12 9C 31 98 31 35 2C 22 4D 2D 52 |500....1.15,"M-R| 00000AC0: 22 C7 28 30 29 C7 28 37 29 C7 28 32 35 35 29 00 |".(0).(7).(255).| 00000AD0: F3 12 00 32 81 49 B2 30 A4 32 35 35 3A A1 23 31 |...2.I.0.255:.#1| 00000AE0: 35 2C 43 24 3A 8B 43 24 B2 22 22 A7 43 24 B2 C7 |5,C$:.C$."".C$..| 00000AF0: 28 30 29 00 05 13 64 32 42 41 4D 25 28 49 29 B2 |(0)...d2BAM%(I).| 00000B00: C6 28 43 24 29 00 0C 13 C8 32 82 49 00 1C 13 2C |.(C$)....2.I...,| 00000B10: 33 42 41 4D 25 28 32 35 35 29 B2 30 00 48 13 90 |3BAM%(255).0.H..| 00000B20: 33 54 B2 C6 28 CA 28 4E 4D 24 28 47 29 2C 31 39 |3T..(.(NM$(G),19| 00000B30: 2C 31 29 29 3A 53 B2 C6 28 CA 28 4E 4D 24 28 47 |,1)):S..(.(NM$(G| 00000B40: 29 2C 32 30 2C 31 29 29 00 53 13 F4 33 8D 32 31 |),20,1)).S..3.21| 00000B50: 37 30 30 00 7D 13 58 34 54 B2 C6 28 CA 28 4E 4D |700.}.X4T..(.(NM| 00000B60: 24 28 47 29 2C 31 2C 31 29 29 3A 53 B2 C6 28 CA |$(G),1,1)):S..(.| 00000B70: 28 4E 4D 24 28 47 29 2C 32 2C 31 29 29 00 90 13 |(NM$(G),2,1))...| 00000B80: BC 34 44 54 B2 54 3A 44 53 B2 53 3A 44 50 B2 32 |.4DT.T:DS.S:DP.2| 00000B90: 00 9B 13 20 35 8D 32 31 37 30 30 00 B6 13 84 35 |... 5.21700....5| 00000BA0: 3A 20 20 20 98 31 35 2C 22 55 31 3A 22 32 3B 30 |: .15,"U1:"2;0| 00000BB0: 3B 44 54 3B 44 53 00 C6 13 E8 35 3A 20 20 20 20 |;DT;DS....5: | 00000BC0: 8D 31 38 35 30 30 00 DD 13 4C 36 3A 20 20 20 20 |.18500...L6: | 00000BD0: 98 31 35 2C 22 42 2D 50 3A 22 32 3B 30 00 ED 13 |.15,"B-P:"2;0...| 00000BE0: B0 36 3A 20 20 20 20 8D 31 38 35 30 30 00 FC 13 |.6: .18500...| 00000BF0: 14 37 3A 20 20 20 8D 31 39 35 30 30 00 18 14 78 |.7: .19500...x| 00000C00: 37 3A 20 20 20 20 8B 20 C6 28 41 24 29 B3 B1 30 |7: . .(A$)..0| 00000C10: 20 A7 20 32 33 31 30 30 00 30 14 DC 37 3A 20 20 | . 23100.0..7: | 00000C20: 20 20 98 31 35 2C 22 42 2D 50 3A 22 32 3B 44 50 | .15,"B-P:"2;DP| 00000C30: 00 40 14 40 38 3A 20 20 20 20 8D 31 38 35 30 30 |.@.@8: .18500| 00000C40: 00 68 14 A4 38 3A 20 20 20 20 8D 20 31 39 35 30 |.h..8: . 1950| 00000C50: 30 3A 54 B2 C6 28 41 24 29 3A 8D 31 39 35 30 30 |0:T..(A$):.19500| 00000C60: 3A 53 B2 C6 28 41 24 29 00 83 14 08 39 3A 20 20 |:S..(A$)....9: | 00000C70: 20 8B 20 54 B3 31 B0 54 B1 33 35 20 A7 20 31 35 | . T.1.T.35 . 15| 00000C80: 37 30 30 00 B6 14 6C 39 3A 20 20 20 20 99 22 20 |700...l9: ." | 00000C90: 20 20 20 20 20 20 20 20 20 20 20 12 20 53 54 49 | . STI| 00000CA0: 4C 4C 20 57 4F 52 4B 49 4E 47 20 92 22 28 44 50 |LL WORKING ."(DP| 00000CB0: AD 32 29 22 91 22 00 C7 14 D0 39 3A 20 20 20 20 |.2)"."....9: | 00000CC0: 44 50 B2 44 50 AA 32 00 E0 14 34 3A 3A 20 20 20 |DP.DP.2...4:: | 00000CD0: 8B 20 44 50 B1 32 35 35 20 A7 20 31 36 31 30 30 |. DP.255 . 16100| 00000CE0: 00 F0 14 98 3A 3A 20 20 20 20 8D 32 31 37 30 30 |....:: .21700| 00000CF0: 00 0D 15 FC 3A 3A 20 20 20 20 20 20 20 98 31 35 |....:: .15| 00000D00: 2C 22 55 31 3A 22 32 3B 30 3B 54 3B 53 00 21 15 |,"U1:"2;0;T;S.!.| 00000D10: 60 3B 3A 20 20 20 20 20 20 20 8D 20 31 38 35 30 |`;: . 1850| 00000D20: 30 00 4C 15 C4 3B 3A 20 20 20 20 20 20 20 8D 20 |0.L..;: . | 00000D30: 31 39 35 30 30 3A 54 B2 C6 28 41 24 29 3A 8D 31 |19500:T..(A$):.1| 00000D40: 39 35 30 30 3A 53 B2 C6 28 41 24 29 00 6A 15 28 |9500:S..(A$).j.(| 00000D50: 3C 3A 20 20 20 20 20 20 20 8B 20 54 B3 31 B0 54 |<: . T.1.T| 00000D60: B1 33 35 20 A7 31 33 37 30 30 00 7E 15 8C 3C 3A |.35 .13700.~..<:| 00000D70: 20 20 20 20 20 20 20 8D 20 32 31 37 30 30 00 92 | . 21700..| 00000D80: 15 F0 3C 3A 20 20 20 20 20 20 20 89 20 31 35 31 |..<: . 151| 00000D90: 30 30 00 C5 15 54 3D 3A 20 20 20 20 99 22 20 20 |00...T=: ." | 00000DA0: 20 20 20 20 20 20 20 20 20 20 12 20 53 54 49 4C | . STIL| 00000DB0: 4C 20 57 4F 52 4B 49 4E 47 20 92 22 28 44 50 AD |L WORKING ."(DP.| 00000DC0: 32 29 22 91 22 00 D6 15 B8 3D 3A 20 20 20 20 44 |2)"."....=: D| 00000DD0: 50 B2 44 50 AA 32 00 EF 15 1C 3E 3A 20 20 20 8B |P.DP.2....>: .| 00000DE0: 20 44 50 B1 32 35 35 20 A7 20 31 36 31 30 30 00 | DP.255 . 16100.| 00000DF0: FF 15 80 3E 3A 20 20 20 89 20 31 33 37 30 30 00 |...>: . 13700.| 00000E00: 11 16 E4 3E 98 31 35 2C 22 42 2D 50 3A 22 32 3B |...>.15,"B-P:"2;| 00000E10: 30 00 1C 16 48 3F 8D 31 38 35 30 30 00 29 16 AC |0...H?.18500.)..| 00000E20: 3F 81 58 B2 30 A4 32 35 35 00 3C 16 10 40 98 32 |?.X.0.255.<..@.2| 00000E30: 2C C7 28 42 41 4D 25 28 58 29 29 3B 00 43 16 74 |,.(BAM%(X));.C.t| 00000E40: 40 82 58 00 59 16 D8 40 98 31 35 2C 22 55 32 3A |@.X.Y..@.15,"U2:| 00000E50: 22 32 3B 30 3B 31 38 3B 30 00 64 16 3C 41 8D 31 |"2;0;18;0.d.<A.1| 00000E60: 38 35 30 30 00 6B 16 A0 41 A0 32 00 82 16 04 42 |8500.k..A.2....B| 00000E70: 84 31 35 2C 45 4E 2C 45 4D 24 2C 45 54 24 2C 45 |.15,EN,EM$,ET$,E| 00000E80: 53 24 00 8F 16 68 42 98 31 35 2C 22 49 30 22 00 |S$...hB.15,"I0".| 00000E90: 9B 16 CC 42 8D 20 31 38 35 30 30 00 AA 16 30 43 |...B. 18500...0C| 00000EA0: 9F 32 2C 38 2C 32 2C 22 23 22 00 B5 16 94 43 8D |.2,8,2,"#"....C.| 00000EB0: 31 38 35 30 30 00 CE 16 F8 43 98 31 35 2C 22 55 |18500....C.15,"U| 00000EC0: 31 3A 22 32 3B 30 3B 31 38 3B 53 28 47 29 00 DA |1:"2;0;18;S(G)..| 00000ED0: 16 5C 44 8D 20 31 38 35 30 30 00 F0 16 C0 44 98 |.\D. 18500....D.| 00000EE0: 31 35 2C 22 42 2D 50 3A 22 32 3B 50 50 28 47 29 |15,"B-P:"2;PP(G)| 00000EF0: 00 FC 16 24 45 8D 20 31 38 35 30 30 00 0B 17 88 |...$E. 18500....| 00000F00: 45 52 52 24 B2 C7 28 31 33 31 29 00 17 17 EC 45 |ERR$..(131)....E| 00000F10: 98 32 2C 52 52 24 3B 00 23 17 50 46 8D 20 31 38 |.2,RR$;.#.PF. 18| 00000F20: 35 30 30 00 3C 17 B4 46 98 31 35 2C 22 55 32 3A |500.<..F.15,"U2:| 00000F30: 22 32 3B 30 3B 31 38 3B 53 28 47 29 00 47 17 18 |"2;0;18;S(G).G..| 00000F40: 47 8D 31 38 35 30 30 00 5C 17 7C 47 84 31 35 2C |G.18500.\.|G.15,| 00000F50: 45 4D 2C 45 4D 24 2C 45 54 2C 45 53 00 68 17 E0 |EM,EM$,ET,ES.h..| 00000F60: 47 89 20 32 32 37 30 30 00 7F 17 44 48 84 31 35 |G. 22700...DH.15| 00000F70: 2C 45 4E 2C 45 4D 24 2C 45 54 24 2C 45 53 24 00 |,EN,EM$,ET$,ES$.| 00000F80: 8F 17 A8 48 8B 20 45 4E B3 32 30 20 A7 20 8E 00 |...H. EN.20 . ..| 00000F90: C4 17 0C 49 99 22 93 11 11 11 11 11 11 11 20 20 |...I."........ | 00000FA0: 20 20 20 20 20 20 12 20 C1 20 44 49 53 4B 20 45 | . . DISK E| 00000FB0: 52 52 4F 52 20 48 41 53 20 48 41 50 50 45 4E 45 |RROR HAS HAPPENE| 00000FC0: 44 20 92 22 00 F2 17 70 49 99 22 20 20 20 20 D0 |D ."...pI." .| 00000FD0: 4C 45 41 53 45 20 52 45 52 55 4E 20 50 52 4F 47 |LEASE RERUN PROG| 00000FE0: 52 41 4D 20 41 4E 44 20 54 52 59 20 41 47 41 49 |RAM AND TRY AGAI| 00000FF0: 4E 22 00 18 18 D4 49 99 22 11 20 20 20 20 20 20 |N"....I.". | 00001000: 20 20 20 20 22 45 4E 3B 45 4D 24 22 20 22 45 54 | "EN;EM$" "ET| 00001010: 24 22 20 22 3B 45 53 24 00 23 18 38 4A A0 32 3A |$" ";ES$.#.8J.2:| 00001020: A0 31 35 00 29 18 9C 4A 80 00 54 18 00 4B 99 22 |.15.)..J..T..K."| 00001030: 93 11 11 20 20 20 20 20 20 20 20 20 D4 48 49 53 |... .HIS| 00001040: 20 49 53 20 4E 4F 54 20 41 20 C7 45 4F 53 20 44 | IS NOT A .EOS D| 00001050: 49 53 4B 22 00 84 18 64 4B 99 22 D0 4C 45 41 53 |ISK"...dK.".LEAS| 00001060: 45 20 52 45 52 55 4E 20 50 52 4F 47 52 41 4D 20 |E RERUN PROGRAM | 00001070: 41 4E 44 20 55 53 45 20 41 20 C7 45 4F 53 20 44 |AND USE A .EOS D| 00001080: 49 53 4B 22 00 90 18 C8 4B 89 20 31 39 30 30 30 |ISK"....K. 19000| 00001090: 00 AC 18 2C 4C A1 23 32 2C 41 24 3A 8B 20 41 24 |...,L.#2,A$:. A$| 000010A0: B2 22 22 A7 20 41 24 B2 C7 28 30 29 00 B2 18 90 |."". A$..(0)....| 000010B0: 4C 8E 00 BC 18 F4 4C 42 24 B2 22 22 00 F9 18 58 |L.....LB$.""...X| 000010C0: 4D 8D 20 31 39 35 30 30 3A 42 24 B2 42 24 AA 41 |M. 19500:B$.B$.A| 000010D0: 24 3A 8D 31 39 35 30 30 3A 42 24 B2 42 24 AA 41 |$:.19500:B$.B$.A| 000010E0: 24 3A 8D 31 39 35 30 30 3A 8B 20 C6 28 41 24 29 |$:.19500:. .(A$)| 000010F0: B2 30 20 A7 20 38 33 30 30 00 06 19 BC 4D 42 24 |.0 . 8300....MB$| 00001100: B2 42 24 AA 41 24 00 10 19 20 4E 46 B2 46 AA 33 |.B$.A$... NF.F.3| 00001110: 00 20 19 84 4E 81 46 B2 46 A4 28 46 AA 32 38 29 |. ..N.F.F.(F.28)| 00001120: 00 2B 19 E8 4E 8D 31 39 35 30 30 00 38 19 4C 4F |.+..N.19500.8.LO| 00001130: 42 24 B2 42 24 AA 41 24 00 40 19 B0 4F 82 20 46 |B$.B$.A$.@..O. F| 00001140: 00 66 19 14 50 49 54 B2 C6 28 CA 28 42 24 2C 32 |.f..PIT..(.(B$,2| 00001150: 31 2C 31 29 29 3A 49 53 B2 C6 28 CA 28 42 24 2C |1,1)):IS..(.(B$,| 00001160: 32 32 2C 31 29 29 00 7C 19 78 50 8B 49 54 B3 B1 |22,1)).|.xP.IT..| 00001170: 31 AF 49 53 B3 B1 37 A7 38 34 30 30 00 8A 19 DC |1.IS..7.8400....| 00001180: 50 4E 4D 24 28 5A 29 B2 42 24 00 A1 19 40 51 53 |PNM$(Z).B$...@QS| 00001190: 28 5A 29 B2 53 50 3A 50 50 28 5A 29 B2 46 AB 33 |(Z).SP:PP(Z).F.3| 000011A0: 32 00 AB 19 A4 51 5A B2 5A AA 31 00 B5 19 08 52 |2....QZ.Z.1....R| 000011B0: 89 38 34 30 30 00 04 1A 6C 52 99 22 93 11 11 11 |.8400...lR."....| 000011C0: 11 11 11 20 20 20 20 20 20 20 20 D4 48 45 52 45 |... .HERE| 000011D0: 20 41 52 45 20 4E 4F 20 53 43 52 41 54 43 48 45 | ARE NO SCRATCHE| 000011E0: 44 22 3A 99 22 20 20 20 20 20 20 20 20 20 20 46 |D":." F| 000011F0: 49 4C 45 53 20 4F 4E 20 54 48 49 53 20 44 49 53 |ILES ON THIS DIS| 00001200: 4B 2E 11 22 00 51 1A D0 52 99 22 20 20 20 20 20 |K..".Q..R." | 00001210: 20 20 D2 45 52 55 4E 20 50 52 4F 47 52 41 4D 20 | .ERUN PROGRAM | 00001220: 41 4E 44 20 49 4E 53 45 52 54 22 3A 99 22 20 20 |AND INSERT":." | 00001230: 20 44 49 53 4B 20 57 49 54 48 20 53 43 52 41 54 | DISK WITH SCRAT| 00001240: 43 48 45 44 20 46 49 4C 45 53 20 4F 4E 20 49 54 |CHED FILES ON IT| 00001250: 22 00 5D 1A 34 53 89 20 31 39 30 30 30 00 7C 1A |".].4S. 19000.|.| 00001260: 98 53 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.S. ************| 00001270: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 9A 1A FC |************....| 00001280: 53 8F 20 20 52 4F 55 54 49 4E 45 20 46 4F 52 20 |S. ROUTINE FOR | 00001290: 42 41 4D 20 52 45 50 41 49 52 00 B9 1A 60 54 8F |BAM REPAIR...`T.| 000012A0: 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A | ***************| 000012B0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 EF 1A C4 54 5A B2 |*********....TZ.| 000012C0: B5 28 53 AD 38 29 3A 52 53 25 B2 32 AE 28 53 AB |.(S.8):RS%.2.(S.| 000012D0: 28 5A AC 38 29 29 3A 97 37 38 30 2C 52 53 25 3A |(Z.8)):.780,RS%:| 000012E0: 9E 38 32 38 3A 52 53 25 B2 C2 28 37 38 30 29 00 |.828:RS%..(780).| 000012F0: 11 1B 28 55 52 54 B2 28 5A AA 31 29 AA 28 54 AC |..(URT.(Z.1).(T.| 00001300: 34 29 3A 41 54 B2 54 AC 34 3A 41 53 B2 41 54 AA |4):AT.T.4:AS.AT.| 00001310: 31 00 2B 1B 8C 55 42 41 4D 25 28 52 54 29 B2 42 |1.+..UBAM%(RT).B| 00001320: 41 4D 25 28 52 54 29 AF 52 53 25 00 62 1B F0 55 |AM%(RT).RS%.b..U| 00001330: 8D 20 32 32 31 30 30 3A 41 53 B2 41 53 AA 31 3A |. 22100:AS.AS.1:| 00001340: 8D 20 32 32 32 30 30 3A 41 53 B2 41 53 AA 31 3A |. 22200:AS.AS.1:| 00001350: 8D 32 32 32 30 30 3A 42 41 4D 25 28 41 54 29 B2 |.22200:BAM%(AT).| 00001360: 43 4E 00 6B 1B 54 56 43 4E B2 30 00 79 1B B8 56 |CN.k.TVCN.0.y..V| 00001370: 81 42 59 54 45 B2 30 A4 37 00 93 1B 1C 57 42 49 |.BYTE.0.7....WBI| 00001380: 54 B2 42 41 4D 25 28 41 53 29 AF 28 32 AE 42 59 |T.BAM%(AS).(2.BY| 00001390: 54 45 29 00 AB 1B 80 57 8B 20 42 49 54 20 B3 B1 |TE)....W. BIT ..| 000013A0: 30 20 A7 20 43 4E B2 43 4E AA 31 00 B5 1B E4 57 |0 . CN.CN.1....W| 000013B0: 82 42 59 54 45 00 BB 1B 48 58 8E 00 0C 1C AC 58 |.BYTE...HX.....X| 000013C0: 99 22 93 11 11 11 11 11 11 11 20 20 20 20 20 20 |."........ | 000013D0: 20 20 20 12 20 D4 48 45 20 55 4E 53 43 52 41 54 | . .HE UNSCRAT| 000013E0: 43 48 20 49 53 20 44 4F 4E 45 20 92 22 3A 99 22 |CH IS DONE .":."| 000013F0: 11 20 20 20 20 20 20 20 20 20 20 20 20 20 20 C8 |. .| 00001400: 41 50 50 59 20 54 4F 20 48 45 4C 50 00 3B 1C 10 |APPY TO HELP.;..| 00001410: 59 99 22 11 11 11 20 20 20 20 20 D0 52 45 53 53 |Y."... .RESS| 00001420: 20 41 4E 59 20 4B 45 59 20 54 4F 20 52 45 54 55 | ANY KEY TO RETU| 00001430: 52 4E 20 54 4F 20 C7 45 4F 53 22 00 50 1C 74 59 |RN TO .EOS".P.tY| 00001440: A1 41 24 3A 8B 41 24 B2 22 22 A7 32 32 39 30 30 |.A$:.A$."".22900| 00001450: 00 5B 1C D8 59 89 32 33 33 30 30 00 8B 1C 3C 5A |.[..Y.23300...<Z| 00001460: 99 22 93 11 11 11 11 11 11 11 11 20 20 20 20 20 |."......... | 00001470: 20 20 20 20 20 20 20 20 12 20 C6 C9 CC C5 A0 C3 | . ......| 00001480: CF D2 D2 D5 D0 D4 C5 C4 20 92 22 00 BD 1C A0 5A |........ ."....Z| 00001490: 99 22 11 11 20 20 20 20 20 20 20 20 20 20 55 4E |.".. UN| 000014A0: 53 43 52 41 54 43 48 45 52 20 54 45 52 4D 49 4E |SCRATCHER TERMIN| 000014B0: 41 54 45 44 22 3A 89 20 31 39 30 30 30 00 C8 1C |ATED":. 19000...| 000014C0: 04 5B A0 32 3A A0 31 35 00 ED 1C 68 5B 97 35 33 |.[.2:.15...h[.53| 000014D0: 32 37 32 2C 28 C2 28 35 33 32 37 32 29 AF 31 35 |272,(.(53272).15| 000014E0: 29 B0 31 39 32 3A 97 36 34 38 2C 34 38 00 F6 1C |).192:.648,48...| 000014F0: CC 5B 99 22 93 22 00 28 1D 30 5C 9F 31 35 2C 38 |.[.".".(.0\.15,8| 00001500: 2C 31 35 3A 9F 32 2C 38 2C 32 2C 22 47 45 4F 53 |,15:.2,8,2,"GEOS| 00001510: 20 42 4F 4F 54 2C 50 2C 52 22 3A 84 31 35 2C 47 | BOOT,P,R":.15,G| 00001520: 47 3A A0 32 3A A0 31 35 00 38 1D 94 5C 8B 47 47 |G:.2:.15.8..\.GG| 00001530: B2 30 A7 32 34 32 30 30 00 63 1D F8 5C 99 22 13 |.0.24200.c..\.".| 00001540: 11 11 11 11 98 0E C9 4E 53 45 52 54 20 C7 45 4F |.......NSERT .EO| 00001550: 53 20 C4 49 53 4B 20 49 4E 20 C4 52 49 56 45 20 |S .ISK IN .RIVE | 00001560: 30 2E 22 00 85 1D 5C 5D 99 22 C8 49 54 20 41 4E |0."...\].".IT AN| 00001570: 59 20 4B 45 59 20 54 4F 20 43 4F 4E 54 49 4E 55 |Y KEY TO CONTINU| 00001580: 45 2E 2E 2E 22 00 9A 1D C0 5D A1 41 24 3A 8B 41 |E..."....].A$:.A| 00001590: 24 B2 22 22 A7 32 34 30 30 30 00 A5 1D 24 5E 89 |$."".24000...$^.| 000015A0: 32 33 35 30 30 00 C5 1D 88 5E 8B 46 46 B2 30 A7 |23500....^.FF.0.| 000015B0: 46 46 B2 31 3A 93 22 47 45 4F 53 20 42 4F 4F 54 |FF.1:."GEOS BOOT| 000015C0: 22 2C 38 2C 31 00 D5 1D EC 5E 83 20 37 33 2C 32 |",8,1....^. 73,2| 000015D0: 35 35 2C 39 36 00 00 00 |55,96... |
....... RQ%.1 . 4700.7...."..".G(14):.53
281,0:.53280,0:.>.L..".E....".L....".S.X
..".Z....".|.@.." FROM THE
BOOK......"......". ............
............R.L.." HOW TO GET TH
E MOST OUT...P.." OF..
.4.." GEOS.2...."
........................9....".^.`.."
. THE MIDNITE PRESS...D.."
MIDNITE SOFTWARE GAZETTE...(.."...
..." PRESENTS......".E.T.
. X.1.3000 :..Q...."...."......"
UNSCRATCH......"
A.4...." TRASH-CANNED
FILE.:.H..._.Z.." BY RICHARD
ROLLINS.E.........." COPYRI
GHT 1986...T.....X.." THE MI
DNITE PRESS...<.." THE MIDNITE SO
FTWARE GAZETTE... .."......"
ALL RIGHTS RESERVED...H.....L.....0...J.
..." P.O. BOX 1747 CHAMPAIGN IL 618
20.].... X.1 . 2000:..G.*.RQ%.1.X.\..FF.
1..24576......X.0.2:.M:.(828.X),M:.X...$
.. NM$(50),S(50),PP(50),BAM%(256).....GS
$."GEOS ".G(102).G(111).G(114).G(109).G(
97).G(116)......G(14)...P..53280,0:.5328
1,15:.646,11.N...."...... INSERT DIS
K WITH SCRATCHED FILE".V...." INT
O DISK DRIVE NUMBER 8"...|..". PRE
SS ANY KEY TO CONTINUE"......A$:. A$.""
. 5600...D.."... . PLEASE WAI
T ."......15,8,15,"I0"...... 18500...P..
2,8,2,"#"...T.. 18500.+.8..15,"U1:2 0 18
0".7.... 18500.K....15,"B-P:2 173".V.D.
.18500.D.H.B$."":X.0...,..#2,A$:. A$."".
A$.G(0).....B$.B$.A$.....X.X.1...X.. X.
11 . 6700...... B$..GS$.19200.R. .T.18:S
.1:X.0:Z.0......15,"U1:"2;0;T;S.....SP.S
...L..19500:T.F(A$)......19500:S.F(A$).%
.... T.0. X.1.-.X.F.2.?....15,"B-P:"2;F.
K.@.. 18500.W.... 19500.K.. . F(A$).0.19
700.V.L F.F.32...P . X.1 . F.S . 8700. .
4!. F.230 . 7900....!.7300....!. Z.0. 21
100.A.`"..Y.D"A.0:B.0:C.0:D.0:E.Z...(#A.
Z:. A..10. A.10.!..#.".... THE FILES SC
RACHED ON THIS DISK ARE.".<..#."NUMBER
FILE NAME".W.T$."------ ---------".
F..$.Y.B.(A.1)....%. Y.50 . Y.A:E.Z:.10
100. ..%. D.1.Z . Y.A:E.Z:.10100....%."
"C;" ";.I.H&.J(NM$(Y),3,16):.S..&C.
C.1....'D.D.1...T'.Y...X'. E.9 . .".THER
E ARE MORE FILES. TYPE 'Y' SEE THEM.".K.
<(.". SELECT THE FILE NUMBER TO UNSCRAT
CH".|. (.". SELECT . ONLY . THE LAST FIL
E SCRATCHED"....).A$:. A$."". 10500...H)
. A$."Y". E.9 .10900.L.L). A$."0".F(A$).
C.47 . 10500.X.0*. 11400....*. Y..50. 88
00....*. D..Z . 8800...\+A.A.10:B.B.10:C
.0:E.E.10.,..+. A.Z.0 . 9100.7.$,. 8900.
T..,G.(.((D.1).10).10).E(A$)....,.".....
. ";:.". ";J(NM$(G),3,16):."
. ";...P-.".. IS THIS THE FILE YOU
WANT?":." PRESS 'Y' FOR YES AND 'N'
FOR NO"....-.A$:.A$."".11700...... A$."N
" . 8800...|.. A$.."Y".11700.N....".....
.... . UNSCRATCHER WORKING .".Y
.D/."... . PLEASE WAIT ....
"..../.15,"I0"....0.18500...P0 2...T0.2,
8,2,"#"...81. 18500.O..1.15,"M-R"G(0)G(7
)G(255)....2.I.0.255:.#15,C$:.C$."".C$.G
(0)...D2BAM%(I).F(C$)...H2.I...,3BAM%(25
5).0.H..3T.F(J(NM$(G),19,1)):S.F(J(NM$(G
),20,1)).S..3.21700.}.X4T.F(J(NM$(G),1,1
)):S.F(J(NM$(G),2,1))....4DT.T:DS.S:DP.2
... 5.21700....5: .15,"U1:"2;0;DT;DS.F
..5: .18500...L6: .15,"B-P:"2;0...
.6: .18500....7: .19500...X7: .
F(A$)..0 . 23100.0..7: .15,"B-P:"2;DP
.@.@8: .18500.H..8: . 19500:T.F(A$
):.19500:S.F(A$)....9: . T.1.T.35 . 15
700...L9: ." . STILL WORKI
NG ."(DP.2)".".G.P9: DP.DP.2...4::
. DP.255 . 16100....:: .21700....::
.15,"U1:"2;0;T;S.!.`;: . 1850
0.L.D;: . 19500:T.F(A$):.19500:S.F
(A$).J.(<: . T.1.T.35 .13700.~..<:
. 21700....<: . 15100.E.T=:
." . STILL WORKING ."(DP.
2)".".V..=: DP.DP.2....>: . DP.255
. 16100....>: . 13700....>.15,"B-P:"2;
0...H?.18500.)..?.X.0.255.<..@.2,G(BAM%(
X));.C.T@.X.Y.X@.15,"U2:"2;0;18;0.D.<A.1
8500.K. A 2....B.15,EN,EM$,ET$,ES$...HB.
15,"I0"...LB. 18500...0C.2,8,2,"#"....C.
18500.N..C.15,"U1:"2;0;18;S(G).Z.\D. 185
00....D.15,"B-P:"2;PP(G)...$E. 18500....
ERR$.G(131)....E.2,RR$;.#.PF. 18500.<..F
.15,"U2:"2;0;18;S(G).G..G.18500.\.|G.15,
EM,EM$,ET,ES.H..G. 22700..DH.15,EN,EM$,
ET$,ES$....H. EN.20 . ..D..I."........
. A DISK ERROR HAS HAPPENED ."...P
I." PLEASE RERUN PROGRAM AND TRY AGAI
N"...TI.". "EN;EM$" "ET$" ";ES$
.#.8J 2: 15.)..J..T..K."... THIS
IS NOT A GEOS DISK"...DK."PLEASE RERUN
PROGRAM AND USE A GEOS DISK"...HK. 19000
...,L.#2,A$:. A$."". A$.G(0)....L.....LB
$.""...XM. 19500:B$.B$.A$:.19500:B$.B$.A
$:.19500:. F(A$).0 . 8300....MB$.B$.A$..
. NF.F.3. ..N.F.F.(F.28).+..N.19500.8.LO
B$.B$.A$.@..O. F.F..PIT.F(J(B$,21,1)):IS
.F(J(B$,22,1)).|.XP.IT..1.IS..7.8400....
PNM$(Z).B$...@QS(Z).SP:PP(Z).F.32....QZ.
Z.1....R.8400...LR."....... THERE
ARE NO SCRATCHED":." FILES ON
THIS DISK..".Q.PR." RERUN PROGRAM
AND INSERT":." DISK WITH SCRATCHED FIL
ES ON IT".].4S. 19000.|..S. ************
************....S. ROUTINE FOR BAM REPA
IR...`T. ************************...DTZ.
.(S.8):RS%.2.(S.(Z.8)):.780,RS%:.828:RS%
.B(780)...(URT.(Z.1).(T.4):AT.T.4:AS.AT.
1.+..UBAM%(RT).BAM%(RT).RS%.B..U. 22100:
AS.AS.1:. 22200:AS.AS.1:.22200:BAM%(AT).
CN.K.TVCN.0.Y..V.BYTE.0.7....WBIT.BAM%(A
S).(2.BYTE)....W. BIT ..0 . CN.CN.1....W
.BYTE...HX.....X."........ . THE
UNSCRATCH IS DONE .":.". H
APPY TO HELP.;..Y."... PRESS ANY KEY
TO RETURN TO GEOS".P.TY.A$:.A$."".22900
.[.XY.23300...<Z.".........
. FILE CORRUPTED ."... Z.".. UN
SCRATCHER TERMINATED":. 19000.H..[ 2: 15
...H[.53272,(B(53272).15).192:.648,48...
L[.".".(.0\.15,8,15:.2,8,2,"GEOS BOOT,P,
R":.15,GG: 2: 15.8..\.GG.0.24200.C..\.".
......INSERT GEOS DISK IN DRIVE 0."...\]
."HIT ANY KEY TO CONTINUE..."....].A$:.A
$."".24000...$^.23500.E..^.FF.0.FF.1:."G
EOS BOOT",8,1.U..^. 73,255,96...
> CLICK IMAGE PREVIEW FOR FULL MODAL