mirror of https://github.com/lianthony/NT4.0
You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
72 lines
1.4 KiB
72 lines
1.4 KiB
% Copyright (c) 1995 Microsoft Corporation
|
|
%
|
|
% Module Name:
|
|
%
|
|
% header.ps
|
|
%
|
|
% Abstract:
|
|
%
|
|
% Windows NT PostScript driver procset
|
|
%
|
|
% Notes:
|
|
%
|
|
% Used to be hardcoded in the C source file.
|
|
% Now reside in the resource instead.
|
|
%
|
|
% Revision History:
|
|
%
|
|
% 07/07/95 -davidx-
|
|
% Extracted out of C source code.
|
|
%
|
|
% mm/dd/yy -author-
|
|
% description
|
|
|
|
%%BeginResource: procset NTPSOct95
|
|
|
|
/NTPSOct95 100 dict dup begin
|
|
|
|
% Redefine frequently used operators
|
|
|
|
/bd {bind def} bind def
|
|
/ld {load def} bd
|
|
/ed {exch def} bd
|
|
/a {currentpoint} bd
|
|
/c /curveto ld
|
|
/d /dup ld
|
|
/e /eofill ld
|
|
/f /fill ld
|
|
/tr /translate ld
|
|
/gr /grestore ld
|
|
/gs /gsave ld
|
|
/j /setlinejoin ld
|
|
/L /lineto ld
|
|
/M /moveto ld
|
|
/n /newpath ld
|
|
/cp /closepath ld
|
|
/rm /rmoveto ld
|
|
/sl /setlinewidth ld
|
|
/sd /setdash ld
|
|
/g /setgray ld
|
|
/r /setrgbcolor ld
|
|
/s /stroke ld
|
|
/t /show ld
|
|
/aw /awidthshow ld
|
|
/im /imagemask ld
|
|
/MS {moveto show} bd
|
|
/SF {findfont exch scalefont setfont} bd
|
|
/SM {cmtx setmatrix} bd
|
|
/MF {findfont exch makefont setfont} bd
|
|
/CM {/cmtx matrix currentmatrix def} bd
|
|
/B {M exch dup 0 rlt exch 0 exch rlt neg 0 rlt} bd
|
|
/CB {B cp eoclip} bd
|
|
/EA {1 index 0 /G0 put 4 string 1 1 4 -1 roll
|
|
{3 copy neg exch cvs dup 0 71 put cvn 3 -1 roll exch put} for pop
|
|
} bd
|
|
/rlt /rlineto ld
|
|
|
|
% Determine whether the interpreter is level 2 or higher
|
|
|
|
/L2? /languagelevel where {pop languagelevel 2 ge} {false} ifelse def
|
|
|
|
end def
|
|
%%EndResource
|