File: viewps2a.ps

package info (click to toggle)
ghostscript 10.05.1~dfsg-1
  • links: PTS, VCS
  • area: main
  • in suites: sid, trixie
  • size: 93,508 kB
  • sloc: ansic: 908,895; python: 7,676; cpp: 6,534; cs: 6,457; sh: 6,168; java: 4,028; perl: 2,373; tcl: 1,639; makefile: 529; awk: 66; yacc: 18
file content (31 lines) | stat: -rw-r--r-- 1,120 bytes parent folder | download
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
% Copyright (C) 2001-2023 Artifex Software, Inc.
% All Rights Reserved.
%
% This software is provided AS-IS with no warranty, either express or
% implied.
%
% This software is distributed under license and may not be copied,
% modified or distributed except as expressly authorized under the terms
% of the license contained in the file LICENSE in this distribution.
%
% Refer to licensing information at http://www.artifex.com or contact
% Artifex Software, Inc.,  39 Mesa Street, Suite 108A, San Francisco,
% CA 94129, USA, for further information.
%

% Display a file produced by ps2ascii with no switch or with -dCOMPLEX.
% This is just a procset to read in before the file to display.

/init { 0.1 0.1 scale } bind def
init
/next { currentfile token pop } bind def
/F { next next pop next exch selectfont } bind def
/P { showpage init } bind def
/S
 { next next moveto
   next dup stringwidth pop next exch div
   gsave 1 scale show grestore
 } bind def
/C { next next next setrgbcolor } bind def
/I { next next next next gsave 0.75 setgray rectfill grestore } bind def
/R { next next next next rectfill } bind def