home *** CD-ROM | disk | FTP | other *** search
/ Turbo Toolbox / Turbo_Toolbox.iso / 1991 / 03 / dtp / pr0391_2.ps < prev    next >
Encoding:
Text File  |  1991-01-20  |  721 b   |  22 lines
  1. %---> PR0391_2.PS
  2. %---> Test von PostScript-Files
  3. %---> (c) 1991 G. Born & TOOLBOX
  4.  
  5. (a:test.ps) (r) file              % öffne File
  6. /datei exch def                   % Fileobjekt merken
  7.  
  8. {                                 % Server-Schleife
  9.   /zeile 80 string def
  10.   datei zeile readline            % lese Zeile
  11.   not { exit } if                 % File-Ende erreicht?
  12.   pop zeile print                 % Stack und Anzeige
  13.                                   %      saubermachen
  14.   zeile cvx exec                  % Zeile ausführen
  15. } loop                            % Ende der Schleife
  16.  
  17. zeile print                       % Restzeile
  18. zeile cvx exec
  19. datei closefile                   % Datei schließen
  20.  
  21. % Ende
  22.