DIR.2

00000000: 01 1C 29 1C 0A 00 E7 34  2C 33 3A E7 30 2C 34 3A  |..)....4,3:.0,4:|
00000010: 86 50 52 24 28 36 2C 31  35 30 29 3A 58 B2 31 3A  |.PR$(6,150):X.1:|
00000020: 59 B2 31 3A 89 35 30 30  30 00 4A 1C 14 00 81 41  |Y.1:.5000.J....A|
00000030: B2 31 A4 32 3A DA 31 2C  34 30 39 36 30 2C 39 3A  |.1.2:.1,40960,9:|
00000040: DA 31 2C 30 2C 32 3A 82  3A 8E 00 73 1C 64 00 99  |.1,0,2:.:..s.d..|
00000050: 22 90 22 3A 8D 32 30 3A  85 22 20 20 49 4E 50 55  |".":.20:."  INPU|
00000060: 54 20 50 41 47 45 20 4E  55 4D 42 45 52 20 22 3B  |T PAGE NUMBER ";|
00000070: 50 47 24 00 8E 1C 6E 00  99 3A 99 22 20 20 50 41  |PG$...n..:."  PA|
00000080: 47 45 20 4E 55 4D 42 45  52 20 22 50 47 24 00 B1  |GE NUMBER "PG$..|
00000090: 1C 78 00 99 3A 99 22 20  20 12 20 20 4F 4B 41 59  |.x..:."  .  OKAY|
000000A0: 3F 20 20 20 20 59 20 4F  52 20 4E 20 3F 3F 20 20  |?    Y OR N ??  |
000000B0: 22 00 BF 1C 82 00 8D 36  30 30 30 3A 8D 32 30 00  |"......6000:.20.|
000000C0: C8 1C 8C 00 A1 F9 56 24  00 D8 1C 96 00 8B 56 24  |......V$......V$|
000000D0: B2 22 4E 22 A7 31 30 30  00 E9 1C A0 00 8B 56 24  |."N".100......V$|
000000E0: B3 B1 22 59 22 A7 31 33  30 00 FA 1C AA 00 99 22  |.."Y".130......"|
000000F0: 95 22 3A 99 22 20 22 4C  31 24 00 29 1D B4 00 99  |.":." "L1$.)....|
00000100: 22 20 DD 20 49 4E 53 45  52 54 20 41 20 44 49 53  |" . INSERT A DIS|
00000110: 4B 20 49 4E 20 44 52 49  56 45 20 38 2E 20 20 20  |K IN DRIVE 8.   |
00000120: 20 20 20 20 20 20 20 DD  22 00 5A 1D BE 00 99 22  |       .".Z...."|
00000130: 20 DD 20 54 48 45 4E 20  50 52 45 53 53 20 12 52  | . THEN PRESS .R|
00000140: 45 54 55 52 4E 92 2E 20  20 20 20 20 20 20 20 20  |ETURN..         |
00000150: 20 20 20 20 20 20 20 20  DD 22 00 8B 1D C3 00 99  |        ."......|
00000160: 22 20 DD 20 50 52 45 53  53 20 12 46 31 92 20 49  |" . PRESS .F1. I|
00000170: 46 20 4C 49 53 54 49 4E  47 20 49 53 20 43 4F 4D  |F LISTING IS COM|
00000180: 50 4C 45 54 45 2E 20 20  20 DD 22 00 97 1D C8 00  |PLETE.   .".....|
00000190: 99 22 20 22 4C 32 24 00  A5 1D D2 00 8D 36 30 30  |." "L2$......600|
000001A0: 30 3A 8D 32 30 00 AE 1D  DC 00 A1 F9 56 24 00 C1  |0:.20.......V$..|
000001B0: 1D E6 00 8B 56 24 B2 C7  28 31 33 33 29 A7 38 30  |....V$..(133).80|
000001C0: 30 00 D4 1D F0 00 8B 56  24 B3 B1 C7 28 31 33 29  |0......V$...(13)|
000001D0: A7 32 31 30 00 EC 1D FA  00 FE 0F 3A 9F 31 35 2C  |.210.......:.15,|
000001E0: 38 2C 31 35 2C 22 49 30  22 3A FE 0F 00 06 1E 04  |8,15,"I0":......|
000001F0: 01 99 22 1C 22 3A 99 22  20 20 12 20 20 22 44 53  |..".":."  .  "DS|
00000200: 24 22 12 20 20 22 00 14  1E 0E 01 8B 44 53 B2 30  |$".  "......DS.0|
00000210: A7 32 38 35 00 42 1E 18  01 99 22 90 22 3A 99 22  |.285.B....".":."|
00000220: 20 20 44 49 53 4B 20 44  52 49 56 45 20 45 52 52  |  DISK DRIVE ERR|
00000230: 4F 52 20 44 45 54 45 43  54 45 44 21 22 3A 89 31  |OR DETECTED!":.1|
00000240: 37 30 00 73 1E 1D 01 99  3A 99 22 9E 20 20 50 4C  |70.s....:.".  PL|
00000250: 45 41 53 45 20 57 41 49  54 21 20 20 52 45 41 44  |EASE WAIT!  READ|
00000260: 49 4E 47 20 54 48 45 20  44 49 52 45 43 54 4F 52  |ING THE DIRECTOR|
00000270: 59 2E 22 00 92 1E 22 01  4E 58 B2 32 AA 59 3A 99  |Y."...".NX.2.Y:.|
00000280: 22 90 22 3A 8D 36 30 35  30 3A 8B 58 B2 37 A7 39  |".":.6050:.X.7.9|
00000290: 30 30 00 AE 1E 2C 01 FE  0F 3A 9F 32 2C 38 2C 30  |00...,...:.2,8,0|
000002A0: 2C 22 24 22 3A A1 23 32  2C 41 24 2C 41 24 00 BB  |,"$":.#2,A$,A$..|
000002B0: 1E 36 01 8B 58 B2 37 A7  39 30 30 00 D5 1E 40 01  |.6..X.7.900...@.|
000002C0: 8B 59 B2 31 35 30 A7 8D  38 30 30 3A 8B 43 4C B2  |.Y.150..800:.CL.|
000002D0: 31 A7 31 37 30 00 E5 1E  45 01 8B 59 B2 4E 58 A7  |1.170...E..Y.NX.|
000002E0: 8D 36 30 39 30 00 F4 1E  4A 01 8B 59 B2 31 A7 8D  |.6090...J..Y.1..|
000002F0: 36 30 37 30 00 1C 1F 54  01 43 B2 30 3A A1 23 32  |6070...T.C.0:.#2|
00000300: 2C 41 24 2C 41 24 2C 41  24 2C 42 24 3A 8B 41 24  |,A$,A$,A$,B$:.A$|
00000310: B3 B1 22 22 A7 43 B2 C6  28 41 24 29 00 36 1F 5E  |.."".C..(A$).6.^|
00000320: 01 8B 42 24 B3 B1 22 22  A7 43 B2 43 AA C6 28 42  |..B$.."".C.C..(B|
00000330: 24 29 AC 32 35 36 00 56  1F 68 01 54 45 24 B2 22  |$).256.V.h.TE$."|
00000340: DD 22 AA C9 28 22 A0 A0  A0 22 AA C4 28 43 29 AA  |."..("..."..(C).|
00000350: 22 20 22 2C 34 29 00 62  1F 72 01 8B 53 54 A7 34  |" ",4).b.r..ST.4|
00000360: 39 30 00 82 1F 7C 01 42  24 B2 22 22 3A A1 23 32  |90...|.B$."":.#2|
00000370: 2C 41 24 3A 8B 41 24 B3  B1 C7 28 33 34 29 A7 33  |,A$:.A$...(34).3|
00000380: 37 30 00 9C 1F 86 01 A1  23 32 2C 42 24 3A 8B 42  |70......#2,B$:.B|
00000390: 24 B2 22 22 A7 42 24 B2  C7 28 30 29 00 A8 1F 90  |$."".B$..(0)....|
000003A0: 01 42 B2 C6 28 42 24 29  00 B7 1F 9A 01 8B 42 B1  |.B..(B$)......B.|
000003B0: 31 36 30 A7 34 34 30 00  CC 1F A4 01 8B 42 B3 33  |160.440......B.3|
000003C0: 32 B0 42 B1 31 32 37 A7  42 B2 36 33 00 DA 1F AE  |2.B.127.B.63....|
000003D0: 01 8B 42 B2 33 34 A7 34  35 30 00 F0 1F B8 01 54  |..B.34.450.....T|
000003E0: 45 24 B2 54 45 24 AA C7  28 42 29 3A 89 33 39 30  |E$.TE$..(B):.390|
000003F0: 00 0D 20 C2 01 43 24 B2  22 22 3A A1 23 32 2C 41  |.. ..C$."":.#2,A|
00000400: 24 3A 8B 41 24 B2 22 20  22 A7 34 35 30 00 2D 20  |$:.A$." ".450.- |
00000410: CC 01 43 24 B2 43 24 AA  41 24 3A A1 23 32 2C 41  |..C$.C$.A$:.#2,A|
00000420: 24 3A 8B 41 24 B3 B1 22  22 A7 34 36 30 00 54 20  |$:.A$.."".460.T |
00000430: D6 01 50 52 24 28 58 2C  59 29 B2 C8 28 54 45 24  |..PR$(X,Y)..(TE$|
00000440: AA 42 4D 24 2C 32 32 29  AA C8 28 43 24 2C 33 29  |.BM$,22)..(C$,3)|
00000450: AA 22 DD 22 00 63 20 E0  01 8D 36 31 30 30 3A 89  |.".".c ...6100:.|
00000460: 33 31 30 00 84 20 EA 01  50 52 24 28 58 2C 59 29  |310.. ..PR$(X,Y)|
00000470: B2 22 DD 22 AA C9 28 22  20 20 20 22 AA C4 28 43  |."."..("   "..(C|
00000480: 29 2C 36 29 00 BC 20 F4  01 50 52 24 28 58 2C 59  |),6).. ..PR$(X,Y|
00000490: 29 B2 C8 28 50 52 24 28  58 2C 59 29 AA 22 42 4C  |)..(PR$(X,Y)."BL|
000004A0: 4F 43 4B 53 20 46 52 45  45 22 AA 42 4D 24 2C 32  |OCKS FREE".BM$,2|
000004B0: 35 29 AA 22 DD 22 3A 8D  36 31 30 30 00 D3 20 FE  |5).".":.6100.. .|
000004C0: 01 50 52 24 28 58 2C 59  29 B2 4C 34 24 3A 8D 36  |.PR$(X,Y).L4$:.6|
000004D0: 31 30 30 00 F5 20 08 02  50 52 24 28 58 2C 59 29  |100.. ..PR$(X,Y)|
000004E0: B2 4C 36 24 3A 8D 36 31  30 30 3A 8B 59 B1 31 34  |.L6$:.6100:.Y.14|
000004F0: 35 A7 35 32 30 00 FE 20  12 02 89 31 37 30 00 2E  |5.520.. ...170..|
00000500: 21 20 03 43 4C B2 30 3A  99 3A 99 22 20 20 44 45  |! .CL.0:.:."  DE|
00000510: 4C 45 54 45 20 4C 41 53  54 20 4C 49 53 54 49 4E  |LETE LAST LISTIN|
00000520: 47 3F 20 20 59 20 4F 52  20 4E 20 3F 3F 22 00 38  |G?  Y OR N ??".8|
00000530: 21 2A 03 8D 36 30 30 30  00 40 21 34 03 8D 32 30  |!*..6000.@!4..20|
00000540: 00 49 21 3E 03 A1 F9 56  24 00 5F 21 48 03 8B 56  |.I!>...V$._!H..V|
00000550: 24 B2 22 4E 22 A7 99 3A  8D 36 30 36 30 3A 8E 00  |$."N"..:.6060:..|
00000560: 70 21 52 03 8B 56 24 B3  B1 22 59 22 A7 38 32 30  |p!R..V$.."Y".820|
00000570: 00 A0 21 5C 03 43 4C B2  31 3A 50 52 24 28 58 2C  |..!\.CL.1:PR$(X,|
00000580: 59 29 B2 4C 36 24 3A 59  B2 59 AB 31 3A 8B 50 52  |Y).L6$:Y.Y.1:.PR|
00000590: 24 28 58 2C 59 29 B3 B1  4C 36 24 A7 38 36 30 3A  |$(X,Y)..L6$.860:|
000005A0: 00 B0 21 66 03 59 B2 31  35 30 3A 8D 36 30 32 30  |..!f.Y.150:.6020|
000005B0: 00 BD 21 70 03 8B 58 B2  37 A7 39 30 30 00 C3 21  |..!p..X.7.900..!|
000005C0: 7A 03 8E 00 C9 21 D0 07  90 00 CF 21 87 13 90 00  |z....!.....!....|
000005D0: FE 21 88 13 42 4C 24 B2  22 22 3A 81 41 B2 31 A4  |.!..BL$."":.A.1.|
000005E0: 34 30 3A 42 4C 24 B2 42  4C 24 AA 22 A0 22 3A 82  |40:BL$.BL$.".":.|
000005F0: 3A 42 4D 24 B2 C8 28 42  4C 24 2C 32 36 29 00 2D  |:BM$..(BL$,26).-|
00000600: 22 92 13 4C 4E 24 B2 22  22 3A 81 41 B2 31 A4 33  |"..LN$."":.A.1.3|
00000610: 36 3A 4C 4E 24 B2 4C 4E  24 AA 22 C0 22 3A 82 3A  |6:LN$.LN$.".":.:|
00000620: 4C 4F 24 B2 C8 28 4C 4E  24 2C 32 34 29 00 89 22  |LO$..(LN$,24).."|
00000630: 9C 13 4C 31 24 B2 22 B0  22 AA 4C 4E 24 AA 22 AE  |..L1$.".".LN$.".|
00000640: 22 3A 4C 32 24 B2 22 AD  22 AA 4C 4E 24 AA 22 BD  |":L2$.".".LN$.".|
00000650: 22 3A 4C 33 24 B2 22 B0  22 AA 4C 4F 24 AA 22 AE  |":L3$.".".LO$.".|
00000660: 22 3A 4C 34 24 B2 22 AD  22 AA 4C 4F 24 AA 22 BD  |":L4$.".".LO$.".|
00000670: 22 3A 4C 35 24 B2 22 AB  22 AA 4C 4F 24 AA 22 B3  |":L5$.".".LO$.".|
00000680: 22 3A 4C 36 24 B2 42 4D  24 00 AE 22 A1 13 4C 37  |":L6$.BM$.."..L7|
00000690: 24 B2 22 DD 20 4C 49 53  54 49 4E 47 20 43 4F 4E  |$.". LISTING CON|
000006A0: 54 49 4E 55 45 44 2E 2E  2E 2E 2E 20 DD 22 00 E2  |TINUED..... ."..|
000006B0: 22 A6 13 99 22 1C 12 93  20 20 53 49 58 20 43 4F  |"..."...  SIX CO|
000006C0: 4C 55 4D 4E 20 44 49 52  45 43 54 4F 52 59 20 50  |LUMN DIRECTORY P|
000006D0: 52 49 4E 54 4F 55 54 20  20 28 39 30 30 29 20 20  |RINTOUT  (900)  |
000006E0: 22 3B 00 13 23 B0 13 99  22 12 20 42 59 20 4A 49  |";..#...". BY JI|
000006F0: 4D 20 43 4F 4F 50 45 52  20 2D 20 51 53 21 20 41  |M COOPER - QS! A|
00000700: 4C 4C 49 41 4E 43 45 20  4C 49 42 52 41 52 49 41  |LLIANCE LIBRARIA|
00000710: 4E 20 22 00 22 23 BA 13  99 3A 99 22 1F 20 22 4C  |N "."#...:.". "L|
00000720: 31 24 00 53 23 C4 13 99  22 20 DD 20 50 52 45 53  |1$.S#..." . PRES|
00000730: 53 20 12 46 31 92 20 54  4F 20 43 52 45 41 54 45  |S .F1. TO CREATE|
00000740: 20 41 20 4E 45 57 20 50  41 47 45 2E 20 20 20 20  | A NEW PAGE.    |
00000750: 20 DD 22 00 8C 23 CE 13  99 22 20 DD 20 50 52 45  | ."..#..." . PRE|
00000760: 53 53 20 12 46 33 92 20  54 4F 20 52 45 43 41 4C  |SS .F3. TO RECAL|
00000770: 4C 20 41 20 53 41 56 45  44 20 50 41 47 45 2E 20  |L A SAVED PAGE. |
00000780: 20 20 DD 22 3A 99 22 20  22 4C 32 24 00 B8 23 D8  |  .":." "L2$..#.|
00000790: 13 4A B2 31 33 32 3A 81  41 B2 31 A4 32 3A 81 4B  |.J.132:.A.1.2:.K|
000007A0: B2 41 A4 38 A9 32 3A 4A  B2 4A AA 31 3A F9 4B 2C  |.A.8.2:J.J.1:.K,|
000007B0: C7 28 4A 29 3A 82 3A 82  00 C6 23 E2 13 8D 36 30  |.(J):.:...#...60|
000007C0: 30 30 3A 8D 32 30 00 CF  23 EC 13 A1 F9 56 24 00  |00:.20..#....V$.|
000007D0: E2 23 F6 13 8B 56 24 B2  C7 28 31 33 33 29 A7 31  |.#...V$..(133).1|
000007E0: 30 30 00 F7 23 00 14 8B  56 24 B3 B1 C7 28 31 33  |00..#...V$...(13|
000007F0: 34 29 A7 35 30 39 30 00  FD 23 6F 17 90 00 12 24  |4).5090..#o....$|
00000800: 70 17 A1 56 24 3A 8B 56  24 B3 B1 22 22 A7 36 30  |p..V$:.V$.."".60|
00000810: 30 30 00 18 24 7A 17 8E  00 22 24 84 17 59 B2 59  |00..$z..."$..Y.Y|
00000820: AA 31 00 37 24 8E 17 8B  59 B1 31 35 30 A7 59 B2  |.1.7$...Y.150.Y.|
00000830: 31 3A 58 B2 58 AA 31 00  3D 24 98 17 8E 00 54 24  |1:X.X.1.=$....T$|
00000840: A2 17 50 52 24 28 58 2C  59 29 B2 4C 33 24 3A 89  |..PR$(X,Y).L3$:.|
00000850: 36 31 30 30 00 6B 24 AC  17 50 52 24 28 58 2C 59  |6100.k$..PR$(X,Y|
00000860: 29 B2 4C 34 24 3A 89 36  31 30 30 00 82 24 B6 17  |).L4$:.6100..$..|
00000870: 50 52 24 28 58 2C 59 29  B2 4C 33 24 3A 8D 36 31  |PR$(X,Y).L3$:.61|
00000880: 30 30 00 99 24 C0 17 50  52 24 28 58 2C 59 29 B2  |00..$..PR$(X,Y).|
00000890: 4C 37 24 3A 8D 36 31 30  30 00 AA 24 CA 17 50 52  |L7$:.6100..$..PR|
000008A0: 24 28 58 2C 59 29 B2 4C  35 24 00 C1 24 D4 17 99  |$(X,Y).L5$..$...|
000008B0: A6 32 29 50 52 24 28 58  2C 59 29 22 20 20 22 58  |.2)PR$(X,Y)"  "X|
000008C0: 3B 00 D1 24 DE 17 8B 59  B3 31 30 A7 99 22 20 22  |;..$...Y.10.." "|
000008D0: 3B 00 E2 24 E8 17 8B 59  B3 31 30 30 A7 99 22 20  |;..$...Y.100.." |
000008E0: 22 3B 00 EC 24 F2 17 99  22 20 22 59 00 F8 24 FC  |";..$..." "Y..$.|
000008F0: 17 8D 36 30 32 30 3A 8E  00 00 00                 |..6020:....     |

