DISK DIR. PRINT

00000000: 01 08 46 08 0A 00 8F 20  44 49 53 4B 20 44 49 52  |..F.... DISK DIR|
00000010: 45 43 54 4F 52 59 20 50  52 49 4E 54 4F 55 54 20  |ECTORY PRINTOUT |
00000020: 46 52 4F 4D 20 41 50 52  49 4C 20 38 34 20 49 53  |FROM APRIL 84 IS|
00000030: 53 55 45 20 4F 46 20 52  55 4E 20 4F 4E 20 50 47  |SUE OF RUN ON PG|
00000040: 2E 20 31 32 32 2E 00 8D  08 64 00 86 46 58 24 28  |. 122....d..FX$(|
00000050: 32 35 36 29 2C 46 54 24  28 32 35 36 29 2C 46 4C  |256),FT$(256),FL|
00000060: 28 32 35 36 29 2C 54 54  28 32 35 36 29 3A 4E B2  |(256),TT(256):N.|
00000070: AB 31 3A 81 49 B2 31 A4  32 35 36 3A 46 58 24 28  |.1:.I.1.256:FX$(|
00000080: 49 29 B2 22 22 3A 82 3A  58 B2 32 32 31 00 AF 08  |I)."":.:X.221...|
00000090: 6E 00 42 4C 24 B2 22 20  22 3A 81 49 B2 31 A4 34  |n.BL$." ":.I.1.4|
000000A0: 30 3A 42 4C 24 B2 42 4C  24 AA 22 A0 22 3A 82 00  |0:BL$.BL$.".":..|
000000B0: DB 08 78 00 A0 31 35 3A  9F 31 35 2C 38 2C 31 35  |..x..15:.15,8,15|
000000C0: 3A 9F 31 2C 38 2C 30 2C  22 24 30 22 3A 8D 34 38  |:.1,8,0,"$0":.48|
000000D0: 30 3A A1 23 31 2C 41 24  2C 42 24 00 FD 08 82 00  |0:.#1,A$,B$.....|
000000E0: 57 B2 35 31 3A 4C 24 B2  22 22 3A 85 22 4C 41 42  |W.51:L$."":."LAB|
000000F0: 45 4C 20 53 54 52 49 4E  47 22 3B 4C 24 00 3F 09  |EL STRING";L$.?.|
00000100: 87 00 8B C3 28 4C 24 29  B1 32 32 A7 99 22 4C 41  |....(L$).22.."LA|
00000110: 42 45 4C 20 53 54 52 49  4E 47 20 54 4F 4F 20 4C  |BEL STRING TOO L|
00000120: 4F 4E 47 2D 4D 41 58 20  49 53 20 32 32 20 43 48  |ONG-MAX IS 22 CH|
00000130: 41 52 41 43 54 45 52 53  2E 22 3A 89 31 33 30 00  |ARACTERS.":.130.|
00000140: 6B 09 8C 00 A1 23 31 2C  41 24 2C 42 24 3A A1 23  |k....#1,A$,B$:.#|
00000150: 31 2C 41 24 2C 42 24 3A  43 B2 30 3A 8B 41 24 B3  |1,A$,B$:C.0:.A$.|
00000160: B1 22 22 A7 43 B2 C6 28  41 24 29 00 85 09 96 00  |."".C..(A$).....|
00000170: 8B 42 24 B3 B1 22 22 A7  43 B2 43 AA C6 28 42 24  |.B$.."".C.C..(B$|
00000180: 29 AC 32 35 36 00 97 09  A0 00 4E B2 4E AA 31 3A  |).256.....N.N.1:|
00000190: 46 4C 28 4E 29 B2 43 00  AD 09 AA 00 A1 23 31 2C  |FL(N).C......#1,|
000001A0: 42 24 3A 8B 53 54 B3 B1  30 A7 32 36 30 00 C0 09  |B$:.ST..0.260...|
000001B0: B4 00 8B 42 24 B3 B1 C7  28 33 34 29 A7 31 37 30  |...B$...(34).170|
000001C0: 00 CA 09 BE 00 4E 24 B2  22 22 00 EE 09 C8 00 A1  |.....N$.""......|
000001D0: 23 31 2C 42 24 3A 8B 42  24 B3 B1 C7 28 33 34 29  |#1,B$:.B$...(34)|
000001E0: A7 4E 24 B2 4E 24 AA 42  24 3A 89 32 30 30 00 FC  |.N$.N$.B$:.200..|
000001F0: 09 D2 00 46 58 24 28 4E  29 B2 4E 24 00 15 0A DC  |...FX$(N).N$....|
00000200: 00 A1 23 31 2C 42 24 3A  8B 42 24 B2 C7 28 33 32  |..#1,B$:.B$..(32|
00000210: 29 A7 32 32 30 00 1F 0A  E6 00 43 24 B2 22 22 00  |).220.....C$."".|
00000220: 41 0A F0 00 43 24 B2 43  24 AA 42 24 3A A1 23 31  |A...C$.C$.B$:.#1|
00000230: 2C 42 24 3A 8B 42 24 B3  B1 22 22 20 20 A7 32 34  |,B$:.B$..""  .24|
00000240: 30 00 5E 0A FA 00 46 54  24 28 4E 29 B2 C8 28 43  |0.^...FT$(N)..(C|
00000250: 24 2C 33 29 3A 8B 53 54  B2 30 A7 31 34 30 00 79  |$,3):.ST.0.140.y|
00000260: 0A 04 01 A0 31 3A 42 46  B2 46 4C 28 4E 29 3A 4E  |....1:BF.FL(N):N|
00000270: B2 4E AB 31 3A 8D 35 38  30 00 85 0A 0E 01 A0 33  |.N.1:.580......3|
00000280: 3A 9F 33 2C 34 00 B3 0A  18 01 98 33 2C C7 28 31  |:.3,4......3,.(1|
00000290: 37 36 29 3B 3A 81 49 B2  31 A4 35 31 3A 98 33 2C  |76);:.I.1.51:.3,|
000002A0: C7 28 31 39 32 29 3B 3A  82 3A 98 33 2C C7 28 31  |.(192);:.:.3,.(1|
000002B0: 37 34 29 00 C9 0A 22 01  98 33 2C C7 28 58 29 3B  |74)..."..3,.(X);|
000002C0: A6 35 31 29 3B C7 28 58  29 00 F5 0A 2C 01 54 32  |.51);.(X)...,.T2|
000002D0: 24 B2 46 58 24 28 30 29  3A 8B 4C 24 B3 B1 22 22  |$.FX$(0):.L$..""|
000002E0: A7 54 32 24 B2 54 32 24  AA 22 20 20 28 22 AA 4C  |.T2$.T2$."  (".L|
000002F0: 24 AA 22 29 22 00 14 0B  36 01 54 24 B2 C7 28 58  |$.")"...6.T$..(X|
00000300: 29 AA 22 20 20 20 20 20  3E 3E 3E 20 22 AA 46 58  |)."     >>> ".FX|
00000310: 24 28 30 29 00 3D 0B 3B  01 8B 4C 24 B2 22 22 A7  |$(0).=.;..L$."".|
00000320: 54 24 B2 54 24 AA CA 28  42 4C 24 2C 31 2C 57 AB  |T$.T$..(BL$,1,W.|
00000330: C3 28 54 24 29 AB 31 29  3A 89 33 33 30 00 71 0B  |.(T$).1):.330.q.|
00000340: 40 01 4B B2 57 AB 32 AB  C3 28 54 24 29 AB C3 28  |@.K.W.2..(T$)..(|
00000350: 4C 24 29 3A 54 24 B2 54  24 AA CA 28 42 4C 24 2C  |L$):T$.T$..(BL$,|
00000360: 31 2C 4B AB 31 29 AA 22  28 22 AA 4C 24 AA 22 29  |1,K.1)."(".L$.")|
00000370: 22 00 8B 0B 4A 01 54 24  B2 54 24 AA 22 20 20 22  |"...J.T$.T$."  "|
00000380: AA C7 28 58 29 3A 98 33  2C 54 24 00 A1 0B 54 01  |..(X):.3,T$...T.|
00000390: 98 33 2C C7 28 58 29 3B  A6 35 31 29 3B C7 28 58  |.3,.(X);.51);.(X|
000003A0: 29 00 CF 0B 5E 01 98 33  2C C7 28 31 37 31 29 3B  |)...^..3,.(171);|
000003B0: 3A 81 49 B2 31 A4 35 31  3A 98 33 2C C7 28 31 39  |:.I.1.51:.3,.(19|
000003C0: 32 29 3B 3A 82 3A 98 33  2C C7 28 31 37 39 29 00  |2);:.:.3,.(179).|
000003D0: E5 0B 68 01 98 33 2C C7  28 58 29 3B A6 35 31 29  |..h..3,.(X);.51)|
000003E0: 3B C7 28 58 29 00 01 0C  72 01 4C B2 39 3A 4B B2  |;.(X)...r.L.9:K.|
000003F0: B5 28 28 4E AA 31 29 AD  32 29 3A 81 49 B2 31 A4  |.((N.1).2):.I.1.|
00000400: 4B 00 3B 0C 7C 01 54 24  B2 C7 28 58 29 3A 4A B2  |K.;.|.T$..(X):J.|
00000410: 49 3A 8D 35 32 30 3A 54  24 B2 54 24 AA 22 20 22  |I:.520:T$.T$." "|
00000420: 3A 4A B2 4B AA 49 3A 8D  35 32 30 3A 54 24 B2 54  |:J.K.I:.520:T$.T|
00000430: 24 AA 22 20 20 22 AA C7  28 58 29 00 4E 0C 86 01  |$."  "..(X).N...|
00000440: 98 33 2C 54 24 20 3A 4C  B2 4C AA 31 3A 82 00 64  |.3,T$ :L.L.1:..d|
00000450: 0C 90 01 98 33 2C C7 28  58 29 3B A6 35 31 29 3B  |....3,.(X);.51);|
00000460: C7 28 58 29 00 8A 0C 9A  01 50 B2 B5 28 28 42 46  |.(X).....P..((BF|
00000470: AC 31 30 30 AD 36 36 34  29 AA 2E 35 29 3A 50 24  |.100.664)..5):P$|
00000480: B2 CA 28 C4 28 50 29 2C  32 29 00 C1 0C A4 01 54  |..(.(P),2).....T|
00000490: 24 B2 C7 28 58 29 AA CA  28 42 4C 24 2C 31 2C 31  |$..(X)..(BL$,1,1|
000004A0: 34 29 AA C4 28 42 46 29  AA 22 20 42 4C 4F 43 4B  |4)..(BF)." BLOCK|
000004B0: 53 20 28 22 AA 50 24 AA  22 25 29 20 46 52 45 45  |S (".P$."%) FREE|
000004C0: 22 00 E9 0C AE 01 54 24  B2 54 24 AA CA 28 42 4C  |".....T$.T$..(BL|
000004D0: 24 2C 31 2C 57 AB C3 28  54 24 29 AA 31 29 AA C7  |$,1,W..(T$).1)..|
000004E0: 28 58 29 3A 98 33 2C 54  24 00 06 0D B8 01 81 49  |(X):.3,T$......I|
000004F0: B2 4C A4 32 37 3A 98 33  2C C7 28 58 29 3B A6 35  |.L.27:.3,.(X);.5|
00000500: 31 29 C7 28 58 29 00 0C  0D C2 01 82 00 3A 0D CC  |1).(X).......:..|
00000510: 01 98 33 2C C7 28 31 37  33 29 3B 3A 81 49 B2 31  |..3,.(173);:.I.1|
00000520: A4 35 31 3A 98 33 2C C7  28 31 39 32 29 3B 3A 82  |.51:.3,.(192);:.|
00000530: 3A 98 33 2C C7 28 31 38  39 29 00 4A 0D D6 01 98  |:.3,.(189).J....|
00000540: 33 3A A0 33 3A A0 31 35  3A 80 00 62 0D E0 01 84  |3:.3:.15:..b....|
00000550: 31 35 2C 45 52 2C 45 52  24 3A 8B 45 52 B3 32 30  |15,ER,ER$:.ER.20|
00000560: A7 8E 00 96 0D EA 01 8B  45 52 B2 37 34 B0 45 52  |........ER.74.ER|
00000570: B2 32 31 A7 45 52 24 B2  45 52 24 AA 22 2D 2D 49  |.21.ER$.ER$."--I|
00000580: 53 20 44 49 53 4B 20 49  4E 53 45 52 54 45 44 3F  |S DISK INSERTED?|
00000590: 22 3A 89 35 31 30 00 BA  0D F4 01 45 52 24 B2 22  |":.510.....ER$."|
000005A0: 44 49 53 4B 20 45 52 52  4F 52 22 AA C4 28 45 52  |DISK ERROR"..(ER|
000005B0: 29 AA 22 3A 20 22 AA 45  52 24 00 C5 0D FE 01 99  |).": ".ER$......|
000005C0: 45 52 24 3A 80 00 EA 0D  08 02 54 B2 54 54 28 4A  |ER$:......T.TT(J|
000005D0: 29 3A 8B 54 B2 30 A7 54  24 B2 54 24 AA CA 28 42  |):.T.0.T$.T$..(B|
000005E0: 4C 24 2C 31 2C 32 34 29  3A 8E 00 03 0E 12 02 8B  |L$,1,24):.......|
000005F0: 46 4C 28 54 29 B3 31 30  30 A7 54 24 B2 54 24 AA  |FL(T).100.T$.T$.|
00000600: 22 A0 22 00 1B 0E 1C 02  8B 46 4C 28 54 29 B3 31  |"."......FL(T).1|
00000610: 30 A7 54 24 B2 54 24 AA  22 A0 22 00 3E 0E 26 02  |0.T$.T$.".".>.&.|
00000620: 54 24 B2 54 24 AA CA 28  C4 28 46 4C 28 54 29 29  |T$.T$..(.(FL(T))|
00000630: 2C 32 29 AA 22 A0 22 AA  46 58 24 28 54 29 00 6C  |,2).".".FX$(T).l|
00000640: 0E 30 02 8B C3 28 46 58  24 28 54 29 29 B3 31 36  |.0...(FX$(T)).16|
00000650: A7 54 24 B2 54 24 AA CA  28 42 4C 24 2C 31 2C 31  |.T$.T$..(BL$,1,1|
00000660: 36 AB C3 28 46 58 24 28  54 29 29 29 00 88 0E 3A  |6..(FX$(T)))...:|
00000670: 02 54 24 B2 54 24 AA 22  A0 22 AA C8 28 46 54 24  |.T$.T$."."..(FT$|
00000680: 28 54 29 2C 33 29 3A 8E  00 9D 0E 44 02 81 49 B2  |(T),3):....D..I.|
00000690: 31 A4 4E 3A 54 54 28 49  29 B2 49 3A 82 00 D2 0E  |1.N:TT(I).I:....|
000006A0: 4E 02 81 49 B2 31 A4 4E  AB 31 3A 53 B2 49 3A 81  |N..I.1.N.1:S.I:.|
000006B0: 4A B2 49 AA 31 A4 4E 3A  8B 46 58 24 28 54 54 28  |J.I.1.N:.FX$(TT(|
000006C0: 4A 29 29 B3 46 58 24 28  54 54 28 53 29 29 A7 53  |J)).FX$(TT(S)).S|
000006D0: B2 4A 00 FB 0E 58 02 82  4A 3A 8B 53 B3 B1 49 A7  |.J...X..J:.S..I.|
000006E0: 54 B2 54 54 28 49 29 3A  54 54 28 49 29 B2 54 54  |T.TT(I):TT(I).TT|
000006F0: 28 53 29 3A 54 54 28 53  29 B2 54 00 04 0F 62 02  |(S):TT(S).T...b.|
00000700: 82 49 3A 8E 00 00 00                              |.I:....         |

