DIR PRINT

00000000: 01 04 2D 08 0A 00 99 20  22 93 11 20 50 52 49 4E  |..-.... ".. PRIN|
00000010: 54 20 44 49 53 4B 45 54  54 45 20 44 49 52 45 43  |T DISKETTE DIREC|
00000020: 54 4F 52 49 45 53 22 3A  20 89 20 35 30 00 47 08  |TORIES": . 50.G.|
00000030: 14 00 84 31 2C 45 2C 45  24 2C 42 2C 49 3A 8B 20  |...1,E,E$,B,I:. |
00000040: 45 B2 30 20 A7 20 8E 00  66 08 1E 00 99 20 22 11  |E.0 . ..f.... ".|
00000050: 20 44 4F 53 20 45 52 52  4F 52 3A 20 22 3B 45 3B  | DOS ERROR: ";E;|
00000060: 45 24 3B 42 3B 49 00 76  08 28 00 A0 20 32 3A 20  |E$;B;I.v.(.. 2: |
00000070: A0 20 31 3A 20 80 00 9A  08 32 00 5A 24 B2 C7 28  |. 1: ....2.Z$..(|
00000080: 5A 29 3A 20 41 B2 31 3A  20 86 20 4C 24 28 32 33  |Z): A.1: . L$(23|
00000090: 32 29 2C 52 24 28 32 33  32 29 00 C3 08 3C 00 57  |2),R$(232)...<.W|
000000A0: B2 AB 41 3A 20 4C B2 5A  3A 20 52 B2 5A 3A 20 4A  |..A: L.Z: R.Z: J|
000000B0: B2 5A 3A 20 4B B2 5A 3A  56 24 B2 22 20 20 20 20  |.Z: K.Z:V$."    |
000000C0: 20 20 22 00 EA 08 46 00  56 B2 31 36 3A 20 51 B2  |  "...F.V.16: Q.|
000000D0: 33 32 3A 20 50 B2 31 32  38 3A 20 46 B2 32 35 36  |32: P.128: F.256|
000000E0: 3A 20 4D B2 5A 3A 20 59  B2 5A 00 13 09 50 00 54  |: M.Z: Y.Z...P.T|
000000F0: 24 28 31 29 B2 22 20 20  20 53 45 51 20 22 3A 20  |$(1)."   SEQ ": |
00000100: 54 24 28 32 29 B2 22 20  20 20 50 52 47 20 22 3A  |T$(2)."   PRG ":|
00000110: 47 B2 5A 00 3C 09 5A 00  54 24 28 33 29 B2 22 20  |G.Z.<.Z.T$(3)." |
00000120: 20 20 55 53 52 20 22 3A  20 54 24 28 34 29 B2 22  |  USR ": T$(4)."|
00000130: 20 20 20 52 45 4C 20 22  3A 4E B2 5A 00 65 09 64  |   REL ":N.Z.e.d|
00000140: 00 99 20 22 11 11 20 44  49 53 4B 20 55 4E 49 54  |.. ".. DISK UNIT|
00000150: 20 4E 52 20 28 38 2D 31  35 29 20 3F A0 38 20 9D  | NR (8-15) ?.8 .|
00000160: 9D 9D 9D 22 3B 00 8C 09  6E 00 85 20 55 3A 20 8B  |...";...n.. U: .|
00000170: 20 55 B3 38 20 B0 20 55  B1 31 35 20 A7 20 99 20  | U.8 . U.15 . . |
00000180: 22 91 91 91 22 3A 20 89  20 31 30 30 00 B8 09 78  |"...": . 100...x|
00000190: 00 99 20 22 11 20 44 49  53 4B 20 44 52 49 56 45  |.. ". DISK DRIVE|
000001A0: 20 4E 52 20 28 30 2F 31  29 20 3F A0 30 9D 9D 9D  | NR (0/1) ?.0...|
000001B0: 22 3B 3A 20 85 20 44 24  00 DE 09 82 00 44 B2 C5  |";: . D$.....D..|
000001C0: 28 44 24 29 3A 20 8B 20  44 AC 44 B1 44 20 A7 20  |(D$): . D.D.D . |
000001D0: 99 20 22 91 91 91 22 3A  20 89 20 31 32 30 00 0C  |. "...": . 120..|
000001E0: 0A 8C 00 99 20 22 11 11  20 50 4C 41 43 45 20 44  |.... ".. PLACE D|
000001F0: 49 53 4B 45 54 54 45 20  49 4E 20 55 4E 49 54 22  |ISKETTE IN UNIT"|
00000200: 3B 55 3B 22 44 52 49 56  45 22 3B 44 00 38 0A 96  |;U;"DRIVE";D.8..|
00000210: 00 99 20 22 20 50 52 45  53 53 20 53 50 41 43 45  |.. " PRESS SPACE|
00000220: 2D 42 41 52 20 54 4F 20  52 45 41 44 20 44 49 52  |-BAR TO READ DIR|
00000230: 45 43 54 4F 52 59 2C 22  00 65 0A A0 00 99 20 22  |ECTORY,".e.... "|
00000240: 20 50 52 45 53 53 20 27  4C 27 20 4B 45 59 20 46  | PRESS 'L' KEY F|
00000250: 4F 52 20 4C 41 53 54 20  44 49 53 4B 20 54 4F 20  |OR LAST DISK TO |
00000260: 52 45 41 44 22 00 89 0A  AA 00 A1 20 4D 24 3A 20  |READ"...... M$: |
00000270: 8B 20 4D 24 B3 B1 22 20  22 20 AF 20 4D 24 B3 B1  |. M$.." " . M$..|
00000280: 22 4C 22 20 A7 20 31 37  30 00 9E 0A B4 00 54 B2  |"L" . 170.....T.|
00000290: 31 38 3A 20 53 B2 31 3A  20 57 B2 A8 20 57 00 B8  |18: S.1: W.. W..|
000002A0: 0A BE 00 9F 20 31 2C 55  2C 31 35 2C 22 49 22 AA  |.... 1,U,15,"I".|
000002B0: 44 24 3A 20 8D 20 32 30  00 D5 0A C8 00 9F 20 32  |D$: . 20...... 2|
000002C0: 2C 55 2C 30 2C 22 24 22  AA 44 24 AA 22 3A 22 3A  |,U,0,"$".D$.":":|
000002D0: 20 8D 20 32 30 00 F5 0A  D2 00 81 20 58 B2 41 20  | . 20...... X.A |
000002E0: A4 20 37 3A 20 A1 23 32  2C 58 24 3A 20 82 3A 20  |. 7: .#2,X$: .: |
000002F0: 46 24 B2 22 22 00 19 0B  DC 00 81 20 58 B2 41 20  |F$.""...... X.A |
00000300: A4 20 32 31 3A 20 A1 23  32 2C 58 24 3A 20 46 24  |. 21: .#2,X$: F$|
00000310: B2 46 24 AA 58 24 3A 20  82 00 39 0B E6 00 A1 23  |.F$.X$: ..9....#|
00000320: 32 2C 58 24 2C 58 24 2C  58 24 2C 58 24 2C 58 24  |2,X$,X$,X$,X$,X$|
00000330: 2C 58 24 2C 41 24 2C 42  24 00 65 0B F0 00 58 B2  |,X$,A$,B$.e...X.|
00000340: C6 28 41 24 AA 5A 24 29  AA C6 28 42 24 AA 5A 24  |.(A$.Z$)..(B$.Z$|
00000350: 29 AC 46 3A 20 58 24 B2  C4 28 58 29 3A 20 43 B2  |).F: X$..(X): C.|
00000360: C3 28 58 24 29 00 91 0B  FA 00 46 24 B2 C7 28 31  |.(X$).....F$..(1|
00000370: 38 29 AA 46 24 AA C7 28  31 34 36 29 AA C8 28 56  |8).F$..(146)..(V|
00000380: 24 2C 35 AB 43 29 AA 58  24 AA 22 20 46 52 45 45  |$,5.C).X$." FREE|
00000390: 22 00 B5 0B 04 01 8B 20  57 20 A7 20 52 B2 5A 3A  |"...... W . R.Z:|
000003A0: 20 52 24 28 52 29 B2 46  24 3A 20 4E B2 41 3A 20  | R$(R).F$: N.A: |
000003B0: 89 20 32 38 30 00 CC 0B  0E 01 4C B2 5A 3A 20 4C  |. 280.....L.Z: L|
000003C0: 24 28 4C 29 B2 46 24 3A  20 47 B2 41 00 E7 0B 18  |$(L).F$: G.A....|
000003D0: 01 A0 20 32 3A 20 9F 20  32 2C 55 2C 32 2C 22 23  |.. 2: . 2,U,2,"#|
000003E0: 22 3A 20 8D 20 32 30 00  02 0C 22 01 98 31 2C 22  |": . 20..."..1,"|
000003F0: 55 31 3A 22 3B 32 3B 44  3B 54 3B 53 3A 20 8D 20  |U1:";2;D;T;S: . |
00000400: 32 30 00 1F 0C 2C 01 98  31 2C 22 42 2D 50 3A 22  |20...,..1,"B-P:"|
00000410: 3B 32 3B 30 3A 20 A1 23  32 2C 41 24 2C 42 24 00  |;2;0: .#2,A$,B$.|
00000420: 3F 0C 36 01 54 B2 C6 28  41 24 AA 5A 24 29 3A 20  |?.6.T..(A$.Z$): |
00000430: 53 B2 C6 28 42 24 AA 5A  24 29 3A 20 48 B2 32 00  |S..(B$.Z$): H.2.|
00000440: 5F 0C 40 01 98 31 2C 22  42 2D 50 3A 22 3B 32 3B  |_.@..1,"B-P:";2;|
00000450: 48 3A 20 A1 23 32 2C 41  24 2C 58 24 2C 58 24 00  |H: .#2,A$,X$,X$.|
00000460: 7B 0C 4A 01 43 B2 C6 28  41 24 AA 5A 24 29 3A 20  |{.J.C..(A$.Z$): |
00000470: 8B 20 43 B3 50 20 A7 20  34 30 30 00 A5 0C 54 01  |. C.P . 400...T.|
00000480: 46 24 B2 22 22 3A 20 81  20 58 B2 41 20 A4 20 56  |F$."": . X.A . V|
00000490: 3A 20 A1 23 32 2C 58 24  3A 20 46 24 B2 46 24 AA  |: .#2,X$: F$.F$.|
000004A0: 58 24 3A 20 82 00 C5 0C  5E 01 98 31 2C 22 42 2D  |X$: ....^..1,"B-|
000004B0: 50 3A 22 3B 32 3B 48 AA  32 38 3A 20 A1 23 32 2C  |P:";2;H.28: .#2,|
000004C0: 41 24 2C 42 24 00 DF 0C  68 01 58 B2 C6 28 41 24  |A$,B$...h.X..(A$|
000004D0: AA 5A 24 29 AA C6 28 42  24 AA 5A 24 29 AC 46 00  |.Z$)..(B$.Z$).F.|
000004E0: FE 0C 72 01 46 24 B2 C8  28 C4 28 58 29 AA 56 24  |..r.F$..(.(X).V$|
000004F0: 2C 38 29 AA 46 24 AA 54  24 28 43 AB 50 29 00 1F  |,8).F$.T$(C.P)..|
00000500: 0D 7C 01 8B 20 57 20 A7  20 52 B2 52 AA 41 3A 20  |.|.. W . R.R.A: |
00000510: 52 24 28 52 29 B2 46 24  3A 20 89 20 34 30 30 00  |R$(R).F$: . 400.|
00000520: 33 0D 86 01 4C B2 4C AA  41 3A 20 4C 24 28 4C 29  |3...L.L.A: L$(L)|
00000530: B2 46 24 00 4A 0D 90 01  48 B2 48 AA 51 3A 20 8B  |.F$.J...H.H.Q: .|
00000540: 20 48 B3 46 20 A7 20 33  32 30 00 58 0D 9A 01 8B  | H.F . 320.X....|
00000550: 20 54 20 A7 20 32 39 30  00 6C 0D A4 01 A0 20 32  | T . 290.l.... 2|
00000560: 3A 20 A0 20 31 3A 20 99  20 22 93 22 00 8D 0D AE  |: . 1: . "."....|
00000570: 01 8B 20 4D B2 5A 20 A7  20 4D B2 41 3A 20 8B 20  |.. M.Z . M.A: . |
00000580: 4D 24 B3 B1 22 4C 22 20  A7 20 31 34 30 00 A7 0D  |M$.."L" . 140...|
00000590: B8 01 8B 20 59 B2 5A 20  A7 20 9F 20 34 2C 34 3A  |... Y.Z . . 4,4:|
000005A0: 20 98 34 2C 22 93 22 00  BD 0D C2 01 59 B2 41 3A  | .4,".".....Y.A:|
000005B0: 20 8B 20 53 54 B2 5A 20  A7 20 35 30 30 00 E7 0D  | . ST.Z . 500...|
000005C0: CC 01 99 20 22 11 20 54  55 52 4E 20 4F 4E 20 50  |... ". TURN ON P|
000005D0: 52 49 4E 54 45 52 20 41  4E 44 20 41 4C 49 47 4E  |RINTER AND ALIGN|
000005E0: 20 50 41 50 45 52 22 00  11 0E D6 01 99 20 22 20  | PAPER"...... " |
000005F0: 54 48 45 4E 20 50 52 45  53 53 20 53 50 41 43 45  |THEN PRESS SPACE|
00000600: 2D 42 41 52 20 54 4F 20  43 4F 4E 54 49 4E 55 45  |-BAR TO CONTINUE|
00000610: 22 00 2A 0E E0 01 A1 20  58 24 3A 20 8B 20 58 24  |".*.... X$: . X$|
00000620: B3 B1 22 20 22 A7 20 34  38 30 00 3E 0E EA 01 A0  |.." ". 480.>....|
00000630: 20 34 3A 20 59 B2 5A 3A  20 89 20 34 34 30 00 62  | 4: Y.Z: . 440.b|
00000640: 0E F4 01 8B 20 47 B2 5A  20 A7 20 98 34 2C 22 22  |.... G.Z . .4,""|
00000650: 3B A6 34 37 29 3B 52 24  28 4B 29 3A 20 89 20 35  |;.47);R$(K): . 5|
00000660: 33 30 00 81 0E FE 01 98  34 2C 22 22 3B A6 36 29  |30......4,"";.6)|
00000670: 3B 4C 24 28 4A 29 3B A6  31 30 29 3B 52 24 28 4B  |;L$(J);.10);R$(K|
00000680: 29 00 9B 0E 08 02 8B 20  47 20 A7 20 4C 24 28 4A  |)...... G . L$(J|
00000690: 29 B2 22 22 3A 20 4A B2  4A AA 41 00 B5 0E 12 02  |)."": J.J.A.....|
000006A0: 8B 20 4E 20 A7 20 52 24  28 4B 29 B2 22 22 3A 20  |. N . R$(K)."": |
000006B0: 4B B2 4B AA 41 00 E0 0E  1C 02 8B 20 4A B1 4C 20  |K.K.A...... J.L |
000006C0: A7 20 57 B2 AB 41 3A 20  4A B2 5A 3A 20 47 B2 5A  |. W..A: J.Z: G.Z|
000006D0: 3A 20 8B 20 4D 24 B3 B1  22 4C 22 A7 20 31 34 30  |: . M$.."L". 140|
000006E0: 00 0A 0F 26 02 8B 20 4B  B1 52 20 A7 20 57 B2 5A  |...&.. K.R . W.Z|
000006F0: 3A 20 4B B2 5A 3A 20 4E  B2 5A 3A 20 8B 20 4D 24  |: K.Z: N.Z: . M$|
00000700: B3 B1 22 4C 22 A7 20 31  34 30 00 1C 0F 30 02 8B  |.."L". 140...0..|
00000710: 20 4A 20 B0 20 4B 20 A7  20 35 30 30 00 27 0F 3A  | J . K . 500.'.:|
00000720: 02 A0 20 34 3A 20 80 00  00 21                    |.. 4: ...!      |