..)....4,3:.0,4:.PR$(6,150):X.1:Y.1:.500
0.J....A.1.2:Z1,40960,9:Z1,0,2:.:..S.D..
".":.20:."  INPUT PAGE NUMBER ";PG$...N.
.:."  PAGE NUMBER "PG$...X..:."  .  OKAY
?    Y OR N ??  "......6000:.20.H.....V$
.X....V$."N".100... ..V$.."Y".130......"
.":." "L1$.)...." . INSERT A DISK IN DRI
VE 8.          .".Z...." . THEN PRESS .R
ETURN..                 ."...C.." . PRES
S .F1. IF LISTING IS COMPLETE.   ."...H.
." "L2$...R..6000:.20.......V$.A....V$.G
(133).800.T....V$..G(13).210.......:.15,
8,15,"I0":........".":."  .  "DS$".  "..
....DS.0.285.B....".":."  DISK DRIVE ERR
OR DETECTED!":.170.S....:.".  PLEASE WAI
T!  READING THE DIRECTORY."...".NX.2.Y:.
".":.6050:.X.7.900...,...:.2,8,0,"$":.#2
,A$,A$...6..X.7.900.U.@..Y.150..800:.CL.
1.170...E..Y.NX..6090...J..Y.1..6070...T
.C.0:.#2,A$,A$,A$,B$:.A$.."".C.F(A$).6.^
..B$.."".C.C.F(B$).256.V.H.TE$.".".I("  
 ".D(C)." ",4).B.R..ST.490...|.B$."":.#2
,A$:.A$..G(34).370......#2,B$:.B$."".B$.
G(0).....B.F(B$)......B.160.440.L....B.3
2.B.127.B.63.Z....B.34.450.....TE$.TE$.G
(B):.390.. B.C$."":.#2,A$:.A$." ".450.- 
L.C$.C$.A$:.#2,A$:.A$.."".460.T V.PR$(X,
Y).H(TE$.BM$,22).H(C$,3).".".C ...6100:.
310.. ..PR$(X,Y).".".I("   ".D(C),6).. .
.PR$(X,Y).H(PR$(X,Y)."BLOCKS FREE".BM$,2
5).".":.6100.S ..PR$(X,Y).L4$:.6100.. ..
PR$(X,Y).L6$:.6100:.Y.145.520.. ...170..
! .CL.0:.:."  DELETE LAST LISTING?  Y OR
 N ??".8!*..6000.@!4..20.I!>...V$._!H..V
