home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Oakland CPM Archive
/
oakcpm.iso
/
cpm
/
list
/
lblmkr4.lbr
/
LBMKRDOC.PZS
/
LBMKRDOC.PAS
Wrap
Pascal/Delphi Source File
|
1987-04-26
|
5KB
|
80 lines
Program DirectionsOnLabelmaker;
var ch:char;
Begin
writeln('This program was written to put mailing lists of names and');
writeln('addresses on labels, up to 3 across. Files may be organized');
writeln('alphabetically by last name,city, or state, or in ascending ');
writeln('zip code order. Addresses may be either 3 or 4 lines long or');
writeln('have 3 lines and a telephone number. You can also create or add');
writeln('to other files by picking out names for special lists you might');
writeln('wish to print out. They, too, can be either 3 or 4 lines long,');
writeln('and be alphabetized as you see fit. You can update or delete ');
writeln('names and addresses, and view the file on the screen as well.');
writeln(' This is a primitive file manager but I think it will to anything');
writeln('most people would want, and a monkey can run it. I have never');
writeln('run this with a file bigger than 350 names, but with even 100 ');
writeln('names you might want to put the file into a RAM disk; deletes');
writeln('take only 4 sec. instead of 35. (The Public Domain program MemBrain');
writeln('is a cinch to set up if you let the defaults run on it. ');
writeln('Only the file of addresses need be on the RAM disk- it takes');
writeln('about 10k of space per 100 names-maybe less. ');
writeln(' For a more detailed look at the main menu see below: ');
writeln;
writeln('MORE');
readln (ch);
writeln('#1: Enter: Enters names and addresses with an extra line after ');
writeln('the name if you asked for 4 lines or a line for a telephone no.');
writeln('at the end if you put ''T''. Every 10 names it will pause and ');
writeln('write them to the file. ');
writeln('#2: Retrieve and update: The name you enter to retrieve must be');
writeln('entered exactly as it is in the file. If you have six smiths');
writeln('in the file they will be retrieved one by one until you find the');
writeln('one you want to update or look at. Note that if you change the');
writeln('last name from jones to smith it will not be alphabetized and ');
writeln('will pile up any new names that begin j-s in front of it. Best');
writeln('to delete it and reenter. This applies to whatever field by which');
writeln('you alphabetize your list. Beware lest your smith was in the ');
writeln('file as Smith. Not sure? Use ');
writeln('#4: View whole file to see how it was spelled. ');
writeln('#3: Erase will erase the names in the file you are dealing with,');
writeln('though not the file itself in your directory. ');
writeln('#5: Delete: will show you the full names one by one of the six');
writeln('Smiths in your file and ask if this is the one you wish to delete.');
writeln('Again, it won''t show you anything unless it is spelled exactly ');
writeln('the same as the one for which you asked it to look. ');
writeln('MORE');
readln (ch);
writeln(' #6:Design labels: Lets you put names and addresses anywhere on');
writeln('the page you want- up to 3 across. It will runthemalltogether,');
writeln('however, if you specify the second address to be put in a column to');
writeln('the left of the first one. The largest field width is 30 before ');
writeln('characters get truncated, but most names don''t take that much space.');
writeln('More specifically, the space is allocated as follows: Last Name-');
writeln('18 characters; first-18; street address,company or apt.-30; ');
writeln('city-15; state and zip code-10 characters each. So I would guess');
writeln('25 spaces between addresses is a safe bet. This was designed to put');
writeln('addresses in rows, so you cannot put ');
writeln(' one address here, ');
writeln(' the second one here, ');
writeln(' and the third here,');
writeln('for instance. #6 actually writes a file which is read by #7 when');
writeln('it comes to print out the page, so unless you want to change some-');
writeln('thing, you can boot the program, pick the file, and print it out.');
writeln(' #7: Output to printer prints the whole file to your design in #6.');
writeln(' #8: Make another file allows you to select whatever names you wish');
writeln('to include in another file so you can make special lists to print out.');
writeln('MORE');
readln(ch);
writeln(' #9: Lets you switch to another .LBL file - perhaps to look at');
writeln('the one you just made with #8.');
writeln(' Any questions, bugs, etc, please call or write:');
writeln(' Ian S. Richmond ');
writeln(' 608 Woodcrest Ave ');
writeln(' Ardmore, P. A. 19003 ');
writeln(' tel#(215)-649-1198 eves. ');
writeln(' I will back this up as best I can-help with changes to suit others''');
writeln('particular purposes.');
end.