*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
*% Use these entries to set paper size most of the time, unless there is
*% specific reason to use PageRegion.
*OpenUI *PageSize: PickOne
*OrderDependency: 30 AnySetup *PageSize
*DefaultPageSize: Letter
*PageSize Letter/Letter 8.5x11in: "statusdict begin letter end"
*PageSize Legal/Legal 8.5x14in: "statusdict begin legal end"
*PageSize SpecialLetter/Full size Letter on Legal: "statusdict begin spletter end"
*PageSize A4/A4 210x297mm: "statusdict begin a4 end"
*PageSize SpecialA4/Special A4 210x356mm: "statusdict begin spa4 end"
*PageSize FullA4/Full size A4 on 210x356mm: "statusdict begin fulla4 end"
*?PageSize: "
save statusdict begin
5 dict begin
/lettertray (Letter) def
/legaltray (Legal) def
/splettertray (Special Letter) def
/a4tray (A4) def
/spa4tray (Special A4) def
papersize {
{load exec} stopped not{= flush}if
}{
{load exec} stopped not{print (.Transverse) = flush}{(Unknown) = flush}ifelse
}ifelse
end
end restore
"
*End
*CloseUI: *PageSize
*% These entries will set up the frame buffer. Usually used with manual feed.
*DefaultPageRegion: Letter
*PageRegion Letter/Letter 8.5x11in: "letter"
*PageRegion Legal/Legal 8.5x14in: "legal"
*PageRegion SpecialLetter/Full size Letter on Legal: "spletter"
*PageRegion A4/A4 210x297mm: "a4"
*PageRegion SpecialA4/Special A4 210x356mm: "spa4"
*PageRegion FullA4/Full size A4 on 210x356mm: "fulla4"
*CloseUI: *PageRegion
*% 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 SpecialLetter: "statusdict begin splettertray end"
*PaperTray A4: "statusdict begin a4tray end"
*PaperTray SpecialA4: "statusdict begin spa4tray end"
*PaperTray FullA4: "statusdict begin fulla4 end"
*?PaperTray: "
save statusdict begin
5 dict begin
/lettertray (Letter) def
/legaltray (Legal) def
/splettertray (Special Letter) def
/a4tray (A4) def
/spa4tray (Special A4) 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/Letter 8.5x11in: "14.2 93.8 597.8 741.6"
*ImageableArea Legal/Legal 8.5x14in: "14.2 93.8 597.8 957.6"
*ImageableArea SpecialLetter/Full size Letter on Legal: "14.2 9.6 597.8 783.4"
*ImageableArea A4/A4 210x297mm: "13.7 93.7 581.7 790.7"
*ImageableArea SpecialA4/Special A4 210x356mm: "13.7 93.8 581.7 957.6"
*ImageableArea FullA4/Full size A4 on 210x356mm: "13.4 .2 581.7 841.7"
*?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/Letter 8.5x11in: "612 792"
*PaperDimension Legal/Legal 8.5x14in: "612 1008"
*PaperDimension SpecialLetter/Full size Letter on Legal: "612 1008"
*PaperDimension A4/A4 210x297mm: "595 842"
*PaperDimension SpecialA4/Special A4 210x356mm: "595 1008"
*PaperDimension FullA4/Full size A4 on 210x356mm: "595 842"
*DefaultFont: Courier
*Font AvantGarde-Book: Standard "(001.006)"
*Font AvantGarde-BookOblique: Standard "(001.006)"
*Font AvantGarde-Demi: Standard "(001.007)"
*Font AvantGarde-DemiOblique: Standard "(001.007)"
*Font Bookman-Demi: Standard "(001.003)"
*Font Bookman-DemiItalic: Standard "(001.003)"
*Font Bookman-Light: Standard "(001.003)"
*Font Bookman-LightItalic: Standard "(001.003)"
*Font Courier: Standard "(002.004)"
*Font Courier-Bold: Standard "(002.004)"
*Font Courier-BoldOblique: Standard "(002.004)"
*Font Courier-Oblique: Standard "(002.004)"
*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.009)"
*Font NewCenturySchlbk-BoldItalic: Standard "(001.007)"
*Font NewCenturySchlbk-Italic: Standard "(001.006)"
*Font NewCenturySchlbk-Roman: Standard "(001.007)"
*Font Palatino-Bold: Standard "(001.005)"
*Font Palatino-BoldItalic: Standard "(001.005)"
*Font Palatino-Italic: Standard "(001.005)"
*Font Palatino-Roman: Standard "(001.005)"
*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.007)"
*Font ZapfDingbats: Special "(001.004)"
*Font Aachen-Bold: Standard "(001.001)"
*Font BrushScript: Standard "(001.001)"
*Font Cooper-Black: Standard "(001.001)"
*Font CooperBlack-Italic: Standard "(001.001)"
*Font FreestyleScript: Standard "(001.001)"
*Font Garamond-Bold: Standard "(001.001)"
*Font Garamond-BoldItalic: Standard "(001.001)"
*Font Garamond-Light: Standard "(001.001)"
*Font Garamond-LightItalic: Standard "(001.001)"
*Font Helvetica-Black: Standard "(001.001)"
*Font Helvetica-BlackOblique: Standard "(001.001)"
*Font Helvetica-Light: Standard "(001.001)"
*Font Helvetica-LightOblique: Standard "(001.001)"
*Font Hobo: Standard "(001.001)"
*Font LetterGothic: Standard "(001.001)"
*Font LetterGothic-Bold: Standard "(001.001)"
*Font LetterGothic-BoldSlanted: Standard "(001.001)"
*Font LetterGothic-Slanted: Standard "(001.001)"
*Font Optima: Standard "(001.001)"
*Font Optima-Bold: Standard "(001.001)"
*Font Optima-BoldOblique: Standard "(001.001)"
*Font Optima-Oblique: Standard "(001.001)"
*Font ParkAvenue: Standard "(001.001)"
*Font Revue: Standard "(001.001)"
*Font Stencil: Standard "(001.001)"
*Font UniversityRoman: Standard "(001.001)"
*?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"