TAPE<>DISK COPY

00000000: 01 08 09 08 01 00 89 31  30 00 27 08 02 00 3A 20  |.......10.'...: |
00000010: 20 20 20 20 20 20 20 54  41 50 45 AD 44 49 53 4B  |       TAPE.DISK|
00000020: 20 42 41 43 4B 55 50 00  44 08 03 00 3A 20 20 20  | BACKUP.D...:   |
00000030: 20 20 20 20 20 43 4F 4D  50 55 54 45 20 47 41 5A  |     COMPUTE GAZ|
00000040: 45 54 54 45 00 5C 08 04  00 3A 20 20 20 20 20 20  |ETTE.\...:      |
00000050: 20 20 20 20 50 41 47 45  20 31 36 34 00 74 08 05  |    PAGE 164.t..|
00000060: 00 3A 20 20 20 20 20 20  20 20 20 20 20 20 44 45  |.:            DE|
00000070: 43 2E 38 34 00 96 08 0A  00 9E 36 35 35 31 37 3A  |C.84......65517:|
00000080: 8B C2 28 37 38 31 29 B2  34 30 A7 4D 54 24 B2 22  |..(781).40.MT$."|
00000090: 05 22 3A 89 33 30 00 A2  08 14 00 4D 54 24 B2 22  |.":.30.....MT$."|
000000A0: 1F 22 00 B9 08 1E 00 8D  31 35 38 30 3A 8B 42 52  |."......1580:.BR|
000000B0: 24 B2 22 52 22 A7 34 35  30 00 CC 08 28 00 81 53  |$."R".450...(..S|
000000C0: 31 B2 4B 31 A4 4E 46 3A  8D 39 33 30 00 F1 08 32  |1.K1.NF:.930...2|
000000D0: 00 A1 23 46 50 2C 41 24  3A 41 24 B2 CA 28 41 24  |..#FP,A$:A$..(A$|
000000E0: AA 43 30 24 2C 4B 31 2C  4B 31 29 3A 5A 54 B2 53  |.C0$,K1,K1):ZT.S|
000000F0: 54 00 11 09 3C 00 42 4B  B2 42 4B AA 4B 31 3A 99  |T...<.BK.BK.K1:.|
00000100: 55 50 24 3B A3 31 37 29  3B 42 4B 3A 52 24 B2 22  |UP$;.17);BK:R$."|
00000110: 22 00 24 09 46 00 A1 49  24 3A 8B 49 24 B1 22 22  |".$.F..I$:.I$.""|
00000120: A7 33 33 30 00 3F 09 50  00 4C 42 24 B2 41 24 3A  |.330.?.P.LB$.A$:|
00000130: 4C 42 B2 C6 28 4C 42 24  29 3A 4E 45 B2 4B 31 00  |LB..(LB$):NE.K1.|
00000140: 56 09 5A 00 8B 5A 54 A7  8D 31 35 30 3A 8D 32 32  |V.Z..ZT..150:.22|
00000150: 30 3A 89 32 35 30 00 7B  09 64 00 A1 23 46 50 2C  |0:.250.{.d..#FP,|
00000160: 41 24 3A 41 24 B2 CA 28  41 24 AA 43 30 24 2C 4B  |A$:A$..(A$.C0$,K|
00000170: 31 2C 4B 31 29 3A 5A 54  B2 53 54 00 97 09 6E 00  |1,K1):ZT.ST...n.|
00000180: 8B C3 28 52 24 29 B1 43  4D A7 8D 31 35 30 3A 8D  |..(R$).CM..150:.|
00000190: 32 32 30 3A 89 36 30 00  A8 09 78 00 8B 4C 42 24  |220:.60...x..LB$|
000001A0: B3 B1 41 24 A7 31 34 30  00 C1 09 82 00 8B 4E 45  |..A$.140......NE|
000001B0: B3 32 35 30 A7 4E 45 B2  4E 45 AA 4B 31 3A 89 39  |.250.NE.NE.K1:.9|
000001C0: 30 00 CE 09 8C 00 8D 31  35 30 3A 89 38 30 00 DD  |0......150:.80..|
000001D0: 09 96 00 8B 4E 45 B1 4B  31 A7 31 39 30 00 F4 09  |....NE.K1.190...|
000001E0: A0 00 8B 4C 42 B3 43 53  A7 52 24 B2 52 24 AA 4C  |...LB.CS.R$.R$.L|
000001F0: 42 24 3A 8E 00 1A 0A AA  00 8B 4C 42 B3 32 33 33  |B$:.......LB.233|
00000200: B0 4C 42 B2 32 34 35 A7  52 24 B2 52 24 AA C7 28  |.LB.245.R$.R$..(|
00000210: 32 33 30 29 AA 4C 42 24  3A 8E 00 2A 0A B4 00 52  |230).LB$:..*...R|
00000220: 24 B2 52 24 AA 4C 42 24  3A 8E 00 47 0A BE 00 8B  |$.R$.LB$:..G....|
00000230: 4C 42 B2 53 50 A7 52 24  B2 52 24 AA 43 53 24 AA  |LB.SP.R$.R$.CS$.|
00000240: C7 28 4E 45 29 3A 8E 00  67 0A C8 00 8B 4C 42 B2  |.(NE):..g....LB.|
00000250: 44 41 A7 52 24 B2 52 24  AA C7 28 32 34 35 29 AA  |DA.R$.R$..(245).|
00000260: C7 28 4E 45 29 3A 8E 00  84 0A D2 00 52 24 B2 52  |.(NE):......R$.R|
00000270: 24 AA C7 28 32 33 31 29  AA C7 28 4E 45 29 AA 4C  |$..(231)..(NE).L|
00000280: 42 24 3A 8E 00 9D 0A DC  00 4C 24 B2 CA 28 C4 28  |B$:......L$..(.(|
00000290: C3 28 52 24 29 AA 4B 34  29 2C 4B 32 29 00 BC 0A  |.(R$).K4),K2)...|
000002A0: E6 00 98 31 2C CA 28 4C  24 AA 53 50 24 2C 4B 31  |...1,.(L$.SP$,K1|
000002B0: 2C 4B 33 29 3B 22 44 22  3B 52 24 3B 00 D0 0A F0  |,K3);"D";R$;....|
000002C0: 00 4E 42 B2 4E 42 AA C3  28 52 24 29 AA 34 3A 8E  |.NB.NB..(R$).4:.|
000002D0: 00 E6 0A FA 00 8D 34 31  30 3A 99 55 50 24 3B A3  |......410:.UP$;.|
000002E0: 33 30 29 3B 4E 42 00 F4  0A 04 01 8D 32 34 39 30  |30);NB......2490|
000002F0: 3A A0 46 50 00 FC 0A 0E  01 82 53 31 00 1F 0B 18  |:.FP......S1....|
00000300: 01 99 22 54 4F 20 52 45  53 54 4F 52 45 20 46 49  |.."TO RESTORE FI|
00000310: 4C 45 53 20 4C 4F 41 44  20 54 48 49 53 22 3B 00  |LES LOAD THIS";.|
00000320: 44 0B 22 01 99 22 20 50  52 4F 47 52 41 4D 20 46  |D.".." PROGRAM F|
00000330: 52 4F 4D 20 54 48 45 20  42 41 43 4B 55 50 20 54  |ROM THE BACKUP T|
00000340: 41 50 45 22 00 4D 0B 2C  01 8D 38 36 30 00 5D 0B  |APE".M.,..860.].|
00000350: 36 01 81 53 4C B2 4B 31  A4 32 30 3A 82 00 67 0B  |6..SL.K1.20:..g.|
00000360: 40 01 89 32 34 38 30 00  85 0B 4A 01 99 22 51 20  |@..2480...J.."Q |
00000370: 51 55 49 54 2C 20 53 50  41 43 45 20 43 4F 4E 54  |QUIT, SPACE CONT|
00000380: 49 4E 55 45 22 00 98 0B  54 01 A1 49 24 3A 8B 49  |INUE"...T..I$:.I|
00000390: 24 B2 22 22 A7 33 34 30  00 A9 0B 5E 01 8B 49 24  |$."".340...^..I$|
000003A0: B3 B1 22 51 22 A7 33 37  30 00 C4 0B 68 01 A0 46  |.."Q".370...h..F|
000003B0: 50 3A 41 4E 24 B2 22 41  22 3A 8D 34 31 30 3A 89  |P:AN$."A":.410:.|
000003C0: 32 34 38 30 00 E9 0B 72  01 99 55 50 24 22 20 20  |2480...r..UP$"  |
000003D0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000003E0: 20 20 20 20 20 22 55 50  24 00 0D 0C 7C 01 99 C7  |     "UP$...|...|
000003F0: 28 31 38 29 22 50 20 54  4F 20 50 41 55 53 45 22  |(18)"P TO PAUSE"|
00000400: C7 28 31 34 36 29 55 50  24 3A 89 38 30 00 4B 0C  |.(146)UP$:.80.K.|
00000410: 86 01 98 31 2C 22 30 32  34 46 22 3B CA 28 4E 41  |...1,"024F";.(NA|
00000420: 24 AA 53 50 24 2C 4B 31  2C 31 36 29 3B CA 28 54  |$.SP$,K1,16);.(T|
00000430: 59 24 2C 4B 31 2C 4B 31  29 3B CA 28 4C 4E 24 AA  |Y$,K1,K1);.(LN$.|
00000440: 53 50 24 2C 4B 31 2C 4B  33 29 3B 00 5A 0C 90 01  |SP$,K1,K3);.Z...|
00000450: 4E 42 B2 4E 42 AA 32 34  3A 8E 00 89 0C 9A 01 98  |NB.NB.24:.......|
00000460: 31 2C 22 30 30 35 45 22  3B 41 4E 24 3A 4E 42 B2  |1,"005E";AN$:NB.|
00000470: 4E 42 AA 38 3A 98 31 2C  43 30 24 3B 43 30 24 3B  |NB.8:.1,C0$;C0$;|
00000480: 43 30 24 3B 3A A0 31 3A  8E 00 97 0C A4 01 45 4E  |C0$;:.1:......EN|
00000490: B2 C3 28 44 54 24 29 00  B2 0C AE 01 8B C6 28 CA  |..(DT$).......(.|
000004A0: 28 44 54 24 2C 45 4E 2C  31 29 29 B3 B1 31 36 30  |(DT$,EN,1))..160|
000004B0: A7 8E 00 CC 0C B8 01 44  54 24 B2 C8 28 44 54 24  |.......DT$..(DT$|
000004C0: 2C 45 4E AB 4B 31 29 3A  89 34 32 30 00 D6 0C C2  |,EN.K1):.420....|
000004D0: 01 8D 31 31 31 30 00 E4  0C CC 01 81 53 31 B2 4B  |..1110......S1.K|
000004E0: 31 A4 4E 46 00 06 0D D6  01 42 4B B2 4B 30 3A 4E  |1.NF.....BK.K0:N|
000004F0: 41 24 B2 4E 41 24 28 53  31 29 3A 54 59 24 B2 54  |A$.NA$(S1):TY$.T|
00000500: 59 24 28 53 31 29 00 20  0D E0 01 9F 31 2C 31 2C  |Y$(S1). ....1,1,|
00000510: 30 3A 4E 42 B2 4E 42 AA  33 30 30 3A 8D 38 34 30  |0:NB.NB.300:.840|
00000520: 00 49 0D EA 01 46 4D 24  B2 22 22 3A 99 3A 99 55  |.I...FM$."":.:.U|
00000530: 50 24 C7 28 31 38 29 22  20 46 4F 55 4E 44 22 C7  |P$.(18)" FOUND".|
00000540: 28 31 34 36 29 22 20 22  3B 00 5F 0D F4 01 8B 52  |(146)" ";._....R|
00000550: 43 24 B3 B1 22 46 22 A7  A0 31 3A 89 34 38 30 00  |C$.."F"..1:.480.|
00000560: 80 0D FE 01 81 58 B2 4B  31 A4 31 36 3A A1 23 31  |.....X.K1.16:.#1|
00000570: 2C 49 24 3A 46 4D 24 B2  46 4D 24 AA 49 24 3A 82  |,I$:FM$.FM$.I$:.|
00000580: 00 99 0D 08 02 99 46 4D  24 3A A1 23 31 2C 41 24  |......FM$:.#1,A$|
00000590: 2C 41 24 2C 41 24 2C 41  24 00 AA 0D 12 02 8B 46  |,A$,A$,A$......F|
000005A0: 4D 24 B2 4E 41 24 A7 35  38 30 00 CA 0D 1C 02 8D  |M$.NA$.580......|
000005B0: 38 34 30 3A 8B 52 43 24  B2 22 4E 22 A7 A0 31 3A  |840:.RC$."N"..1:|
000005C0: 8D 31 35 32 30 3A 89 34  38 30 00 F2 0D 26 02 4E  |.1520:.480...&.N|
000005D0: 42 B2 4E 42 AA 4C 4E 3A  81 58 B2 4B 31 A4 4C 4E  |B.NB.LN:.X.K1.LN|
000005E0: AB 4B 34 3A A1 23 4B 31  2C 41 24 3A 82 3A 8D 34  |.K4:.#K1,A$:.:.4|
000005F0: 38 30 00 03 0E 30 02 8B  52 43 24 B2 22 44 22 A7  |80...0..RC$."D".|
00000600: 35 35 30 00 0F 0E 3A 02  A0 31 3A 89 34 38 30 00  |550...:..1:.480.|
00000610: 45 0E 44 02 58 B2 C3 28  4E 41 24 29 3A 8B CA 28  |E.D.X..(NA$):..(|
00000620: 4E 41 24 2C 58 2C 4B 31  29 B2 22 20 22 A7 4E 41  |NA$,X,K1)." ".NA|
00000630: 24 B2 CA 28 4E 41 24 2C  4B 31 2C 58 AB 4B 31 29  |$..(NA$,K1,X.K1)|
00000640: 3A 89 35 38 30 00 69 0E  4E 02 9F 46 50 2C 38 2C  |:.580.i.N..FP,8,|
00000650: 46 50 2C 22 40 30 3A 22  AA 4E 41 24 AA 43 4F 24  |FP,"@0:".NA$.CO$|
00000660: AA 54 59 24 AA 22 2C 57  22 00 7F 0E 58 02 8D 38  |.TY$.",W"...X..8|
00000670: 34 30 3A 8B 52 43 24 B2  22 44 22 A7 36 34 30 00  |40:.RC$."D".640.|
00000680: 90 0E 62 02 8B 52 43 24  B2 22 45 22 A7 37 36 30  |..b..RC$."E".760|
00000690: 00 A8 0E 6C 02 8B 52 43  24 B2 22 4E 22 A7 8D 31  |...l..RC$."N"..1|
000006A0: 35 31 30 3A 89 34 37 30  00 C6 0E 76 02 99 22 20  |510:.470...v.." |
000006B0: 45 58 50 45 43 54 45 44  20 44 20 4F 52 20 45 22  |EXPECTED D OR E"|
000006C0: 3A 89 32 34 38 30 00 E0  0E 80 02 42 4B B2 42 4B  |:.2480.....BK.BK|
000006D0: AA 4B 31 3A 99 55 50 24  3B A3 32 34 29 3B 42 4B  |.K1:.UP$;.24);BK|
000006E0: 00 E8 0E 8A 02 4C B2 30  00 00 0F 94 02 4C B2 4C  |.....L.0.....L.L|
000006F0: AA 4B 31 3A 8B 4C B1 4C  4E AB 4B 34 A7 36 30 30  |.K1:.L.LN.K4.600|
00000700: 00 26 0F 9E 02 A1 23 31  2C 41 24 3A 41 24 B2 CA  |.&....#1,A$:A$..|
00000710: 28 41 24 AA 43 30 24 2C  4B 31 2C 4B 31 29 3A 41  |(A$.C0$,K1,K1):A|
00000720: B2 C6 28 41 24 29 00 3E  0F A8 02 8B 41 B3 32 33  |..(A$).>....A.23|
00000730: 30 A7 98 46 50 2C 41 24  3B 3A 89 36 36 30 00 77  |0..FP,A$;:.660.w|
00000740: 0F B2 02 8B 41 B2 32 33  30 A7 A1 23 31 2C 41 24  |....A.230..#1,A$|
00000750: 3A 4C B2 4C AA 4B 31 3A  41 24 B2 CA 28 41 24 AA  |:L.L.K1:A$..(A$.|
00000760: 43 30 24 2C 4B 31 2C 4B  31 29 3A 98 46 50 2C 41  |C0$,K1,K1):.FP,A|
00000770: 24 3B 3A 89 36 36 30 00  86 0F BC 02 8B 41 B2 32  |$;:.660......A.2|
00000780: 33 31 A7 37 33 30 00 9B  0F C6 02 8B 41 B2 32 33  |31.730......A.23|
00000790: 32 B0 41 B2 32 34 35 A7  37 35 30 00 AC 0F D0 02  |2.A.245.750.....|
000007A0: 98 46 50 2C 41 24 3B 3A  89 36 36 30 00 D7 0F DA  |.FP,A$;:.660....|
000007B0: 02 A1 23 31 2C 41 24 2C  41 31 24 3A 4C B2 4C AA  |..#1,A$,A1$:L.L.|
000007C0: 4B 32 3A 41 31 24 B2 CA  28 41 31 24 AA 43 30 24  |K2:A1$..(A1$.C0$|
000007D0: 2C 4B 31 2C 4B 31 29 00  F7 0F E4 02 81 58 B2 4B  |,K1,K1)......X.K|
000007E0: 31 A4 C6 28 41 24 29 3A  98 46 50 2C 41 31 24 3B  |1..(A$):.FP,A1$;|
000007F0: 3A 82 3A 89 36 36 30 00  2C 10 EE 02 A1 23 31 2C  |:.:.660.,....#1,|
00000800: 41 31 24 3A 4C B2 4C AA  4B 31 3A 81 58 B2 4B 31  |A1$:L.L.K1:.X.K1|
00000810: A4 C6 28 41 31 24 29 3A  98 46 50 2C C7 28 41 AB  |..(A1$):.FP,.(A.|
00000820: 32 30 30 29 3B 3A 82 3A  89 36 36 30 00 3D 10 F8  |200);:.:.660.=..|
00000830: 02 8D 32 34 39 30 3A A0  31 3A A0 46 50 00 4E 10  |..2490:.1:.FP.N.|
00000840: 02 03 8B 41 24 B3 B1 22  41 22 A7 38 32 30 00 70  |...A$.."A".820.p|
00000850: 10 0C 03 99 22 20 46 49  4C 45 27 22 4E 41 24 22  |...." FILE'"NA$"|
00000860: 27 20 49 53 20 49 4E 43  4F 4D 50 4C 45 54 45 22  |' IS INCOMPLETE"|
00000870: 00 94 10 16 03 99 22 51  20 54 4F 20 51 55 49 54  |......"Q TO QUIT|
00000880: 2C 20 53 50 41 43 45 20  54 4F 20 43 4F 4E 54 49  |, SPACE TO CONTI|
00000890: 4E 55 45 22 00 A7 10 20  03 A1 41 24 3A 8B 41 24  |NUE"... ..A$:.A$|
000008A0: B2 22 22 A7 38 30 30 00  B8 10 2A 03 8B 41 24 B2  |."".800...*..A$.|
000008B0: 22 51 22 A7 32 34 38 30  00 C5 10 34 03 82 53 31  |"Q".2480...4..S1|
000008C0: 3A 8D 38 36 30 00 DB 10  3E 03 81 53 4C B2 4B 31  |:.860...>..SL.K1|
000008D0: A4 32 30 3A 82 3A 89 32  34 38 30 00 F3 10 48 03  |.20:.:.2480...H.|
000008E0: A1 23 31 2C 4C 31 24 2C  4C 32 24 2C 4C 33 24 2C  |.#1,L1$,L2$,L3$,|
000008F0: 52 43 24 00 14 11 52 03  4C 4E B2 C5 28 4C 31 24  |RC$...R.LN..(L1$|
00000900: AA 4C 32 24 AA 4C 33 24  29 3A 4E 42 B2 4E 42 AA  |.L2$.L3$):NB.NB.|
00000910: 4C 4E 3A 8E 00 43 11 5C  03 54 54 B2 C5 28 CA 28  |LN:..C.\.TT..(.(|
00000920: 54 49 24 2C 4B 31 2C 4B  32 29 29 AC 33 36 30 30  |TI$,K1,K2)).3600|
00000930: AA C5 28 CA 28 54 49 24  2C 4B 33 2C 4B 32 29 29  |..(.(TI$,K3,K2))|
00000940: AC 36 30 00 64 11 66 03  54 54 B2 54 54 AA B5 28  |.60.d.f.TT.TT..(|
00000950: 4E 42 AD 32 35 29 3A 48  48 B2 B5 28 54 54 AD 33  |NB.25):HH..(TT.3|
00000960: 36 30 30 29 00 7E 11 70  03 4D 4D B2 B5 28 28 54  |600).~.p.MM..((T|
00000970: 54 AB 48 48 AC 33 36 30  30 29 AD 36 30 29 00 A7  |T.HH.3600).60)..|
00000980: 11 7A 03 48 48 24 B2 CA  28 C4 28 48 48 29 2C 32  |.z.HH$..(.(HH),2|
00000990: 29 3A 8B C3 28 48 48 24  29 B3 32 A7 48 48 24 B2  |):..(HH$).2.HH$.|
000009A0: 22 30 22 AA 48 48 24 00  D0 11 84 03 4D 4D 24 B2  |"0".HH$.....MM$.|
000009B0: CA 28 C4 28 4D 4D 29 2C  32 29 3A 8B C3 28 4D 4D  |.(.(MM),2):..(MM|
000009C0: 24 29 B3 32 A7 4D 4D 24  B2 22 30 22 AA 4D 4D 24  |$).2.MM$."0".MM$|
000009D0: 00 FC 11 8E 03 54 49 24  B2 48 48 24 AA 4D 4D 24  |.....TI$.HH$.MM$|
000009E0: AA 22 30 30 22 3A 99 22  45 53 54 49 4D 41 54 45  |."00":."ESTIMATE|
000009F0: 44 20 54 49 4D 45 3D 22  3B 54 49 24 00 02 12 98  |D TIME=";TI$....|
00000A00: 03 8E 00 1E 12 A2 03 4E  41 24 B2 4E 41 24 28 53  |.......NA$.NA$(S|
00000A10: 31 29 3A 54 59 24 B2 54  59 24 28 53 31 29 00 3F  |1):TY$.TY$(S1).?|
00000A20: 12 AC 03 8B 4E 42 AA 4C  4E 28 53 31 29 AC 28 42  |....NB.LN(S1).(B|
00000A30: 44 AA 35 29 AA 42 48 B3  54 42 A7 31 30 35 30 00  |D.5).BH.TB.1050.|
00000A40: 53 12 B6 03 9F 31 2C 31  2C 31 2C 4E 41 24 3A 8D  |S....1,1,1,NA$:.|
00000A50: 33 39 30 00 65 12 C0 03  98 31 2C 22 30 30 34 4E  |390.e....1,"004N|
00000A60: 22 3B 3A A0 31 00 83 12  CA 03 99 22 20 4C 4F 41  |";:.1......" LOA|
00000A70: 44 20 41 4E 4F 54 48 45  52 20 43 41 53 53 45 54  |D ANOTHER CASSET|
00000A80: 54 45 22 00 9D 12 D4 03  99 22 20 20 20 54 59 50  |TE"......"   TYP|
00000A90: 45 20 51 20 54 4F 20 51  55 49 54 2C 22 00 B8 12  |E Q TO QUIT,"...|
00000AA0: DE 03 99 22 20 20 53 50  41 43 45 20 54 4F 20 43  |..."  SPACE TO C|
00000AB0: 4F 4E 54 49 4E 55 45 22  00 CC 12 E8 03 A1 41 24  |ONTINUE"......A$|
00000AC0: 3A 8B 41 24 B2 22 22 A7  31 30 30 30 00 DD 12 F2  |:.A$."".1000....|
00000AD0: 03 8B 41 24 B2 22 51 22  A7 32 34 38 30 00 0D 13  |..A$."Q".2480...|
00000AE0: FC 03 99 22 20 54 41 50  45 20 53 49 5A 45 20 28  |..." TAPE SIZE (|
00000AF0: 4D 49 4E 29 20 22 3B 54  4D 3B CA 28 42 53 24 2C  |MIN) ";TM;.(BS$,|
00000B00: 31 2C C3 28 C4 28 54 4D  29 29 AA 32 29 00 28 13  |1,.(.(TM)).2).(.|
00000B10: 06 04 85 54 4D 24 3A 8B  54 4D 24 B2 22 22 A7 54  |...TM$:.TM$."".T|
00000B20: 4D 24 B2 C4 28 54 4D 29  00 44 13 10 04 54 42 B2  |M$..(TM).D...TB.|
00000B30: C5 28 54 4D 24 29 AC 42  4D 3A 8D 38 36 30 3A 4E  |.(TM$).BM:.860:N|
00000B40: 42 B2 4B 30 00 51 13 1A  04 99 53 50 24 3B 43 52  |B.K0.Q....SP$;CR|
00000B50: 24 00 72 13 24 04 99 22  20 20 20 20 91 12 50 20  |$.r.$.."    ..P |
00000B60: 54 4F 20 50 41 55 53 45  92 22 3A 99 55 50 24 55  |TO PAUSE.":.UP$U|
00000B70: 50 24 00 81 13 2E 04 99  4E 41 24 3A 42 4B B2 4B  |P$......NA$:BK.K|
00000B80: 30 00 99 13 38 04 4C 4E  24 B2 CA 28 C4 28 4C 4E  |0...8.LN$..(.(LN|
00000B90: 28 53 31 29 29 2C 4B 32  29 00 BC 13 42 04 9F 46  |(S1)),K2)...B..F|
00000BA0: 50 2C 38 2C 46 50 2C 22  30 3A 22 AA 4E 41 24 AA  |P,8,FP,"0:".NA$.|
00000BB0: 43 4F 24 AA 54 59 24 AA  22 2C 52 22 00 DB 13 4C  |CO$.TY$.",R"...L|
00000BC0: 04 9F 31 2C 31 2C 31 2C  4E 41 24 3A 4E 42 B2 4E  |..1,1,1,NA$:NB.N|
00000BD0: 42 AA 42 48 3A 8D 33 39  30 3A 8E 00 F9 13 56 04  |B.BH:.390:....V.|
00000BE0: 99 22 11 20 46 4F 52 4D  41 54 20 44 49 53 4B 20  |.". FORMAT DISK |
00000BF0: 28 4E 20 4F 52 20 59 29  22 00 05 14 60 04 85 22  |(N OR Y)"...`.."|
00000C00: 20 22 3B 41 24 00 17 14  6A 04 8B 41 24 B3 B1 22  | ";A$...j..A$.."|
00000C10: 59 22 A7 31 32 30 30 00  32 14 74 04 4E 44 24 B2  |Y".1200.2.t.ND$.|
00000C20: 22 22 3A 99 22 11 20 44  49 53 4B 20 4E 41 4D 45  |"":.". DISK NAME|
00000C30: 22 3B 00 48 14 7E 04 85  4E 44 24 3A 8B 4E 44 24  |";.H.~..ND$:.ND$|
00000C40: B2 22 22 A7 31 32 30 30  00 62 14 88 04 49 44 24  |."".1200.b...ID$|
00000C50: B2 22 22 3A 99 22 20 44  49 53 4B 20 49 44 20 20  |."":." DISK ID  |
00000C60: 22 3B 00 78 14 92 04 85  49 44 24 3A 8B 49 44 24  |";.x....ID$:.ID$|
00000C70: B2 22 22 A7 31 32 30 30  00 92 14 9C 04 98 31 35  |."".1200......15|
00000C80: 2C 22 4E 30 3A 22 3B 4E  44 24 3B 22 2C 22 3B 49  |,"N0:";ND$;",";I|
00000C90: 44 24 00 A5 14 A6 04 8D  32 34 39 30 3A 8B 45 31  |D$......2490:.E1|
00000CA0: A7 32 34 39 30 00 BE 14  B0 04 99 22 20 4F 50 45  |.2490......" OPE|
00000CB0: 4E 20 44 54 42 2E 49 44  2E 46 49 4C 45 22 00 D7  |N DTB.ID.FILE"..|
00000CC0: 14 BA 04 9F 31 2C 31 2C  30 2C 22 44 54 42 2E 49  |....1,1,0,"DTB.I|
00000CD0: 44 2E 46 49 4C 45 22 00  E5 14 C4 04 4E 42 B2 4E  |D.FILE".....NB.N|
00000CE0: 42 AA 33 30 30 00 EE 14  CE 04 8D 38 34 30 00 F9  |B.300......840..|
00000CF0: 14 D8 04 A1 23 31 2C 41  24 00 1E 15 E2 04 8B 41  |....#1,A$......A|
00000D00: 24 B3 B1 56 4E 24 A7 99  22 20 56 45 52 53 49 4F  |$..VN$.." VERSIO|
00000D10: 4E 20 45 52 52 4F 52 22  3A 89 32 34 38 30 00 34  |N ERROR":.2480.4|
00000D20: 15 EC 04 99 22 93 11 20  46 52 4F 4D 20 44 49 53  |....".. FROM DIS|
00000D30: 4B 3A 22 3B 00 4E 15 F6  04 81 58 B2 31 A4 32 30  |K:";.N....X.1.20|
00000D40: 3A A1 23 31 2C 41 24 3A  99 41 24 3B 3A 82 00 6C  |:.#1,A$:.A$;:..l|
00000D50: 15 00 05 99 3A 99 22 42  41 43 4B 45 44 20 55 50  |....:."BACKED UP|
00000D60: 20 4F 4E 20 20 44 41 54  45 3A 22 3B 00 85 15 0A  | ON  DATE:";....|
00000D70: 05 81 58 B2 31 A4 38 3A  A1 23 31 2C 41 24 3A 99  |..X.1.8:.#1,A$:.|
00000D80: 41 24 3B 3A 82 00 93 15  14 05 99 22 20 54 49 4D  |A$;:......." TIM|
00000D90: 45 22 3B 00 AC 15 1E 05  81 58 B2 31 A4 36 3A A1  |E";......X.1.6:.|
00000DA0: 23 31 2C 41 24 3A 99 41  24 3B 3A 82 00 B2 15 28  |#1,A$:.A$;:....(|
00000DB0: 05 99 00 BB 15 32 05 4E  46 B2 30 00 C4 15 3C 05  |.....2.NF.0...<.|
00000DC0: 8D 38 34 30 00 D6 15 46  05 8B 52 43 24 B2 22 46  |.840...F..RC$."F|
00000DD0: 22 A7 31 33 38 30 00 E8  15 50 05 8B 52 43 24 B2  |".1380...P..RC$.|
00000DE0: 22 45 22 A7 A0 31 3A 8E  00 03 16 5A 05 99 22 20  |"E"..1:....Z.." |
00000DF0: 52 45 43 20 43 44 20 45  52 52 4F 52 22 3A 89 32  |REC CD ERROR":.2|
00000E00: 34 38 30 00 22 16 64 05  4E 41 24 B2 22 22 3A 81  |480.".d.NA$."":.|
00000E10: 58 B2 31 A4 31 36 3A A1  23 31 2C 41 24 3A 99 41  |X.1.16:.#1,A$:.A|
00000E20: 24 3B 00 33 16 6E 05 4E  41 24 B2 4E 41 24 AA 41  |$;.3.n.NA$.NA$.A|
00000E30: 24 3A 82 00 4B 16 78 05  A1 23 31 2C 54 59 24 3A  |$:..K.x..#1,TY$:|
00000E40: 99 22 20 22 54 59 24 22  20 22 3B 00 6B 16 82 05  |." "TY$" ";.k...|
00000E50: A1 23 31 2C 41 24 2C 41  32 24 2C 41 33 24 3A 99  |.#1,A$,A2$,A3$:.|
00000E60: 41 24 3B 41 32 24 3B 41  33 24 3B 00 7F 16 8C 05  |A$;A2$;A3$;.....|
00000E70: 99 3A 8B 41 46 24 B2 22  59 22 A7 31 34 38 30 00  |.:.AF$."Y".1480.|
00000E80: 98 16 96 05 99 55 50 24  3A 99 22 42 4B 55 50 20  |.....UP$:."BKUP |
00000E90: 59 20 4F 52 20 4E 22 3B  00 A8 16 A0 05 59 4E 24  |Y OR N";.....YN$|
00000EA0: B2 22 22 3A 85 59 4E 24  00 C7 16 AA 05 8B CA 28  |."":.YN$.......(|
00000EB0: 59 4E 24 AA 22 59 22 2C  4B 31 2C 4B 31 29 B2 22  |YN$."Y",K1,K1)."|
00000EC0: 59 22 A7 31 34 38 30 00  D9 16 B4 05 8B 59 4E 24  |Y".1480......YN$|
00000ED0: B2 22 4E 22 A7 31 33 34  30 00 E3 16 BE 05 89 31  |."N".1340......1|
00000EE0: 34 33 30 00 F0 16 C8 05  4E 46 B2 4E 46 AA 4B 31  |430.....NF.NF.K1|
00000EF0: 00 12 17 D2 05 4E 41 24  28 4E 46 29 B2 4E 41 24  |.....NA$(NF).NA$|
00000F00: 3A 54 59 24 28 4E 46 29  B2 54 59 24 3A 89 31 33  |:TY$(NF).TY$:.13|
00000F10: 34 30 00 18 17 DC 05 8E  00 23 17 E6 05 A0 46 50  |40.......#....FP|
00000F20: 3A A0 31 00 42 17 F0 05  99 22 20 4C 4F 41 44 20  |:.1.B...." LOAD |
00000F30: 43 4F 4E 54 49 4E 55 41  54 49 4F 4E 20 54 41 50  |CONTINUATION TAP|
00000F40: 45 22 00 59 17 FA 05 99  22 20 54 59 50 45 20 51  |E".Y...." TYPE Q|
00000F50: 20 54 4F 20 51 55 49 54  22 00 78 17 04 06 99 22  | TO QUIT".x...."|
00000F60: 20 20 20 20 20 20 53 50  41 43 45 20 54 4F 20 43  |      SPACE TO C|
00000F70: 4F 4E 54 49 4E 55 45 22  00 8C 17 0E 06 A1 41 24  |ONTINUE"......A$|
00000F80: 3A 8B 41 24 B2 22 22 A7  31 35 35 30 00 9D 17 18  |:.A$."".1550....|
00000F90: 06 8B 41 24 B2 22 51 22  A7 32 34 38 30 00 AD 17  |..A$."Q".2480...|
00000FA0: 22 06 8D 38 36 30 3A 4E  42 B2 30 3A 8E 00 D2 17  |"..860:NB.0:....|
00000FB0: 2C 06 86 4C 4E 28 31 35  30 29 2C 4E 41 24 28 31  |,..LN(150),NA$(1|
00000FC0: 35 30 29 2C 54 24 28 34  29 2C 54 59 24 28 31 35  |50),T$(4),TY$(15|
00000FD0: 30 29 00 18 18 36 06 42  48 B2 33 30 30 3A 42 44  |0)...6.BH.300:BD|
00000FE0: B2 32 35 36 3A 42 4B B2  30 3A 42 4D B2 38 34 30  |.256:BK.0:BM.840|
00000FF0: 3A 42 4F B2 35 33 32 38  30 3A 43 4D B2 32 35 30  |:BO.53280:CM.250|
00001000: 3A 43 53 B2 32 33 30 3A  44 41 B2 34 35 3A 44 49  |:CS.230:DA.45:DI|
00001010: 52 B2 38 3A 46 50 B2 35  00 35 18 40 06 4B 30 B2  |R.8:FP.5.5.@.K0.|
00001020: 30 3A 4B 31 B2 31 3A 4B  32 B2 32 3A 4B 33 B2 33  |0:K1.1:K2.2:K3.3|
00001030: 3A 4B 34 B2 34 00 66 18  4A 06 4E 42 B2 30 3A 4E  |:K4.4.f.J.NB.0:N|
00001040: 43 B2 30 3A 4E 45 B2 30  3A 4E 46 B2 30 3A 50 53  |C.0:NE.0:NF.0:PS|
00001050: B2 38 30 30 30 3A 53 50  B2 33 32 3A 54 42 B2 30  |.8000:SP.32:TB.0|
00001060: 3A 54 4D B2 36 30 00 99  18 54 06 41 46 24 B2 22  |:TM.60...T.AF$."|
00001070: 22 3A 41 4E 24 B2 22 4E  22 3A 42 52 24 B2 22 22  |":AN$."N":BR$.""|
00001080: 3A 81 58 B2 31 A4 34 30  3A 42 53 24 B2 42 53 24  |:.X.1.40:BS$.BS$|
00001090: AA C7 28 31 35 37 29 3A  82 00 C0 18 5E 06 43 30  |..(157):....^.C0|
000010A0: 24 B2 C7 28 30 29 3A 43  42 24 B2 22 22 3A 43 4F  |$..(0):CB$."":CO|
000010B0: 24 B2 22 2C 22 3A 43 53  24 B2 C7 28 32 33 32 29  |$.",":CS$..(232)|
000010C0: 00 0B 19 68 06 44 41 24  B2 22 22 3A 44 4E 24 B2  |...h.DA$."":DN$.|
000010D0: 22 22 3A 46 4D 24 B2 22  22 3A 52 43 24 B2 22 22  |"":FM$."":RC$.""|
000010E0: 3A 53 50 24 B2 22 20 20  20 20 20 20 20 20 20 22  |:SP$."         "|
000010F0: 3A 53 50 24 B2 53 50 24  AA 53 50 24 AA 53 50 24  |:SP$.SP$.SP$.SP$|
00001100: 3A 55 50 24 B2 C7 28 31  34 35 29 00 17 19 72 06  |:UP$..(145)...r.|
00001110: 56 4E 24 B2 22 32 22 00  2A 19 7C 06 9F 31 35 2C  |VN$."2".*.|..15,|
00001120: 38 2C 31 35 3A 97 42 4F  2C 30 00 56 19 86 06 99  |8,15:.BO,0.V....|
00001130: 4D 54 24 3A 99 C7 28 31  34 37 29 3A 99 22 20 20  |MT$:..(147):."  |
00001140: 44 49 53 4B 20 54 4F 20  54 41 50 45 20 42 41 43  |DISK TO TAPE BAC|
00001150: 4B 55 50 11 11 22 00 97  19 90 06 54 24 28 4B 30  |KUP..".....T$(K0|
00001160: 29 B2 22 44 45 4C 22 3A  54 24 28 31 29 B2 22 53  |)."DEL":T$(1)."S|
00001170: 45 51 22 3A 54 24 28 32  29 B2 22 50 52 47 22 3A  |EQ":T$(2)."PRG":|
00001180: 54 24 28 33 29 B2 22 55  53 52 22 3A 54 24 28 34  |T$(3)."USR":T$(4|
00001190: 29 B2 22 52 45 4C 22 00  C0 19 9A 06 99 22 42 41  |)."REL"......"BA|
000011A0: 43 4B 55 50 20 4F 52 20  52 45 53 54 4F 52 45 22  |CKUP OR RESTORE"|
000011B0: 3A 85 22 28 42 20 4F 52  20 52 29 22 3B 42 52 24  |:."(B OR R)";BR$|
000011C0: 00 D7 19 A4 06 42 52 24  B2 CA 28 42 52 24 AA 22  |.....BR$..(BR$."|
000011D0: 20 22 2C 31 2C 31 29 00  F3 19 AE 06 8B 42 52 24  | ",1,1)......BR$|
000011E0: B3 B1 22 42 22 AF 42 52  24 B3 B1 22 52 22 A7 32  |.."B".BR$.."R".2|
000011F0: 34 38 30 00 1D 1A B8 06  99 22 11 50 52 4F 43 45  |480......".PROCE|
00001200: 53 53 20 41 4C 4C 20 46  49 4C 45 53 22 3A 85 22  |SS ALL FILES":."|
00001210: 28 59 20 4F 52 20 4E 29  22 3B 41 46 24 00 34 1A  |(Y OR N)";AF$.4.|
00001220: C2 06 41 46 24 B2 CA 28  41 46 24 AA 22 59 22 2C  |..AF$..(AF$."Y",|
00001230: 31 2C 31 29 00 50 1A CC  06 8B 41 46 24 B3 B1 22  |1,1).P....AF$.."|
00001240: 59 22 AF 41 46 24 B3 B1  22 4E 22 A7 32 34 38 30  |Y".AF$.."N".2480|
00001250: 00 62 1A D6 06 8B 42 52  24 B2 22 52 22 A7 31 38  |.b....BR$."R".18|
00001260: 39 30 00 93 1A E0 06 99  22 11 54 41 50 45 20 53  |90......".TAPE S|
00001270: 49 5A 45 20 28 4D 49 4E  29 20 22 3B 54 4D 3B CA  |IZE (MIN) ";TM;.|
00001280: 28 42 53 24 2C 31 2C C3  28 C4 28 54 4D 29 29 AA  |(BS$,1,.(.(TM)).|
00001290: 32 29 3B 00 AE 1A EA 06  85 54 4D 24 3A 8B 54 4D  |2);......TM$:.TM|
000012A0: 24 B2 22 22 A7 54 4D 24  B2 C4 28 54 4D 29 00 C5  |$."".TM$..(TM)..|
000012B0: 1A F4 06 54 4D B2 C5 28  54 4D 24 29 3A 54 42 B2  |...TM..(TM$):TB.|
000012C0: 54 4D AA 42 4D 00 E1 1A  FE 06 9F 33 2C 38 2C 33  |TM.BM......3,8,3|
000012D0: 2C 22 30 3A 53 59 53 20  44 41 54 45 2C 53 2C 52  |,"0:SYS DATE,S,R|
000012E0: 22 00 F6 1A 08 07 84 31  35 2C 45 31 2C 45 32 24  |"......15,E1,E2$|
000012F0: 2C 45 33 2C 45 34 00 12  1B 12 07 8B 45 31 A7 44  |,E3,E4......E1.D|
00001300: 24 B2 22 30 30 2F 30 30  2F 30 30 22 3A 89 31 38  |$."00/00/00":.18|
00001310: 33 30 00 1C 1B 1C 07 84  33 2C 44 24 00 23 1B 26  |30......3,D$.#.&|
00001320: 07 A0 33 00 37 1B 30 07  99 22 11 20 4D 4D 2F 44  |..3.7.0..". MM/D|
00001330: 44 2F 59 59 20 22 3B 00  4F 1B 3A 07 85 44 41 24  |D/YY ";.O.:..DA$|
00001340: 3A 8B 44 41 24 B2 22 22  A7 44 41 24 B2 44 24 00  |:.DA$."".DA$.D$.|
00001350: 60 1B 44 07 8B 44 24 B2  44 41 24 A7 31 38 39 30  |`.D..D$.DA$.1890|
00001360: 00 98 1B 4E 07 44 41 24  B2 CA 28 44 41 24 AA 22  |...N.DA$..(DA$."|
00001370: 20 20 20 20 20 20 20 20  22 2C 31 2C 38 29 3A 9F  |        ",1,8):.|
00001380: 20 33 2C 38 2C 33 2C 22  40 30 3A 53 59 53 20 44  | 3,8,3,"@0:SYS D|
00001390: 41 54 45 2C 53 2C 57 22  00 AC 1B 58 07 8D 32 34  |ATE,S,W"...X..24|
000013A0: 39 30 3A 98 33 2C 44 41  24 3A A0 33 00 B7 1B 62  |90:.3,DA$:.3...b|
000013B0: 07 54 24 B2 54 49 24 00  E0 1B 6C 07 99 22 11 20  |.T$.TI$...l..". |
000013C0: 48 48 4D 4D 20 20 20 20  20 3F 20 22 54 24 3B CA  |HHMM     ? "T$;.|
000013D0: 28 42 53 24 2C 31 2C C3  28 54 24 29 AA 32 29 3B  |(BS$,1,.(T$).2);|
000013E0: 00 FF 1B 76 07 85 54 24  3A 54 49 24 B2 CA 28 54  |...v..T$:TI$..(T|
000013F0: 24 AA 22 30 30 30 30 30  30 22 2C 31 2C 36 29 00  |$."000000",1,6).|
00001400: 0E 1C 80 07 8B 42 52 24  B2 22 52 22 A7 8E 00 3A  |.....BR$."R"...:|
00001410: 1C 8A 07 99 22 93 20 20  52 45 41 44 49 4E 47 20  |....".  READING |
00001420: 44 49 52 45 43 54 4F 52  59 11 22 3A 9F 44 49 52  |DIRECTORY.":.DIR|
00001430: 2C 38 2C 44 49 52 2C 22  24 22 00 53 1C 94 07 81  |,8,DIR,"$".S....|
00001440: 4C B2 4B 31 A4 31 34 32  3A A1 23 44 49 52 2C 41  |L.K1.142:.#DIR,A|
00001450: 24 3A 82 00 70 1C 9E 07  44 4E 24 B2 22 22 3A 81  |$:..p...DN$."":.|
00001460: 4C B2 4B 31 A4 31 36 3A  A1 23 44 49 52 2C 41 24  |L.K1.16:.#DIR,A$|
00001470: 00 90 1C A8 07 44 4E 24  B2 44 4E 24 AA 41 24 3A  |.....DN$.DN$.A$:|
00001480: 82 3A 99 22 93 20 44 49  53 4B 3A 22 44 4E 24 3B  |.:.". DISK:"DN$;|
00001490: 00 A9 1C B2 07 44 54 24  B2 44 4E 24 3A 8D 34 32  |.....DT$.DN$:.42|
000014A0: 30 3A 44 4E 24 B2 44 54  24 00 C8 1C BC 07 A1 23  |0:DN$.DT$......#|
000014B0: 44 49 52 2C 41 24 2C 41  24 2C 49 31 24 2C 41 24  |DIR,A$,A$,I1$,A$|
000014C0: 2C 4F 31 24 2C 4F 32 24  00 F0 1C C6 07 99 22 20  |,O1$,O2$......" |
000014D0: 49 44 3A 22 3B 49 31 24  3B 49 32 24 3B 3A 99 22  |ID:";I1$;I2$;:."|
000014E0: 20 4F 53 3A 22 3B 4F 31  24 3B 4F 32 24 22 11 22  | OS:";O1$;O2$"."|
000014F0: 00 08 1D D0 07 81 4C B2  4B 31 A4 38 39 3A A1 23  |......L.K1.89:.#|
00001500: 44 49 52 2C 41 24 3A 82  00 11 1D DA 07 4E 46 B2  |DIR,A$:......NF.|
00001510: 30 00 22 1D E4 07 52 42  B2 44 49 52 3A 52 24 B2  |0."...RB.DIR:R$.|
00001520: 22 22 00 56 1D EE 07 81  52 B2 4B 31 A4 32 35 34  |"".V....R.K1.254|
00001530: 3A A1 23 52 42 2C 41 24  3A 52 24 B2 52 24 AA CA  |:.#RB,A$:R$.R$..|
00001540: 28 41 24 AA 43 30 24 2C  4B 31 2C 4B 31 29 3A 82  |(A$.C0$,K1,K1):.|
00001550: 3A 5A 53 B2 53 54 00 5F  1D F8 07 42 B2 4B 30 00  |:ZS.ST._...B.K0.|
00001560: 72 1D 02 08 99 22 93 20  44 49 53 4B 3A 22 44 4E  |r....". DISK:"DN|
00001570: 24 3B 00 9B 1D 0C 08 99  A3 32 33 29 22 49 44 3A  |$;.......23)"ID:|
00001580: 3B 49 31 24 3B 49 32 24  3B 3A 3F 22 20 4F 53 3A  |;I1$;I2$;:?" OS:|
00001590: 22 4F 31 24 3B 4F 32 24  22 51 22 00 A7 1D 16 08  |"O1$;O2$"Q".....|
000015A0: 81 50 B2 4B 31 A4 38 00  C7 1D 20 08 54 B2 C6 28  |.P.K1.8... .T..(|
000015B0: CA 28 52 24 2C 42 AA 4B  31 29 29 3A 8B 54 B2 4B  |.(R$,B.K1)):.T.K|
000015C0: 30 A7 54 B2 31 32 38 00  EA 1D 2A 08 4C B2 C6 28  |0.T.128...*.L..(|
000015D0: CA 28 52 24 2C 42 32 39  29 29 3A 48 B2 C6 28 CA  |.(R$,B29)):H..(.|
000015E0: 28 52 24 2C 42 AA 33 30  29 29 00 05 1E 34 08 4C  |(R$,B.30))...4.L|
000015F0: B2 28 4C AA 32 35 36 AC  48 29 3A 8B 4C B2 4B 30  |.(L.256.H):.L.K0|
00001600: A7 32 32 30 30 00 1A 1E  3E 08 4E 24 B2 CA 28 52  |.2200...>.N$..(R|
00001610: 24 2C 42 AA 4B 34 2C 31  36 29 00 3C 1E 48 08 54  |$,B.K4,16).<.H.T|
00001620: 59 24 B2 54 24 28 54 AB  31 32 38 29 3A 8B 54 59  |Y$.T$(T.128):.TY|
00001630: 24 B2 22 44 45 4C 22 A7  32 32 30 30 00 53 1E 52  |$."DEL".2200.S.R|
00001640: 08 44 54 24 B2 4E 24 3A  8D 34 32 30 3A 4E 24 B2  |.DT$.N$:.420:N$.|
00001650: 44 54 24 00 6A 1E 5C 08  99 4C 3B A3 34 29 3A 54  |DT$.j.\..L;.4):T|
00001660: 59 24 3B 22 20 20 22 3B  4E 24 00 7F 1E 66 08 8B  |Y$;"  ";N$...f..|
00001670: 41 46 24 B2 22 59 22 A7  99 3A 89 32 31 38 30 00  |AF$."Y"..:.2180.|
00001680: 9B 1E 70 08 99 22 20 59  2F 4E 20 3F 20 59 22 3B  |..p.." Y/N ? Y";|
00001690: CA 28 42 53 24 2C 31 2C  33 29 3B 00 B9 1E 7A 08  |.(BS$,1,3);...z.|
000016A0: 59 4E 24 B2 22 22 3A 85  59 4E 24 3A 8B 59 4E 24  |YN$."":.YN$:.YN$|
000016B0: B2 22 4E 22 A7 32 32 30  30 00 D1 1E 84 08 4E 46  |."N".2200.....NF|
000016C0: B2 4E 46 AA 4B 31 3A 4E  41 24 28 4E 46 29 B2 4E  |.NF.K1:NA$(NF).N|
000016D0: 24 00 F3 1E 8E 08 54 59  24 28 4E 46 29 B2 CA 28  |$.....TY$(NF)..(|
000016E0: 54 59 24 2C 4B 31 2C 4B  31 29 3A 4C 4E 28 4E 46  |TY$,K1,K1):LN(NF|
000016F0: 29 B2 4C 00 16 1F 98 08  42 B2 42 AA 33 32 3A 82  |).L.....B.B.32:.|
00001700: 50 3A 99 22 11 20 20 50  4C 45 41 53 45 20 57 41  |P:.".  PLEASE WA|
00001710: 49 54 2E 2E 2E 22 00 26  1F A2 08 8B 5A 53 B2 4B  |IT...".&....ZS.K|
00001720: 30 A7 32 30 32 30 00 2F  1F AC 08 A0 44 49 52 00  |0.2020./....DIR.|
00001730: 3F 1F B6 08 8B 4E 46 B3  4B 32 A7 32 33 36 30 00  |?....NF.K2.2360.|
00001740: 67 1F C0 08 81 49 B2 31  A4 32 30 30 30 3A 82 3A  |g....I.1.2000:.:|
00001750: 99 22 93 11 20 20 20 20  20 53 4F 52 54 49 4E 47  |."..     SORTING|
00001760: 2E 2E 2E 2E 2E 11 22 00  7E 1F CA 08 81 53 31 B2  |......".~....S1.|
00001770: 4B 31 A4 4E 46 AB 4B 31  3A 53 4D B2 53 31 00 8F  |K1.NF.K1:SM.S1..|
00001780: 1F D4 08 81 53 32 B2 53  31 AA 4B 31 A4 4E 46 00  |....S2.S1.K1.NF.|
00001790: AA 1F DE 08 8B 4E 41 24  28 53 4D 29 B1 4E 41 24  |.....NA$(SM).NA$|
000017A0: 28 53 32 29 A7 53 4D B2  53 32 00 B2 1F E8 08 82  |(S2).SM.S2......|
000017B0: 53 32 00 C2 1F F2 08 8B  53 4D B2 53 31 A7 32 33  |S2......SM.S1.23|
000017C0: 33 30 00 F5 1F FC 08 4E  41 24 28 4B 30 29 3B 4E  |30.....NA$(K0);N|
000017D0: 41 24 28 53 31 29 3A 4E  41 24 28 53 31 29 B2 4E  |A$(S1):NA$(S1).N|
000017E0: 41 24 28 53 4D 29 3A 4E  41 24 28 53 4D 29 B2 4E  |A$(SM):NA$(SM).N|
000017F0: 41 24 28 30 29 00 28 20  06 09 54 59 24 28 4B 30  |A$(0).( ..TY$(K0|
00001800: 29 3B 54 59 24 28 53 31  29 3A 54 59 24 28 53 31  |);TY$(S1):TY$(S1|
00001810: 29 B2 54 59 24 28 53 4D  29 3A 54 59 24 28 53 4D  |).TY$(SM):TY$(SM|
00001820: 29 B2 54 59 24 28 30 29  00 55 20 10 09 4C 4E 28  |).TY$(0).U ..LN(|
00001830: 4B 30 29 3B 4C 4E 28 53  31 29 3A 4C 4E 28 53 31  |K0);LN(S1):LN(S1|
00001840: 29 B2 4C 4E 28 53 4D 29  3A 4C 4E 28 53 4D 29 B2  |).LN(SM):LN(SM).|
00001850: 4C 4E 28 30 29 00 65 20  1A 09 99 22 20 22 4E 41  |LN(0).e ..." "NA|
00001860: 24 28 53 31 29 00 7B 20  24 09 82 53 31 3A 99 22  |$(S1).{ $..S1:."|
00001870: 20 22 4E 41 24 28 4E 46  29 3A 99 00 8E 20 2E 09  | "NA$(NF):... ..|
00001880: 8D 32 35 32 30 3A 4E 42  B2 4E 42 AA 50 53 00 A7  |.2520:NB.NB.PS..|
00001890: 20 38 09 9F 31 2C 31 2C  31 2C 22 44 54 42 2E 49  | 8..1,1,1,"DTB.I|
000018A0: 44 2E 46 49 4C 45 22 00  B7 20 42 09 4E 42 B2 4E  |D.FILE".. B.NB.N|
000018B0: 42 AA 42 48 AA 33 39 00  CA 20 4C 09 98 31 2C 22  |B.BH.39.. L..1,"|
000018C0: 30 33 39 56 22 3B 56 4E  24 3B 00 E3 20 56 09 98  |039V";VN$;.. V..|
000018D0: 31 2C CA 28 44 4E 24 AA  53 50 24 2C 4B 31 2C 32  |1,.(DN$.SP$,K1,2|
000018E0: 30 29 3B 00 FF 20 60 09  98 31 2C CA 28 44 41 24  |0);.. `..1,.(DA$|
000018F0: AA 53 50 24 2C 4B 31 2C  38 29 3B 54 49 24 3B 00  |.SP$,K1,8);TI$;.|
00001900: 0D 21 6A 09 81 53 31 B2  4B 31 A4 4E 46 00 25 21  |.!j..S1.K1.NF.%!|
00001910: 74 09 4C 4E 24 B2 CA 28  C4 28 4C 4E 28 53 31 29  |t.LN$..(.(LN(S1)|
00001920: 29 2C 4B 32 29 00 41 21  7E 09 4E 41 24 B2 4E 41  |),K2).A!~.NA$.NA|
00001930: 24 28 53 31 29 3A 54 59  24 3B 54 59 24 28 53 31  |$(S1):TY$;TY$(S1|
00001940: 29 00 4A 21 88 09 8D 33  39 30 00 57 21 92 09 82  |).J!...390.W!...|
00001950: 53 31 3A 8D 34 31 30 00  67 21 9C 09 8B 4E 46 B3  |S1:.410.g!...NF.|
00001960: 4B 31 A7 32 34 38 30 00  6D 21 A6 09 8E 00 77 21  |K1.2480.m!....w!|
00001970: B0 09 A0 31 35 3A 80 00  9E 21 BA 09 84 31 35 2C  |...15:...!...15,|
00001980: 45 31 2C 45 32 24 2C 45  33 2C 45 34 3A 8B 45 31  |E1,E2$,E3,E4:.E1|
00001990: A7 99 45 31 3B 45 32 24  3B 45 33 3B 45 34 00 A4  |..E1;E2$;E3;E4..|
000019A0: 21 C4 09 8E 00 AA 21 CE  09 80 00 B7 21 D8 09 94  |!.....!.....!...|
000019B0: 22 44 54 42 22 3A 8E 00  C7 21 E2 09 94 22 40 30  |"DTB":...!..."@0|
000019C0: 3A 44 54 42 22 2C 38 00  00 00                    |:DTB",8...      |

.......10.'...:        TAPE.DISK BACKUP.
D...:        COMPUTE GAZETTE.\...:      
    PAGE 164.T...:            DEC.84....
..65517:.B(781).40.MT$.".":.30.....MT$."
."......1580:.BR$."R".450.L.(..S1.K1.NF:
.930...2..#FP,A$:A$.J(A$.C0$,K1,K1):ZT.S
T...<.BK.BK.K1:.UP$;.17);BK:R$."".$.F..I
$:.I$."".330.?.P.LB$.A$:LB.F(LB$):NE.K1.
V.Z..ZT..150:.220:.250.{.D..#FP,A$:A$.J(
A$.C0$,K1,K1):ZT.ST...N..C(R$).CM..150:.
220:.60...X..LB$..A$.140.A....NE.250.NE.
NE.K1:.90.N....150:.80......NE.K1.190...
 ..LB.CS.R$.R$.LB$:.......LB.233.LB.245.
