*PPD-Adobe: "4.0"
*% Adobe Systems Printer Description File
*% For "ImageServer UltraScript System" version 16.0
*% Date: 01/20/95
*% This file is somewhat hacked up to work with Pagemaker 5.0
*% It does not adhere to certain Adobe suggested keyword option values
*% In particular, specification of duplexing is non standard.
*FormatVersion: "4.0"
*FileVersion: "1.0"
*LanguageVersion: English
*% General Information and Defaults ===============
*FreeVM: "676322"
*ColorDevice: False
*VariablePaperSize: False
*FileSystem: False
*?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: "(WARNING : Printer Does Not Support Soft Reset.) = flush"
*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: "{dup mul exch dup mul add 1 exch sub }"
*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 letter end"
*PageSize Legal: "statusdict begin legal end"
*%PageSize Ledger: "statusdict begin ledger end"
*PageSize Tabloid: "statusdict begin ledger end"
*PageSize A3: "statusdict begin a3 end"
*PageSize A4: "statusdict begin a4 end"
*PageSize B4: "statusdict begin b4 end"
*PageSize B5: "statusdict begin b5 end"
*?PageSize: "
save statusdict begin
6 dict begin
/letter (Letter) def
/legal (Legal) def
/ledger (Ledger) def
/a3 (A3) def
/a4 (A4) def
/b4 (B4) def
/b5 (B5) 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: "letter"
*PageRegion Legal: "legal"
*PageRegion Ledger: "ledger"
*PageRegion Tabloid: "ledger"
*PageRegion A3: "a3"
*PageRegion A4: "a4"
*PageRegion B4: "b4"
*PageRegion B5: "b5"
*% Entries 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 letter end"
*PaperTray Legal: "statusdict begin legal end"
*PaperTray Ledger: "statusdict begin ledger end"
*PaperTray Tabloid: "statusdict begin ledger end"
*PaperTray A3: "statusdict begin a3 end"
*PaperTray A4: "statusdict begin a4 end"
*PaperTray B4: "statusdict begin b4 end"
*PaperTray B5: "statusdict begin b5 end"
*?PaperTray: "
save statusdict begin
6 dict begin
/letter (Letter) def
/legal (Legal) def
/ledger (Ledger) def
/a3 (A3) def
/a4 (A4) 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
*% The following entries provide information about specific paper keywords.
*DefaultImageableArea: Letter
*ImageableArea Letter: "9 9 594 774"
*ImageableArea Legal: "9 9 594 990"
*ImageableArea Ledger: "9 9 774 1206"
*ImageableArea Tabloid: "9 9 1206 774"
*ImageableArea A3: "9 9 823 1172"
*ImageableArea A4: "9 9 577 823"
*ImageableArea B4: "9 9 710 1013"
*ImageableArea B5: "9 9 497 710"
*?ImageableArea: "
save /cvp { cvi ( ) cvs print ( ) print } bind def
newpath clippath pathbbox
4 -2 roll exch 2 {ceiling cvp} repeat
exch 2 {floor cvp} repeat flush
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 A3: "841 1190"
*PaperDimension A4: "595 841"
*PaperDimension B4: "728 1031"
*PaperDimension B5: "515 728"
*DefaultOutputBin: Upper
*DefaultInputSlot: 1
*InputSlot Lower: "statusdict begin 2 setpapertray end"
*InputSlot Upper: "statusdict begin 1 setpapertray end"
*?InputSlot: "
save statusdict begin
5 dict begin
/1 (Upper) def
/2 (Lower) 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: ""
*OutputOrder Reverse: ""
*DefaultFont: Courier
*Font AvantGarde-Book: Standard "(9.0)"
*Font AvantGarde-BookOblique: Standard "(9.0)"
*Font AvantGarde-Demi: Standard "(9.0)"
*Font AvantGarde-DemiOblique: Standard "(9.0)"
*Font Bookman-Demi: Standard "(9.0)"
*Font Bookman-DemiItalic: Standard "(9.0)"
*Font Bookman-Light: Standard "(9.0)"
*Font Bookman-LightItalic: Standard "(9.0)"
*Font Courier: Standard "(9.0)"
*Font Courier-Bold: Standard "(9.0)"
*Font Courier-BoldOblique: Standard "(9.0)"
*Font Courier-Oblique: Standard "(9.0)"
*Font Helvetica: Standard "(9.0)"
*Font Helvetica-Bold: Standard "(9.0)"
*Font Helvetica-BoldOblique: Standard "(9.0)"
*Font Helvetica-Narrow: Standard "(9.0)"
*Font Helvetica-Narrow-Bold: Standard "(9.0)"
*Font Helvetica-Narrow-BoldOblique: Standard "(9.0)"
*Font Helvetica-Narrow-Oblique: Standard "(9.0)"
*Font Helvetica-Oblique: Standard "(9.0)"
*Font NewCenturySchlbk-Bold: Standard "(9.0)"
*Font NewCenturySchlbk-BoldItalic: Standard "(9.0)"
*Font NewCenturySchlbk-Italic: Standard "(9.0)"
*Font NewCenturySchlbk-Roman: Standard "(9.0)"
*Font Palatino-Bold: Standard "(9.0)"
*Font Palatino-BoldItalic: Standard "(9.0)"
*Font Palatino-Italic: Standard "(9.0)"
*Font Palatino-Roman: Standard "(9.0)"
*Font Symbol: Special "(9.0)"
*Font Times-Bold: Standard "(9.0)"
*Font Times-BoldItalic: Standard "(9.0)"
*Font Times-Italic: Standard "(9.0)"
*Font Times-Roman: Standard "(9.0)"
*Font ZapfChancery-MediumItalic: Standard "(9.0)"
*Font ZapfDingbats: Special "(9.0)"
*?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"
*% Status (format: %%[ status: <one of these> ]%% )
*Status: "idle"
*Status: "busy"
*Status: "waiting"
*Status: "printing"
*Status: "warming up"
*Status: "PrinterError: warming up"
*Status: "PrinterError: no toner cartridge"
*Status: "PrinterError: service call"
*Status: "PrinterError: cover open"
*Status: "PrinterError: out of paper"
*Status: "PrinterError: no paper tray"