$."N"..:.6060:..P!R..V$.."Y".820. !\.CL.
1:PR$(X,Y).L6$:Y.Y.1:.PR$(X,Y)..L6$.860:
..!F.Y.150:.6020..!P..X.7.900.C!Z...I!P.
..O!.....!..BL$."":.A.1.40:BL$.BL$." ":.
:BM$.H(BL$,26).-"..LN$."":.A.1.36:LN$.LN
$.".":.:LO$.H(LN$,24).."..L1$.".".LN$.".
":L2$.".".LN$.".":L3$.".".LO$.".":L4$.".
".LO$.".":L5$.".".LO$.".":L6$.BM$.."..L7
$.". LISTING CONTINUED..... .".."..."...
  SIX COLUMN DIRECTORY PRINTOUT  (900)  
";..#...". BY JIM COOPER - QS! ALLIANCE 
LIBRARIAN "."#...:.". "L1$.S#D.." . PRES
S .F1. TO CREATE A NEW PAGE.     ."..#N.
." . PRESS .F3. TO RECALL A SAVED PAGE. 
  .":." "L2$..#X.J.132:.A.1.2:.K.A.8.2:J
.J.1:.K,G(J):.:..F#...6000:.20.O#....V$.
.#...V$.G(133).100..#...V$..G(134).5090.
.#O....$P..V$:.V$.."".6000..$Z..."$..Y.Y
.1.7$...Y.150.Y.1:X.X.1.=$....T$..PR$(X,
Y).L3$:.6100.K$..PR$(X,Y).L4$:.6100..$..
PR$(X,Y).L3$:.6100..$..PR$(X,Y).L7$:.610
0..$J.PR$(X,Y).L5$.A$T...2)PR$(X,Y)"  "X
;.Q$...Y.10.." ";..$...Y.100.." ";..$...
" "Y..$...6020:....

×

C64 Image

> CLICK IMAGE PREVIEW FOR FULL MODAL