*% Adobe Systems Printer Description File
*% For "QMS-PS 3200" version 52.4
*% Produced by "BuildPPD.ps" version 3.0 edit 58
*% Date: 08/02/91
*FormatVersion: "3.0"
*FileVersion: "1.0"
*LanguageVersion: English
*% General Information and Defaults ===============
*FreeVM: "486838"
*ColorDevice: False
*VariablePaperSize: False
*FileSystem: True
*?FileSystem: "/initializedisk where{pop(True)}{(False)} ifelse = flush"
*Throughput: "20"
*Password: "0"
*ExitServer: "
count 0 eq { % is the password on the stack?
true
}{
dup % potential password
statusdict begin checkpassword end not
} ifelse
{ % if no password or not valid
(WARNING : Cannot perform the exitserver command.) =
(Password supplied is not valid.) =
(Please contact the author of this software.) = flush
quit
} if
serverdict begin exitserver
"
*End
*Reset: "
count 0 eq { % is the password on the stack?
true
}{
dup % potential password
statusdict begin checkpassword end not
} ifelse
{ % if no password or not valid
(WARNING : Cannot reset printer.) =
(Password supplied is not valid.) =
(Please contact the author of this software.) = flush
quit
} if
serverdict begin exitserver
systemdict /quit get exec
(WARNING : Printer Reset Failed.) = flush
"
*End
*DefaultResolution: 300dpi
*?Resolution: "
save
initgraphics
0 0 moveto currentpoint matrix defaultmatrix transform
0 72 lineto currentpoint matrix defaultmatrix transform
3 -1 roll sub dup mul
3 1 roll exch sub dup mul
add sqrt round cvi
( ) cvs print (dpi) = flush
restore
"
*End
*% Halftone Information ===============
*ScreenFreq: "60.0"
*ScreenAngle: "45.0"
*DefaultScreenProc: Dot
*ScreenProc Dot: "
{abs exch abs 2 copy add 1 gt {1 sub dup mul exch 1 sub dup mul add 1
sub }{dup mul exch dup mul add 1 exch sub }ifelse }
"
*End
*ScreenProc Line: "{ pop }"
*ScreenProc Ellipse: "{ dup 5 mul 8 div mul exch dup mul exch add sqrt 1 exch sub }"
*% Use these entries to set paper size most of the time, unless there is
*% specific reason to use PageRegion or PaperTray.
*DefaultPageSize: Letter
*PageSize Letter: "statusdict begin lettertray end"
*PageSize Legal: "statusdict begin legaltray end"
*PageSize Ledger: "statusdict begin ledgertray end"
*PageSize Tabloid: "statusdict begin 11x17tray end"
*PageSize Executive: "statusdict begin executivetray end"
*PageSize A3: "statusdict begin a3tray end"
*PageSize A4: "statusdict begin a4tray end"
*PageSize A5: "statusdict begin a5tray end"
*PageSize B4: "statusdict begin b4tray end"
*PageSize B5: "statusdict begin b5tray end"
*?PageSize: "
save statusdict begin
10 dict begin
/letter (Letter) def
/legal (Legal) def
/ledger (Ledger) def
/11x17 (Tabloid) def
/a3 (A3) def /a4 (A4) def
/a5 (A5) def /b4 (B4) def
/b5 (B5) def /executivepage (Executive) def
papersize {
{load exec} stopped not{= flush}if
}{
{load exec} stopped not{print (.Transverse) = flush}{(Unknown) = flush}ifelse
}ifelse
end
end restore
"
*End
*% These entries will set up the frame buffer. Usually used with manual feed.
*DefaultPageRegion: Letter
*PageRegion Letter: "statusdict begin letter end"
*PageRegion Legal: "statusdict begin legal end"
*PageRegion Ledger: "statusdict begin ledger end"
*PageRegion Tabloid: "statusdict begin 11x17 end"
*PageRegion Executive: "statusdict begin executivepage end"
*PageRegion A3: "statusdict begin a3 end"
*PageRegion A4: "statusdict begin a4 end"
*PageRegion A5: "statusdict begin a5 end"
*PageRegion B4: "statusdict begin b4 end"
*PageRegion B5: "statusdict begin b5 end"
*%---------------------------------------------------------------------------
*% *% These entries will invoke a particular tray--error may occur if tray is not inserted.
*% *% These errors should be trapped by software and a message displayed
*% *DefaultPaperTray: None
*% *PaperTray Letter: "statusdict begin lettertray end"
*% *PaperTray Legal: "statusdict begin legaltray end"
*% *PaperTray Ledger: "statusdict begin ledgertray end"
*% *PaperTray Tabloid: "statusdict begin 11x17tray end"
*% *PaperTray Executive: "statusdict begin executivetray end"
*% *PaperTray A3: "statusdict begin a3tray end"
*% *PaperTray A4: "statusdict begin a4tray end"
*% *PaperTray A5: "statusdict begin a5tray end"
*% *PaperTray B4: "statusdict begin b4tray end"
*% *PaperTray B5: "statusdict begin b5tray end"
*% *?PaperTray: "
*% save statusdict begin
*% 10 dict begin
*% /letter (Letter) def
*% /legal (Legal) def
*% /ledger (Ledger) def
*% /11x17 (Tabloid) def
*% /executivepage (Executive) def
*% /a3 (A3) def /a4 (A4) def
*% /a5 (A5) def /b4 (B4) def
*% /b5 (B5) def
*% papersize {
*% {load exec} stopped not{= flush}if
*% }{
*% {load exec} stopped not{print (.Transverse) = flush}if
*% }ifelse
*% end
*% end restore
*% "
*% *End
*%---------------------------------------------------------------------------
*% These provide the physical dimensions of the paper (by keyword)
*DefaultPaperDimension: Letter
*PaperDimension Letter: "612 792"
*PaperDimension Legal: "612 1008"
*PaperDimension Ledger: "1224 792"
*PaperDimension Tabloid: "792 1224"
*PaperDimension Executive: "522 756"
*PaperDimension A3: "842 1190"
*PaperDimension A4: "595 842"
*PaperDimension A5: "420 595"
*PaperDimension B4: "729 1032"
*PaperDimension B5: "516 729"
*DefaultOutputBin: Upper
*OutputBin Upper: "statusdict begin 1 setoutputtray end"
*OutputBin Lower: "statusdict begin 2 setoutputtray end"
*OutputBin Side: "statusdict begin 3 setoutputtray end"
*?OutputBin: "
save statusdict begin
3 dict begin
/1 (Upper) def
/2 (Lower) def
/3 (Side) def
outputtray
{( ) cvs cvn load exec} stopped not{= flush}if
end
end restore
"
*End
*DefaultInputSlot: Upper
*InputSlot Lower: "statusdict begin 2 setpapertray end"
*InputSlot Upper: "statusdict begin 1 setpapertray end"
*InputSlot LargeCapacity: "statusdict begin 3 setpapertray end"
*?InputSlot: "
save statusdict begin
3 dict begin
/1 (Lower) def
/2 (Upper) def
/3 (LargeCapacity) def
papertray
{( ) cvs cvn load exec} stopped not{= flush}if
end
end restore
"
*End
*DefaultManualFeed: False
*?ManualFeed: "
statusdict /manualfeed get
{(True)}{(False)}ifelse = flush"
*End
*ManualFeed True: "statusdict begin /manualfeed true store end"
*ManualFeed False: "statusdict begin /manualfeed false store end"
*DefaultOutputOrder: Normal
*OutputOrder Normal: "statusdict begin 1 setoutputtray end"
*OutputOrder Reverse: "statusdict begin 3 setoutputtray end"
*DefaultCollator: None
*DefaultSorter: None
*DefaultDuplex: False
*Duplex False: "statusdict begin false setduplexmode false settumble end"
*Duplex True: "statusdict begin true setduplexmode false settumble end"
*?Duplex: "
statusdict begin
duplexmode
{ (True) }
{ (False) }
ifelse
= flush
end
"
*End
*% Font Information =====================
*DefaultFont: Courier
*Font AGaramond-Bold: Standard "(001.000)"
*Font AGaramond-BoldItalic: Standard "(001.000)"
*Font AGaramond-Italic: Standard "(001.000)"
*Font AGaramond-Regular: Standard "(001.000)"
*Font AGaramond-Semibold: Standard "(001.000)"
*Font AGaramond-SemiboldItalic: Standard "(001.000)"
*Font AvantGarde-Book: Standard "(001.002)"
*Font AvantGarde-BookOblique: Standard "(001.002)"
*Font AvantGarde-Demi: Standard "(001.003)"
*Font AvantGarde-DemiOblique: Standard "(001.003)"
*Font Bookman-Demi: Standard "(001.001)"
*Font Bookman-DemiItalic: Standard "(001.001)"
*Font Bookman-Light: Standard "(001.001)"
*Font Bookman-LightItalic: Standard "(001.001)"
*Font Courier: Standard "(002.003)"
*Font Courier-Bold: Standard "(002.003)"
*Font Courier-BoldOblique: Standard "(002.003)"
*Font Courier-Oblique: Standard "(002.003)"
*Font Helvetica: Standard "(001.006)"
*Font Helvetica-Bold: Standard "(001.007)"
*Font Helvetica-BoldOblique: Standard "(001.007)"
*Font Helvetica-Condensed: Standard "(001.001)"
*Font Helvetica-Condensed-Bold: Standard "(001.002)"
*Font Helvetica-Condensed-BoldObl: Standard "(001.002)"
*Font Helvetica-Condensed-Oblique: Standard "(001.001)"
*Font Helvetica-Narrow: Standard "(001.006)"
*Font Helvetica-Narrow-Bold: Standard "(001.007)"
*Font Helvetica-Narrow-BoldOblique: Standard "(001.007)"
*Font Helvetica-Narrow-Oblique: Standard "(001.006)"
*Font Helvetica-Oblique: Standard "(001.006)"
*Font NewCenturySchlbk-Bold: Standard "(001.006)"
*Font NewCenturySchlbk-BoldItalic: Standard "(001.004)"
*Font NewCenturySchlbk-Italic: Standard "(001.003)"
*Font NewCenturySchlbk-Roman: Standard "(001.004)"
*Font Palatino-Bold: Standard "(001.002)"
*Font Palatino-BoldItalic: Standard "(001.002)"
*Font Palatino-Italic: Standard "(001.002)"
*Font Palatino-Roman: Standard "(001.001)"
*Font Symbol: Special "(001.007)"
*Font Times-Bold: Standard "(001.007)"
*Font Times-BoldItalic: Standard "(001.009)"
*Font Times-Italic: Standard "(001.007)"
*Font Times-Roman: Standard "(001.007)"
*Font ZapfChancery-MediumItalic: Standard "(001.003)"
*Font ZapfDingbats: Special "(001.002)"
*?FontQuery: "
save 4 dict begin /sv exch def
/str (fonts/ ) def
/st2 128 string def
{
count 0 gt {
dup st2 cvs (/) print print (:) print
dup FontDirectory exch known {pop (Yes)}{
str exch st2 cvs dup length /len exch def
6 exch putinterval str 0 len 6 add getinterval mark exch
{ } st2 filenameforall counttomark 0 gt {
cleartomark (Yes)}{cleartomark (No)}ifelse
}ifelse = flush
}{ exit } ifelse
} bind loop
(*) = flush
sv end restore
"
*End
*?FontList: "
save 2 dict begin /sv exch def
/str 128 string def
FontDirectory { pop == } bind forall flush
/filenameforall where {
pop save (fonts/*) {
dup length 6 sub 6 exch getinterval cvn ==
} bind str filenameforall flush restore
} if
(*) = flush
sv end restore
"
*End
*% Printer Messages (verbatim from printer):
*Message: "%%[ exitserver: permanent state may be changed ]%%"
*Message: "%%[ Flushing: rest of job (to end-of-file) will be ignored ]%%"
*Message: "\FontName\ not found, using Courier"
