51K COPY

00000000: 01 08 26 08 64 00 8F 20  4D 4F 44 20 46 52 20 36  |..&.d.. MOD FR 6|
00000010: 2F 38 33 20 47 41 5A 45  54 54 45 20 42 59 20 4A  |/83 GAZETTE BY J|
00000020: 20 52 55 42 49 4E 00 2F  08 6E 00 89 37 30 30 00  | RUBIN./.n..700.|
00000030: 43 08 C7 00 8F 20 52 45  41 44 20 44 49 53 4B 20  |C.... READ DISK |
00000040: 45 52 52 00 5B 08 C8 00  84 31 2C 45 52 2C 45 52  |ERR.[....1,ER,ER|
00000050: 24 2C 45 32 25 2C 45 33  25 3A 8E 00 6C 08 2B 01  |$,E2%,E3%:..l.+.|
00000060: 8F 20 52 45 41 44 20 42  4C 4F 43 4B 00 7A 08 2C  |. READ BLOCK.z.,|
00000070: 01 97 35 33 32 38 30 2C  4E 55 00 92 08 36 01 43  |..53280,NU...6.C|
00000080: B2 2E 3A 56 B2 31 31 30  37 AA 53 31 AC 34 30 AA  |..:V.1107.S1.40.|
00000090: 54 31 00 CA 08 40 01 8F  20 41 44 44 20 53 4B 49  |T1...@.. ADD SKI|
000000A0: 50 20 49 46 20 59 4F 55  20 48 41 56 45 20 50 41  |P IF YOU HAVE PA|
000000B0: 52 41 4C 4C 45 4C 20 49  45 45 45 20 49 4E 54 45  |RALLEL IEEE INTE|
000000C0: 52 46 41 43 45 20 48 45  52 45 00 E0 08 4A 01 98  |RFACE HERE...J..|
000000D0: 31 2C 22 55 31 22 3B 33  3B 2E 3B 54 31 3B 53 31  |1,"U1";3;.;T1;S1|
000000E0: 00 F3 08 54 01 8D 32 30  30 3A 8B 45 52 B2 30 A7  |...T..200:.ER.0.|
000000F0: 33 37 30 00 06 09 5E 01  43 B2 43 AA 31 3A 8B 43  |370...^.C.C.1:.C|
00000100: B3 33 89 33 33 30 00 39  09 68 01 97 56 2C 45 52  |.3.330.9.h..V,ER|
00000110: 3A 81 4A B2 28 42 42 AA  4E 55 29 AC 32 35 36 A4  |:.J.(BB.NU).256.|
00000120: 28 42 42 AA 4E 55 29 AC  32 35 36 AA 32 35 35 3A  |(BB.NU).256.255:|
00000130: 97 4A 2C 2E 3A 82 4A 3A  8E 00 4A 09 72 01 98 31  |.J,.:.J:..J.r..1|
00000140: 2C 22 42 2D 50 22 3B 33  3B 2E 00 5C 09 7C 01 8B  |,"B-P";3;..\.|..|
00000150: 4E 55 B3 B1 30 A7 97 56  2C 31 32 37 00 81 09 86  |NU..0..V,127....|
00000160: 01 97 39 39 36 2C C2 28  33 29 3A 97 39 39 37 2C  |..996,.(3):.997,|
00000170: C2 28 34 29 3A 97 34 2C  42 42 AA 4E 55 3A 9E 4D  |.(4):.4,BB.NU:.M|
00000180: 41 00 99 09 90 01 97 33  2C C2 28 39 39 36 29 3A  |A......3,.(996):|
00000190: 97 34 2C C2 28 39 39 37  29 00 B5 09 9A 01 8B 53  |.4,.(997)......S|
000001A0: 54 B3 B1 2E AF 53 54 B3  B1 36 34 A7 8D 32 30 30  |T....ST..64..200|
000001B0: 3A 89 33 36 30 00 BB 09  A4 01 8E 00 CD 09 F3 01  |:.360...........|
000001C0: 8F 20 57 52 49 54 45 20  42 4C 4F 43 4B 00 DB 09  |. WRITE BLOCK...|
000001D0: F4 01 97 35 33 32 38 30  2C 4E 55 00 E3 09 FE 01  |...53280,NU.....|
000001E0: 43 B2 2E 00 FE 09 08 02  8B 55 25 B2 2E A7 98 31  |C........U%....1|
000001F0: 2C 22 42 2D 41 22 3B 2E  3B 54 31 3B 53 31 00 0F  |,"B-A";.;T1;S1..|
00000200: 0A 12 02 98 31 2C 22 42  2D 50 22 3B 33 3B 2E 00  |....1,"B-P";3;..|
00000210: 2C 0A 1C 02 8B 4E 55 B3  B1 30 A7 97 31 31 30 37  |,....NU..0..1107|
00000220: AA 53 31 AC 34 30 AA 54  31 2C 33 32 00 64 0A 26  |.S1.40.T1,32.d.&|
00000230: 02 8F 20 41 44 44 20 53  4B 49 50 20 49 46 20 59  |.. ADD SKIP IF Y|
00000240: 4F 55 20 48 41 56 45 20  50 41 52 41 4C 4C 45 4C  |OU HAVE PARALLEL|
00000250: 20 49 45 45 45 20 49 4E  54 45 52 46 41 43 45 20  | IEEE INTERFACE |
00000260: 48 45 52 45 00 8B 0A 30  02 97 39 39 36 2C C2 28  |HERE...0..996,.(|
00000270: 33 29 3A 97 39 39 37 2C  C2 28 34 29 3A 97 34 2C  |3):.997,.(4):.4,|
00000280: 42 42 AA 4E 55 3A 9E 4D  41 AA 33 00 A3 0A 3A 02  |BB.NU:.MA.3...:.|
00000290: 97 33 2C C2 28 39 39 36  29 3A 97 34 2C C2 28 39  |.3,.(996):.4,.(9|
000002A0: 39 37 29 00 CE 0A 44 02  8B 53 54 B3 B1 2E AF 53  |97)...D..ST....S|
000002B0: 54 B3 B1 36 34 A7 99 22  49 45 45 45 20 57 52 49  |T..64.."IEEE WRI|
000002C0: 54 45 22 53 54 22 22 3A  89 31 30 30 30 30 00 E4  |TE"ST"":.10000..|
000002D0: 0A 4E 02 98 31 2C 22 55  32 22 3B 33 3B 30 3B 54  |.N..1,"U2";3;0;T|
000002E0: 31 3B 53 31 00 F7 0A 58  02 8D 32 30 30 3A 8B 45  |1;S1...X..200:.E|
000002F0: 52 B2 30 A7 36 33 30 00  0A 0B 62 02 43 B2 43 AA  |R.0.630...b.C.C.|
00000300: 31 3A 8B 43 B3 33 A7 35  39 30 00 40 0B 6C 02 99  |1:.C.3.590.@.l..|
00000310: 22 55 4E 52 45 43 4F 56  45 52 41 42 4C 45 20 57  |"UNRECOVERABLE W|
00000320: 52 49 54 45 20 45 52 52  4F 52 22 45 52 2C 45 52  |RITE ERROR"ER,ER|
00000330: 24 2C 45 32 25 2C 45 33  25 3A 89 31 30 30 30 30  |$,E2%,E3%:.10000|
00000340: 00 46 0B 76 02 8E 00 59  0B BB 02 8F 20 4D 41 49  |.F.v...Y.... MAI|
00000350: 4E 20 50 52 4F 47 52 41  4D 00 90 0B BC 02 81 49  |N PROGRAM......I|
00000360: B2 38 32 38 A4 39 30 31  3A 87 41 3A 97 49 2C 41  |.828.901:.A:.I,A|
00000370: 3A 82 3A 99 22 05 22 3B  3A 97 35 33 32 38 31 2C  |:.:.".";:.53281,|
00000380: 36 3A 97 35 33 32 38 30  2C 32 3A 97 30 2C 34 37  |6:.53280,2:.0,47|
00000390: 00 C9 0B C6 02 81 49 B2  30 A4 32 34 3A 97 35 34  |......I.0.24:.54|
000003A0: 32 37 32 AA 49 2C 30 3A  82 3A 97 35 34 32 37 33  |272.I,0:.:.54273|
000003B0: 2C 32 30 3A 97 35 34 32  37 37 2C 31 35 33 3A 97  |,20:.54277,153:.|
000003C0: 35 34 32 37 38 2C 31 35  33 00 F9 0B D0 02 97 35  |54278,153......5|
000003D0: 35 2C 30 3A 97 35 36 2C  33 35 3A 9C 3A 42 42 B2  |5,0:.56,35:.:BB.|
000003E0: 33 35 3A 4E B2 32 32 30  3A 42 41 B2 42 42 AC 32  |35:N.220:BA.BB.2|
000003F0: 35 36 3A 4D 41 B2 38 32  38 00 1C 0C DA 02 86 42  |56:MA.828......B|
00000400: 4D 25 28 33 35 2C 32 31  29 3A 81 4A B2 30 A4 37  |M%(35,21):.J.0.7|
00000410: 3A 54 41 28 4A 29 B2 32  AE 4A 3A 82 00 30 0C E4  |:TA(J).2.J:..0..|
00000420: 02 99 22 93 42 41 43 4B  55 50 20 31 35 34 31 22  |..".BACKUP 1541"|
00000430: 00 5F 0C EE 02 99 22 27  47 4F 54 4F 31 30 30 30  |._...."'GOTO1000|
00000440: 30 27 20 49 46 20 50 52  4F 47 52 41 4D 20 51 55  |0' IF PROGRAM QU|
00000450: 49 54 53 20 41 42 4E 4F  52 4D 41 4C 4C 59 22 00  |ITS ABNORMALLY".|
00000460: 6B 0C F8 02 9F 31 2C 38  2C 31 35 00 75 0C 02 03  |k....1,8,15.u...|
00000470: 8D 32 30 30 30 00 A3 0C  0C 03 99 22 93 11 11 11  |.2000......"....|
00000480: 11 44 4F 20 59 4F 55 20  57 41 4E 54 20 54 4F 20  |.DO YOU WANT TO |
00000490: 42 4C 41 4E 4B 20 54 48  45 20 53 43 52 45 45 4E  |BLANK THE SCREEN|
000004A0: 3F 22 3B 00 C3 0C 16 03  8D 33 32 30 30 3A 8B 41  |?";......3200:.A|
000004B0: 24 B2 22 59 22 A7 53 42  B2 31 3A 98 31 2C 22 55  |$."Y".SB.1:.1,"U|
000004C0: 49 2D 22 00 F9 0C 20 03  99 22 13 11 11 11 11 11  |I-"... .."......|
000004D0: 11 44 4F 20 59 4F 55 20  57 41 4E 54 20 54 4F 20  |.DO YOU WANT TO |
000004E0: 43 4F 50 59 20 12 41 4C  4C 20 36 38 33 92 20 53  |COPY .ALL 683. S|
000004F0: 45 43 54 4F 52 53 3F 22  3B 00 10 0D 2A 03 8D 33  |ECTORS?";...*..3|
00000500: 32 30 30 3A 8B 41 24 B2  22 59 22 A7 44 42 B2 31  |200:.A$."Y".DB.1|
00000510: 00 2F 0D 34 03 99 22 93  22 3B 3A 44 24 B2 22 53  |./.4..".";:D$."S|
00000520: 22 3A 8D 33 30 30 30 3A  49 32 24 B2 49 52 24 00  |":.3000:I2$.IR$.|
00000530: 5E 0D 3E 03 8B 44 52 24  B3 B1 22 32 41 22 A7 99  |^.>..DR$.."2A"..|
00000540: 22 93 49 4C 4C 45 47 41  4C 20 44 4F 53 20 31 2E  |".ILLEGAL DOS 1.|
00000550: 30 20 44 49 53 4B 22 3A  89 31 30 30 30 30 00 9F  |0 DISK":.10000..|
00000560: 0D 48 03 8B 49 32 24 B2  49 31 24 A7 99 22 93 53  |.H..I2$.I1$..".S|
00000570: 4F 55 52 43 45 20 41 4E  44 20 44 45 53 54 49 4E  |OURCE AND DESTIN|
00000580: 41 54 49 4F 4E 20 48 41  56 45 20 53 41 4D 45 20  |ATION HAVE SAME |
00000590: 49 44 20 43 4F 44 45 22  3A 89 31 30 30 30 30 00  |ID CODE":.10000.|
000005A0: A9 0D 52 03 8D 32 35 30  30 00 BC 0D 5C 03 8B 44  |..R..2500...\..D|
000005B0: 42 A7 54 53 B2 31 3A 45  53 B2 33 35 00 D8 0D 66  |B.TS.1:ES.35...f|
000005C0: 03 54 B2 54 53 3A 53 B2  30 3A 4E 55 B2 31 3A 54  |.T.TS:S.0:NU.1:T|
000005D0: 31 B2 54 3A 53 31 B2 53  00 EF 0D 70 03 98 31 2C  |1.T:S1.S...p..1,|
000005E0: 22 49 30 22 3A 9F 33 2C  38 2C 33 2C 22 23 22 00  |"I0":.3,8,3,"#".|
000005F0: 0C 0E 7A 03 55 25 B2 42  4D 25 28 54 31 2C 53 31  |..z.U%.BM%(T1,S1|
00000600: 29 3A 8B 55 25 B2 AB 31  A7 39 32 30 00 36 0E 84  |):.U%..1.920.6..|
00000610: 03 8B 28 55 25 B2 30 29  B0 28 44 42 B2 31 29 A7  |..(U%.0).(DB.1).|
00000620: 8D 33 30 30 3A 4E 55 B2  4E 55 AA 31 3A 8B 4E 55  |.300:NU.NU.1:.NU|
00000630: B1 4E A7 39 33 30 00 47  0E 8E 03 53 31 B2 53 31  |.N.930.G...S1.S1|
00000640: AA 31 3A 89 38 39 30 00  64 0E 98 03 53 31 B2 2E  |.1:.890.d...S1..|
00000650: 3A 54 31 B2 54 31 AA 31  3A 8B 54 31 B3 B2 54 46  |:T1.T1.1:.T1..TF|
00000660: A7 38 39 30 00 6B 0E A2  03 A0 33 00 A7 0E AC 03  |.890.k....3.....|
00000670: 44 24 B2 22 44 22 3A 8D  33 30 30 30 3A 41 24 B2  |D$."D":.3000:A$.|
00000680: 22 4E 22 3A 8B 49 31 24  B2 22 22 A7 49 31 24 B2  |"N":.I1$."".I1$.|
00000690: 49 52 24 3A 41 24 B2 22  59 22 3A 8B 49 31 24 B2  |IR$:A$."Y":.I1$.|
000006A0: 49 32 24 A7 38 34 30 00  DA 0E B6 03 8B 41 24 B2  |I2$.840......A$.|
000006B0: 22 59 22 A7 98 31 2C 22  4E 30 3A 22 44 4E 24 3A  |"Y"..1,"N0:"DN$:|
000006C0: 8D 32 30 30 3A 8B 45 52  B3 B1 30 A7 99 45 52 2C  |.200:.ER..0..ER,|
000006D0: 45 52 24 3A 89 31 30 30  30 30 00 F3 0E C0 03 8B  |ER$:.10000......|
000006E0: 49 52 24 B3 B1 49 31 24  A7 99 22 12 22 3B 3A 89  |IR$..I1$..".";:.|
000006F0: 39 34 30 00 0A 0F CA 03  98 31 2C 22 49 30 22 3A  |940......1,"I0":|
00000700: 9F 33 2C 38 2C 33 2C 22  23 22 00 1D 0F D4 03 4E  |.3,8,3,"#".....N|
00000710: 55 B2 31 3A 54 31 B2 54  3A 53 31 B2 53 00 3B 0F  |U.1:T1.T:S1.S.;.|
00000720: DE 03 55 25 B2 42 4D 25  28 54 31 2C 53 31 29 3A  |..U%.BM%(T1,S1):|
00000730: 8B 55 25 B2 AB 31 A7 31  30 32 30 00 66 0F E8 03  |.U%..1.1020.f...|
00000740: 8B 28 55 25 B2 30 29 B0  28 44 42 B2 31 29 A7 8D  |.(U%.0).(DB.1)..|
00000750: 35 30 30 3A 4E 55 B2 4E  55 AA 31 3A 8B 4E 55 B1  |500:NU.NU.1:.NU.|
00000760: 4E A7 31 30 33 30 00 77  0F F2 03 53 31 B2 53 31  |N.1030.w...S1.S1|
00000770: AA 31 3A 89 39 39 30 00  94 0F FC 03 53 31 B2 2E  |.1:.990.....S1..|
00000780: 3A 54 31 B2 54 31 AA 31  3A 8B 54 31 B3 B2 54 46  |:T1.T1.1:.T1..TF|
00000790: A7 39 39 30 00 9B 0F 06  04 A0 33 00 B8 0F 10 04  |.990......3.....|
000007A0: 53 B2 53 31 AA 31 3A 8B  53 B1 32 30 A7 53 B2 2E  |S.S1.1:.S.20.S..|
000007B0: 3A 54 31 B2 54 31 AA 31  00 CC 0F 1A 04 54 B2 54  |:T1.T1.1.....T.T|
000007C0: 31 3A 8B 54 B1 54 46 A7  31 30 38 30 00 F3 0F 24  |1:.T.TF.1080...$|
000007D0: 04 44 24 B2 22 53 22 3A  8D 33 30 30 30 3A 8B 49  |.D$."S":.3000:.I|
000007E0: 52 24 B3 B1 49 32 24 A7  99 22 12 22 3B 3A 89 31  |R$..I2$..".";:.1|
000007F0: 30 36 30 00 0B 10 2E 04  4E 55 B2 31 3A 54 31 B2  |060.....NU.1:T1.|
00000800: 54 3A 53 31 B2 53 3A 89  38 38 30 00 25 10 38 04  |T:S1.S:.880.%.8.|
00000810: 97 35 33 32 36 35 2C 32  37 3A 98 31 2C 22 55 49  |.53265,27:.1,"UI|
00000820: 2B 22 3A A0 31 00 39 10  42 04 97 35 35 2C 30 3A  |+":.1.9.B..55,0:|
00000830: 97 35 36 2C 31 36 30 3A  9C 00 5A 10 4C 04 97 35  |.56,160:..Z.L..5|
00000840: 33 32 38 30 2C 36 3A 99  22 93 42 41 43 4B 55 50  |3280,6:.".BACKUP|
00000850: 20 43 4F 4D 50 4C 45 54  45 22 00 7C 10 56 04 9F  | COMPLETE".|.V..|
00000860: 31 2C 38 2C 30 2C 22 24  30 22 3A A1 23 31 2C 41  |1,8,0,"$0":.#1,A|
00000870: 24 2C 42 24 3A 4E 24 B2  C7 28 30 29 00 96 10 60  |$,B$:N$..(0)...`|
00000880: 04 A1 23 31 2C 41 24 2C  42 24 3A 8B 42 24 B2 22  |..#1,A$,B$:.B$."|
00000890: 22 A7 31 31 36 30 00 BC  10 6A 04 A1 23 31 2C 41  |".1160...j..#1,A|
000008A0: 24 2C 42 24 3A 99 C6 28  41 24 AA 4E 24 29 AA 32  |$,B$:..(A$.N$).2|
000008B0: 35 36 AC C6 28 42 24 AA  4E 24 29 3B 00 DA 10 74  |56..(B$.N$);...t|
000008C0: 04 A1 23 31 2C 41 24 3A  8B 41 24 B3 B1 22 22 A7  |..#1,A$:.A$.."".|
000008D0: 99 41 24 3B 3A 89 31 31  34 30 00 E6 10 7E 04 99  |.A$;:.1140...~..|
000008E0: 3A 89 31 31 32 30 00 EF  10 88 04 A0 31 3A 80 00  |:.1120......1:..|
000008F0: 01 11 CF 07 8F 20 46 4F  52 4D 41 54 20 44 49 53  |..... FORMAT DIS|
00000900: 4B 00 27 11 D0 07 85 22  11 11 44 45 53 54 49 4E  |K.'...."..DESTIN|
00000910: 41 54 49 4F 4E 20 44 49  53 4B 20 4E 41 4D 45 20  |ATION DISK NAME |
00000920: 20 20 22 3B 44 4E 24 00  41 11 DA 07 8B 44 4E 24  |  ";DN$.A....DN$|
00000930: B2 22 22 A7 99 22 91 91  91 91 22 3A 89 32 30 30  |."".."....":.200|
00000940: 30 00 57 11 E4 07 8B C3  28 44 4E 24 29 B1 31 36  |0.W.....(DN$).16|
00000950: A7 9C 3A 89 34 30 30 00  7A 11 EE 07 46 B2 30 3A  |..:.400.z...F.0:|
00000960: 81 4A B2 31 A4 C3 28 44  4E 24 29 3A 53 31 24 B2  |.J.1..(DN$):S1$.|
00000970: CA 28 44 4E 24 2C 4A 2C  31 29 00 94 11 F8 07 8B  |.(DN$,J,1)......|
00000980: 53 31 24 B2 22 22 B0 53  31 24 B2 C7 28 33 34 29  |S1$."".S1$..(34)|
00000990: A7 46 B2 31 00 AC 11 02  08 82 4A 3A 8B 46 A7 99  |.F.1......J:.F..|
000009A0: 22 91 91 91 91 22 3A 89  32 30 30 30 00 CF 11 0C  |"....":.2000....|
000009B0: 08 99 22 11 11 54 4F 54  41 4C 4C 59 20 46 4F 52  |.."..TOTALLY FOR|
000009C0: 4D 41 54 20 54 48 45 20  44 49 53 4B 3F 22 3B 00  |MAT THE DISK?";.|
000009D0: E3 11 16 08 8D 33 32 30  30 3A 8B 41 24 B2 22 4E  |.....3200:.A$."N|
000009E0: 22 A7 8E 00 10 12 20 08  85 22 55 4E 49 51 55 45  |"..... .."UNIQUE|
000009F0: 20 44 49 53 4B 20 49 44  20 20 20 20 20 20 20 20  | DISK ID        |
00000A00: 20 20 20 20 20 20 20 20  20 20 20 22 3B 49 31 24  |           ";I1$|
00000A10: 00 28 12 2A 08 8B 49 31  24 B2 22 22 A7 99 22 91  |.(.*..I1$.""..".|
00000A20: 91 22 3A 89 32 30 38 30  00 43 12 34 08 8B C3 28  |.":.2080.C.4...(|
00000A30: 49 31 24 29 B3 B1 32 A7  99 22 91 91 22 3A 89 32  |I1$)..2.."..":.2|
00000A40: 30 38 30 00 5A 12 3E 08  44 24 B2 22 45 22 3A 99  |080.Z.>.D$."E":.|
00000A50: 22 93 22 3B 3A 8D 33 30  30 30 00 6A 12 48 08 8B  |".";:.3000.j.H..|
00000A60: 45 52 B3 B1 30 A7 32 31  36 30 00 A4 12 52 08 97  |ER..0.2160...R..|
00000A70: 35 34 32 37 36 2C 33 33  3A 97 35 34 32 39 36 2C  |54276,33:.54296,|
00000A80: 31 35 3A 99 3A 99 22 11  11 12 41 4C 52 45 41 44  |15:.:."...ALREAD|
00000A90: 59 20 46 4F 52 4D 41 54  54 45 44 20 44 49 53 4B  |Y FORMATTED DISK|
00000AA0: 21 21 21 22 00 D7 12 5C  08 99 22 11 12 41 52 45  |!!!"...\.."..ARE|
00000AB0: 20 59 4F 55 20 53 55 52  45 3F 3F 3F 22 3B 3A 8D  | YOU SURE???";:.|
00000AC0: 33 32 30 30 3A 97 35 34  32 37 36 2C 33 32 3A 97  |3200:.54276,32:.|
00000AD0: 35 34 32 39 36 2C 2E 00  E9 12 66 08 8B 41 24 B3  |54296,....f..A$.|
00000AE0: B1 22 59 22 A7 32 30 30  30 00 15 13 70 08 97 35  |."Y".2000...p..5|
00000AF0: 34 32 37 36 2C 33 32 3A  97 35 34 32 39 36 2C 30  |4276,32:.54296,0|
00000B00: 3A 98 31 2C 22 4E 30 3A  22 AA 44 4E 24 AA 22 2C  |:.1,"N0:".DN$.",|
00000B10: 22 AA 49 31 24 00 1E 13  7A 08 8D 32 30 30 00 32  |".I1$...z..200.2|
00000B20: 13 84 08 8B 45 52 A7 99  45 52 24 3A 89 31 30 30  |....ER..ER$:.100|
00000B30: 30 30 00 38 13 8E 08 8E  00 46 13 C3 09 8F 20 47  |00.8.....F.... G|
00000B40: 45 54 20 42 41 4D 00 54  13 C4 09 54 53 B2 31 3A  |ET BAM.T...TS.1:|
00000B50: 54 46 B2 2E 00 6B 13 CE  09 98 31 2C 22 49 30 22  |TF...k....1,"I0"|
00000B60: 3A 9F 33 2C 38 2C 33 2C  22 23 22 00 74 13 D8 09  |:.3,8,3,"#".t...|
00000B70: 53 39 B2 30 00 90 13 E2  09 97 35 33 32 38 31 2C  |S9.0......53281,|
00000B80: 31 3A 99 22 93 22 3B 3A  97 35 33 32 38 31 2C 36  |1:.".";:.53281,6|
00000B90: 00 B5 13 EC 09 4E 55 B2  30 3A 54 31 B2 31 38 3A  |.....NU.0:T1.18:|
00000BA0: 53 31 B2 30 3A 43 30 24  B2 C7 28 2E 29 3A 8D 33  |S1.0:C0$..(.):.3|
00000BB0: 30 30 3A A0 33 00 DB 13  F6 09 81 49 B2 30 A4 32  |00:.3......I.0.2|
00000BC0: 30 3A 97 31 31 30 34 AA  49 AC 34 30 2C C6 28 C9  |0:.1104.I.40,.(.|
00000BD0: 28 C4 28 49 29 2C 31 29  29 3A 82 00 FE 13 00 0A  |(.(I),1)):......|
00000BE0: 81 49 B2 31 A4 33 35 3A  97 31 39 38 37 AA 49 2C  |.I.1.35:.1987.I,|
00000BF0: C6 28 C9 28 C4 28 49 29  2C 31 29 29 3A 82 00 11  |.(.(.(I),1)):...|
00000C00: 14 0A 0A 97 35 33 32 36  35 2C 32 37 3A 42 59 B2  |....53265,27:BY.|
00000C10: 34 00 23 14 14 0A 54 25  B2 28 42 59 AB 34 29 AD  |4.#...T%.(BY.4).|
00000C20: 34 AA 31 00 57 14 1E 0A  8B C2 28 42 41 AA 42 59  |4.1.W.....(BA.BY|
00000C30: 29 B2 2E A7 81 4A B2 2E  A4 32 30 3A 42 4D 25 28  |)....J...20:BM%(|
00000C40: 54 25 2C 4A 29 B2 2E 3A  82 3A 42 59 B2 42 59 AA  |T%,J)..:.:BY.BY.|
00000C50: 34 3A 89 32 36 34 30 00  5F 14 28 0A 53 B2 30 00  |4:.2640._.(.S.0.|
00000C60: 90 14 32 0A 42 59 B2 42  59 AA 31 3A 41 30 B2 C2  |..2.BY.BY.1:A0..|
00000C70: 28 42 41 AA 42 59 29 3A  81 4A B2 2E A4 37 3A 55  |(BA.BY):.J...7:U|
00000C80: 25 B2 53 3A 8B 55 25 B1  32 31 A7 55 25 B2 32 31  |%.S:.U%.21.U%.21|
00000C90: 00 B0 14 37 0A 42 4D 25  28 54 25 2C 55 25 29 B2  |...7.BM%(T%,U%).|
00000CA0: 41 30 AF 54 41 28 4A 29  3A 53 B2 53 AA 31 3A 82  |A0.TA(J):S.S.1:.|
00000CB0: 00 BF 14 3C 0A 8B 53 B3  32 32 A7 32 36 31 30 00  |...<..S.22.2610.|
00000CC0: CB 14 46 0A 42 59 B2 42  59 AA 31 00 E2 14 50 0A  |..F.BY.BY.1...P.|
00000CD0: 45 53 B2 32 31 3A 8B 54  25 B1 31 37 A7 45 53 B2  |ES.21:.T%.17.ES.|
00000CE0: 31 39 00 F3 14 5A 0A 8B  54 25 B1 32 34 A7 45 53  |19...Z..T%.24.ES|
00000CF0: B2 31 38 00 04 15 64 0A  8B 54 25 B1 33 30 A7 45  |.18...d..T%.30.E|
00000D00: 53 B2 31 37 00 20 15 6E  0A 81 4A B2 45 53 A4 32  |S.17. .n..J.ES.2|
00000D10: 31 3A 42 4D 25 28 54 25  2C 4A 29 B2 AB 31 3A 82  |1:BM%(T%,J)..1:.|
00000D20: 00 5D 15 78 0A 53 4D B2  2E 3A 81 4A B2 2E A4 32  |.].x.SM..:.J...2|
00000D30: 30 3A 53 4C 25 B2 31 31  30 37 AA 4A AC 34 30 AA  |0:SL%.1107.J.40.|
00000D40: 54 25 3A 97 53 4C 25 2C  34 35 3A 8B 42 4D 25 28  |T%:.SL%,45:.BM%(|
00000D50: 54 25 2C 4A 29 B3 B1 2E  A7 32 37 30 30 00 72 15  |T%,J)....2700.r.|
00000D60: 82 0A 53 4D B2 53 4D AA  31 3A 97 53 4C 25 2C 31  |..SM.SM.1:.SL%,1|
00000D70: 36 30 00 81 15 8C 0A 82  3A 53 39 B2 53 39 AA 53  |60......:S9.S9.S|
00000D80: 4D 00 92 15 96 0A 8B 54  25 B3 B2 31 37 A7 32 37  |M......T%..17.27|
00000D90: 35 30 00 BB 15 A0 0A 97  31 39 30 37 AA 54 25 2C  |50......1907.T%,|
00000DA0: 34 36 3A 97 31 38 36 37  AA 54 25 2C 34 36 3A 8B  |46:.1867.T%,46:.|
00000DB0: 54 25 B3 B2 32 34 A7 32  37 35 30 00 D8 15 AA 0A  |T%..24.2750.....|
00000DC0: 97 31 38 32 37 AA 54 25  2C 34 36 3A 8B 54 25 B3  |.1827.T%,46:.T%.|
00000DD0: B2 33 30 A7 32 37 35 30  00 E8 15 B4 0A 97 31 37  |.30.2750......17|
00000DE0: 38 37 AA 54 25 2C 34 36  00 06 16 BE 0A 8B 53 4D  |87.T%,46......SM|
00000DF0: B2 2E AF 54 53 B2 54 25  A7 54 53 B2 54 53 AA 31  |...TS.T%.TS.TS.1|
00000E00: 3A 89 32 37 37 30 00 17  16 C8 0A 8B 53 4D B3 B1  |:.2770......SM..|
00000E10: 2E A7 54 46 B2 54 25 00  28 16 D2 0A 8B 42 59 B3  |..TF.T%.(....BY.|
00000E20: 31 34 33 A7 32 35 38 30  00 39 16 DC 0A 8B 44 42  |143.2580.9....DB|
00000E30: B2 31 A7 53 39 B2 36 38  33 00 56 16 E6 0A 99 22  |.1.S9.683.V...."|
00000E40: 13 22 53 39 3B 22 42 4C  4F 43 4B 53 20 54 4F 20  |."S9;"BLOCKS TO |
00000E50: 58 46 45 52 22 3B 00 72  16 F0 0A 53 38 B2 39 30  |XFER";.r...S8.90|
00000E60: AA 32 35 AA 28 2E 36 35  30 AA 2E 39 38 30 29 AC  |.25.(.650..980).|
00000E70: 53 39 00 87 16 FA 0A 8B  53 42 B2 30 A7 53 38 B2  |S9......SB.0.S8.|
00000E80: 53 38 AC 31 2E 32 35 00  97 16 04 0B 53 37 B2 B5  |S8.1.25.....S7..|
00000E90: 28 53 38 AD 36 30 29 00  AE 16 0E 0B 99 53 37 22  |(S8.60)......S7"|
00000EA0: 3A 22 B5 28 53 38 AB 53  37 AC 36 30 29 3B 00 C2  |:".(S8.S7.60);..|
00000EB0: 16 18 0B 8B 53 42 B2 31  A7 97 35 33 32 36 35 2C  |....SB.1..53265,|
00000EC0: 31 31 00 C8 16 22 0B 8E  00 E1 16 B7 0B 8F 43 48  |11..."........CH|
00000ED0: 41 4E 47 45 20 44 49 53  4B 20 52 4F 55 54 49 4E  |ANGE DISK ROUTIN|
00000EE0: 45 00 EF 16 B8 0B 97 35  33 32 36 35 2C 32 37 00  |E......53265,27.|
00000EF0: 1C 17 C2 0B 8B 44 24 B2  22 44 22 A7 53 31 24 B2  |.....D$."D".S1$.|
00000F00: 22 44 45 53 54 49 4E 41  54 49 4F 4E 22 3A 97 35  |"DESTINATION":.5|
00000F10: 33 32 38 30 2C 32 3A 89  33 30 34 30 00 49 17 CC  |3280,2:.3040.I..|
00000F20: 0B 8B 44 24 B2 22 45 22  A7 53 31 24 B2 22 44 45  |..D$."E".S1$."DE|
00000F30: 53 54 49 4E 41 54 49 4F  4E 22 3A 97 35 33 32 38  |STINATION":.5328|
00000F40: 30 2C 32 3A 89 33 30 34  30 00 63 17 D6 0B 53 31  |0,2:.3040.c...S1|
00000F50: 24 B2 22 53 4F 55 52 43  45 22 3A 97 35 33 32 38  |$."SOURCE":.5328|
00000F60: 30 2C 35 00 A6 17 E0 0B  97 35 34 32 37 36 2C 33  |0,5......54276,3|
00000F70: 33 3A 97 35 34 32 39 36  2C 31 35 3A 99 22 13 11  |3:.54296,15:."..|
00000F80: 49 4E 53 45 52 54 20 22  3B 53 31 24 3B 22 20 44  |INSERT ";S1$;" D|
00000F90: 49 53 4B 2C 20 50 52 45  53 53 20 53 48 49 46 54  |ISK, PRESS SHIFT|
00000FA0: 20 92 BF 9D 22 3B 00 CB  17 EA 0B 97 32 30 34 2C  | ...";......204,|
00000FB0: 30 3A 92 36 35 33 2C 31  3A 97 35 34 32 37 36 2C  |0:.653,1:.54276,|
00000FC0: 33 32 3A 97 35 34 32 39  36 2C 30 00 DF 17 F4 0B  |32:.54296,0.....|
00000FD0: 8B 53 42 B2 31 A7 97 35  33 32 36 35 2C 31 31 00  |.SB.1..53265,11.|
00000FE0: F6 17 FE 0B 97 32 30 34  2C 31 3A 9F 32 2C 38 2C  |.....204,1:.2,8,|
00000FF0: 30 2C 22 24 30 22 00 0C  18 08 0C 8D 32 30 30 3A  |0,"$0"......200:|
00001000: 8B 44 24 B2 22 45 22 A7  A0 32 3A 8E 00 25 18 12  |.D$."E"..2:..%..|
00001010: 0C 8B 45 52 B1 30 A7 A0  32 3A 99 22 12 22 3B 3A  |..ER.0..2:.".";:|
00001020: 89 33 30 30 30 00 3B 18  1C 0C 81 4A B2 31 A4 32  |.3000.;....J.1.2|
00001030: 36 3A A1 23 32 2C 41 24  3A 82 4A 00 57 18 26 0C  |6:.#2,A$:.J.W.&.|
00001040: A1 23 32 2C 41 24 3A A1  23 32 2C 42 24 3A 49 52  |.#2,A$:.#2,B$:IR|
00001050: 24 B2 41 24 AA 42 24 00  7A 18 30 0C A1 23 32 2C  |$.A$.B$.z.0..#2,|
00001060: 41 24 3A A1 23 32 2C 41  24 3A A1 23 32 2C 42 24  |A$:.#2,A$:.#2,B$|
00001070: 3A 44 52 24 B2 41 24 AA  42 24 00 AD 18 3A 0C 99  |:DR$.A$.B$...:..|
00001080: 22 13 11 20 20 20 20 20  20 20 20 20 20 20 20 20  |"..             |
00001090: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000010A0: 20 20 20 20 20 20 20 20  20 20 20 22 3B 00 B6 18  |           ";...|
000010B0: 44 0C A0 32 3A 8E 00 CC  18 7F 0C 8F 20 47 45 54  |D..2:....... GET|
000010C0: 20 59 2F 4E 20 52 4F 55  54 49 4E 45 00 DB 18 80  | Y/N ROUTINE....|
000010D0: 0C 99 A3 33 37 29 22 BF  9D 22 3B 00 F6 18 8A 0C  |...37)"..";.....|
000010E0: 97 32 30 34 2C 30 3A A1  41 24 3A 8B 41 24 B2 22  |.204,0:.A$:.A$."|
000010F0: 22 A7 33 32 31 30 00 01  19 94 0C 97 32 30 34 2C  |".3210......204,|
00001100: 31 00 17 19 9E 0C 8B 41  24 B2 22 59 22 A7 99 22  |1......A$."Y".."|
00001110: 12 59 45 53 22 3A 8E 00  2C 19 A8 0C 8B 41 24 B2  |.YES":..,....A$.|
00001120: 22 4E 22 A7 99 22 12 4E  4F 22 3A 8E 00 36 19 B2  |"N"..".NO":..6..|
00001130: 0C 89 33 32 31 30 00 4A  19 0F 27 8F 20 41 42 4E  |..3210.J..'. ABN|
00001140: 4F 52 4D 41 4C 20 45 58  49 54 00 72 19 10 27 98  |ORMAL EXIT.r..'.|
00001150: 31 2C 22 55 4A 22 3A 97  35 35 2C 30 3A 97 35 36  |1,"UJ":.55,0:.56|
00001160: 2C 31 36 30 3A 9C 3A 97  35 33 32 36 35 2C 32 37  |,160:.:.53265,27|
00001170: 3A 90 00 BA 19 98 3A 83  35 36 2C 31 37 36 2C 33  |:.....:.56,176,3|
00001180: 2C 35 36 2C 31 37 36 2C  33 34 2C 31 36 32 2C 33  |,56,176,34,162,3|
00001190: 2C 33 32 2C 31 39 38 2C  32 35 35 2C 31 36 30 2C  |,32,198,255,160,|
000011A0: 30 2C 31 33 32 2C 33 2C  33 32 2C 32 30 37 2C 32  |0,132,3,32,207,2|
000011B0: 35 35 2C 31 32 30 2C 31  36 32 00 03 1A A2 3A 83  |55,120,162....:.|
000011C0: 35 32 2C 31 33 34 2C 31  2C 31 34 35 2C 33 2C 31  |52,134,1,145,3,1|
000011D0: 36 32 2C 35 35 2C 31 33  34 2C 31 2C 38 38 2C 31  |62,55,134,1,88,1|
000011E0: 36 35 2C 31 34 34 2C 32  30 38 2C 33 2C 32 30 30  |65,144,208,3,200|
000011F0: 2C 32 30 38 2C 32 33 34  2C 37 36 2C 32 30 34 2C  |,208,234,76,204,|
00001200: 32 35 35 00 49 1A AC 3A  83 31 36 32 2C 33 2C 33  |255.I..:.162,3,3|
00001210: 32 2C 32 30 31 2C 32 35  35 2C 31 36 30 2C 30 2C  |2,201,255,160,0,|
00001220: 31 33 32 2C 33 2C 31 32  30 2C 31 36 39 2C 35 32  |132,3,120,169,52|
00001230: 2C 31 33 33 2C 31 2C 31  37 37 2C 33 2C 31 36 32  |,133,1,177,3,162|
00001240: 2C 35 35 2C 31 33 34 2C  31 00 81 1A B6 3A 83 38  |,55,134,1....:.8|
00001250: 38 2C 33 32 2C 32 31 30  2C 32 35 35 2C 31 36 35  |8,32,210,255,165|
00001260: 2C 31 34 34 2C 32 30 38  2C 33 2C 32 30 30 2C 32  |,144,208,3,200,2|
00001270: 30 38 2C 32 33 34 2C 37  36 2C 32 30 34 2C 32 35  |08,234,76,204,25|
00001280: 35 00 00 2E                                       |5...            |

..&.D.. MOD FR 6/83 GAZETTE BY J RUBIN./
.N..700.C.G.. READ DISK ERR.[.H..1,ER,ER
$,E2%,E3%:..L.+.. READ BLOCK.Z.,..53280,
NU...6.C..:V.1107.S1.40.T1.J.@.. ADD SKI
P IF YOU HAVE PARALLEL IEEE INTERFACE HE
RE...J..1,"U1";3;.;T1;S1...T..200:.ER.0.
370...^.C.C.1:.C.3.330.9.H..V,ER:.J.(BB.
NU).256.(BB.NU).256.255:.J,.:.J:..J.R..1
,"B-P";3;..\.|..NU..0..V,127......996,B(
3):.997,B(4):.4,BB.NU:.MA......3,B(996):
.4,B(997)......ST....ST..64..200:.360...
....M.... WRITE BLOCK......53280,NU.....
C........U%....1,"B-A";.;T1;S1......1,"B
-P";3;..,....NU..0..1107.S1.40.T1,32.D.&
.. ADD SKIP IF YOU HAVE PARALLEL IEEE IN
TERFACE HERE...0..996,B(3):.997,B(4):.4,
BB.NU:.MA.3...:..3,B(996):.4,B(997).N.D.
.ST....ST..64.."IEEE WRITE"ST"":.10000..
.N..1,"U2";3;0;T1;S1...X..200:.ER.0.630.
..B.C.C.1:.C.3.590.@.L.."UNRECOVERABLE W
RITE ERROR"ER,ER$,E2%,E3%:.10000.F.V...Y
.... MAIN PROGRAM......I.828.901:.A:.I,A
:.:.".";:.53281,6:.53280,2:.0,47.I.F..I.
0.24:.54272.I,0:.:.54273,20:.54277,153:.
54278,153...P..55,0:.56,35:.:BB.35:N.220
:BA.BB.256:MA.828...Z..BM%(35,21):.J.0.7
:TA(J).2.J:..0....".BACKUP 1541"._...."'
GOTO10000' IF PROGRAM QUITS ABNORMALLY".
K....1,8,15.U....2000......".....DO YOU 
WANT TO BLANK THE SCREEN?";.C....3200:.A
$."Y".SB.1:.1,"UI-"... ..".......DO YOU 
WANT TO COPY .ALL 683. SECTORS?";...*..3
200:.A$."Y".DB.1./.4..".";:D$."S":.3000:
I2$.IR$.^.>..DR$.."2A"..".ILLEGAL DOS 1.
0 DISK":.10000...H..I2$.I1$..".SOURCE AN
D DESTINATION HAVE SAME ID CODE":.10000.
..R..2500...\..DB.TS.1:ES.35.X.F.T.TS:S.
0:NU.1:T1.T:S1.S...P..1,"I0":.3,8,3,"#".
..Z.U%.BM%(T1,S1):.U%..1.920.6....(U%.0)
.(DB.1)..300:NU.NU.1:.NU.N.930.G...S1.S1
.1:.890.D...S1..:T1.T1.1:.T1..TF.890.K..
. 3.....D$."D":.3000:A$."N":.I1$."".I1$.
IR$:A$."Y":.I1$.I2$.840.Z....A$."Y"..1,"
N0:"DN$:.200:.ER..0..ER,ER$:.10000......
IR$..I1$..".";:.940...J..1,"I0":.3,8,3,"
#"...T.NU.1:T1.T:S1.S.;...U%.BM%(T1,S1):
.U%..1.1020.F....(U%.0).(DB.1)..500:NU.N
U.1:.NU.N.1030.W...S1.S1.1:.990.....S1..
:T1.T1.1:.T1..TF.990..... 3.....S.S1.1:.
S.20.S..:T1.T1.1.L...T.T1:.T.TF.1080...$
.D$."S":.3000:.IR$..I2$..".";:.1060.....
NU.1:T1.T:S1.S:.880.%.8..53265,27:.1,"UI
+": 1.9.B..55,0:.56,160:..Z.L..53280,6:.
".BACKUP COMPLETE".|.V..1,8,0,"$0":.#1,A
$,B$:N$.G(0)...`..#1,A$,B$:.B$."".1160..
.J..#1,A$,B$:.F(A$.N$).256.F(B$.N$);.Z.T
..#1,A$:.A$..""..A$;:.1140...~..:.1120..
... 1:....O.. FORMAT DISK.'.P.."..DESTIN
ATION DISK NAME   ";DN$.A.Z..DN$."".."..
..":.2000.W....C(DN$).16..:.400.Z...F.0:
.J.1.C(DN$):S1$.J(DN$,J,1)......S1$."".S
1$.G(34).F.1......J:.F.."....":.2000.O..
.."..TOTALLY FORMAT THE DISK?";......320
0:.A$."N"..... .."UNIQUE DISK ID        
           ";I1$.(.*..I1$."".."..":.2080
.C.4..C(I1$)..2.."..":.2080.Z.>.D$."E":.
".";:.3000.J.H..ER..0.2160...R..54276,33
:.54296,15:.:."...ALREADY FORMATTED DISK
!!!".W.\.."..ARE YOU SURE???";:.3200:.54
276,32:.54296,....F..A$.."Y".2000...P..5
4276,32:.54296,0:.1,"N0:".DN$.",".I1$...
Z..200.2....ER..ER$:.10000.8.....F.C.. G
ET BAM.T.D.TS.1:TF...K.N..1,"I0":.3,8,3,
"#".T.X.S9.0......53281,1:.".";:.53281,6
.....NU.0:T1.18:S1.0:C0$.G(.):.300: 3...
...I.0.20:.1104.I.40,F(I(D(I),1)):......
.I.1.35:.1987.I,F(I(D(I),1)):.......5326
5,27:BY.4.#...T%.(BY.4).4.1.W....B(BA.BY
)....J...20:BM%(T%,J)..:.:BY.BY.4:.2640.
_.(.S.0...2.BY.BY.1:A0.B(BA.BY):.J...7:U
%.S:.U%.21.U%.21...7.BM%(T%,U%).A0.TA(J)
:S.S.1:....<..S.22.2610.K.F.BY.BY.1...P.
ES.21:.T%.17.ES.19...Z..T%.24.ES.18...D.
.T%.30.ES.17. .N..J.ES.21:BM%(T%,J)..1:.
.].X.SM..:.J...20:SL%.1107.J.40.T%:.SL%,
45:.BM%(T%,J)....2700.R...SM.SM.1:.SL%,1
60......:S9.S9.SM......T%..17.2750... ..
1907.T%,46:.1867.T%,46:.T%..24.2750.X...
.1827.T%,46:.T%..30.2750......1787.T%,46
......SM...TS.T%.TS.TS.1:.2770...H..SM..
..TF.T%.(.R..BY.143.2580.9....DB.1.S9.68
3.V...."."S9;"BLOCKS TO XFER";.R...S8.90
.25.(.650..980).S9......SB.0.S8.S8.1.25.
....S7..(S8.60)......S7":".(S8.S7.60);.B
....SB.1..53265,11.H."........CHANGE DIS
K ROUTINE......53265,27...B..D$."D".S1$.
"DESTINATION":.53280,2:.3040.I.L..D$."E"
.S1$."DESTINATION":.53280,2:.3040.C.V.S1
$."SOURCE":.53280,5......54276,33:.54296
,15:."..INSERT ";S1$;" DISK, PRESS SHIFT
 ...";.K....204,0:.653,1:.54276,32:.5429
6,0......SB.1..53265,11......204,1:.2,8,
0,"$0"......200:.D$."E". 2:..%....ER.0. 
2:.".";:.3000.;....J.1.26:.#2,A$:.J.W.&.
.#2,A$:.#2,B$:IR$.A$.B$.Z.0..#2,A$:.#2,A
$:.#2,B$:DR$.A$.B$...:.."..             
                           ";...D. 2:..L
... GET Y/N ROUTINE.......37)"..";.....
.204,0:.A$:.A$."".3210......204,1......A
$."Y"..".YES":..,....A$."N"..".NO":..6..
..3210.J..'. ABNORMAL EXIT.R..'.1,"UJ":.
55,0:.56,160:.:.53265,27:.....:.56,176,3
,56,176,34,162,3,32,198,255,160,0,132,3,
32,207,255,120,162....:.52,134,1,145,3,1
62,55,134,1,88,165,144,208,3,200,208,234
,76,204,255.I..:.162,3,32,201,255,160,0,
132,3,120,169,52,133,1,177,3,162,55,134,
1....:.88,32,210,255,165,144,208,3,200,2
08,234,76,204,255...

×

C64 Image

> CLICK IMAGE PREVIEW FOR FULL MODAL