..-.... ".. PRINT DISKETTE DIRECTORIES":
 . 50.G....1,E,E$,B,I:. E.0 . ..F.... ".
 DOS ERROR: ";E;E$;B;I.V.(.  2:   1: ...
.2.Z$.G(Z): A.1: . L$(232),R$(232).C.<.W
..A: L.Z: R.Z: J.Z: K.Z:V$."      "...F.
V.16: Q.32: P.128: F.256: M.Z: Y.Z...P.T
$(1)."   SEQ ": T$(2)."   PRG ":G.Z.<.Z.
T$(3)."   USR ": T$(4)."   REL ":N.Z.E.D
.. ".. DISK UNIT NR (8-15) ? 8 ....";...
N.. U: . U.8 . U.15 . . "...": . 100...X
.. ". DISK DRIVE NR (0/1) ? 0...";: . D$
.....D.E(D$): . D.D.D . . "...": . 120..
.... ".. PLACE DISKETTE IN UNIT";U;"DRIV
E";D.8.... " PRESS SPACE-BAR TO READ DIR
ECTORY,".E. .. " PRESS 'L' KEY FOR LAST 
DISK TO READ"...... M$: . M$.." " . M$..
"L" . 170.....T.18: S.1: W.. W...... 1,U
,15,"I".D$: . 20.U.H.. 2,U,0,"$".D$.":":
 . 20...R.. X.A . 7: .#2,X$: .: F$.""...
... X.A . 21: .#2,X$: F$.F$.X$: ..9....#
2,X$,X$,X$,X$,X$,X$,A$,B$.E...X.F(A$.Z$)
.F(B$.Z$).F: X$.D(X): C.C(X$).....F$.G(1
8).F$.G(146).H(V$,5.C).X$." FREE"...... 
W . R.Z: R$(R).F$: N.A: . 280.L...L.Z: L
$(L).F$: G.A.....  2: . 2,U,2,"#": . 20.
.."..1,"U1:";2;D;T;S: . 20...,..1,"B-P:"
;2;0: .#2,A$,B$.?.6.T.F(A$.Z$): S.F(B$.Z
$): H.2._.@..1,"B-P:";2;H: .#2,A$,X$,X$.
{.J.C.F(A$.Z$): . C.P . 400...T.F$."": .
 X.A . V: .#2,X$: F$.F$.X$: ..E.^..1,"B-
P:";2;H.28: .#2,A$,B$...H.X.F(A$.Z$).F(B
$.Z$).F...R.F$.H(D(X).V$,8).F$.T$(C.P)..
.|.. W . R.R.A: R$(R).F$: . 400.3...L.L.
A: L$(L).F$.J...H.H.Q: . H.F . 320.X....
 T . 290.L...  2:   1: . "."...... M.Z .
 M.A: . M$.."L" . 140...... Y.Z . . 4,4:
 .4,"."...B.Y.A: . ST.Z . 500...L.. ". T
URN ON PRINTER AND ALIGN PAPER"...V.. " 
THEN PRESS SPACE-BAR TO CONTINUE".*.... 
X$: . X$.." ". 480.>...  4: Y.Z: . 440.B
.... G.Z . .4,"";.47);R$(K): . 530......
4,"";.6);L$(J);.10);R$(K)...... G . L$(J
)."": J.J.A...... N . R$(K)."": K.K.A...
... J.L . W..A: J.Z: G.Z: . M$.."L". 140
...&.. K.R . W.Z: K.Z: N.Z: . M$.."L". 1
40...0.. J . K . 500.'.:.  4: ...!

×

C64 Image

> CLICK IMAGE PREVIEW FOR FULL MODAL