R$.R$.G(230).LB$:..*...R$.R$.LB$:..G....
LB.SP.R$.R$.CS$.G(NE):..G.H..LB.DA.R$.R$
.G(245).G(NE):....R.R$.R$.G(231).G(NE).L
B$:......L$.J(D(C(R$).K4),K2)......1,J(L
$.SP$,K1,K3);"D";R$;.P...NB.NB.C(R$).4:.
......410:.UP$;.30);NB......2490: FP....
..S1......"TO RESTORE FILES LOAD THIS";.
D.".." PROGRAM FROM THE BACKUP TAPE".M.,
..860.].6..SL.K1.20:..G.@..2480...J.."Q 
QUIT, SPACE CONTINUE"...T..I$:.I$."".340
...^..I$.."Q".370.D.H. FP:AN$."A":.410:.
2480...R..UP$"                       "UP
$...|..G(18)"P TO PAUSE"G(146)UP$:.80.K.
...1,"024F";J(NA$.SP$,K1,16);J(TY$,K1,K1
);J(LN$.SP$,K1,K3);.Z...NB.NB.24:.......
1,"005E";AN$:NB.NB.8:.1,C0$;C0$;C0$;: 1:
......EN.C(DT$)......F(J(DT$,EN,1))..160
...L...DT$.H(DT$,EN.K1):.420.V.B..1110..
.L..S1.K1.NF...V.BK.K0:NA$.NA$(S1):TY$.T
Y$(S1). ....1,1,0:NB.NB.300:.840.I...FM$
."":.:.UP$G(18)" FOUND"G(146)" ";._....R
C$.."F". 1:.480......X.K1.16:.#1,I$:FM$.
FM$.I$:.......FM$:.#1,A$,A$,A$,A$......F
M$.NA$.580.J....840:.RC$."N". 1:.1520:.4
80...&.NB.NB.LN:.X.K1.LN.K4:.#K1,A$:.:.4
80...0..RC$."D".550...:. 1:.480.E.D.X.C(
NA$):.J(NA$,X,K1)." ".NA$.J(NA$,K1,X.K1)
:.580.I.N..FP,8,FP,"@0:".NA$.CO$.TY$.",W
"..X..840:.RC$."D".640...B..RC$."E".760
...L..RC$."N"..1510:.470.F.V.." EXPECTED
 D OR E":.2480.....BK.BK.K1:.UP$;.24);BK
