Path: utzoo!censor!geac!jtsv16!uunet!mcsun!unido!rwthinf!cip-s01.informatik.rwth-aachen.de!pmk
From: pmk@cip-s01.informatik.rwth-aachen.de (Michael Keukert)
Newsgroups: comp.lang.pascal
Subject: Pretty Print Pascal
Message-ID: <1944@rwthinf.UUCP>
Date: 4 Jan 90 23:16:45 GMT
Sender: news@rwthinf.UUCP
Reply-To: pmk@cip-s01.informatik.rwth-aachen.de (Michael Keukert)
Organization: Informatik RWTH Aachen
Lines: 46


To: Bruce Weisman

Sorry, I'm not (yet) allowed to e-mail, so I have to answer publically.

I've been asked to translate the german help-text in the pretty print
pascal source to english. Here ist is:

PROCEDURE Help;
BEGIN
  WriteLn;
  WriteLn('PPP - Pretty Print Pascal. Author: Martin Blea 890224');
  WriteLn('=====================================================');
  WriteLn;
  WriteLn('Proper Declaration:  PPP source <to> <as> <switches>');
  WriteLn('           Example:  PPP Test.pas prn necp6  -p');
  WriteLn;
  Writeln('Parameter 1');
  WriteLn(' FROM:  Source Text');
  WriteLn('       '#39'.PAS'#39' will be appended if necessary.');
  WriteLn;
  Writeln('Parameter 2');
  WriteLn(' TO: Output');
  WriteLn('       (not specified) = output to screen');
  WriteLn('       CON             = output to screen');
  WriteLn('       PRN             = output to printer');
  WriteLn;
  Writeln('Parameter 3');
  WriteLn(' AS:');
  WriteLn('       (not specified) = for destination file');
  WriteLn('       CON             = for screen');
  WriteLn('       NECP6           = for NEC-P6 and compatible printers');
  WriteLn('       NORTON          = for NORTON-Guides');
  WriteLn('       PRN             = for standard printer');
  WriteLn;
  Writeln('Parameter 4');
  WriteLn(' SWITCHES: (with no blanks)');
  WriteLn('       -A = append to destination file');
  WriteLn('       -C = no keyword conversion');
  WriteLn('       -P = no form-feed after last page')
END;


--------------------------------------------------------------------------
 Michael Keukert, Elsasstrasse 58, D-5100 Aachen 35, Phone: +49 241 513297
 Twenty bucks per day plus expenses, hundred in advance.      (Sam Spade)