Quick-Docs by Ron Fetzer¢ ¢ ¢ The DISK LABEL program prints¢ an alphabetical list of your disk¢ directory on 3.5 x 15/16 size¢ pressure sensitive labels. ¢ ¢ The program can print 27 file¢ names on one label. If there are¢ more than 27 names it will print it¢ on a second label. The program can¢ handle a total of 54 files. The¢ program will ignore the following¢ file names: DOS.SYS, DUP.SYS and¢ RAMDISK.COM. ¢ ¢ The program will search for the¢ disk title that was placed on the¢ disk with the CATALOGER program.¢ This title will be printed on the¢ first line with the disk density¢ information and the number of K-¢ bytes of free disk space. If there¢ is no disk title on the disk then¢ the program will ask you for a¢ title. ¢ ¢ To adjust the labels correctly¢ in your printer use the LABEL ADJUST¢ section. Move your label either up¢ or down until it is in the right¢ position. Once you have found the¢ correct position make a dot with¢ WHITEOUT on your tractor feed¢ housing. Now you will have a position¢ indicator of where the beginning of¢ the labels are to be placed. ¢ ¢ If your printer is not an EPSON¢ or COMPATIBLE or an ATARI then you¢ must put into the program YOUR¢ PRINTER control characters. Please¢ unlock the program and list it. In¢ lines 470, 480, 490 remove the REM.¢ In line 470 put in the printer¢ control characters for 6/72 line¢ spacing. In line 480 put in the¢ control characters for compressed or¢ condensed. In line 490 put in the¢ control characters for superscript.¢ See the example: 470 IF NN=3 THEN¢ LPRINT CHR$(27);"A";CHR$(6). 480 IF¢ NN=3 THEN LPRINT CHR$(27);CHR$(20). ¢ 490 IF NN=3 THEN LPRINT¢ CHR$(27);"R";CHR$(0). Also look at¢ lines 390-450 to see how it is done.¢ In line 2360 remove the REM¢ statement and type in the reverse¢ line feed code for your printer.¢ Example: 2360 LPRINT¢ "*********";CHR$(27);CHR$(10). (Be ¢ sure to remove the colon - keep the¢ semi colon). Also look at lines 1930¢ and 2150 for guidance. When you have¢ done this save your program with¢ SAVE "D:LABEL.TUR". ¢ ¢ If you want this program to be¢ free standing on another disk copy¢ the file named "LABEL.TUR" on a¢ TURBO BASIC disk and call it¢ "LABEL.ARB". ¢ ¢ To use this program hit the¢ RESET key and type in RUN "D:LABEL.¢ TUR". ¢ ¢ >>>>>>>>>>>>>>>>END<<<<<<<<<<<<<<<<<<¢ ¢
