00000000: 0D 0D 20 20 20 20 20 20 20 31 2C 32 2C 33 20 C4 |.. 1,2,3 .|
00000010: C9 D3 CB 20 C4 C9 D2 C5 C3 D4 CF D2 D9 0D 20 20 |... .......... |
00000020: 20 20 20 20 20 20 20 20 20 20 20 20 20 42 59 0D | BY.|
00000030: 20 20 20 20 20 20 20 20 C4 41 4E 49 45 4C 20 D2 | .ANIEL .|
00000040: 2E 20 D7 49 4E 53 54 45 41 44 0D 0D C3 CF CD CD |. .INSTEAD......|
00000050: CF C4 CF D2 C5 20 D0 CF D7 C5 D2 2F D0 CC C1 D9 |..... ...../....|
00000060: 20 CD C1 C7 C1 DA C9 CE C5 0D C1 50 52 49 4C 2F | ..........PRIL/|
00000070: CD 41 59 2C 20 31 39 38 36 0D 50 2E 38 36 0D 0D |.AY, 1986.P.86..|
00000080: 20 20 D4 48 49 53 20 50 52 4F 47 52 41 4D 20 57 | .HIS PROGRAM W|
00000090: 41 53 20 57 52 49 54 54 45 4E 20 46 4F 52 20 54 |AS WRITTEN FOR T|
000000A0: 48 4F 53 45 0D 0D 46 52 55 47 41 4C 20 54 59 50 |HOSE..FRUGAL TYP|
000000B0: 45 53 20 4F 55 54 20 54 48 45 52 45 2E 20 20 D9 |ES OUT THERE. .|
000000C0: 4F 55 20 4B 4E 4F 57 20 54 48 45 0D 0D 54 59 50 |OU KNOW THE..TYP|
000000D0: 45 2D 2D 20 54 48 45 20 4B 49 4E 44 20 4F 46 20 |E-- THE KIND OF |
000000E0: 50 45 52 53 4F 4E 20 57 48 4F 20 57 49 4C 4C 0D |PERSON WHO WILL.|
000000F0: 0D 44 52 41 49 4E 20 41 20 4B 45 54 43 48 55 50 |.DRAIN A KETCHUP|
00000100: 20 42 4F 54 54 4C 45 20 46 4F 52 20 48 4F 55 52 | BOTTLE FOR HOUR|
00000110: 53 0D 0D 42 45 46 4F 52 45 20 4F 50 45 4E 49 4E |S..BEFORE OPENIN|
00000120: 47 20 41 20 4E 45 57 20 42 4F 54 54 4C 45 2E 20 |G A NEW BOTTLE. |
00000130: 20 D4 48 45 0D 0D 4B 49 4E 44 20 4F 46 20 50 45 | .HE..KIND OF PE|
00000140: 52 53 4F 4E 20 57 48 4F 20 55 53 45 53 20 43 4F |RSON WHO USES CO|
00000150: 55 50 4F 4E 53 20 41 54 0D 0D 54 48 45 20 37 2D |UPONS AT..THE 7-|
00000160: C5 4C 45 56 45 4E 2E 0D 0D 0D 20 20 C9 4E 53 54 |.LEVEN.... .NST|
00000170: 45 41 44 20 4F 46 20 4B 45 54 43 48 55 50 2C 20 |EAD OF KETCHUP, |
00000180: 31 2C 32 2C 33 20 C4 C9 D3 CB 0D 0D C4 C9 D2 C5 |1,2,3 ..........|
00000190: C3 D4 CF D2 D9 20 53 41 56 45 53 20 50 41 50 45 |..... SAVES PAPE|
000001A0: 52 20 57 48 45 4E 20 59 4F 55 20 50 52 49 4E 54 |R WHEN YOU PRINT|
000001B0: 0D 0D 4F 55 54 20 59 4F 55 52 20 44 49 53 4B 20 |..OUT YOUR DISK |
000001C0: 44 49 52 45 43 54 4F 52 49 45 53 2E 20 20 CE 4F |DIRECTORIES. .O|
000001D0: 52 4D 41 4C 4C 59 2C 0D 0D 57 48 45 4E 20 59 4F |RMALLY,..WHEN YO|
000001E0: 55 20 4D 41 4B 45 20 41 20 50 52 49 4E 54 4F 55 |U MAKE A PRINTOU|
000001F0: 54 20 4F 46 20 41 20 44 49 53 4B 0D 0D 44 49 52 |T OF A DISK..DIR|
00000200: 45 43 54 4F 52 59 2C 20 4F 4E 4C 59 20 4F 4E 45 |ECTORY, ONLY ONE|
00000210: 20 44 49 52 45 43 54 4F 52 59 20 57 49 4C 4C 20 | DIRECTORY WILL |
00000220: 42 45 0D 0D 4F 4E 20 41 20 50 41 47 45 2D 2D 20 |BE..ON A PAGE-- |
00000230: 4C 45 41 56 49 4E 47 20 54 48 45 20 50 41 47 45 |LEAVING THE PAGE|
00000240: 20 54 57 4F 0D 0D 54 48 49 52 44 53 20 42 4C 41 | TWO..THIRDS BLA|
00000250: 4E 4B 2E 20 20 C4 C9 D3 CB 20 C4 C9 D2 C5 C3 D4 |NK. .... ......|
00000260: CF D2 D9 20 46 49 4C 4C 53 0D 0D 54 48 41 54 20 |... FILLS..THAT |
00000270: 53 50 41 43 45 2E 0D 0D 0D 20 20 C8 4F 57 3F 20 |SPACE.... .OW? |
00000280: 20 C9 54 20 49 53 20 53 49 4D 50 4C 45 2E 20 20 | .T IS SIMPLE. |
00000290: C4 C9 D3 CB 20 C4 C9 D2 C5 C3 D4 CF D2 D9 0D 0D |.... ...........|
000002A0: 52 45 41 44 53 20 55 50 20 54 4F 20 54 48 52 45 |READS UP TO THRE|
000002B0: 45 20 44 49 53 4B 20 44 49 52 45 43 54 4F 52 49 |E DISK DIRECTORI|
000002C0: 45 53 0D 0D 49 4E 54 4F 20 4D 45 4D 4F 52 59 20 |ES..INTO MEMORY |
000002D0: 41 4E 44 20 54 48 45 4E 20 50 52 49 4E 54 53 20 |AND THEN PRINTS |
000002E0: 54 48 45 0D 0D 44 49 52 45 43 54 4F 52 49 45 53 |THE..DIRECTORIES|
000002F0: 20 49 4E 20 54 48 52 45 45 20 43 4F 4C 55 4D 4E | IN THREE COLUMN|
00000300: 53 20 4F 4E 20 41 4E 20 38 30 0D 0D 43 4F 4C 55 |S ON AN 80..COLU|
00000310: 4D 4E 20 50 41 47 45 2E 0D 0D 0D 20 20 C2 45 46 |MN PAGE.... .EF|
00000320: 4F 52 45 20 59 4F 55 20 55 53 45 20 54 48 49 53 |ORE YOU USE THIS|
00000330: 20 50 52 4F 47 52 41 4D 2C 20 4D 41 4B 45 0D 0D | PROGRAM, MAKE..|
00000340: 53 55 52 45 20 54 48 41 54 20 59 4F 55 52 20 50 |SURE THAT YOUR P|
00000350: 52 49 4E 54 45 52 20 49 53 20 52 45 41 44 59 2E |RINTER IS READY.|
00000360: 0D 0D D4 48 45 4E 20 57 48 45 4E 20 59 4F 55 20 |...HEN WHEN YOU |
00000370: 52 55 4E 20 54 48 45 20 50 52 4F 47 52 41 4D 2C |RUN THE PROGRAM,|
00000380: 20 59 4F 55 0D 0D 41 52 45 20 50 52 4F 4D 50 54 | YOU..ARE PROMPT|
00000390: 45 44 20 54 4F 20 45 4E 54 45 52 20 54 48 45 20 |ED TO ENTER THE |
000003A0: 4E 55 4D 42 45 52 20 4F 46 0D 0D 44 49 53 4B 53 |NUMBER OF..DISKS|
000003B0: 20 59 4F 55 20 57 49 4C 4C 20 42 45 20 57 4F 52 | YOU WILL BE WOR|
000003C0: 4B 49 4E 47 20 57 49 54 48 2E 0D 0D C1 46 54 45 |KING WITH....FTE|
000003D0: 52 20 59 4F 55 20 45 4E 54 45 52 20 54 48 45 20 |R YOU ENTER THE |
000003E0: 4E 55 4D 42 45 52 2C 20 59 4F 55 20 41 52 45 0D |NUMBER, YOU ARE.|
000003F0: 0D 50 52 4F 4D 50 54 45 44 20 54 4F 20 49 4E 53 |.PROMPTED TO INS|
00000400: 45 52 54 20 45 41 43 48 20 44 49 53 4B 20 49 4E |ERT EACH DISK IN|
00000410: 54 4F 20 54 48 45 0D 0D 44 52 49 56 45 2E 20 20 |TO THE..DRIVE. |
00000420: D9 4F 55 20 4D 55 53 54 20 50 52 45 53 53 20 41 |.OU MUST PRESS A|
00000430: 20 4B 45 59 20 54 4F 0D 0D 43 4F 4E 54 49 4E 55 | KEY TO..CONTINU|
00000440: 45 2E 0D E0 0D 0D 20 20 D7 48 45 4E 20 54 48 45 |E..... .HEN THE|
00000450: 20 4C 41 53 54 20 44 49 52 45 43 54 4F 52 59 20 | LAST DIRECTORY |
00000460: 49 53 20 52 45 41 44 2C 0D 0D 54 48 45 20 50 52 |IS READ,..THE PR|
00000470: 49 4E 54 4F 55 54 20 57 49 4C 4C 20 42 45 47 49 |INTOUT WILL BEGI|
00000480: 4E 2E 0D 0D 0D 20 20 D4 4F 20 52 55 4E 20 54 48 |N.... .O RUN TH|
00000490: 49 53 20 50 52 4F 47 52 41 4D 2C 20 45 58 49 54 |IS PROGRAM, EXIT|
000004A0: 20 CC 4F 41 44 53 54 41 52 2C 0D 0D 54 59 50 45 | .OADSTAR,..TYPE|
000004B0: 20 CC CF C1 C4 22 31 32 33 20 C4 C9 D2 C5 C3 D4 | ...."123 ......|
000004C0: CF D2 D9 22 2C 38 20 41 4E 44 20 48 49 54 0D 0D |...",8 AND HIT..|
000004D0: 52 45 54 55 52 4E 2E 20 20 D4 48 45 4E 20 54 59 |RETURN. .HEN TY|
000004E0: 50 45 20 D2 D5 CE 20 41 4E 44 20 52 45 54 55 52 |PE ... AND RETUR|
000004F0: 4E 2E 0D 0D 0D C6 C9 CC C5 D3 20 D2 C5 D1 D5 C9 |N......... .....|
00000500: D2 C5 C4 3A 0D 0D 31 32 33 20 C4 C9 D2 C5 C3 D4 |...:..123 ......|
00000510: CF D2 D9 0D 0D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |.....-----------|
00000520: 3C 45 4E 44 20 4F 46 20 54 45 58 54 3E 2D 2D 2D |<END OF TEXT>---|
00000530: 2D 2D 2D 2D 2D 2D 2D 2D 2D 0D 0D E0 0D |---------.... |
.. 1,2,3 DISK DIRECTORY.
BY. DANIEL R. WINSTEAD..COMM
ODORE POWER/PLAY MAGAZINE.APRIL/MAY, 198
6.P.86.. THIS PROGRAM WAS WRITTEN FOR T
HOSE..FRUGAL TYPES OUT THERE. YOU KNOW
THE..TYPE-- THE KIND OF PERSON WHO WILL.
.DRAIN A KETCHUP BOTTLE FOR HOURS..BEFOR
E OPENING A NEW BOTTLE. THE..KIND OF PE
RSON WHO USES COUPONS AT..THE 7-ELEVEN..
.. INSTEAD OF KETCHUP, 1,2,3 DISK..DIRE
CTORY SAVES PAPER WHEN YOU PRINT..OUT YO
UR DISK DIRECTORIES. NORMALLY,..WHEN YO
U MAKE A PRINTOUT OF A DISK..DIRECTORY,
ONLY ONE DIRECTORY WILL BE..ON A PAGE--
LEAVING THE PAGE TWO..THIRDS BLANK. DIS
K DIRECTORY FILLS..THAT SPACE.... HOW?
IT IS SIMPLE. DISK DIRECTORY..READS UP
TO THREE DISK DIRECTORIES..INTO MEMORY
AND THEN PRINTS THE..DIRECTORIES IN THRE
E COLUMNS ON AN 80..COLUMN PAGE.... BEF
ORE YOU USE THIS PROGRAM, MAKE..SURE THA
T YOUR PRINTER IS READY...THEN WHEN YOU
RUN THE PROGRAM, YOU..ARE PROMPTED TO EN
TER THE NUMBER OF..DISKS YOU WILL BE WOR
KING WITH...AFTER YOU ENTER THE NUMBER,
YOU ARE..PROMPTED TO INSERT EACH DISK IN
TO THE..DRIVE. YOU MUST PRESS A KEY TO.
.CONTINUE..... WHEN THE LAST DIRECTORY
IS READ,..THE PRINTOUT WILL BEGIN.... T
O RUN THIS PROGRAM, EXIT LOADSTAR,..TYPE
LOAD"123 DIRECTORY",8 AND HIT..RETURN.
THEN TYPE RUN AND RETURN....FILES REQUI
RED:..123 DIRECTORY..-----------<END OF
TEXT>------------....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL