TRIPLE TOOL
FILE INFORMATION
FILENAME(S): TRIPLE TOOL
FILE TYPE(S): PRG
FILE SIZE: 8.1K
FIRST SEEN: 2025-12-02 02:14:58
APPEARS ON: 1 disk(s)
FILE HASH
7ad43b4e4cae857cab92c8c08f2109e709b4db3d4616b189c6f09e5feea6ad0a
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| OK | TRIPLE TOOL | PRG | The BAM Archive | 17 | 9 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1C 08 00 00 9E 28 32 30 38 30 29 20 45 4C |.......(2080) EL|
00000010: 4F 53 4F 46 54 20 31 39 38 36 20 00 00 00 20 20 |OSOFT 1986 ... |
00000020: 20 A2 E9 BD 32 08 9D FF 00 CA D0 F7 78 86 01 CA | ...2.......x...|
00000030: 9A 4C 00 01 A0 00 84 FD 84 FE A9 42 A2 28 85 AE |.L.........B.(..|
00000040: 86 AF A9 1C A2 09 85 AC 86 AD 20 81 01 A9 01 A2 |.......... .....|
00000050: 08 85 AE 86 AF B1 FD C9 5D D0 10 A9 00 48 20 A2 |........]....H .|
00000060: 01 AA 68 20 A8 01 CA D0 FA F0 0D C9 2B D0 06 20 |..h ........+.. |
00000070: A2 01 48 D0 E9 20 A8 01 20 B1 01 D0 D8 AE B8 01 |..H.. .. .......|
00000080: CA 30 24 BD B9 01 85 FE 85 2E CA BD B9 01 85 FD |.0$.............|
00000090: 85 2D CA BD B9 01 85 AD CA BD B9 01 85 AC 8E B8 |.-..............|
000000A0: 01 20 81 01 4C 49 01 A9 37 85 01 29 06 C9 06 D0 |. ..LI..7..)....|
000000B0: 01 58 4C E1 01 A5 FD D0 02 C6 FE C6 FD A5 AE D0 |.XL.............|
000000C0: 02 C6 AF C6 AE B1 AE 91 FD A5 AE C5 AC D0 E6 A5 |................|
000000D0: AF C5 AD D0 E0 60 20 B1 01 B1 FD 60 91 AE E6 AE |.....` ....`....|
000000E0: D0 02 E6 AF 60 E6 FD D0 02 E6 FE 60 08 01 08 7B |....`......`...{|
000000F0: 21 7B 21 01 38 03 03 03 03 03 03 03 03 03 03 03 |!{!.8...........|
00000100: 03 03 03 03 03 03 03 03 03 03 03 03 03 03 03 03 |................|
00000110: 03 03 03 03 00 A9 00 20 71 A8 4C AE A7 23 08 0A |....... q.L..#..|
00000120: 00 99 22 93 22 3A 81 49 B2 30 A4 31 33 39 3A 87 |..".":.I.0.139:.|
00000130: 41 3A 97 34 39 31 35 32 AA 49 2C 41 3A 82 00 30 |A:.49152.I,A:..0|
00000140: 08 0F 00 81 54 B2 31 A4 31 35 30 00 45 08 14 00 |....T.1.150.E...|
00000150: 9E 34 39 32 34 38 2C 30 2C 31 31 2C 54 3A 82 54 |.49248,0,11,T:.T|
00000160: 00 90 08 64 00 83 31 32 30 2C 31 36 39 2C 33 34 |...d..120,169,34|
00000170: 2C 31 34 31 2C 32 30 2C 33 2C 31 36 39 2C 31 39 |,141,20,3,169,19|
00000180: 32 2C 31 34 31 2C 32 31 2C 33 2C 31 37 33 2C 31 |2,141,21,3,173,1|
00000190: 37 2C 32 30 38 2C 34 31 2C 31 32 37 2C 31 34 31 |7,208,41,127,141|
000001A0: 2C 31 37 2C 32 30 38 2C 31 36 39 00 D8 08 6E 00 |,17,208,169...n.|
000001B0: 83 31 35 31 2C 31 34 31 2C 31 38 2C 32 30 38 2C |.151,141,18,208,|
000001C0: 31 37 33 2C 32 36 2C 32 30 38 2C 39 2C 31 2C 31 |173,26,208,9,1,1|
000001D0: 34 31 2C 32 36 2C 32 30 38 2C 38 38 2C 39 36 2C |41,26,208,88,96,|
000001E0: 31 36 39 2C 31 2C 34 34 2C 32 35 2C 32 30 38 2C |169,1,44,25,208,|
000001F0: 32 30 38 00 1E 09 78 00 83 33 2C 37 36 2C 34 39 |208...x..3,76,49|
00000200: 2C 32 33 34 2C 31 37 33 2C 33 32 2C 32 30 38 2C |,234,173,32,208,|
00000210: 34 31 2C 31 35 2C 32 30 31 2C 32 2C 32 30 38 2C |41,15,201,2,208,|
00000220: 32 31 2C 31 36 39 2C 38 2C 31 34 31 2C 33 32 2C |21,169,8,141,32,|
00000230: 32 30 38 2C 31 36 39 2C 30 00 6B 09 82 00 83 31 |208,169,0.k....1|
00000240: 34 31 2C 31 38 2C 32 30 38 2C 31 36 39 2C 31 2C |41,18,208,169,1,|
00000250: 31 34 31 2C 32 35 2C 32 30 38 2C 31 30 34 2C 31 |141,25,208,104,1|
00000260: 36 38 2C 31 30 34 2C 31 37 30 2C 31 30 34 2C 36 |68,104,170,104,6|
00000270: 34 2C 31 36 39 2C 32 2C 31 34 31 2C 33 32 2C 32 |4,169,2,141,32,2|
00000280: 30 38 2C 31 36 39 00 B1 09 8C 00 83 31 35 30 2C |08,169......150,|
00000290: 31 34 31 2C 31 38 2C 32 30 38 2C 37 36 2C 36 33 |141,18,208,76,63|
000002A0: 2C 31 39 32 2C 30 2C 32 35 35 2C 30 2C 32 35 35 |,192,0,255,0,255|
000002B0: 2C 30 2C 32 35 35 2C 30 2C 32 35 35 2C 30 2C 33 |,0,255,0,255,0,3|
000002C0: 32 2C 32 35 33 2C 31 37 34 2C 33 32 00 FC 09 96 |2,253,174,32....|
000002D0: 00 83 31 35 38 2C 31 38 33 2C 31 34 32 2C 35 30 |..158,183,142,50|
000002E0: 2C 31 39 32 2C 31 34 32 2C 37 35 2C 31 39 32 2C |,192,142,75,192,|
000002F0: 33 32 2C 32 35 33 2C 31 37 34 2C 33 32 2C 31 35 |32,253,174,32,15|
00000300: 38 2C 31 38 33 2C 31 34 32 2C 35 34 2C 31 39 32 |8,183,142,54,192|
00000310: 2C 33 32 2C 32 35 33 00 48 0A A0 00 83 31 37 34 |,32,253.H....174|
00000320: 2C 33 32 2C 31 35 38 2C 31 38 33 2C 31 34 32 2C |,32,158,183,142,|
00000330: 38 30 2C 31 39 32 2C 31 37 33 2C 32 31 2C 33 2C |80,192,173,21,3,|
00000340: 32 30 31 2C 31 39 32 2C 32 30 38 2C 31 2C 39 36 |201,192,208,1,96|
00000350: 2C 37 36 2C 30 2C 31 39 32 2C 32 33 38 2C 30 2C |,76,0,192,238,0,|
00000360: 32 34 36 00 90 0A FA 00 97 36 35 37 2C 31 32 38 |246......657,128|
00000370: 3A 97 38 30 38 2C 32 35 31 3A 8F 22 2B 14 1C 52 |:.808,251:."+..R|
00000380: 45 4D 22 45 4C 4F 53 4F 46 54 20 2D 31 39 38 36 |EM"ELOSOFT -1986|
00000390: 2D 22 00 D2 0A FF 00 97 35 33 32 37 32 2C 32 38 |-"......53272,28|
000003A0: 3A 8F 22 2B 14 11 52 45 4D 22 47 41 56 45 20 54 |:."+..REM"GAVE T|
000003B0: 48 49 53 20 54 4F 20 42 42 53 20 57 41 54 45 52 |HIS TO BBS WATER|
000003C0: 4C 41 4E 44 2E 22 00 F7 0A 00 01 8F 22 50 53 3A |LAND."......"PS:|
000003D0: 20 48 45 20 41 4C 53 4F 20 4D 41 44 45 20 54 48 | HE ALSO MADE TH|
000003E0: 49 53 20 50 52 4F 47 52 41 4D 22 00 09 0B 2C 01 |IS PROGRAM"...,.|
000003F0: 99 22 93 22 3A 9C 3A 9E 36 35 35 31 31 00 1F 0B |.".":.:.65511...|
00000400: 2D 01 9F 31 35 2C 38 2C 31 35 2C 22 55 49 22 3A |-..15,8,15,"UI":|
00000410: A0 31 35 00 3C 0B 36 01 97 35 33 32 38 30 2C 30 |.15.<.6..53280,0|
00000420: 3A 97 35 33 32 38 31 2C 30 3A 97 36 34 36 2C 37 |:.53281,0:.646,7|
00000430: 00 62 0B 40 01 99 A3 31 33 29 3A 99 22 9E 2B 11 |.b.@...13):.".+.|
00000440: 09 45 4C 4F 53 4F 46 54 20 2D 31 39 38 36 2D 22 |.ELOSOFT -1986-"|
00000450: 00 79 0B 4A 01 99 A3 31 36 29 3A 99 22 11 50 52 |.y.J...16):.".PR|
00000460: 45 53 45 4E 54 53 22 00 94 0B 54 01 99 A3 31 34 |ESENTS"...T...14|
00000470: 29 3A 99 22 11 54 52 49 50 4C 45 20 54 4F 4F 4C |):.".TRIPLE TOOL|
00000480: 21 22 00 C7 0B 59 01 99 22 2B 11 05 20 47 52 45 |!"...Y.."+.. GRE|
00000490: 45 54 49 4E 47 53 20 54 4F 20 54 48 45 20 4A 4F |ETINGS TO THE JO|
000004A0: 4C 4C 59 20 4A 4F 4B 45 52 20 41 4E 44 20 55 46 |LLY JOKER AND UF|
000004B0: 4F 2E 22 00 D7 0B 5E 01 81 49 B2 31 A4 33 30 30 |O."...^..I.1.300|
000004C0: 30 3A 82 00 14 0C 68 01 99 A3 37 29 3A 99 22 93 |0:....h...7):.".|
000004D0: 9E 2B 1D 07 2B 11 09 20 54 4F 20 55 4E 53 43 52 |.+..+.. TO UNSCR|
000004E0: 41 54 43 48 20 46 49 4C 45 53 20 20 3D 3E 20 12 |ATCH FILES => .|
000004F0: 20 46 31 20 92 22 00 40 0C 72 01 99 A3 37 29 3A | F1 .".@.r...7):|
00000500: 99 22 11 20 54 4F 20 52 45 4D 4F 56 45 20 45 52 |.". TO REMOVE ER|
00000510: 52 4F 52 53 2B 20 04 3D 3E 20 12 20 46 33 20 92 |RORS+ .=> . F3 .|
00000520: 22 00 6C 0C 7C 01 99 A3 37 29 3A 99 22 11 20 54 |".l.|...7):.". T|
00000530: 4F 20 55 4E 4E 45 57 20 57 48 4F 4C 45 20 44 49 |O UNNEW WHOLE DI|
00000540: 53 4B 20 3D 3E 20 12 20 46 35 20 92 22 00 98 0C |SK => . F5 ."...|
00000550: 86 01 99 A3 37 29 3A 99 22 11 20 54 4F 20 51 55 |....7):.". TO QU|
00000560: 49 54 20 54 4F 20 42 41 53 49 43 2B 20 04 3D 3E |IT TO BASIC+ .=>|
00000570: 20 12 20 46 37 20 92 22 00 AB 0C 90 01 A1 41 24 | . F7 ."......A$|
00000580: 3A 8B 41 24 B2 22 22 A7 34 30 30 00 BE 0C 9A 01 |:.A$."".400.....|
00000590: 8B 41 24 B2 C7 28 31 33 33 29 A7 34 36 30 00 D2 |.A$..(133).460..|
000005A0: 0C A4 01 8B 41 24 B2 C7 28 31 33 34 29 A7 31 31 |....A$..(134).11|
000005B0: 35 30 00 E6 0C AE 01 8B 41 24 B2 C7 28 31 33 35 |50......A$..(135|
000005C0: 29 A7 31 36 34 30 00 FA 0C B8 01 8B 41 24 B2 C7 |).1640......A$..|
000005D0: 28 31 33 36 29 A7 31 39 35 30 00 03 0D C2 01 89 |(136).1950......|
000005E0: 34 30 30 00 1C 0D CC 01 97 35 33 32 38 31 2C 31 |400......53281,1|
000005F0: 31 3A 8D 39 39 30 3A 52 45 25 B2 30 00 48 0D D6 |1:.990:RE%.0.H..|
00000600: 01 99 22 93 9E 12 43 4F 4D 4D 45 4E 43 45 20 53 |.."...COMMENCE S|
00000610: 45 41 52 43 48 20 4F 4E 20 54 52 41 43 4B 92 22 |EARCH ON TRACK."|
00000620: 44 49 25 22 2C 31 11 22 00 67 0D E0 01 53 50 25 |DI%",1.".g...SP%|
00000630: B2 31 3A 54 52 25 B2 44 49 25 3A 9F 31 35 2C 38 |.1:TR%.DI%:.15,8|
00000640: 2C 31 35 2C 22 49 30 00 7D 0D EA 01 9F 38 2C 38 |,15,"I0.}....8,8|
00000650: 2C 32 2C 22 23 32 22 3A 46 49 25 B2 30 00 9B 0D |,2,"#2":FI%.0...|
00000660: F4 01 98 31 35 2C 22 55 31 3A 22 32 3B 30 3B 54 |...15,"U1:"2;0;T|
00000670: 52 25 3B 53 50 25 3A 8D 39 33 30 00 C9 0D FE 01 |R%;SP%:.930.....|
00000680: 81 49 B2 30 A4 31 3A A1 23 38 2C 41 24 3A 8D 39 |.I.0.1:.#8,A$:.9|
00000690: 30 30 3A 50 25 28 49 29 B2 C6 28 41 24 29 3A 82 |00:P%(I)..(A$):.|
000006A0: 3A 41 B2 32 3A 8D 39 32 30 00 E3 0D 08 02 A1 23 |:A.2:.920......#|
000006B0: 38 2C 41 24 3A 8D 39 30 30 3A 41 B2 C6 28 41 24 |8,A$:.900:A..(A$|
000006C0: 29 AF 37 00 0E 0E 12 02 48 24 B2 22 22 3A 81 49 |).7.....H$."":.I|
000006D0: B2 30 A4 31 3A A1 23 38 2C 41 24 3A 8D 39 30 30 |.0.1:.#8,A$:.900|
000006E0: 3A 4C 25 28 49 29 B2 C6 28 41 24 29 3A 82 00 2D |:L%(I)..(A$):..-|
000006F0: 0E 1C 02 81 49 B2 33 A4 31 38 3A A1 23 38 2C 41 |....I.3.18:.#8,A|
00000700: 24 3A 48 24 B2 48 24 AA 41 24 3A 82 3A 00 3C 0E |$:H$.H$.A$:.:.<.|
00000710: 26 02 8B 48 24 B2 22 22 A7 35 37 30 00 73 0E 30 |&..H$."".570.s.0|
00000720: 02 99 20 4B 49 24 28 41 29 3B 22 20 22 3B 43 4F |.. KI$(A);" ";CO|
00000730: 24 3B 48 24 3B A3 31 31 29 43 4F 24 3B 3B 4C 25 |$;H$;.11)CO$;;L%|
00000740: 28 30 29 3B 4C 25 28 31 29 3A 8B 41 B2 30 A7 89 |(0);L%(1):.A.0..|
00000750: 37 33 30 00 9D 0E 3A 02 46 49 25 B2 46 49 25 AA |730...:.FI%.FI%.|
00000760: 31 3A 8B 46 49 25 B3 38 A7 41 B2 46 49 25 AC 33 |1:.FI%.8.A.FI%.3|
00000770: 32 AA 32 3A 8D 39 32 30 3A 89 35 32 30 00 AE 0E |2.2:.920:.520...|
00000780: 44 02 8B 50 25 28 30 29 B2 30 A7 36 30 30 00 F1 |D..P%(0).0.600..|
00000790: 0E 4E 02 99 22 11 4C 49 4E 4B 20 54 4F 20 54 52 |.N..".LINK TO TR|
000007A0: 41 43 4B 20 22 3B 3A 54 52 25 B2 50 25 28 30 29 |ACK ";:TR%.P%(0)|
000007B0: 3A 53 50 25 B2 50 25 28 31 29 3A 46 49 25 B2 30 |:SP%.P%(1):FI%.0|
000007C0: 3A 99 54 52 25 3B 53 50 25 22 11 22 3A 89 35 30 |:.TR%;SP%".":.50|
000007D0: 30 00 28 0F 58 02 A0 38 3A 99 22 12 11 44 49 52 |0.(.X..8:."..DIR|
000007E0: 45 43 54 4F 52 59 20 45 4E 44 53 92 22 2C 3A 8B |ECTORY ENDS.",:.|
000007F0: 52 45 25 A7 99 22 56 41 4C 49 44 41 54 49 4E 47 |RE%.."VALIDATING|
00000800: 22 3A 98 31 35 2C 22 56 00 3A 0F 62 02 8D 39 33 |":.15,"V.:.b..93|
00000810: 30 3A A0 31 35 3A 89 33 30 30 00 59 0F 6C 02 98 |0:.15:.300.Y.l..|
00000820: 31 35 2C 22 55 31 3A 22 32 3B 30 3B 4C 25 28 30 |15,"U1:"2;0;L%(0|
00000830: 29 3B 4C 25 28 31 29 3A 8E 00 75 0F 76 02 44 25 |);L%(1):..u.v.D%|
00000840: B2 32 3A 99 22 11 54 52 41 43 4B 2C 20 53 45 43 |.2:.".TRACK, SEC|
00000850: 54 4F 52 22 3B 00 9D 0F 80 02 8D 36 32 30 3A 81 |TOR";......620:.|
00000860: 49 B2 30 A4 31 3A A1 23 38 2C 41 24 3A 8D 39 30 |I.0.1:.#8,A$:.90|
00000870: 30 3A 5A 25 28 49 29 B2 C6 28 41 24 29 00 C4 0F |0:Z%(I)..(A$)...|
00000880: 8A 02 99 5A 25 28 49 29 22 9D 20 22 3B 3A 82 3A |...Z%(I)". ";:.:|
00000890: 99 3A 99 22 91 54 52 41 43 4B 2C 20 53 45 43 54 |.:.".TRACK, SECT|
000008A0: 4F 52 22 3B 00 D5 0F 94 02 8B 5A 25 28 30 29 B2 |OR";......Z%(0).|
000008B0: 30 A7 99 3A 8E 00 15 10 9E 02 98 31 35 2C 22 42 |0..:.......15,"B|
000008C0: 2D 46 22 30 3B 5A 25 28 30 29 3B 5A 25 28 31 29 |-F"0;Z%(0);Z%(1)|
000008D0: 3A 4C 25 28 30 29 B2 5A 25 28 30 29 3A 4C 25 28 |:L%(0).Z%(0):L%(|
000008E0: 31 29 B2 5A 25 28 31 29 3A 5A 25 28 44 25 29 B2 |1).Z%(1):Z%(D%).|
000008F0: 5A 25 28 30 29 00 30 10 A8 02 5A 25 28 44 25 AA |Z%(0).0...Z%(D%.|
00000900: 31 29 B2 5A 25 28 31 29 3A 44 25 B2 44 25 AA 32 |1).Z%(1):D%.D%.2|
00000910: 00 3E 10 B2 02 8B 44 53 B2 30 A7 36 34 30 00 7B |.>....DS.0.640.{|
00000920: 10 BC 02 99 3A 99 22 12 46 49 4C 45 20 49 53 20 |....:.".FILE IS |
00000930: 4E 4F 57 20 42 45 49 4E 47 20 52 45 49 4E 53 54 |NOW BEING REINST|
00000940: 41 54 45 44 92 21 22 3A 58 25 B2 A8 28 58 25 29 |ATED.!":X%..(X%)|
00000950: 3A 41 B2 46 49 25 AC 33 32 AA 32 00 A7 10 C6 02 |:A.FI%.32.2.....|
00000960: 81 49 B2 32 A4 44 25 AB 34 A9 32 3A 98 31 35 2C |.I.2.D%.4.2:.15,|
00000970: 22 42 2D 46 3A 22 30 3B 5A 25 28 49 29 3B 5A 25 |"B-F:"0;Z%(I);Z%|
00000980: 28 49 AA 31 29 3A 82 00 C9 10 D0 02 4C 25 28 30 |(I.1):......L%(0|
00000990: 29 B2 54 52 25 3A 4C 25 28 31 29 B2 53 50 25 3A |).TR%:L%(1).SP%:|
000009A0: 8D 36 32 30 3A 89 39 32 30 00 E4 10 DA 02 99 22 |.620:.920......"|
000009B0: 55 4E 53 43 52 41 54 43 48 3F 20 28 59 2F 4E 29 |UNSCRATCH? (Y/N)|
000009C0: 2B A0 04 00 FB 10 E4 02 A1 20 41 24 3A 8B 20 41 |+........ A$:. A|
000009D0: 24 B2 22 22 20 A7 20 37 34 30 00 0D 11 EE 02 8B |$."" . 740......|
000009E0: 20 41 24 B3 B1 22 59 22 A7 35 37 30 00 47 11 F8 | A$.."Y".570.G..|
000009F0: 02 58 25 B2 30 3A 99 22 11 42 4C 4F 43 4B 53 20 |.X%.0:.".BLOCKS |
00000A00: 42 45 49 4E 47 20 46 49 4C 4C 45 44 22 3A 5A 25 |BEING FILLED":Z%|
00000A10: 28 30 29 B2 4C 25 28 30 29 3A 8D 36 33 30 3A 8B |(0).L%(0):.630:.|
00000A20: 58 25 A7 35 37 30 00 79 11 02 03 99 22 11 49 53 |X%.570.y....".IS|
00000A30: 20 54 48 49 53 20 41 20 12 50 92 52 4F 47 52 41 | THIS A .P.ROGRA|
00000A40: 4D 2C 12 53 92 45 51 55 45 4E 54 49 41 4C 2C 20 |M,.S.EQUENTIAL, |
00000A50: 12 55 92 53 45 52 2C 22 00 94 11 0C 03 99 22 4F |.U.SER,"......"O|
00000A60: 52 20 12 52 92 45 4C 41 54 49 56 45 20 46 49 4C |R .R.ELATIVE FIL|
00000A70: 45 22 3B 00 C7 11 16 03 A1 20 4A 41 24 3A 8B 4A |E";...... JA$:.J|
00000A80: 41 24 B3 B1 22 50 22 AF 4A 41 24 B3 B1 22 53 22 |A$.."P".JA$.."S"|
00000A90: AF 4A 41 24 B3 B1 22 55 22 AF 4A 41 24 B3 B1 22 |.JA$.."U".JA$.."|
00000AA0: 52 22 A7 37 39 30 00 CF 11 20 03 99 3A 99 00 F9 |R".790... ..:...|
00000AB0: 11 2A 03 99 3A 8B 4A 41 24 B2 22 50 22 A7 99 22 |.*..:.JA$."P".."|
00000AC0: 12 50 52 4F 47 52 41 4D 92 2D 22 3A 4B 49 25 B2 |.PROGRAM.-":KI%.|
00000AD0: 31 33 30 3A 89 38 35 30 00 1E 12 34 03 8B 4A 41 |130:.850...4..JA|
00000AE0: 24 B2 22 55 22 A7 99 22 12 55 53 45 52 92 2D 22 |$."U"..".USER.-"|
00000AF0: 3A 4B 49 25 B2 31 33 31 3A 89 38 35 30 00 47 12 |:KI%.131:.850.G.|
00000B00: 3E 03 8B 4A 41 24 B2 22 52 22 A7 99 22 12 52 45 |>..JA$."R"..".RE|
00000B10: 4C 41 54 49 56 45 92 2D 22 3A 4B 49 25 B2 31 33 |LATIVE.-":KI%.13|
00000B20: 32 3A 89 38 35 30 00 64 12 48 03 99 22 12 53 45 |2:.850.d.H..".SE|
00000B30: 51 55 45 4E 54 49 41 4C 92 2D 22 3A 4B 49 25 B2 |QUENTIAL.-":KI%.|
00000B40: 31 32 39 00 7A 12 52 03 99 22 46 49 4C 45 20 52 |129.z.R.."FILE R|
00000B50: 45 54 52 49 45 56 45 44 22 00 97 12 5C 03 4C 25 |ETRIEVED"...\.L%|
00000B60: 28 30 29 B2 54 52 25 3A 4C 25 28 31 29 B2 53 50 |(0).TR%:L%(1).SP|
00000B70: 25 3A 8D 36 32 30 00 B6 12 66 03 41 B2 46 49 25 |%:.620...f.A.FI%|
00000B80: AC 33 32 AA 32 3A 8D 39 32 30 3A 98 38 2C C7 28 |.32.2:.920:.8,.(|
00000B90: 4B 49 25 29 3B 00 DC 12 70 03 42 4C 25 B2 28 28 |KI%);...p.BL%.((|
00000BA0: 44 25 AB 32 29 AD 32 29 AA 31 3A 99 22 11 22 42 |D%.2).2).1:."."B|
00000BB0: 4C 25 22 42 4C 4F 43 4B 53 22 3B 00 0F 13 7A 03 |L%"BLOCKS";...z.|
00000BC0: 98 31 35 2C 22 55 32 3A 22 32 3B 30 3B 54 52 25 |.15,"U2:"2;0;TR%|
00000BD0: 3B 53 50 25 3A 99 22 52 45 54 52 49 45 56 45 44 |;SP%:."RETRIEVED|
00000BE0: 21 11 22 3A 52 45 25 B2 31 3A 89 35 37 30 00 22 |!.":RE%.1:.570."|
00000BF0: 13 84 03 8B 41 24 B2 22 22 A7 41 24 B2 C7 28 30 |....A$."".A$..(0|
00000C00: 29 00 28 13 8E 03 8E 00 3A 13 98 03 98 31 35 2C |).(.....:....15,|
00000C10: 22 42 2D 50 3A 22 32 3B 41 00 5B 13 A2 03 84 31 |"B-P:"2;A.[....1|
00000C20: 35 2C 45 4E 25 2C 45 4D 24 2C 45 54 25 2C 45 53 |5,EN%,EM$,ET%,ES|
00000C30: 25 3A 8B 45 4E 25 B2 30 A7 8E 00 71 13 AC 03 99 |%:.EN%.0...q....|
00000C40: 22 11 11 12 44 49 53 4B 20 45 52 52 4F 52 92 22 |"...DISK ERROR."|
00000C50: 00 90 13 B6 03 99 22 11 3A 22 45 4E 25 22 2C 22 |......".:"EN%","|
00000C60: 45 4D 24 22 2C 22 45 54 25 22 2C 22 45 53 25 00 |EM$","ET%","ES%.|
00000C70: A5 13 CA 03 81 51 B2 31 A4 31 37 30 30 3A 82 3A |.....Q.1.1700:.:|
00000C80: 89 33 30 30 00 AB 13 D4 03 8E 00 D5 13 DE 03 86 |.300............|
00000C90: 50 25 28 31 29 2C 4C 25 28 31 29 2C 5A 25 28 33 |P%(1),L%(1),Z%(3|
00000CA0: 30 30 29 2C 4B 49 24 28 34 29 3A 43 4F 24 B2 C7 |00),KI$(4):CO$..|
00000CB0: 28 33 34 29 00 EA 13 E8 03 81 49 B2 30 A4 34 3A |(34)......I.0.4:|
00000CC0: 87 4B 49 24 28 49 29 3A 82 00 0F 14 F2 03 83 22 |.KI$(I):......."|
00000CD0: 12 44 45 4C 92 22 2C 22 53 45 51 22 2C 22 50 52 |.DEL.","SEQ","PR|
00000CE0: 47 22 2C 22 55 53 52 22 2C 22 52 45 4C 22 00 46 |G","USR","REL".F|
00000CF0: 14 FC 03 50 47 24 B2 22 93 12 9E 55 4E 53 43 52 |...PG$."...UNSCR|
00000D00: 41 54 43 48 20 49 49 20 50 52 47 2C 20 53 45 51 |ATCH II PRG, SEQ|
00000D10: 2C 20 55 53 52 20 41 4E 44 20 52 45 4C 20 46 49 |, USR AND REL FI|
00000D20: 4C 45 53 92 22 00 7E 14 06 04 99 50 47 24 22 11 |LES.".~....PG$".|
00000D30: 22 3A 99 22 54 48 49 53 20 50 52 4F 47 52 41 4D |":."THIS PROGRAM|
00000D40: 20 52 45 54 52 49 45 56 45 53 20 53 43 52 41 54 | RETRIEVES SCRAT|
00000D50: 43 48 45 44 20 46 49 4C 45 53 2E 11 22 00 A9 14 |CHED FILES.."...|
00000D60: 10 04 99 22 53 43 52 41 54 43 48 45 44 20 46 49 |..."SCRATCHED FI|
00000D70: 4C 45 53 20 4D 55 53 54 20 4E 4F 54 20 48 41 56 |LES MUST NOT HAV|
00000D80: 45 20 42 45 45 4E 20 22 00 D9 14 1A 04 99 22 57 |E BEEN "......"W|
00000D90: 52 49 54 54 45 4E 20 4F 56 45 52 20 42 59 20 4E |RITTEN OVER BY N|
00000DA0: 45 57 20 50 52 4F 47 52 41 4D 53 2C 20 54 48 45 |EW PROGRAMS, THE|
00000DB0: 4E 20 45 56 45 4E 22 3B 00 18 15 24 04 99 22 20 |N EVEN";...$.." |
00000DC0: 54 48 49 53 20 50 52 4F 47 52 41 4D 20 43 41 4E |THIS PROGRAM CAN|
00000DD0: 4E 4F 54 20 48 45 4C 50 20 59 4F 55 20 41 4E 59 |NOT HELP YOU ANY|
00000DE0: 4D 4F 52 45 20 21 2B 20 0F 92 22 00 36 15 2E 04 |MORE !+ ..".6...|
00000DF0: 99 22 11 11 11 05 2B 20 06 53 50 41 43 45 20 3D |."....+ .SPACE =|
00000E00: 20 4D 45 4E 55 22 00 55 15 38 04 99 22 11 11 11 | MENU".U.8.."...|
00000E10: 05 2B 20 05 52 45 54 55 52 4E 20 3D 20 53 54 41 |.+ .RETURN = STA|
00000E20: 52 54 22 00 6D 15 42 04 A1 20 42 24 3A 8B 20 42 |RT".m.B.. B$:. B|
00000E30: 24 B2 22 22 20 A7 20 31 30 39 30 00 7F 15 4C 04 |$."" . 1090...L.|
00000E40: 8B 42 24 B2 C7 28 33 32 29 A7 33 30 30 00 92 15 |.B$..(32).300...|
00000E50: 56 04 8B 42 24 B2 C7 28 31 33 29 A7 31 31 33 30 |V..B$..(13).1130|
00000E60: 00 9C 15 60 04 89 31 30 39 30 00 A9 15 6A 04 44 |...`..1090...j.D|
00000E70: 49 25 B2 31 38 3A 8E 00 BB 15 74 04 99 22 2B 91 |I%.18:....t.."+.|
00000E80: 04 22 3A 89 31 30 37 30 00 F8 15 7E 04 97 35 33 |.":.1070...~..53|
00000E90: 32 38 31 2C 31 31 3A 99 22 93 05 12 2B 20 04 54 |281,11:."...+ .T|
00000EA0: 48 49 53 20 50 52 4F 47 52 41 4D 20 52 45 50 41 |HIS PROGRAM REPA|
00000EB0: 49 52 53 20 4D 4F 53 54 20 45 52 52 4F 52 53 2B |IRS MOST ERRORS+|
00000EC0: 20 04 22 00 2A 16 88 04 99 22 91 12 20 20 4F 4E | .".*....".. ON|
00000ED0: 20 41 20 44 49 53 4B 45 54 54 45 2C 20 57 48 45 | A DISKETTE, WHE|
00000EE0: 4E 20 49 4E 20 44 4F 55 42 54 2C 20 4D 41 4B 45 |N IN DOUBT, MAKE|
00000EF0: 20 41 20 20 22 00 5C 16 92 04 99 22 91 12 2B 20 | A ".\...."..+ |
00000F00: 0A 42 41 43 4B 55 50 20 43 4F 50 59 20 46 49 52 |.BACKUP COPY FIR|
00000F10: 53 54 2E 2B 20 0C 22 00 74 16 9C 04 99 22 11 49 |ST.+ .".t....".I|
00000F20: 4E 53 45 52 54 20 44 49 53 4B 45 54 54 45 22 00 |NSERT DISKETTE".|
00000F30: A5 16 A6 04 85 22 13 2B 11 04 53 54 41 52 54 20 |.....".+..START |
00000F40: 52 45 4D 4F 56 49 4E 47 20 45 52 52 4F 52 53 20 |REMOVING ERRORS |
00000F50: 28 59 2F 4E 29 20 20 59 9D 9D 9D 22 3B 57 24 00 |(Y/N) Y...";W$.|
00000F60: B7 16 B0 04 8B 20 57 24 B3 B1 22 59 22 A7 33 30 |..... W$.."Y".30|
00000F70: 30 00 C4 16 BA 04 9F 31 35 2C 38 2C 31 35 00 D0 |0......15,8,15..|
00000F80: 16 C4 04 81 54 B2 31 A4 33 35 00 F1 16 CE 04 4E |....T.1.35.....N|
00000F90: 53 B2 32 30 AA 32 AC 28 54 B1 31 37 29 AA 28 54 |S.20.2.(T.17).(T|
00000FA0: B1 32 34 29 AA 28 54 B1 33 30 29 00 0A 17 D8 04 |.24).(T.30).....|
00000FB0: 54 24 B2 C9 28 C4 28 54 29 2C C3 28 C4 28 54 29 |T$..(.(T),.(.(T)|
00000FC0: 29 AB 31 29 00 1E 17 E2 04 8B 54 B3 31 30 A7 54 |).1)......T.10.T|
00000FD0: 24 B2 22 30 22 AA 54 24 00 2A 17 EC 04 4A 4F 42 |$."0".T$.*...JOB|
00000FE0: B2 31 37 36 00 34 17 F6 04 8D 31 35 33 30 00 42 |.176.4....1530.B|
00000FF0: 17 00 05 8B 45 B2 31 89 31 33 30 30 00 5B 17 0A |....E.1.1300.[..|
00001000: 05 42 44 B2 42 44 AA 31 3A 52 B2 52 AA 4E 53 3A |.BD.BD.1:R.R.NS:|
00001010: 89 31 34 35 30 00 67 17 14 05 81 53 B2 30 A4 4E |.1450.g....S.0.N|
00001020: 53 00 80 17 1E 05 53 24 B2 C9 28 C4 28 53 29 2C |S.....S$..(.(S),|
00001030: C3 28 C4 28 53 29 29 AB 31 29 00 94 17 28 05 8B |.(.(S)).1)...(..|
00001040: 53 B3 31 30 A7 53 24 B2 22 30 22 AA 53 24 00 C6 |S.10.S$."0".S$..|
00001050: 17 32 05 99 22 13 2B 11 06 12 9A 52 45 53 54 4F |.2..".+....RESTO|
00001060: 52 49 4E 47 92 20 54 52 41 43 4B 20 22 54 24 22 |RING. TRACK "T$"|
00001070: 20 2C 20 53 45 43 54 4F 52 20 22 53 24 00 D2 17 | , SECTOR "S$...|
00001080: 3C 05 4A 4F 42 B2 31 32 38 00 DC 17 46 05 8D 31 |<.JOB.128...F..1|
00001090: 35 33 30 00 EA 17 50 05 8B 45 B2 31 89 31 34 34 |530...P..E.1.144|
000010A0: 30 00 F4 17 5A 05 52 B2 52 AA 31 00 08 18 64 05 |0...Z.R.R.1...d.|
000010B0: 8B 45 B3 B1 34 AF 45 B3 B1 35 89 31 34 34 30 00 |.E..4.E..5.1440.|
000010C0: 16 18 6E 05 8B 45 B2 35 89 31 34 31 30 00 35 18 |..n..E.5.1410.5.|
000010D0: 78 05 98 31 35 2C 22 4D 2D 57 22 C7 28 37 31 29 |x..15,"M-W".(71)|
000010E0: C7 28 30 29 C7 28 31 29 C7 28 37 29 00 41 18 82 |.(0).(1).(7).A..|
000010F0: 05 4A 4F 42 B2 31 34 34 00 4B 18 8C 05 8D 31 35 |.JOB.144.K....15|
00001100: 33 30 00 5B 18 96 05 8B 45 B3 B1 31 A7 57 B2 57 |30.[....E..1.W.W|
00001110: AA 31 00 63 18 A0 05 82 20 53 00 6B 18 AA 05 82 |.1.c.... S.k....|
00001120: 20 54 00 73 18 B4 05 A0 31 35 00 AB 18 BE 05 99 | T.s....15......|
00001130: 22 13 2B 11 06 2B 20 29 22 00 CB 18 C8 05 8B 42 |".+..+ )"......B|
00001140: 44 B2 33 35 A7 99 22 13 2B 11 06 42 41 44 20 44 |D.35..".+..BAD D|
00001150: 49 53 4B 22 3A 80 00 E8 18 D2 05 99 22 13 2B 11 |ISK":.......".+.|
00001160: 06 52 45 41 44 20 45 52 52 4F 52 53 20 3A 22 52 |.READ ERRORS :"R|
00001170: 00 00 19 DC 05 99 22 11 57 52 49 54 45 20 45 52 |......".WRITE ER|
00001180: 52 4F 52 53 20 3A 22 57 00 0E 19 E6 05 99 22 11 |RORS :"W......".|
00001190: 44 4F 4E 45 21 22 00 23 19 F0 05 81 47 B2 31 A4 |DONE!".#....G.1.|
000011A0: 31 35 30 30 3A 82 3A 89 33 30 30 00 2D 19 FA 05 |1500:.:.300.-...|
000011B0: 54 52 59 B2 30 00 4F 19 04 06 98 31 35 2C 22 4D |TRY.0.O....15,"M|
000011C0: 2D 57 22 C7 28 38 29 C7 28 30 29 C7 28 32 29 C7 |-W".(8).(0).(2).|
000011D0: 28 54 29 C7 28 53 29 00 6F 19 0E 06 98 31 35 2C |(T).(S).o....15,|
000011E0: 22 4D 2D 57 22 C7 28 31 29 C7 28 30 29 C7 28 31 |"M-W".(1).(0).(1|
000011F0: 29 C7 28 4A 4F 42 29 00 7D 19 18 06 54 52 59 B2 |).(JOB).}...TRY.|
00001200: 54 52 59 AA 31 00 93 19 22 06 98 31 35 2C 22 4D |TRY.1..."..15,"M|
00001210: 2D 52 22 C7 28 31 29 C7 28 30 29 00 9F 19 2C 06 |-R".(1).(0)...,.|
00001220: A1 23 31 35 2C 45 24 00 B2 19 36 06 8B 45 24 B2 |.#15,E$...6..E$.|
00001230: 22 22 A7 45 24 B2 C7 28 30 29 00 BE 19 40 06 45 |"".E$..(0)...@.E|
00001240: B2 C6 28 45 24 29 00 D0 19 4A 06 8B 54 52 59 B2 |..(E$)...J..TRY.|
00001250: 35 30 30 89 31 36 33 30 00 E0 19 54 06 8B 45 B1 |500.1630...T..E.|
00001260: 31 32 37 89 31 35 36 30 00 E6 19 5E 06 8E 00 23 |127.1560...^...#|
00001270: 1A 68 06 97 35 33 32 38 31 2C 31 31 3A 99 22 93 |.h..53281,11:.".|
00001280: 12 05 20 50 41 52 54 49 41 4C 20 44 49 53 4B 20 |.. PARTIAL DISK |
00001290: 55 4E 4E 45 57 2E 2B 20 13 9E 22 00 51 1A 72 06 |UNNEW.+ ..".Q.r.|
000012A0: 99 22 54 48 49 53 20 50 52 4F 47 52 41 4D 20 50 |."THIS PROGRAM P|
000012B0: 41 52 54 49 41 4C 4C 59 20 52 45 53 54 4F 52 45 |ARTIALLY RESTORE|
000012C0: 53 20 41 20 44 49 53 4B 22 00 81 1A 7C 06 99 22 |S A DISK"...|.."|
000012D0: 41 46 54 45 52 20 49 54 20 48 41 53 20 42 45 45 |AFTER IT HAS BEE|
000012E0: 4E 20 4E 45 57 45 44 2D 2D 4E 4F 54 20 46 4F 52 |N NEWED--NOT FOR|
000012F0: 4D 41 54 54 45 44 21 22 3B 00 B1 1A 86 06 99 22 |MATTED!";......"|
00001300: 20 50 52 4F 47 52 41 4D 53 20 54 48 41 54 20 57 | PROGRAMS THAT W|
00001310: 45 52 45 20 49 4E 20 54 52 20 31 38 20 53 43 20 |ERE IN TR 18 SC |
00001320: 31 20 43 41 4E 4E 4F 54 22 00 FD 1A 90 06 99 22 |1 CANNOT"......"|
00001330: 42 45 20 52 45 54 52 49 45 56 45 44 20 44 55 45 |BE RETRIEVED DUE|
00001340: 20 54 4F 20 54 48 45 20 46 41 43 54 20 54 48 41 | TO THE FACT THA|
00001350: 54 20 57 48 45 4E 20 20 41 20 44 49 53 4B 20 49 |T WHEN A DISK I|
00001360: 53 20 4E 45 57 45 44 2C 20 54 52 20 31 38 2D 53 |S NEWED, TR 18-S|
00001370: 43 20 31 22 3B 00 39 1B 9A 06 99 22 20 49 53 20 |C 1";.9...." IS |
00001380: 54 4F 54 41 4C 4C 59 20 20 45 52 41 53 45 44 20 |TOTALLY ERASED |
00001390: 42 55 54 20 54 48 45 20 4F 54 48 45 52 53 20 57 |BUT THE OTHERS W|
000013A0: 49 4C 4C 20 42 45 20 52 45 47 41 49 4E 45 44 2E |ILL BE REGAINED.|
000013B0: 22 00 7E 1B A4 06 99 22 50 52 4F 47 52 41 4D 53 |".~...."PROGRAMS|
000013C0: 20 49 4E 20 31 38 2C 31 20 4D 4F 53 54 4C 59 20 | IN 18,1 MOSTLY |
000013D0: 53 54 41 52 54 20 41 54 20 31 37 2C 30 20 2C 20 |START AT 17,0 , |
000013E0: 31 37 2C 31 20 2C 20 31 39 2C 30 20 41 4E 44 20 |17,1 , 19,0 AND |
000013F0: 31 39 2C 31 2E 22 00 BC 1B AE 06 99 22 57 49 54 |19,1."......"WIT|
00001400: 48 20 44 49 53 4B 20 44 4F 43 54 45 52 20 59 4F |H DISK DOCTER YO|
00001410: 55 20 43 41 4E 20 46 49 4E 44 20 54 48 45 53 45 |U CAN FIND THESE|
00001420: 20 41 4E 44 20 52 45 43 52 45 41 54 45 20 31 38 | AND RECREATE 18|
00001430: 2C 31 22 3B 00 F1 1B B8 06 99 22 20 42 59 20 43 |,1";......" BY C|
00001440: 4C 4F 53 45 4C 59 20 45 58 41 4D 49 4E 49 4E 47 |LOSELY EXAMINING|
00001450: 20 4F 54 48 45 52 44 49 53 4B 27 53 20 54 52 20 | OTHERDISK'S TR |
00001460: 31 38 20 53 43 20 31 2E 22 00 3C 1C C2 06 99 22 |18 SC 1.".<...."|
00001470: 4E 4F 54 45 20 54 48 45 53 45 20 44 4F 57 4E 2C |NOTE THESE DOWN,|
00001480: 20 57 48 45 4E 20 52 45 43 52 45 41 54 49 4E 47 | WHEN RECREATING|
00001490: 20 31 38 2C 31 20 20 20 59 4F 55 20 43 41 4E 20 | 18,1 YOU CAN |
000014A0: 4C 49 4E 4B 20 54 48 45 4D 20 54 4F 20 54 48 45 |LINK THEM TO THE|
000014B0: 53 45 22 3B 00 8C 1C CC 06 99 22 20 54 52 41 43 |SE";......" TRAC|
000014C0: 4B 53 20 41 4E 44 20 20 20 53 45 43 54 4F 52 53 |KS AND SECTORS|
000014D0: 2C 20 57 49 54 48 20 41 20 4C 49 54 54 4C 45 20 |, WITH A LITTLE |
000014E0: 4C 55 43 4B 20 41 4E 44 20 54 49 4D 45 2C 20 20 |LUCK AND TIME, |
000014F0: 20 54 48 45 20 57 48 4F 4C 45 20 44 49 53 4B 20 | THE WHOLE DISK |
00001500: 49 53 22 3B 00 B7 1C D6 06 99 22 20 41 53 20 47 |IS";......" AS G|
00001510: 4F 4F 44 20 41 53 20 4E 45 57 2E 2B 20 07 28 4F |OOD AS NEW.+ .(O|
00001520: 4F 50 53 21 29 20 4F 4C 44 2E 22 00 06 1D E0 06 |OPS!) OLD.".....|
00001530: 99 22 49 46 20 54 48 49 53 20 50 52 4F 47 52 41 |."IF THIS PROGRA|
00001540: 4D 20 44 4F 45 53 4E 27 54 20 57 4F 52 4B 20 49 |M DOESN'T WORK I|
00001550: 54 20 4D 45 41 4E 53 20 20 20 54 48 41 54 20 54 |T MEANS THAT T|
00001560: 48 45 52 45 20 57 41 53 20 4E 4F 54 48 49 4E 47 |HERE WAS NOTHING|
00001570: 20 49 4E 20 31 38 2C 34 2E 22 00 55 1D EA 06 99 | IN 18,4.".U....|
00001580: 22 49 4E 20 54 48 49 53 20 43 41 53 45 20 54 48 |"IN THIS CASE TH|
00001590: 45 52 45 27 53 20 4C 49 54 54 4C 45 20 48 4F 50 |ERE'S LITTLE HOP|
000015A0: 45 2C 20 46 4F 52 4D 41 54 49 54 20 41 4E 44 20 |E, FORMATIT AND |
000015B0: 4B 49 53 53 20 59 4F 55 52 20 46 49 4C 45 53 20 |KISS YOUR FILES |
000015C0: 47 4F 4F 44 42 59 45 2E 22 00 88 1D F4 06 99 22 |GOODBYE."......"|
000015D0: 12 9F 50 52 45 53 53 20 52 45 54 55 52 4E 20 54 |..PRESS RETURN T|
000015E0: 4F 20 53 54 41 52 54 2B 20 13 22 3B 00 BA 1D FE |O START+ .";....|
000015F0: 06 99 22 12 9F 53 50 41 43 45 20 54 4F 20 52 45 |.."..SPACE TO RE|
00001600: 54 55 52 4E 20 54 4F 20 4D 45 4E 55 2B 20 11 22 |TURN TO MENU+ ."|
00001610: 00 CE 1D 08 07 A1 41 24 3A 8B 41 24 B2 22 22 A7 |......A$:.A$."".|
00001620: 31 38 30 30 00 E1 1D 12 07 8B 41 24 B2 C7 28 31 |1800......A$..(1|
00001630: 33 29 A7 31 38 34 30 00 F3 1D 1C 07 8B 41 24 B2 |3).1840......A$.|
00001640: C7 28 33 32 29 A7 33 30 30 00 FD 1D 26 07 89 31 |.(32).300...&..1|
00001650: 38 30 30 00 0A 1E 30 07 9F 31 35 2C 38 2C 31 35 |800...0..15,8,15|
00001660: 00 19 1E 3A 07 9F 32 2C 38 2C 32 2C 22 23 22 00 |...:..2,8,2,"#".|
00001670: 30 1E 44 07 98 31 35 2C 22 55 31 3A 22 3B 32 3B |0.D..15,"U1:";2;|
00001680: 30 3B 31 38 3B 31 00 43 1E 4E 07 98 32 2C C7 28 |0;18;1.C.N..2,.(|
00001690: 31 38 29 3B C7 28 34 29 3B 00 5A 1E 58 07 98 31 |18);.(4);.Z.X..1|
000016A0: 35 2C 22 55 32 3A 22 3B 32 3B 30 3B 31 38 3B 31 |5,"U2:";2;0;18;1|
000016B0: 00 6D 1E 62 07 98 31 35 2C 22 56 41 4C 49 44 41 |.m.b..15,"VALIDA|
000016C0: 54 41 22 00 88 1E 6C 07 99 22 57 41 49 54 20 41 |TA"...l.."WAIT A|
000016D0: 20 57 48 49 4C 45 20 50 4C 45 41 53 45 22 00 9C | WHILE PLEASE"..|
000016E0: 1E 76 07 84 31 35 2C 41 24 2C 42 24 2C 43 24 2C |.v..15,A$,B$,C$,|
000016F0: 44 24 00 B3 1E 80 07 99 22 12 93 22 3A 99 41 24 |D$......"..":.A$|
00001700: 3B 42 24 3B 43 24 2C 44 24 00 D2 1E 8A 07 81 57 |;B$;C$,D$......W|
00001710: B2 31 A4 31 35 30 30 3A 82 3A 98 31 35 2C 22 55 |.1.1500:.:.15,"U|
00001720: 49 22 3A 8D 32 30 36 30 00 E2 1E 94 07 A0 32 3A |I":.2060......2:|
00001730: A0 31 35 3A 89 33 30 30 00 FF 1E 9E 07 97 35 33 |.15:.300......53|
00001740: 32 38 30 2C 30 3A 97 35 33 32 38 31 2C 30 3A 97 |280,0:.53281,0:.|
00001750: 36 34 36 2C 37 00 2F 1F A8 07 99 22 93 54 48 49 |646,7./....".THI|
00001760: 53 20 50 52 4F 47 52 41 4D 20 57 41 53 20 47 49 |S PROGRAM WAS GI|
00001770: 56 45 4E 20 54 4F 20 42 42 53 20 57 41 54 45 52 |VEN TO BBS WATER|
00001780: 4C 41 4E 44 22 00 52 1F B2 07 99 22 2B 20 0B 42 |LAND".R...."+ .B|
00001790: 59 20 45 4C 4F 53 4F 46 54 20 2D 31 39 38 36 2D |Y ELOSOFT -1986-|
000017A0: 00 81 1F BC 07 99 22 11 49 46 20 59 4F 55 20 20 |......".IF YOU |
000017B0: 52 45 41 4C 4C 59 20 57 41 4E 54 20 54 4F 20 51 |REALLY WANT TO Q|
000017C0: 55 49 54 2C 20 50 52 45 53 53 20 46 37 2E 22 00 |UIT, PRESS F7.".|
000017D0: A4 1F C6 07 99 22 11 4D 49 53 54 41 4B 45 3F 20 |.....".MISTAKE? |
000017E0: 50 52 45 53 53 20 46 31 20 49 4E 53 54 45 41 44 |PRESS F1 INSTEAD|
000017F0: 2E 22 00 AC 1F D0 07 A1 41 24 00 BF 1F DA 07 8B |."......A$......|
00001800: 41 24 B2 C7 28 31 33 33 29 A7 33 30 30 00 D3 1F |A$..(133).300...|
00001810: E4 07 8B 41 24 B2 C7 28 31 33 36 29 A7 32 30 35 |...A$..(136).205|
00001820: 30 00 E7 1F EE 07 8B 41 24 B2 C7 28 31 36 30 29 |0......A$..(160)|
00001830: A7 31 39 36 30 00 F1 1F F8 07 89 32 30 30 30 00 |.1960......2000.|
00001840: FC 1F 02 08 9E 36 34 37 33 38 00 2E 20 0C 08 99 |.....64738.. ...|
00001850: 22 93 49 46 20 59 4F 55 20 53 41 57 20 41 4E 20 |".IF YOU SAW AN |
00001860: 45 52 52 4F 52 2C 20 54 48 49 53 20 50 52 4F 47 |ERROR, THIS PROG|
00001870: 52 41 4D 20 43 41 4E 4E 4F 54 22 3B 00 5F 20 BD |RAM CANNOT";._ .|
00001880: 0B 99 22 46 49 58 20 59 4F 55 20 44 49 53 4B 2C |.."FIX YOU DISK,|
00001890: 20 54 52 59 20 46 4F 52 47 45 54 54 49 4E 47 20 | TRY FORGETTING |
000018A0: 59 4F 55 52 20 46 49 4C 45 53 2E 22 3B 00 AF 20 |YOUR FILES.";.. |
000018B0: BF 0B 99 22 4E 45 57 20 54 48 45 20 44 49 53 4B |..."NEW THE DISK|
000018C0: 2C 20 54 48 45 20 43 48 41 4E 43 45 53 20 4F 46 |, THE CHANCES OF|
000018D0: 20 59 4F 55 20 45 56 45 52 20 20 20 53 45 45 49 | YOU EVER SEEI|
000018E0: 4E 47 20 59 4F 55 52 20 46 49 4C 45 53 20 42 41 |NG YOUR FILES BA|
000018F0: 43 4B 20 41 52 45 20 56 45 52 59 20 22 00 E9 20 |CK ARE VERY ".. |
00001900: C0 0B 99 22 53 4D 41 4C 4C 2E 20 4E 4F 57 20 59 |..."SMALL. NOW Y|
00001910: 4F 55 20 4D 55 53 54 20 54 52 59 20 54 4F 20 44 |OU MUST TRY TO D|
00001920: 4F 20 49 54 20 54 48 45 2B 20 04 4C 4F 4E 47 20 |O IT THE+ .LONG |
00001930: 57 41 59 2C 20 22 00 17 21 C7 0B 99 22 59 4F 55 |WAY, "..!..."YOU|
00001940: 20 4D 55 53 54 20 44 4F 20 49 54 20 42 59 20 48 | MUST DO IT BY H|
00001950: 41 4E 44 2C 20 44 4F 20 4E 4F 54 20 41 54 54 45 |AND, DO NOT ATTE|
00001960: 4D 50 54 22 00 46 21 D1 0B 99 22 54 48 49 53 20 |MPT".F!..."THIS |
00001970: 49 46 20 59 4F 55 20 4C 41 43 4B 20 54 48 45 20 |IF YOU LACK THE |
00001980: 53 4B 49 4C 4C 53 2C 20 49 54 20 57 49 4C 4C 20 |SKILLS, IT WILL |
00001990: 42 45 22 00 79 21 DB 0B 99 22 41 20 57 41 53 54 |BE".y!..."A WAST|
000019A0: 45 20 4F 46 20 54 49 4D 45 20 41 4E 44 20 45 46 |E OF TIME AND EF|
000019B0: 46 4F 52 54 2E 2E 2E 22 3A 81 50 B2 31 A4 34 30 |FORT...":.P.1.40|
000019C0: 30 30 3A 82 3A 8E 5D 03 3C 66 6E 6E 60 62 3C 00 |00:.:.].<fnn`b<.|
000019D0: 06 0E 02 1E 3E 66 C6 00 FC FE 02 FC 86 FE FC 00 |....>f..........|
000019E0: 7C FE 00 C0 C0 FE 7C 00 FC FE 02 C6 C6 FE FC 00 ||.....|.........|
000019F0: FE FE 00 F0 C0 FE FE 00 FE FE 00 F8 C0 C0 C0 00 |................|
00001A00: 7C FE 00 DE C6 FE 7C 00 C6 C6 02 FE C6 C6 C6 00 ||.....|.........|
00001A10: 3C 3C 00 18 18 3C 3C 00 FE FE 00 18 D8 F8 70 00 |<<...<<.......p.|
00001A20: CC D8 00 F0 D8 CC C6 00 C0 C0 00 C0 C0 FE FE 00 |................|
00001A30: C6 EE 02 D6 C6 C6 C6 00 C6 C6 02 D6 CE C6 C6 00 |................|
00001A40: 7C FE 02 C6 C6 FE 7C 00 FC FE 02 FC C0 C0 C0 00 ||.....|.........|
00001A50: 7C FE 02 C6 C6 CE 7E 01 FC FE 02 FC D8 CC C6 00 ||.....~.........|
00001A60: 7C FE 00 FC 06 FE 7C 00 7E 7E 00 2B 18 04 00 C6 ||.....|.~~.+....|
00001A70: C6 02 C6 C6 FE 7C 00 C6 C6 02 C6 C6 6C 38 00 C6 |.....|......l8..|
00001A80: C6 02 C6 D6 EE C6 00 C6 6C 00 30 38 6C C6 00 CC |........l.08l...|
00001A90: CC 00 78 30 30 30 00 FE FE 00 38 70 FE FE 00 3C |..x000....8p...<|
00001AA0: 2B 30 05 3C 00 0C 12 30 7C 30 62 FC 00 3C 2B 0C |+0.<...0|0b..<+.|
00001AB0: 05 3C 00 00 18 3C 7E 2B 18 04 00 10 30 7F 7F 30 |.<...<~+....0..0|
00001AC0: 10 5D 09 2B 18 04 00 00 18 00 66 66 66 5D 05 66 |.].+......fff].f|
00001AD0: 66 FF 66 FF 66 66 00 18 3E 60 3C 06 7C 18 00 62 |f.f.ff..>`<.|..b|
00001AE0: 66 0C 18 30 66 46 00 3C 66 3C 38 67 66 3F 00 06 |f..0fF.<f<8gf?..|
00001AF0: 0C 18 5D 05 0C 18 30 30 30 18 0C 00 30 18 0C 0C |..]...000...0...|
00001B00: 0C 18 30 00 00 66 3C FF 3C 66 5D 03 18 18 7E 18 |..0..f<.<f]...~.|
00001B10: 18 5D 07 18 18 30 5D 03 7E 5D 09 18 18 00 00 03 |.]...0].~]......|
00001B20: 06 0C 18 30 60 00 7C FE 0E D6 E6 C6 FE 7C 08 08 |...0`.|......|..|
00001B30: 00 08 08 18 18 18 FC FE 02 06 1C 70 FE FE FC FE |...........p....|
00001B40: 02 3C 3C 02 FE FC 18 18 D8 D8 FE 18 18 18 FE FE |.<<.............|
00001B50: 00 80 FC 06 FE FC 7C FE 00 C0 FC C6 FE 7C FE FE |......|......|..|
00001B60: 06 0C 18 10 30 30 7C FE 06 C6 7C C6 FE 7C 7C FE |....00|...|..||.|
00001B70: 06 C6 7E 06 FE 7C 00 00 18 00 00 18 5D 04 18 00 |..~..|......]...|
00001B80: 00 18 18 30 0E 18 30 60 30 18 0E 5D 03 7E 00 7E |...0..0`0..].~.~|
00001B90: 5D 03 70 18 0C 06 0C 18 70 00 3C 66 06 0C 18 00 |].p.....p.<f....|
00001BA0: 18 5D 04 FF FF 5D 03 08 1C 3E 7F 7F 1C 3E 00 2B |.]...]...>...>.+|
00001BB0: 18 08 5D 03 FF FF 5D 05 FF FF 5D 05 FF FF 5D 09 |..]...]...]...].|
00001BC0: FF FF 00 00 2B 30 08 2B 0C 08 5D 03 E0 F0 38 2B |....+0.+..]...8+|
00001BD0: 18 04 1C 0F 07 5D 03 18 18 38 F0 E0 5D 03 2B C0 |.....]...8..].+.|
00001BE0: 06 FF FF C0 E0 70 38 1C 0E 07 03 03 07 0E 1C 38 |.....p8........8|
00001BF0: 70 E0 C0 FF FF 2B C0 06 FF FF 2B 03 06 00 3C 2B |p....+....+...<+|
00001C00: 7E 04 3C 5D 06 FF FF 00 36 7F 7F 7F 3E 1C 08 00 |~.<]....6...>...|
00001C10: 2B 60 08 5D 03 07 0F 1C 18 18 C3 E7 7E 3C 3C 7E |+`.]........~<<~|
00001C20: E7 C3 00 3C 7E 66 66 7E 3C 00 18 18 66 66 18 18 |...<~ff~<...ff..|
00001C30: 3C 00 2B 06 08 08 1C 3E 7F 3E 1C 08 00 18 18 18 |<.+....>.>......|
00001C40: FF FF 18 18 18 C0 C0 30 30 C0 C0 30 30 2B 18 08 |.......00..00+..|
00001C50: 00 00 03 3E 76 36 36 00 FF 7F 3F 1F 0F 07 03 01 |...>v66...?.....|
00001C60: 5D 08 2B F0 08 5D 04 2B FF 05 5D 0E FF 2B C0 08 |].+..].+..]..+..|
00001C70: CC CC 33 33 CC CC 33 33 2B 03 08 5D 04 CC CC 33 |..33..33+..]...3|
00001C80: 33 FF FE FC F8 F0 E0 C0 80 2B 03 08 18 18 18 1F |3........+......|
00001C90: 1F 18 18 18 5D 04 2B 0F 04 18 18 18 1F 1F 5D 06 |....].+.......].|
00001CA0: F8 F8 18 18 18 5D 06 FF FF 5D 03 1F 1F 2B 18 06 |.....]...]...+..|
00001CB0: FF FF 5D 06 FF FF 2B 18 06 F8 F8 18 18 18 2B C0 |..]...+.......+.|
00001CC0: 08 2B E0 08 2B 07 08 FF FF 5D 06 FF FF FF 5D 0A |.+..+....]....].|
00001CD0: FF FF FF 2B 03 06 FF FF 5D 04 2B F0 04 2B 0F 04 |...+....].+..+..|
00001CE0: 5D 04 18 18 18 F8 F8 5D 03 2B F0 04 5D 04 2B F0 |]......].+..].+.|
00001CF0: 04 2B 0F 04 C3 99 91 91 9F 99 C3 FF F9 F1 FD E1 |.+..............|
00001D00: C1 99 39 FF 03 01 FD 03 79 01 03 FF 83 01 FF 3F |..9.....y......?|
00001D10: 3F 01 83 FF 03 01 FD 39 39 01 03 FF 01 01 FF 0F |?......99.......|
00001D20: 3F 01 01 FF 01 01 FF 07 3F 3F 3F FF 83 01 FF 21 |?.......???....!|
00001D30: 39 01 83 FF 39 39 FD 01 39 39 39 FF C3 C3 FF E7 |9...99..999.....|
00001D40: E7 C3 C3 FF 01 01 FF E7 27 07 8F FF 33 27 FF 0F |........'...3'..|
00001D50: 27 33 39 FF 3F 3F FF 3F 3F 01 01 FF 39 11 FD 29 |'39.??.??...9..)|
00001D60: 39 39 39 FF 39 39 FD 29 31 39 39 FF 83 01 FD 39 |999.99.)199....9|
00001D70: 39 01 83 FF 03 01 FD 03 3F 3F 3F FF 83 01 FD 39 |9.......???....9|
00001D80: 39 31 81 FE 03 01 FD 03 27 33 39 FF 83 01 FF 03 |91......'39.....|
00001D90: F9 01 83 FF 81 81 FF 2B E7 04 FF 39 39 FD 39 39 |.......+...99.99|
00001DA0: 01 83 FF 39 39 FD 39 39 93 C7 FF 39 39 FD 39 29 |...99.99...99.9)|
00001DB0: 11 39 FF 39 93 FF CF C7 93 39 FF 33 33 FF 87 CF |.9.9.....9.33...|
00001DC0: CF CF FF 01 01 FF C7 8F 01 01 FF C3 2B CF 05 C3 |............+...|
00001DD0: FF F3 ED CF 83 CF 9D 03 FF C3 2B F3 05 C3 FF FF |..........+.....|
00001DE0: E7 C3 81 2B E7 04 FF EF CF 80 80 CF EF 2B FF 09 |...+.........+..|
00001DF0: 2B E7 04 FF FF E7 FF 99 99 99 2B FF 05 99 99 00 |+.........+.....|
00001E00: 99 00 99 99 FF E7 C1 9F C3 F9 83 E7 FF 9D 99 F3 |................|
00001E10: E7 CF 99 B9 FF C3 99 C3 C7 98 99 C0 FF F9 F3 E7 |................|
00001E20: 2B FF 05 F3 E7 CF CF CF E7 F3 FF CF E7 F3 F3 F3 |+...............|
00001E30: E7 CF FF FF 99 C3 00 C3 99 FF FF FF E7 E7 81 E7 |................|
00001E40: E7 2B FF 07 E7 E7 CF FF FF FF 81 2B FF 09 E7 E7 |.+.........+....|
00001E50: FF FF FC F9 F3 E7 CF 9F FF 83 01 F1 29 19 39 01 |............).9.|
00001E60: 83 F7 F7 FF F7 F7 E7 E7 E7 03 01 FD F9 E3 8F 01 |................|
00001E70: 01 03 01 FD C3 C3 FD 01 03 E7 E7 27 27 01 E7 E7 |...........''...|
00001E80: E7 01 01 FF 7F 03 F9 01 03 83 01 FF 3F 03 39 01 |............?.9.|
00001E90: 83 01 01 F9 F3 E7 EF CF CF 83 01 F9 39 83 39 01 |............9.9.|
00001EA0: 83 83 01 F9 39 81 F9 01 83 FF FF E7 FF FF E7 2B |....9..........+|
00001EB0: FF 04 E7 FF FF E7 E7 CF F1 E7 CF 9F CF E7 F1 FF |................|
00001EC0: FF FF 81 FF 81 FF FF FF 8F E7 F3 F9 F3 E7 8F FF |................|
00001ED0: C3 99 F9 F3 E7 FF E7 2B FF 04 00 00 FF FF FF F7 |.......+........|
00001EE0: E3 C1 80 80 E3 C1 FF 2B E7 08 FF FF FF 00 00 2B |.......+.......+|
00001EF0: FF 05 00 00 2B FF 05 00 00 2B FF 09 00 00 FF FF |....+....+......|
00001F00: 2B CF 08 2B F3 08 FF FF FF 1F 0F C7 2B E7 04 E3 |+..+........+...|
00001F10: F0 F8 FF FF FF E7 E7 C7 0F 1F FF FF FF 2B 3F 06 |.............+?.|
00001F20: 00 00 3F 1F 8F C7 E3 F1 F8 FC FC F8 F1 E3 C7 8F |..?.............|
00001F30: 1F 3F 00 00 2B 3F 06 00 00 2B FC 06 FF C3 2B 81 |.?..+?...+....+.|
00001F40: 04 C3 2B FF 06 00 00 FF C9 80 80 80 C1 E3 F7 FF |..+.............|
00001F50: 2B 9F 08 FF FF FF F8 F0 E3 E7 E7 3C 18 81 C3 C3 |+..........<....|
00001F60: 81 18 3C FF C3 81 99 99 81 C3 FF E7 E7 99 99 E7 |..<.............|
00001F70: E7 C3 FF 2B F9 08 F7 E3 C1 80 C1 E3 F7 FF E7 E7 |...+............|
00001F80: E7 00 00 E7 E7 E7 3F 3F CF CF 3F 3F CF CF 2B E7 |......??..??..+.|
00001F90: 08 FF FF FC C1 89 C9 C9 FF 00 80 C0 E0 F0 F8 FC |................|
00001FA0: FE 2B FF 08 2B 0F 08 2B FF 04 5D 05 2B FF 0E 00 |.+..+..+..].+...|
00001FB0: 2B 3F 08 33 33 CC CC 33 33 CC CC 2B FC 08 2B FF |+?.33..33..+..+.|
00001FC0: 04 33 33 CC CC 00 01 03 07 0F 1F 3F 7F 2B FC 08 |.33........?.+..|
00001FD0: E7 E7 E7 E0 E0 E7 E7 E7 2B FF 04 2B F0 04 E7 E7 |........+..+....|
00001FE0: E7 E0 E0 2B FF 06 07 07 E7 E7 E7 2B FF 06 00 00 |...+.......+....|
00001FF0: FF FF FF E0 E0 2B E7 06 00 00 2B FF 06 00 00 2B |.....+....+....+|
00002000: E7 06 07 07 E7 E7 E7 2B 3F 08 2B 1F 08 2B F8 08 |.......+?.+..+..|
00002010: 00 00 2B FF 06 5D 03 2B FF 0A 5D 03 2B FC 06 00 |..+..].+..].+...|
00002020: 00 2B FF 04 2B 0F 04 2B F0 04 2B FF 04 E7 E7 E7 |.+..+..+..+.....|
00002030: 07 07 FF FF FF 2B 0F 04 2B FF 04 2B 0F 04 F0 F0 |.....+..+..+....|
00002040: F0 88 FF |... |
.......(2080) ELOSOFT 1986 ... ...2...
.JP.X..J.L.. ......B.(............ .....
.......I]P...H ...H ..JP...I+P. ..HP. ..
..PX...J0$.......J......-J.....J.......
. ..LI..7..).I.P.XL....P.F.F...P.F.F....
...E.P...E.P.` ....`....P...`..P...`...{
!{!.8..................................
Q.L..#....".":.I.0.139:.A:.49152.I,A:..0
....T.1.150.E....49248,0,11,T:.T...D..12
0,169,34,141,20,3,169,192,141,21,3,173,1
7,208,41,127,141,17,208,169.X.N..151,141
,18,208,173,26,208,9,1,141,26,208,88,96,
169,1,44,25,208,208...X..3,76,49,234,173
,32,208,41,15,201,2,208,21,169,8,141,32,
208,169,0.K....141,18,208,169,1,141,25,2
08,104,168,104,170,104,64,169,2,141,32,2
08,169......150,141,18,208,76,63,192,0,2
55,0,255,0,255,0,255,0,32,253,174,32....
..158,183,142,50,192,142,75,192,32,253,1
74,32,158,183,142,54,192,32,253.H. ..174
,32,158,183,142,80,192,173,21,3,201,192,
208,1,96,76,0,192,238,0,246......657,128
:.808,251:."+..REM"ELOSOFT -1986-".R....
53272,28:."+..REM"GAVE THIS TO BBS WATER
LAND."......"PS: HE ALSO MADE THIS PROGR
AM"...,..".":.:.65511...-..15,8,15,"UI":
15.<.6..53280,0:.53281,0:.646,7.B.@...1
3):.".+..ELOSOFT -1986-".Y.J...16):.".PR
ESENTS"...T...14):.".TRIPLE TOOL!".G.Y..
"+.. GREETINGS TO THE JOLLY JOKER AND UF
O.".W.^..I.1.3000:....H...7):."..+..+..
TO UNSCRATCH FILES => . F1 .".@.R...7):
.". TO REMOVE ERRORS+ .=> . F3 .".L.|...
7):.". TO UNNEW WHOLE DISK => . F5 ."...
....7):.". TO QUIT TO BASIC+ .=> . F7 ."
......A$:.A$."".400......A$.G(133).460.R
....A$.G(134).1150......A$.G(135).1640..
....A$.G(136).1950...B..400...L..53281,1
1:.990:RE%.0.H.V.."...COMMENCE SEARCH ON
TRACK."DI%",1.".G...SP%.1:TR%.DI%:.15,8
,15,"I0.}....8,8,2,"#2":FI%.0......15,"U
1:"2;0;TR%;SP%:.930.I....I.0.1:.#8,A$:.9
00:P%(I).F(A$):.:A.2:.920......#8,A$:.90
0:A.F(A$).7.....H$."":.I.0.1:.#8,A$:.900
:L%(I).F(A$):..-....I.3.18:.#8,A$:H$.H$.
A$:.:.<.&..H$."".570.S.0.. KI$(A);" ";CO
$;H$;.11)CO$;;L%(0);L%(1):.A.0..730...:.
FI%.FI%.1:.FI%.8.A.FI%.32.2:.920:.520...
D..P%(0).0.600...N..".LINK TO TRACK ";:T
R%.P%(0):SP%.P%(1):FI%.0:.TR%;SP%".":.50
0.(.X. 8:."..DIRECTORY ENDS.",:.RE%.."VA
LIDATING":.15,"V.:.B..930: 15:.300.Y.L..
15,"U1:"2;0;L%(0);L%(1):..U.V.D%.2:.".TR
ACK, SECTOR";......620:.I.0.1:.#8,A$:.90
0:Z%(I).F(A$).D....Z%(I)". ";:.:.:.".TRA
CK, SECTOR";.U....Z%(0).0..:.......15,"B
-F"0;Z%(0);Z%(1):L%(0).Z%(0):L%(1).Z%(1)
:Z%(D%).Z%(0).0...Z%(D%.1).Z%(1):D%.D%.2
.>....DS.0.640.{....:.".FILE IS NOW BEIN
G REINSTATED.!":X%..(X%):A.FI%.32.2...F.
.I.2.D%.4.2:.15,"B-F:"0;Z%(I);Z%(I.1):..
I.P.L%(0).TR%:L%(1).SP%:.620:.920...Z.."
UNSCRATCH? (Y/N)+ ....... A$:. A$."" . 7
40...... A$.."Y".570.G...X%.0:.".BLOCKS
BEING FILLED":Z%(0).L%(0):.630:.X%.570.Y
....".IS THIS A .P.ROGRAM,.S.EQUENTIAL,
.U.SER,"......"OR .R.ELATIVE FILE";.G...
. JA$:.JA$.."P".JA$.."S".JA$.."U".JA$.."
R".790.O. ..:....*..:.JA$."P"..".PROGRAM
.-":KI%.130:.850...4..JA$."U"..".USER.-"
:KI%.131:.850.G.>..JA$."R"..".RELATIVE.-
":KI%.132:.850.D.H..".SEQUENTIAL.-":KI%.
129.Z.R.."FILE RETRIEVED"...\.L%(0).TR%:
L%(1).SP%:.620...F.A.FI%.32.2:.920:.8,G(
KI%);...P.BL%.((D%.2).2).1:."."BL%"BLOCK
S";...Z..15,"U2:"2;0;TR%;SP%:."RETRIEVED
!.":RE%.1:.570."....A$."".A$.G(0).(.....
:....15,"B-P:"2;A.[....15,EN%,EM$,ET%,ES
%:.EN%.0...Q...."...DISK ERROR."......".
:"EN%","EM$","ET%","ES%...J..Q.1.1700:.:
.300...T...U....P%(1),L%(1),Z%(300),KI$(
4):CO$.G(34)......I.0.4:.KI$(I):......."
.DEL.","SEQ","PRG","USR","REL".F...PG$."
...UNSCRATCH II PRG, SEQ, USR AND REL FI
LES.".~....PG$".":."THIS PROGRAM RETRIEV
ES SCRATCHED FILES.."......"SCRATCHED FI
LES MUST NOT HAVE BEEN ".Y...."WRITTEN O
VER BY NEW PROGRAMS, THEN EVEN";...$.."
THIS PROGRAM CANNOT HELP YOU ANYMORE !+
..".6...."....+ .SPACE = MENU".U.8.."...
.+ .RETURN = START".M.B.. B$:. B$."" . 1
090..L..B$.G(32).300...V..B$.G(13).1130
...`..1090...J.DI%.18:....T.."+..":.1070
...~..53281,11:."...+ .THIS PROGRAM REPA
IRS MOST ERRORS+ .".*....".. ON A DISKE
TTE, WHEN IN DOUBT, MAKE A ".\...."..+
.BACKUP COPY FIRST.+ .".T....".INSERT DI
SKETTE"......".+..START REMOVING ERRORS
(Y/N) Y...";W$...... W$.."Y".300.D....1
5,8,15.P.D..T.1.35...N.NS.20.2.(T.17).(T
.24).(T.30)...X.T$.I(D(T),C(D(T)).1)....
..T.10.T$."0".T$.*...JOB.176.4....1530.B
....E.1.1300.[...BD.BD.1:R.R.NS:.1450.G.
...S.0.NS.....S$.I(D(S),C(D(S)).1)...(..
S.10.S$."0".S$.F.2..".+....RESTORING. TR
ACK "T$" , SECTOR "S$.R.<.JOB.128...F..1
530...P..E.1.1440...Z.R.R.1...D..E..4.E.
.5.1440...N..E.5.1410.5.X..15,"M-W"G(71)
G(0)G(1)G(7).A...JOB.144.K....1530.[....
E..1.W.W.1.C. .. S.K.... T.S... 15......
".+..+ )".K.H..BD.35..".+..BAD DISK":...
.R..".+..READ ERRORS :"R......".WRITE ER
RORS :"W......".DONE!".#....G.1.1500:.:.
300.-...TRY.0.O....15,"M-W"G(8)G(0)G(2)G
(T)G(S).O....15,"M-W"G(1)G(0)G(1)G(JOB).
}...TRY.TRY.1..."..15,"M-R"G(1)G(0)...,.
.#15,E$...6..E$."".E$.G(0)...@.E.F(E$).P
.J..TRY.500.1630...T..E.127.1560...^...#
.H..53281,11:."... PARTIAL DISK UNNEW.+
..".Q.R.."THIS PROGRAM PARTIALLY RESTORE
S A DISK"...|.."AFTER IT HAS BEEN NEWED-
-NOT FORMATTED!";......" PROGRAMS THAT W
ERE IN TR 18 SC 1 CANNOT"......"BE RETRI
EVED DUE TO THE FACT THAT WHEN A DISK I
S NEWED, TR 18-SC 1";.9...." IS TOTALLY
ERASED BUT THE OTHERS WILL BE REGAINED.
".~...."PROGRAMS IN 18,1 MOSTLY START AT
17,0 , 17,1 , 19,0 AND 19,1."......"WIT
H DISK DOCTER YOU CAN FIND THESE AND REC
REATE 18,1";......" BY CLOSELY EXAMINING
OTHERDISK'S TR 18 SC 1.".<.B.."NOTE THE
SE DOWN, WHEN RECREATING 18,1 YOU CAN
LINK THEM TO THESE";...L.." TRACKS AND
SECTORS, WITH A LITTLE LUCK AND TIME,
THE WHOLE DISK IS";...V.." AS GOOD AS N
EW.+ .(OOPS!) OLD."......"IF THIS PROGRA
M DOESN'T WORK IT MEANS THAT THERE WAS
NOTHING IN 18,4.".U...."IN THIS CASE TH
ERE'S LITTLE HOPE, FORMATIT AND KISS YOU
R FILES GOODBYE."......"..PRESS RETURN T
O START+ .";......"..SPACE TO RETURN TO
MENU+ .".N....A$:.A$."".1800......A$.G(1
3).1840......A$.G(32).300...&..1800...0.
.15,8,15...:..2,8,2,"#".0.D..15,"U1:";2;
0;18;1.C.N..2,G(18);G(4);.Z.X..15,"U2:";
2;0;18;1.M.B..15,"VALIDATA"...L.."WAIT A
WHILE PLEASE"...V..15,A$,B$,C$,D$......
"..":.A$;B$;C$,D$.R....W.1.1500:.:.15,"U
I":.2060..... 2: 15:.300......53280,0:.5
3281,0:.646,7./....".THIS PROGRAM WAS GI
VEN TO BBS WATERLAND".R...."+ .BY ELOSOF
T -1986-......".IF YOU REALLY WANT TO Q
UIT, PRESS F7."...F..".MISTAKE? PRESS F1
INSTEAD."...P..A$...Z..A$.G(133).300.S.
...A$.G(136).2050......A$.G(160).1960...
...2000......64738.. ...".IF YOU SAW AN
ERROR, THIS PROGRAM CANNOT";._ ..."FIX Y
OU DISK, TRY FORGETTING YOUR FILES.";..
..."NEW THE DISK, THE CHANCES OF YOU EVE
R SEEING YOUR FILES BACK ARE VERY "..
..."SMALL. NOW YOU MUST TRY TO DO IT THE
+ .LONG WAY, "..!G.."YOU MUST DO IT BY H
AND, DO NOT ATTEMPT".F!Q.."THIS IF YOU L
ACK THE SKILLS, IT WILL BE".Y!..."A WAST
E OF TIME AND EFFORT...":.P.1.4000:.:.].
<FNN`B<.....>FF.........|.....|....FF...
................|...F.|.FF..FFF.<<...<<.
....X.P.LX..XLF.........F..VFFF.FF.VNFF.
|..FF.|.........|..FFN~.....XLF.|.....|.
~~.+...FF.FF.|.FF.FFL8.FF.FV.F.FL.08LF.L
L.X000....8P...<+0.<...0|0B..<+..<...<~+
....00.].+......FFF].FF.F.FF..>`<.|..B
F..0FF.<F<8GF?....]...000...0.....0..F<.
<F]...~..]...0].~].........0`.|..V.F.|..
...........P.....<<.....XX............|.
...F.|......00|..F|F.||..F~..|......]...
...0..0`0..].~.~].P.....P.<F.....]...]..
.>.>.+..]...]...]...].....+0.+..]...8+
.....]...8..].+......P8........8P....+..
..+...<+~.<]....6>...+`.]......C.~<<~
.C.<~FF~<...FF..<.+....>>.............0
0..00+.....>V66..?.....].+..].+..]..+..
LL33LL33+..].LL33........+..........].+.
......]......]...]...+....]...+.......+.
.+..+....]....]....+....].+..+..]......]
.+..].+..+..C.....C.....A.9.....Y......?
?......99.......?.......???....!9...99..
999.CC...CC.....'...3'..'39.??.??...9..)
999.99.)199....99.......???....991......
'39............+...99.99...99.99.G.99.9)
.9.9..OG.9.33..OOO....G....C+O.C...O.O..
.C+..C...C.+....O..O.+..+.........+.....
......A.C........O...C.CG.......+....OOO
...O.....O...C.C.........+....O....+....
......O.....).9.....................CC..
...''..............?.9........OO...9.9.
....9..........+.......O..O.O...........
........C......+.........A...A.+.......+
....+....+......+O.+.......G+..........G
.....+?...?..G........G..?..+?...+...C+.
.C+.....I...A...+..........<..CC..<.C...
.C.......C.+....A.A...........??OO??OO+.
....A.II.........+..+..+..].+...+?.33LL3
3LL+..+..33LL......?+..........+..+....
...+.......+.........+....+....+.......+
?.+..+....+..].+..].+....+..+..+..+.....
.....+..+..+.......
> CLICK IMAGE PREVIEW FOR FULL MODAL