REP.DISK

00000000: 01 08 23 08 64 00 99 22  93 22 3A 97 35 33 32 38  |..#.d..".":.5328|
00000010: 30 2C 30 3A 97 35 33 32  38 31 2C 30 3A 99 C7 28  |0,0:.53281,0:..(|
00000020: 31 34 29 00 57 08 6E 00  42 4C 24 B2 22 20 22 3A  |14).W.n.BL$." ":|
00000030: 81 49 B2 31 A4 37 3A 42  4C 24 B2 42 4C 24 AA 42  |.I.1.7:BL$.BL$.B|
00000040: 4C 24 3A 82 3A 42 4C 24  B2 42 4C 24 AA C8 28 42  |L$:.:BL$.BL$..(B|
00000050: 4C 24 2C 31 32 37 29 00  98 08 78 00 42 31 24 B2  |L$,127)...x.B1$.|
00000060: 22 A0 A0 A0 A0 A0 A0 A0  A0 A0 A0 A0 A0 A0 22 3A  |".............":|
00000070: 42 4F 24 B2 C7 28 30 29  3A 81 49 B2 31 A4 37 3A  |BO$..(0):.I.1.7:|
00000080: 42 4F 24 B2 42 4F 24 AA  42 4F 24 3A 82 3A 50 41  |BO$.BO$.BO$:.:PA|
00000090: 24 B2 C7 28 31 33 30 29  00 B6 08 82 00 42 32 24  |$..(130).....B2$|
000000A0: B2 C8 28 42 4F 24 2C 39  29 3A 42 33 24 B2 C8 28  |..(BO$,9):B3$..(|
000000B0: 42 4F 24 2C 33 29 00 CD  08 8C 00 42 4F 24 B2 42  |BO$,3).....BO$.B|
000000C0: 4F 24 AA C8 28 42 4F 24  2C 31 32 37 29 00 E7 08  |O$..(BO$,127)...|
000000D0: 96 00 53 41 B2 35 30 AC  32 35 36 3A 4D 41 B2 39  |..SA.50.256:MA.9|
000000E0: 37 39 3A 47 45 B2 34 00  08 09 A0 00 86 42 4C 4F  |79:GE.4......BLO|
000000F0: 25 28 33 35 2C 32 30 2C  32 29 3A 86 53 55 25 28  |%(35,20,2):.SU%(|
00000100: 33 35 2C 32 30 2C 32 29  00 1B 09 AA 00 9F 31 35  |35,20,2)......15|
00000110: 2C 38 2C 31 35 3A 9F 34  2C 34 3A 00 21 09 B4 00  |,8,15:.4,4:.!...|
00000120: 3A 00 27 09 BE 00 8F 00  5A 09 C8 00 99 22 93 05  |:.'.....Z...."..|
00000130: D0 4C 45 41 53 45 20 49  4E 53 45 52 54 20 44 45  |.LEASE INSERT DE|
00000140: 46 45 43 54 49 56 45 20  44 49 53 4B 20 49 4E 20  |FECTIVE DISK IN |
00000150: 12 44 52 49 56 45 20 30  92 22 00 75 09 D2 00 99  |.DRIVE 0.".u....|
00000160: 22 11 99 2D 54 48 45 4E  20 48 49 54 20 41 4E 59  |"..-THEN HIT ANY|
00000170: 20 4B 45 59 22 00 88 09  DC 00 A1 58 24 3A 8B 58  | KEY"......X$:.X|
00000180: 24 B2 22 22 A7 32 32 30  00 9B 09 E6 00 98 31 35  |$."".220......15|
00000190: 2C 22 49 31 22 3A 84 31  35 2C 46 00 CE 09 F0 00  |,"I1":.15,F.....|
000001A0: 99 3A 99 22 11 11 05 D4  59 50 45 20 54 48 45 20  |.:."....YPE THE |
000001B0: 12 C9 C4 92 20 4F 46 20  54 48 45 20 44 45 46 45  |.... OF THE DEFE|
000001C0: 43 54 49 56 45 20 44 49  53 4B 3A 20 22 3B 00 E1  |CTIVE DISK: ";..|
000001D0: 09 FA 00 9F 31 2C 30 3A  84 31 2C 49 44 24 3A A0  |....1,0:.1,ID$:.|
000001E0: 31 00 04 0A 04 01 98 31  35 2C 22 4D 2D 57 22 3B  |1......15,"M-W";|
000001F0: C7 28 31 34 34 29 3B C7  28 30 29 3B C7 28 32 29  |.(144);.(0);.(2)|
00000200: 3B 49 44 24 00 0E 0A 0E  01 8D 31 31 38 30 00 14  |;ID$......1180..|
00000210: 0A 18 01 3A 00 1A 0A 22  01 8F 00 63 0A 2C 01 99  |...:..."...c.,..|
00000220: 22 93 20 20 20 20 20 20  20 20 1F 20 D3 C5 CC C5  |".        . ....|
00000230: C3 D4 20 CF D0 D4 C9 CF  CE 11 11 22 3A 99 22 12  |.. ........":.".|
00000240: 1C 31 92 9E 20 20 52 45  50 41 49 52 20 4F 4E 4C  |.1..  REPAIR ONL|
00000250: 59 20 42 41 53 49 43 20  50 52 4F 47 52 41 4D 53  |Y BASIC PROGRAMS|
00000260: 11 1C 22 00 96 0A 36 01  99 22 12 32 92 9E 20 20  |.."...6..".2..  |
00000270: 52 45 50 41 49 52 20 41  4C 4C 20 4F 54 48 45 52  |REPAIR ALL OTHER|
00000280: 20 42 55 54 20 42 41 53  49 43 20 50 52 4F 47 52  | BUT BASIC PROGR|
00000290: 41 4D 53 11 1C 22 00 B9  0A 40 01 99 22 12 33 92  |AMS.."...@..".3.|
000002A0: 9E 20 20 52 45 50 41 49  52 20 41 4C 4C 20 50 52  |.  REPAIR ALL PR|
000002B0: 4F 47 52 41 4D 53 11 11  22 00 D3 0A 4A 01 9F 31  |OGRAMS.."...J..1|
000002C0: 2C 30 3A 84 31 2C 58 24  3A A0 31 3A 58 B2 C5 28  |,0:.1,X$:.1:X..(|
000002D0: 58 24 29 00 D9 0A 54 01  3A 00 DF 0A 5E 01 8F 00  |X$)...T.:...^...|
000002E0: E5 0A 68 01 8F 00 F5 0A  72 01 9F 38 2C 38 2C 38  |..h.....r..8,8,8|
000002F0: 2C 22 23 35 22 00 23 0B  7C 01 54 39 B2 31 3A 83  |,"#5".#.|.T9.1:.|
00000300: 31 2C 32 30 2C 31 38 2C  31 39 2C 32 35 2C 31 37  |1,20,18,19,25,17|
00000310: 2C 33 31 2C 31 36 2C 33  36 2C 30 2C 30 3A 8C 3A  |,31,16,36,0,0:.:|
00000320: 87 58 31 00 38 0B 86 01  87 59 3A 87 58 32 3A 8B  |.X1.8....Y:.X2:.|
00000330: 58 32 B2 30 A7 35 35 30  00 50 0B 90 01 81 54 31  |X2.0.550.P....T1|
00000340: B2 58 31 A4 58 32 AB 31  3A 81 54 32 B2 30 A4 59  |.X1.X2.1:.T2.0.Y|
00000350: 00 62 0B 9A 01 98 31 35  2C 22 42 2D 50 22 3B 38  |.b....15,"B-P";8|
00000360: 3B 31 00 79 0B A4 01 98  31 35 2C 22 55 31 22 3B  |;1.y....15,"U1";|
00000370: 38 3B 31 3B 54 31 3B 54  32 00 AE 0B AE 01 84 31  |8;1;T1;T2......1|
00000380: 35 2C 46 3A 44 52 24 B2  44 52 24 AA 22 C2 22 AA  |5,F:DR$.DR$.".".|
00000390: C9 28 22 20 22 AA C4 28  54 31 29 2C 32 29 AA C9  |.(" "..(T1),2)..|
000003A0: 28 22 20 20 22 AA C4 28  54 32 29 2C 33 29 00 E5  |("  "..(T2),3)..|
000003B0: 0B B8 01 44 52 24 B2 44  52 24 AA C9 28 22 20 20  |...DR$.DR$..("  |
000003C0: 22 AA C4 28 46 29 2C 33  29 3A 8B 46 B3 B1 30 A7  |"..(F),3):.F..0.|
000003D0: 44 52 24 B2 44 52 24 AA  22 20 20 20 20 20 20 22  |DR$.DR$."      "|
000003E0: 3A 89 35 33 30 00 16 0C  C2 01 98 31 35 2C 22 4D  |:.530......15,"M|
000003F0: 2D 52 22 3B C7 28 30 29  3B C7 28 33 34 29 3A A1  |-R";.(0);.(34):.|
00000400: 23 31 35 2C 58 24 3A 8B  58 24 B2 22 22 A7 58 24  |#15,X$:.X$."".X$|
00000410: B2 C7 28 30 29 3A 00 20  0C CC 01 41 24 B2 58 24  |..(0):. ...A$.X$|
00000420: 00 50 0C D6 01 98 31 35  2C 22 4D 2D 52 22 3B C7  |.P....15,"M-R";.|
00000430: 28 31 29 3B C7 28 33 34  29 3A A1 23 31 35 2C 58  |(1);.(34):.#15,X|
00000440: 24 3A 8B 58 24 B2 22 22  A7 58 24 B2 C7 28 30 29  |$:.X$."".X$..(0)|
00000450: 00 5A 0C E0 01 42 24 B2  58 24 00 8C 0C EA 01 44  |.Z...B$.X$.....D|
00000460: 52 24 B2 44 52 24 AA C9  28 22 20 20 22 AA C4 28  |R$.DR$..("  "..(|
00000470: C6 28 41 24 29 29 2C 33  29 AA C9 28 22 20 20 22  |.(A$)),3)..("  "|
00000480: AA C4 28 C6 28 42 24 29  29 2C 33 29 00 B8 0C F4  |..(.(B$)),3)....|
00000490: 01 42 4C 4F 25 28 54 31  2C 54 32 2C 31 29 B2 C6  |.BLO%(T1,T2,1)..|
000004A0: 28 41 24 29 3A 42 4C 4F  25 28 54 31 2C 54 32 2C  |(A$):BLO%(T1,T2,|
000004B0: 32 29 B2 C6 28 42 24 29  00 C9 0C FE 01 8B C6 28  |2)..(B$).......(|
000004C0: 41 24 29 B2 30 A7 35 33  30 00 F9 0C 08 02 53 55  |A$).0.530.....SU|
000004D0: 25 28 C6 28 41 24 29 2C  C6 28 42 24 29 2C 31 29  |%(.(A$),.(B$),1)|
000004E0: B2 54 31 3A 53 55 25 28  C6 28 41 24 29 2C C6 28  |.T1:SU%(.(A$),.(|
000004F0: 42 24 29 2C 32 29 B2 54  32 00 16 0D 12 02 8B C3  |B$),2).T2.......|
00000500: 28 44 52 24 29 B2 37 35  A7 98 34 2C 44 52 24 3A  |(DR$).75..4,DR$:|
00000510: 44 52 24 B2 22 22 00 29  0D 1C 02 82 3A 82 3A 58  |DR$."".)....:.:X|
00000520: 31 B2 58 32 3A 89 33 39  30 00 42 0D 26 02 98 34  |1.X2:.390.B.&..4|
00000530: 3A A0 38 3A 98 31 35 2C  22 49 31 22 3A 84 31 35  |:.8:.15,"I1":.15|
00000540: 2C 46 00 48 0D 30 02 3A  00 4E 0D 3A 02 8F 00 5E  |,F.H.0.:.N.:...^|
00000550: 0D 44 02 9F 37 2C 38 2C  37 2C 22 23 35 22 00 68  |.D..7,8,7,"#5".h|
00000560: 0D 4E 02 8C 3A 87 58 31  00 7D 0D 58 02 87 59 3A  |.N..:.X1.}.X..Y:|
00000570: 87 58 32 3A 8B 58 32 B2  30 A7 38 33 30 00 98 0D  |.X2:.X2.0.830...|
00000580: 62 02 81 55 31 B2 58 31  A4 58 32 AB 31 3A 8B 55  |b..U1.X1.X2.1:.U|
00000590: 31 B2 31 38 A7 38 32 30  00 A4 0D 6C 02 81 55 32  |1.18.820...l..U2|
000005A0: B2 30 A4 59 00 CB 0D 76  02 8B 53 55 25 28 55 31  |.0.Y...v..SU%(U1|
000005B0: 2C 55 32 2C 31 29 B1 30  B0 53 55 25 28 55 31 2C  |,U2,1).0.SU%(U1,|
000005C0: 55 32 2C 32 29 B1 30 A7  38 31 30 00 F2 0D 80 02  |U2,2).0.810.....|
000005D0: 53 31 B2 42 4C 4F 25 28  55 31 2C 55 32 2C 31 29  |S1.BLO%(U1,U2,1)|
000005E0: 3A 53 32 B2 42 4C 4F 25  28 55 31 2C 55 32 2C 32  |:S2.BLO%(U1,U2,2|
000005F0: 29 3A 00 05 0E 8A 02 8B  53 31 B2 30 AF 53 32 B2  |):......S1.0.S2.|
00000600: 30 A7 38 31 30 00 19 0E  94 02 50 52 24 B2 C7 28  |0.810.....PR$..(|
00000610: 55 31 29 AA C7 28 55 32  29 00 29 0E 9E 02 52 31  |U1)..(U2).)...R1|
00000620: B2 55 31 3A 52 32 B2 55  32 00 50 0E A8 02 53 31  |.U1:R2.U2.P...S1|
00000630: B2 42 4C 4F 25 28 52 31  2C 52 32 2C 31 29 3A 53  |.BLO%(R1,R2,1):S|
00000640: 32 B2 42 4C 4F 25 28 52  31 2C 52 32 2C 32 29 3A  |2.BLO%(R1,R2,2):|
00000650: 00 68 0E B2 02 50 52 24  B2 50 52 24 AA C7 28 53  |.h...PR$.PR$..(S|
00000660: 31 29 AA C7 28 53 32 29  00 8C 0E BC 02 42 4C 4F  |1)..(S2).....BLO|
00000670: 25 28 52 31 2C 52 32 2C  31 29 B2 30 3A 42 4C 4F  |%(R1,R2,1).0:BLO|
00000680: 25 28 52 31 2C 52 32 2C  32 29 B2 30 00 A8 0E C6  |%(R1,R2,2).0....|
00000690: 02 8B 53 31 B3 B1 30 A7  52 31 B2 53 31 3A 52 32  |..S1..0.R1.S1:R2|
000006A0: B2 53 32 3A 89 36 38 30  00 B5 0E D0 02 8B 58 B2  |.S2:.680......X.|
000006B0: 33 A7 37 37 30 00 BF 0E  DA 02 8D 31 30 37 30 00  |3.770......1070.|
000006C0: D8 0E E4 02 8B 58 B2 31  AF 41 31 25 B2 31 AF 41  |.....X.1.A1%.1.A|
000006D0: 32 25 B2 34 A7 37 37 30  00 F3 0E EE 02 8B 58 B2  |2%.4.770......X.|
000006E0: 32 AF 41 31 25 B3 B1 31  AF 41 32 25 B3 B1 34 A7  |2.A1%..1.A2%..4.|
000006F0: 37 37 30 00 FC 0E F8 02  89 38 31 30 00 16 0F 02  |770......810....|
00000700: 03 42 5A B2 C3 28 50 52  24 29 AD 32 AB 31 3A 50  |.BZ..(PR$).2.1:P|
00000710: 4E B2 50 4E AA 31 00 46  0F 0C 03 98 34 2C C9 28  |N.PN.1.F....4,.(|
00000720: C4 28 50 4E 29 2C 32 29  3B 22 2E 20 44 41 54 41  |.(PN),2);". DATA|
00000730: 20 3A 20 53 54 41 52 54  20 22 AA C9 28 C4 28 55  | : START "..(.(U|
00000740: 31 29 2C 32 29 3B 00 74  0F 16 03 98 34 2C 22 20  |1),2);.t....4," |
00000750: 22 AA C9 28 C4 28 55 32  29 2C 32 29 AA 22 20 20  |"..(.(U2),2)."  |
00000760: 20 4C 41 45 4E 47 45 20  22 AA C9 28 C4 28 42 5A  | LAENGE "..(.(BZ|
00000770: 29 2C 32 29 00 7D 0F 20  03 8D 38 36 30 00 8A 0F  |),2).}. ..860...|
00000780: 2A 03 50 52 24 B2 22 22  3A 82 00 9B 0F 34 03 82  |*.PR$."":....4..|
00000790: 3A 58 31 B2 58 32 3A 89  36 30 30 00 D9 0F 3E 03  |:X1.X2:.600...>.|
000007A0: 45 42 B2 32 35 35 3A 53  50 B2 30 3A 49 53 B2 49  |EB.255:SP.0:IS.I|
000007B0: 53 AA 31 3A 49 4E 24 B2  49 4E 24 AA C8 28 42 4F  |S.1:IN$.IN$..(BO|
000007C0: 24 2C 32 35 34 AB C3 28  49 4E 24 29 29 3A 8D 31  |$,254..(IN$)):.1|
000007D0: 30 31 30 3A A0 34 3A A0  37 00 DF 0F 48 03 80 00  |010:.4:.7...H...|
000007E0: E5 0F 52 03 3A 00 EB 0F  5C 03 8F 00 F7 0F 66 03  |..R.:...\.....f.|
000007F0: 81 4A B2 31 A4 42 5A 00  12 10 70 03 54 31 B2 C6  |.J.1.BZ...p.T1..|
00000800: 28 CA 28 50 52 24 2C 28  4A AB 31 29 AC 32 AA 31  |(.(PR$,(J.1).2.1|
00000810: 29 29 00 2D 10 7A 03 54  32 B2 C6 28 CA 28 50 52  |)).-.z.T2..(.(PR|
00000820: 24 2C 28 4A AB 31 29 AC  32 AA 32 29 29 00 44 10  |$,(J.1).2.2)).D.|
00000830: 84 03 98 31 35 2C 22 55  31 22 3B 37 3B 31 3B 54  |...15,"U1";7;1;T|
00000840: 31 3B 54 32 00 52 10 8E  03 8B 4A B2 31 A7 8D 39  |1;T2.R....J.1..9|
00000850: 35 30 00 7B 10 98 03 98  31 35 2C 22 55 32 22 3B  |50.{....15,"U2";|
00000860: 37 3B 30 3B 54 31 3B 54  32 3A 98 31 35 2C 22 42  |7;0;T1;T2:.15,"B|
00000870: 2D 41 22 3B 30 3B 54 31  3B 54 32 00 83 10 A2 03  |-A";0;T1;T2.....|
00000880: 82 3A 8E 00 89 10 AC 03  3A 00 8F 10 B6 03 8F 00  |.:......:.......|
00000890: C5 10 C0 03 49 54 24 B2  50 41 24 AA C7 28 54 31  |....IT$.PA$..(T1|
000008A0: 29 AA C7 28 54 32 29 AA  C9 28 C4 28 31 30 30 30  |)..(T2)..(.(1000|
000008B0: AA 50 4E 29 2C 33 29 AA  42 31 24 AA 42 32 24 AA  |.PN),3).B1$.B2$.|
000008C0: C7 28 42 5A 29 00 EB 10  CA 03 8B C3 28 49 4E 24  |.(BZ).......(IN$|
000008D0: 29 B3 B2 31 39 32 A7 49  4E 24 B2 49 4E 24 AA 49  |)..192.IN$.IN$.I|
000008E0: 54 24 AA 42 33 24 3A 89  39 39 30 00 1C 11 D4 03  |T$.B3$:.990.....|
000008F0: 49 4E 24 B2 49 4E 24 AA  49 54 24 AA C7 28 30 29  |IN$.IN$.IT$..(0)|
00000900: 3A 49 53 B2 49 53 AA 31  3A 45 42 B2 49 53 AA 31  |:IS.IS.1:EB.IS.1|
00000910: 3A 53 50 B2 31 38 3A 8D  31 30 31 30 00 22 11 DE  |:SP.18:.1010."..|
00000920: 03 8E 00 28 11 E8 03 3A  00 2E 11 F2 03 8F 00 4A  |...(...:.......J|
00000930: 11 FC 03 8B 49 53 B2 31  39 A7 8D 31 31 33 30 3A  |....IS.19..1130:|
00000940: 49 53 B2 30 3A 89 31 30  35 30 00 7A 11 06 04 9F  |IS.0:.1050.z....|
00000950: 38 2C 38 2C 38 2C 22 23  36 22 3A 98 31 35 2C 22  |8,8,8,"#6":.15,"|
00000960: 4D 2D 57 22 3B C7 28 30  29 3B C7 28 33 35 29 3B  |M-W";.(0);.(35);|
00000970: C7 28 31 29 3B C7 28 53  50 29 00 AA 11 10 04 49  |.(1);.(SP).....I|
00000980: 4E 24 B2 C7 28 45 42 29  AA 49 4E 24 3A 98 38 2C  |N$..(EB).IN$:.8,|
00000990: 49 4E 24 3B 3A 98 31 35  2C 22 55 32 22 3B 38 3B  |IN$;:.15,"U2";8;|
000009A0: 30 3B 31 38 3B 49 53 3A  A0 38 00 B7 11 1A 04 49  |0;18;IS:.8.....I|
000009B0: 4E 24 B2 22 22 3A 8E 00  BD 11 24 04 3A 00 C3 11  |N$."":....$.:...|
000009C0: 2E 04 8F 00 F3 11 38 04  54 31 B2 C6 28 50 52 24  |......8.T1..(PR$|
000009D0: 29 3A 54 32 B2 C6 28 CA  28 50 52 24 2C 32 29 29  |):T2..(.(PR$,2))|
000009E0: 3A 98 31 35 2C 22 55 31  22 3B 37 3B 31 3B 54 31  |:.15,"U1";7;1;T1|
000009F0: 3B 54 32 00 23 12 42 04  98 31 35 2C 22 4D 2D 52  |;T2.#.B..15,"M-R|
00000A00: 22 3B C7 28 32 29 3B C7  28 33 34 29 3A A1 23 31  |";.(2);.(34):.#1|
00000A10: 35 2C 58 24 3A 8B 58 24  B2 22 22 A7 58 24 B2 C7  |5,X$:.X$."".X$..|
00000A20: 28 30 29 00 31 12 4C 04  41 31 25 B2 C6 28 58 24  |(0).1.L.A1%..(X$|
00000A30: 29 00 61 12 56 04 98 31  35 2C 22 4D 2D 52 22 3B  |).a.V..15,"M-R";|
00000A40: C7 28 33 29 3B C7 28 33  34 29 3A A1 23 31 35 2C  |.(3);.(34):.#15,|
00000A50: 58 24 3A 8B 58 24 B2 22  22 A7 58 24 B2 C7 28 30  |X$:.X$."".X$..(0|
00000A60: 29 00 71 12 60 04 41 32  25 B2 C6 28 58 24 29 3A  |).q.`.A2%..(X$):|
00000A70: 8E 00 A0 12 6A 04 9F 38  2C 38 2C 38 2C 22 23 36  |....j..8,8,8,"#6|
00000A80: 22 3A 98 31 35 2C 22 4D  2D 57 22 3B C7 28 30 29  |":.15,"M-W";.(0)|
00000A90: 3B C7 28 33 35 29 3B C7  28 31 29 3B C7 28 30 29  |;.(35);.(1);.(0)|
00000AA0: 00 CE 12 74 04 49 4E 24  B2 C7 28 32 35 35 29 AA  |...t.IN$..(255).|
00000AB0: 49 4E 24 3A 98 38 2C 49  4E 24 3B 3A 98 31 35 2C  |IN$:.8,IN$;:.15,|
00000AC0: 22 55 32 22 3B 38 3B 30  3B 31 38 3B 31 39 00 D5  |"U2";8;0;18;19..|
00000AD0: 12 7E 04 A0 38 00 DB 12  88 04 3A 00 E1 12 92 04  |.~..8.....:.....|
00000AE0: 8F 00 11 13 9C 04 99 22  93 9A D0 4C 45 41 53 45  |......."...LEASE|
00000AF0: 20 49 4E 53 45 52 54 20  4E 45 57 20 44 49 53 4B  | INSERT NEW DISK|
00000B00: 20 49 4E 20 12 20 44 52  49 56 45 20 30 20 92 11  | IN . DRIVE 0 ..|
00000B10: 22 00 33 13 A6 04 99 22  2D 20 54 48 45 4E 20 48  |".3...."- THEN H|
00000B20: 49 54 20 41 4E 59 20 4B  45 59 11 22 3A 97 31 35  |IT ANY KEY.":.15|
00000B30: 38 2C 30 00 47 13 B0 04  A1 58 24 3A 8B 58 24 B2  |8,0.G....X$:.X$.|
00000B40: 22 22 A7 31 32 30 30 00  74 13 BA 04 99 3A 99 22  |"".1200.t....:."|
00000B50: D4 59 50 45 20 54 48 45  20 12 20 4E 41 4D 45 20  |.YPE THE . NAME |
00000B60: 92 20 4F 46 20 54 48 45  20 4E 45 57 20 44 49 53  |. OF THE NEW DIS|
00000B70: 4B 3A 20 22 00 87 13 C4  04 9F 31 2C 30 3A 84 31  |K: "......1,0:.1|
00000B80: 2C 44 4E 24 3A A0 31 00  B4 13 CE 04 99 3A 99 22  |,DN$:.1......:."|
00000B90: 11 D4 59 50 45 20 54 48  45 20 12 20 C9 C4 20 92  |..YPE THE . .. .|
00000BA0: 20 4F 46 20 54 48 45 20  4E 45 57 20 44 49 53 4B  | OF THE NEW DISK|
00000BB0: 3A 20 22 3B 00 C7 13 D8  04 9F 31 2C 30 3A 84 31  |: ";......1,0:.1|
00000BC0: 2C 49 44 24 3A A0 31 00  E1 13 E2 04 98 31 35 2C  |,ID$:.1......15,|
00000BD0: 22 4E 30 3A 22 AA 44 4E  24 AA 22 2C 22 AA 49 44  |"N0:".DN$.",".ID|
00000BE0: 24 00 E7 13 EC 04 8E 00  00 00                    |$.........      |

..#.D..".":.53280,0:.53281,0:.G(14).W.N.
BL$." ":.I.1.7:BL$.BL$.BL$:.:BL$.BL$.H(B
L$,127)...X.B1$."             ":BO$.G(0)
:.I.1.7:BO$.BO$.BO$:.:PA$.G(130).....B2$
.H(BO$,9):B3$.H(BO$,3).M...BO$.BO$.H(BO$
,127).....SA.50.256:MA.979:GE.4... ..BLO
%(35,20,2):.SU%(35,20,2)......15,8,15:.4
,4:.!...:.'.....Z.H.."..PLEASE INSERT DE
FECTIVE DISK IN .DRIVE 0.".U.R.."..-THEN
 HIT ANY KEY"......X$:.X$."".220......15
,"I1":.15,F.N....:."...TYPE THE .ID. OF 
THE DEFECTIVE DISK: ";......1,0:.1,ID$: 
1......15,"M-W";G(144);G(0);G(2);ID$....
..1180.....:..."...C.,..".        . SELE
CT OPTION..":."..1..  REPAIR ONLY BASIC 
PROGRAMS.."...6..".2..  REPAIR ALL OTHER
 BUT BASIC PROGRAMS.."...@..".3..  REPAI
R ALL PROGRAMS..".S.J..1,0:.1,X$: 1:X.E(
X$).Y.T.:...^.....H.....R..8,8,8,"#5".#.
|.T9.1:.1,20,18,19,25,17,31,16,36,0,0:.:
.X1.8....Y:.X2:.X2.0.550.P....T1.X1.X2.1
:.T2.0.Y.B....15,"B-P";8;1.Y....15,"U1";
8;1;T1;T2......15,F:DR$.DR$."B".I(" ".D(
T1),2).I("  ".D(T2),3).....DR$.DR$.I("  
".D(F),3):.F..0.DR$.DR$."      ":.530...
B..15,"M-R";G(0);G(34):.#15,X$:.X$."".X$
.G(0):. .L.A$.X$.P.V..15,"M-R";G(1);G(34
):.#15,X$:.X$."".X$.G(0).Z...B$.X$.....D
R$.DR$.I("  ".D(F(A$)),3).I("  ".D(F(B$)
),3).....BLO%(T1,T2,1).F(A$):BLO%(T1,T2,
2).F(B$).I....F(A$).0.530.....SU%(F(A$),
F(B$),1).T1:SU%(F(A$),F(B$),2).T2......C
(DR$).75..4,DR$:DR$."".)....:.:X1.X2:.39
0.B.&..4: 8:.15,"I1":.15,F.H.0.:.N.:...^
.D..7,8,7,"#5".H.N..:.X1.}.X..Y:.X2:.X2.
0.830...B..U1.X1.X2.1:.U1.18.820...L..U2
.0.Y.K.V..SU%(U1,U2,1).0.SU%(U1,U2,2).0.
810.....S1.BLO%(U1,U2,1):S2.BLO%(U1,U2,2
):......S1.0.S2.0.810.....PR$.G(U1).G(U2
).)...R1.U1:R2.U2.P...S1.BLO%(R1,R2,1):S
2.BLO%(R1,R2,2):.H...PR$.PR$.G(S1).G(S2)
.....BLO%(R1,R2,1).0:BLO%(R1,R2,2).0...F
..S1..0.R1.S1:R2.S2:.680...P..X.3.770...
Z..1070.X....X.1.A1%.1.A2%.4.770......X.
2.A1%..1.A2%..4.770......810.....BZ.C(PR
$).2.1:PN.PN.1.F....4,I(D(PN),2);". DATA
 : START ".I(D(U1),2);.T....4," ".I(D(U2
),2)."   LAENGE ".I(D(BZ),2).}. ..860...
*.PR$."":....4..:X1.X2:.600.Y.>.EB.255:S
P.0:IS.IS.1:IN$.IN$.H(BO$,254.C(IN$)):.1
010: 4: 7...H.....R.:...\.....F..J.1.BZ.
..P.T1.F(J(PR$,(J.1).2.1)).-.Z.T2.F(J(PR
$,(J.1).2.2)).D....15,"U1";7;1;T1;T2.R..
..J.1..950.{....15,"U2";7;0;T1;T2:.15,"B
-A";0;T1;T2......:......:.......E...IT$.
PA$.G(T1).G(T2).I(D(1000.PN),3).B1$.B2$.
G(BZ)...J..C(IN$)..192.IN$.IN$.IT$.B3$:.
990...T.IN$.IN$.IT$.G(0):IS.IS.1:EB.IS.1
:SP.18:.1010.".....(...:.......J....IS.1
9..1130:IS.0:.1050.Z....8,8,8,"#6":.15,"
M-W";G(0);G(35);G(1);G(SP).....IN$.G(EB)
.IN$:.8,IN$;:.15,"U2";8;0;18;IS: 8.....I
N$."":....$.:.C.......8.T1.F(PR$):T2.F(J
(PR$,2)):.15,"U1";7;1;T1;T2.#.B..15,"M-R
";G(2);G(34):.#15,X$:.X$."".X$.G(0).1.L.
A1%.F(X$).A.V..15,"M-R";G(3);G(34):.#15,
X$:.X$."".X$.G(0).Q.`.A2%.F(X$):.. .J..8
,8,8,"#6":.15,"M-W";G(0);G(35);G(1);G(0)
.N.T.IN$.G(255).IN$:.8,IN$;:.15,"U2";8;0
;18;19.U.~. 8.....:............"..PLEASE
 INSERT NEW DISK IN . DRIVE 0 ..".3...."
- THEN HIT ANY KEY.":.158,0.G....X$:.X$.
"".1200.T....:."TYPE THE . NAME . OF THE
 NEW DISK: "...D..1,0:.1,DN$: 1...N..:."
.TYPE THE . ID . OF THE NEW DISK: ";.G.X
..1,0:.1,ID$: 1......15,"N0:".DN$.",".ID
$.........

×

C64 Image

> CLICK IMAGE PREVIEW FOR FULL MODAL