.....L.0.....L.L.K1:.L.LN.K4.600.&....#1
,A$:A$.J(A$.C0$,K1,K1):A.F(A$).>....A.23
0..FP,A$;:.660.W....A.230..#1,A$:L.L.K1:
A$.J(A$.C0$,K1,K1):.FP,A$;:.660......A.2
31.730...F..A.232.A.245.750...P..FP,A$;:
.660.W.Z..#1,A$,A1$:L.L.K2:A1$.J(A1$.C0$
,K1,K1)......X.K1.F(A$):.FP,A1$;:.:.660.
,....#1,A1$:L.L.K1:.X.K1.F(A1$):.FP,G(A.
200);:.:.660.=....2490: 1: FP.N....A$.."
A".820.P...." FILE'"NA$"' IS INCOMPLETE"
......"Q TO QUIT, SPACE TO CONTINUE"... 
..A$:.A$."".800...*..A$."Q".2480.E.4..S1
:.860...>..SL.K1.20:.:.2480...H..#1,L1$,
L2$,L3$,RC$...R.LN.E(L1$.L2$.L3$):NB.NB.
LN:..C.\.TT.E(J(TI$,K1,K2)).3600.E(J(TI$
,K3,K2)).60.D.F.TT.TT..(NB.25):HH..(TT.3
600).~.P.MM..((TT.HH.3600).60)...Z.HH$.J
(D(HH),2):.C(HH$).2.HH$."0".HH$.P...MM$.
J(D(MM),2):.C(MM$).2.MM$."0".MM$.....TI$
.HH$.MM$."00":."ESTIMATED TIME=";TI$....
.......NA$.NA$(S1):TY$.TY$(S1).?....NB.L
N(S1).(BD.5).BH.TB.1050.S....1,1,1,NA$:.
390.E....1,"004N";: 1...J.." LOAD ANOTHE
R CASSETTE"...T.."   TYPE Q TO QUIT,"...
..."  SPACE TO CONTINUE".L....A$:.A$."".
1000......A$."Q".2480......" TAPE SIZE (
MIN) ";TM;J(BS$,1,C(D(TM)).2).(....TM$:.
TM$."".TM$.D(TM).D...TB.E(TM$).BM:.860:N
B.K0.Q....SP$;CR$.R.$.."    ..P TO PAUSE
.":.UP$UP$......NA$:BK.K0...8.LN$.J(D(LN
(S1)),K2)...B..FP,8,FP,"0:".NA$.CO$.TY$.
",R"...L..1,1,1,NA$:NB.NB.BH:.390:....V.
.". FORMAT DISK (N OR Y)"...`.." ";A$...
J..A$.."Y".1200.2.T.ND$."":.". DISK NAME
";.H.~..ND$:.ND$."".1200.B...ID$."":." D
ISK ID  ";.X....ID$:.ID$."".1200......15
,"N0:";ND$;",";ID$......2490:.E1.2490...
..." OPEN DTB.ID.FILE".W....1,1,0,"DTB.I
D.FILE"...D.NB.NB.300...N..840...X..#1,A
$......A$..VN$.." VERSION ERROR":.2480.4
....".. FROM DISK:";.N....X.1.20:.#1,A$:
.A$;:..L....:."BACKED UP ON  DATE:";....
..X.1.8:.#1,A$:.A$;:......." TIME";.....
.X.1.6:.#1,A$:.A$;:....(.....2.NF.0.D.<.
.840.V.F..RC$."F".1380...P..RC$."E". 1:.
...Z.." REC CD ERROR":.2480.".D.NA$."":.
X.1.16:.#1,A$:.A$;.3.N.NA$.NA$.A$:..K.X.
.#1,TY$:." "TY$" ";.K....#1,A$,A2$,A3$:.
A$;A2$;A3$;.....:.AF$."Y".1480......UP$
:."BKUP Y OR N";... .YN$."":.YN$.G....J(
YN$."Y",K1,K1)."Y".1480.Y....YN$."N".134
0......1430...H.NF.NF.K1...R.NA$(NF).NA$
:TY$(NF).TY$:.1340.......#... FP: 1.B...
." LOAD CONTINUATION TAPE".Y...." TYPE Q
 TO QUIT".X...."      SPACE TO CONTINUE"
......A$:.A$."".1550......A$."Q".2480...
"..860:NB.0:..R.,..LN(150),NA$(150),T$(4
),TY$(150)...6.BH.300:BD.256:BK.0:BM.840
:BO.53280:CM.250:CS.230:DA.45:DIR.8:FP.5
.5.@.K0.0:K1.1:K2.2:K3.3:K4.4.F.J.NB.0:N
C.0:NE.0:NF.0:PS.8000:SP.32:TB.0:TM.60..
.T.AF$."":AN$."N":BR$."":.X.1.40:BS$.BS$
.G(157):....^.C0$.G(0):CB$."":CO$.",":CS
$.G(232)...H.DA$."":DN$."":FM$."":RC$.""
:SP$."         ":SP$.SP$.SP$.SP$:UP$.G(1
45)...R.VN$."2".*.|..15,8,15:.BO,0.V....
MT$:.G(147):."  DISK TO TAPE BACKUP.."..
...T$(K0)."DEL":T$(1)."SEQ":T$(2)."PRG":
T$(3)."USR":T$(4)."REL"......"BACKUP OR 
RESTORE":."(B OR R)";BR$.W...BR$.J(BR$."
 ",1,1)......BR$.."B".BR$.."R".2480.....
.".PROCESS ALL FILES":."(Y OR N)";AF$.4.
B.AF$.J(AF$."Y",1,1).P.L..AF$.."Y".AF$..
"N".2480.B.V..BR$."R".1890......".TAPE S
IZE (MIN) ";TM;J(BS$,1,C(D(TM)).2);.....
.TM$:.TM$."".TM$.D(TM).E...TM.E(TM$):TB.
TM.BM......3,8,3,"0:SYS DATE,S,R"......1
5,E1,E2$,E3,E4......E1.D$."00/00/00":.18
30......3,D$.#.&. 3.7.0..". MM/DD/YY ";.
O.:..DA$:.DA$."".DA$.D$.`.D..D$.DA$.1890
...N.DA$.J(DA$."        ",1,8):. 3,8,3,"
@0:SYS DATE,S,W"...X..2490:.3,DA$: 3...B
.T$.TI$...L..". HHMM     ? "T$;J(BS$,1,C
(T$).2);...V..T$:TI$.J(T$."000000",1,6).
.....BR$."R"...:....".  READING DIRECTOR
Y.":.DIR,8,DIR,"$".S....L.K1.142:.#DIR,A
$:..P...DN$."":.L.K1.16:.#DIR,A$.....DN$
.DN$.A$:.:.". DISK:"DN$;.....DT$.DN$:.42
0:DN$.DT$.H....#DIR,A$,A$,I1$,A$,O1$,O2$
...F.." ID:";I1$;I2$;:." OS:";O1$;O2$"."
...P..L.K1.89:.#DIR,A$:....Z.NF.0."...RB
.DIR:R$."".V....R.K1.254:.#RB,A$:R$.R$.J
(A$.C0$,K1,K1):.:ZS.ST._...B.K0.R....". 
DISK:"DN$;.......23)"ID:;I1$;I2$;:?" OS:
"O1$;O2$"Q"......P.K1.8.G. .T.F(J(R$,B.K
1)):.T.K0.T.128...*.L.F(J(R$,B29)):H.F(J
(R$,B.30))...4.L.(L.256.H):.L.K0.2200...
>.N$.J(R$,B.K4,16).<.H.TY$.T$(T.128):.TY
$."DEL".2200.S.R.DT$.N$:.420:N$.DT$.J.\.
.L;.4):TY$;"  ";N$..F..AF$."Y"..:.2180.
..P.." Y/N ? Y";J(BS$,1,3);...Z.YN$."":.
YN$:.YN$."N".2200.Q...NF.NF.K1:NA$(NF).N
$.....TY$(NF).J(TY$,K1,K1):LN(NF).L.....
B.B.32:.P:.".  PLEASE WAIT...".&....ZS.K
0.2020./... DIR.?....NF.K2.2360.G....I.1
.2000:.:."..     SORTING......".~.J..S1.
K1.NF.K1:SM.S1...T..S2.S1.K1.NF......NA$
(SM).NA$(S2).SM.S2......S2.B....SM.S1.23
30.....NA$(K0);NA$(S1):NA$(S1).NA$(SM):N
A$(SM).NA$(0).( ..TY$(K0);TY$(S1):TY$(S1
).TY$(SM):TY$(SM).TY$(0).U ..LN(K0);LN(S
1):LN(S1).LN(SM):LN(SM).LN(0).E ..." "NA
$(S1).{ $..S1:." "NA$(NF):... ...2520:NB
.NB.PS.. 8..1,1,1,"DTB.ID.FILE".. B.NB.N
B.BH.39.J L..1,"039V";VN$;.. V..1,J(DN$.
SP$,K1,20);.. `..1,J(DA$.SP$,K1,8);TI$;.
.!J..S1.K1.NF.%!T.LN$.J(D(LN(S1)),K2).A!
~.NA$.NA$(S1):TY$;TY$(S1).J!...390.W!...
S1:.410.G!...NF.K1.2480.M!....W!.. 15:..
.!...15,E1,E2$,E3,E4:.E1..E1;E2$;E3;E4..
!D....!N....!X.."DTB":..G!..."@0:DTB",8.
..

×

C64 Image

> CLICK IMAGE PREVIEW FOR FULL MODAL