..F.... DISK DIRECTORY PRINTOUT FROM APR
IL 84 ISSUE OF RUN ON PG. 122....D..FX$(
256),FT$(256),FL(256),TT(256):N..1:.I.1.
256:FX$(I)."":.:X.221...N.BL$." ":.I.1.4
0:BL$.BL$." ":....X. 15:.15,8,15:.1,8,0,
"$0":.480:.#1,A$,B$.....W.51:L$."":."LAB
EL STRING";L$.?....C(L$).22.."LABEL STRI
NG TOO LONG-MAX IS 22 CHARACTERS.":.130.
K....#1,A$,B$:.#1,A$,B$:C.0:.A$.."".C.F(
A$)......B$.."".C.C.F(B$).256... .N.N.1:
FL(N).C......#1,B$:.ST..0.260......B$..G
(34).170.J...N$.""...H..#1,B$:.B$..G(34)
.N$.N$.B$:.200...R.FX$(N).N$......#1,B$:
.B$.G(32).220.....C$."".A...C$.C$.B$:.#1
,B$:.B$..""  .240.^...FT$(N).H(C$,3):.ST
.0.140.Y... 1:BF.FL(N):N.N.1:.580..... 3
:.3,4......3,G(176);:.I.1.51:.3,G(192);:
.:.3,G(174).I."..3,G(X);.51);G(X)...,.T2
$.FX$(0):.L$.."".T2$.T2$."  (".L$.")"...
6.T$.G(X)."     >>> ".FX$(0).=.;..L$."".
T$.T$.J(BL$,1,W.C(T$).1):.330.Q.@.K.W.2.
C(T$).C(L$):T$.T$.J(BL$,1,K.1)."(".L$.")
"...J.T$.T$."  ".G(X):.3,T$...T..3,G(X);
.51);G(X).O.^..3,G(171);:.I.1.51:.3,G(19
2);:.:.3,G(179)...H..3,G(X);.51);G(X)...
R.L.9:K..((N.1).2):.I.1.K.;.|.T$.G(X):J.
I:.520:T$.T$." ":J.K.I:.520:T$.T$."  ".G
(X).N....3,T$ :L.L.1:..D....3,G(X);.51);
G(X).....P..((BF.100.664)..5):P$.J(D(P),
2).A...T$.G(X).J(BL$,1,14).D(BF)." BLOCK
S (".P$."%) FREE".....T$.T$.J(BL$,1,W.C(
T$).1).G(X):.3,T$......I.L.27:.3,G(X);.5
1)G(X)...B...:.L..3,G(173);:.I.1.51:.3,G
(192);:.:.3,G(189).J.V..3: 3: 15:..B....
15,ER,ER$:.ER.20........ER.74.ER.21.ER$.
ER$."--IS DISK INSERTED?":.510.....ER$."
DISK ERROR".D(ER).": ".ER$.E....ER$:....
..T.TT(J):.T.0.T$.T$.J(BL$,1,24):.......
FL(T).100.T$.T$." "......FL(T).10.T$.T$.
" ".>.&.T$.T$.J(D(FL(T)),2)." ".FX$(T).L
.0..C(FX$(T)).16.T$.T$.J(BL$,1,16.C(FX$(
T)))...:.T$.T$." ".H(FT$(T),3):....D..I.
1.N:TT(I).I:..R.N..I.1.N.1:S.I:.J.I.1.N:
.FX$(TT(J)).FX$(TT(S)).S.J...X..J:.S..I.
T.TT(I):TT(I).TT(S):TT(S).T...B..I:....

×

C64 Image

> CLICK IMAGE PREVIEW FOR FULL MODAL