LISTING PROGRAM This is a program that prints a source file. This software is offered in an effort to add to the collection of software tools. This writer started in the software world without any help, and thus did not have anyone to supply any tools. I hope this saves someone from having to write a listing program. There are three programs which make up the set. They are FACE.SAV, LIST.SAV and SCRIBE.SAV. FACE provides the ability to interactively set the top and bottom margins as well as the number of lines to be printed on a page. The program asks what is the top margin, the bottom margin and the total number of lines on a page. A mathmatical computation is made, and the three figures are stored in a file named FAC.DAT. The LIST and SCRIBE programs read this file, and thus the top and bottom margins are set. This program should be run before you run LIST or SCRIBE, but if you fail to do this, there is a hook in LIST and SCRIBE that sends you a message telling you to do it. Once this program has been run it is not necessary to run it again until the size of the paper changes. LIST is a program that will print any given part or all of a file. The program asks the beginning line number, ending line number and then the name of the file. If nothing is entered at the question for the beginning line number, then the program makes the beginning at line one. If nothing is entered for the ending line number, the program ends at the end of the file or line number 32767 which ever comes first. The file name should be in the convential manner, i.e., device:filename.ext. If device is omitted the program looks at the system (SY:) device only. If the ext is omitted the program looks for PAS. The printer is actuated by the entry of the file name, so put paper in the printer before you start running the program. SCRIBE is a program that will print all of one or more files. The program asks for the file name to be entered in the manner described in the LIST program. This question is repeated after each entry. Printing starts when a carriage return is entered without a filename. All of the filenames entered are put in a file named DIR.DAT which is read by the program. The source files are included for your consideration. They are written in PASCAL and the Oregon Software compiler is used. Except for the external Fortran call to get the date and the rewrite and reset statements all the rest I have tried to write in standard PASCAL. Your questions and comments are welcome. M. Alvin Levy LEVY & ADAMS Attorneys at Law Suite 400, 75 Marietta St. NW Atlanta, Ga. 30303 404-521-2406