[Exit Server]
%!PS-Adobe 2.0
%%IncludeFeature: emulation(postscript)
%%Creator: QMS Inc.
%%For: PSExecutive Utilities
%%Copyright (C) 1992 by QMS Inc. All rights reserved.
%%EndComments
serverdict begin 0 exitserver
[Eject Page]
%!PS-Adobe 2.0
%%IncludeFeature: emulation(postscript)
%%Creator: QMS Inc.
%%For: PSExecutive Utilities
%%Copyright (C) 1992 by QMS Inc. All rights reserved.
%%EndComments
showpage
[Printer Name]
%!PS-Adobe 2.0
%%IncludeFeature: emulation(postscript)
%%Creator: QMS Inc.
%%For: PSExecutive Utilities
%%Copyright (C) 1992 by QMS Inc. All rights reserved.
%%EndComments
serverdict begin 0 exitserver
/RenamePrinter { statusdict begin dup 32 string printername ne
{setprintername} {pop}ifelse end }def
[Paper Source]
%!PS-Adobe 2.0
%%IncludeFeature: emulation(postscript)
%%Creator: QMS Inc.
%%For: PSExecutive Utilities
%%Copyright (C) 1992 by QMS Inc. All rights reserved.
%%EndComments
serverdict begin 0 exitserver
/SetPaperSource {
/papersource exch store
statusdict begin papersource dup defaultpapertray ne
{setdefaultpapertray} {pop}ifelse end }def
[Job Paper Source]
%!PS-Adobe 2.0
%%IncludeFeature: emulation(postscript)
%%Creator: QMS Inc.
%%For: PSExecutive Utilities
%%Copyright (C) 1992 by QMS Inc. All rights reserved.
%%EndComments
/SetPaperSource {
/papersource exch store
statusdict begin papersource dup defaultpapertray ne
{setpapertray} {pop}ifelse end }def
[Time Stamp]
%!PS-Adobe 2.0
%%IncludeFeature: emulation(postscript)
%%Creator: QMS Inc.
%%For: PSExecutive Utilities
%%Copyright (C) 1992 by QMS Inc. All rights reserved.
%%EndComments
/xfn exch def /pfn 50 string def
/prnt {dup type/stringtype ne{=string cvs}if dup stringwidth pop
/tx exch 10 add def/ty 10 def
currentpoint/toy exch def/tox exch def 1 setgray newpath
tox 5 sub toy 3 sub moveto 0 ty rlineto tx 0 rlineto 0 ty neg rlineto
closepath gsave fill grestore 0 setgray stroke tox toy moveto show}bind def
/TimeArray 2 array def
/showpage {grestore initgraphics usertime TimeArray 1 3 -1 roll put
gsave 0 0 moveto clippath pathbbox grestore
/ury exch def /urx exch def /lly exch def /11x exch def
TimeArray 0 get TimeArray 1 get sub abs 1000 div
/Times-Roman findfont 6 scalefont setfont
.5 setlinewidth 0 setgray 11x 9 add lly 12 add moveto
/xs ( Process time in seconds = ) def
xs exch 15 string cvs 30 exch putinterval xs prnt
11x 144 add lly 12 add moveto xfn prnt
pfn 1 (Printed on a )putinterval pfn 14 statusdict /product get putinterval
urx pfn stringwidth pop 9 add sub lly 12 add moveto pfn prnt
systemdict /showpage get exec StartTime} bind def
/StartTime {usertime TimeArray 0 3 -1 roll put gsave} bind def
StartTime
[Advanced Emulation]
0
%!PS-Adobe 2.0
%%IncludeFeature: emulation(postscript)
%%Creator: QMS Inc.
%%For: PSExecutive Utilities
%%Copyright (C) 1992 by QMS Inc. All rights reserved.
%%EndComments
serverdict begin 0 exitserver
/SetPrinterAdvEmul {
statusdict begin
/emulationval exch store
/interfaceval exch store
interfaceval emulationval setdefaultemulation end } def
[Enable Manual Feed]
%!PS-Adobe 2.0
%%IncludeFeature: emulation(postscript)
%%Creator: QMS Inc.
%%For: PSExecutive Utilities
%%Copyright (C) 1992 by QMS Inc. All rights reserved.
%%EndComments
statusdict /manualfeed true put
[Disable Manual Feed]
%!PS-Adobe 2.0
%%IncludeFeature: emulation(postscript)
%%Creator: QMS Inc.
%%For: PSExecutive Utilities
%%Copyright (C) 1992 by QMS Inc. All rights reserved.
%%EndComments
statusdict /manualfeed false put
[Font Cache Buffer Size]
%!PS-Adobe 2.0
%%IncludeFeature: emulation(postscript)
%%Title: SetBuffers
%%Creator: QMS Inc. (GY)
%%For: PSExecutive Utilities
%%BeginProcSet: SetFontCacheSize 1.0
%%Copyright (C) 1992 by QMS Inc. All rights reserved.
%%EndComments
serverdict begin 0 exitserver
/SetFontCacheSize{
statusdict begin
/freq exch def
getallfontcachesizes exch pop
/fcur exch def /fmax exch def /fmin exch def
freq fcur ne {freq fmax gt {/freq fmax def}if
%%% freq fmin lt {/freq fmin def}if
freq setfontcachesize}if end
} def
%%EndProcSet:
[Serial BufferSize]
%!PS-Adobe 2.0
%%IncludeFeature: emulation(postscript)
%%Creator: QMS Inc.
%%For: PSExecutive Utilities
%%Copyright (C) 1992 by QMS Inc. All rights reserved.
%%EndComments
%%BeginProcSet: SetBuffers Serial 1.0
serverdict begin 0 exitserver
/SetSerialBuf
{
statusdict begin
/newval exch store
/setserialbuffersize where {
pop statusdict begin serialbuffersize newval ne{
newval setserialbuffersize
}if
end } if
} def
%%EndProcSet:
[Parallel BufferSize]
%!PS-Adobe 2.0
%%IncludeFeature: emulation(postscript)
%%Creator: QMS Inc.
%%For: PSExecutive Utilities
%%Copyright (C) 1992 by QMS Inc. All rights reserved.
%%EndComments
%%BeginProcSet: SetBuffers Parallel 1.0
serverdict begin 0 exitserver
/SetParallelBuf
{
statusdict begin
/newval exch store
/setparallelbuffersize where {
pop statusdict begin parallelbuffersize newval ne{
newval setparallelbuffersize
}if
end } if
} def
%%EndProcSet:
[AppleTalk BufferSize]
%!PS-Adobe 2.0 SetBuffers
%%IncludeFeature: emulation(postscript)
%%Title: AppleTalk BufferSize
%%Creator: QMS Inc.
%%For: PSExecutive Utilities
%%Copyright (C) 1992 by QMS Inc. All rights reserved.
%%EndComments
%%BeginProcSet: SetBuffers 1.0
serverdict begin 0 exitserver
/SetAppleBuf{
statusdict begin
/newval exch store
/setappletalkbuffersize where {
pop statusdict begin appletalkbuffersize newval ne{
newval setappletalkbuffersize
}if
end } if
} def
%%EndProcSet:
[Optional BufferSize]
%!PS-Adobe 2.0
%%IncludeFeature: emulation(postscript)
%%Title: Optional BufferSize
%%Creator: QMS Inc.
%%For: PSExecutive Utilities
%%Copyright (C) 1992 by QMS Inc. All rights reserved.
%%EndComments
%%BeginProcSet: SetBuffers 1.0
serverdict begin 0 exitserver
/SetOptionalBuf{
statusdict begin
/newval exch store
/setoptionbuffersize where {
pop statusdict begin optionbuffersize newval ne{
newval setoptionbuffersize
}if
end } if
} def
%%EndProcSet:
[Default Timeout]
%!PS-Adobe 2.0
%%IncludeFeature: emulation(postscript)
%%Creator: QMS Inc.
%%For: PSExecutive Utilities
%%Copyright (C) 1992 by QMS Inc. All rights reserved.
%%EndComments
serverdict begin 0 exitserver
/SetDefTimeOuts
{
/jto exch def
/mto exch def
/wto exch def
statusdict begin
jto mto wto setdefaulttimeouts
end
}def
[Advanced Timeout]
%!PS-Adobe 2.0
%%IncludeFeature: emulation(postscript)
%%Creator: QMS Inc.
%%For: PSExecutive Utilities
%%Copyright (C) 1992 by QMS Inc. All rights reserved.
%%EndComments
serverdict begin 0 exitserver
/SetESPTimeOuts
{
/jto exch def
/mto exch def
/wto exch def
/emulwto exch def
/espwto exch def
statusdict begin
jto mto wto setdefaulttimeouts
emulwto setemulationwaittimeout
espwto setesptimeout
end
}def
[410 Timeout]
%!PS-Adobe 2.0
%%IncludeFeature: emulation(postscript)
%%Creator: QMS Inc.
%%For: PSExecutive Utilities
%%Copyright (C) 1992 by QMS Inc. All rights reserved.
%%EndComments
serverdict begin 0 exitserver
/Set410TimeOuts
{
/jto exch def
/mto exch def
/wto exch def
/emulwto exch def
/espwto exch def
statusdict begin
jto mto wto setdefaulttimeouts
emulwto setemulationwaittimeout
espwto setautoselecttimeout
end
}def
[Emulation Wait Timeout]
%!PS-Adobe 2.0
%%IncludeFeature: emulation(postscript)
%%Creator: QMS Inc.
%%For: PSExecutive Utilities
%%Copyright (C) 1992 by QMS Inc. All rights reserved.
%%EndComments
serverdict begin 0 exitserver
/SetEmulWaitTimeOuts
{
/emulwto exch def
statusdict begin
emulwto setemulationwaittimeout
end
}def
[Spool Timeout]
%!PS-Adobe 2.0
%%IncludeFeature: emulation(postscript)
%%Creator: QMS Inc.
%%For: PSExecutive Utilities
%%Copyright (C) 1992 by QMS Inc. All rights reserved.
%%EndComments
serverdict begin 0 exitserver
/SetSpoolTimeOuts
{
/splto exch def
statusdict begin
splto setspooltimeout
end
}def
[Printer Port Batch]
%!PS-Adobe 2.0
%%IncludeFeature: emulation(postscript)
%%Creator: QMS Inc.
%%For: PSExecutive Utilities
%%Copyright (C) 1992 by QMS Inc. All rights reserved.
%%EndComments
serverdict begin 0 exitserver
/PrinterPort
{
/channel exch def
/options exch def
/baud exch def
statusdict begin
channel sccbatch options eq exch baud eq and not
{channel baud options setsccbatch}if
end
}def
[Printer Port Emulation]
%!PS-Adobe 2.0
%%IncludeFeature: emulation(postscript)
%%Creator: QMS Inc.
%%For: PSExecutive Utilities
%%Copyright (C) 1992 by QMS Inc. All rights reserved.
%%EndComments
serverdict begin 0 exitserver
/PrinterPort
{
/channel exch def
/options exch def
/baud exch def
statusdict begin
channel sccbatch options eq exch baud eq and not
{channel baud options setsccinteractive}if
end
}def
[Chan25 Printer Port]
%!PS-Adobe 2.0
%%IncludeFeature: emulation(postscript)
%%Creator: QMS Inc.
%%For: PSExecutive Utilities
%%Copyright (C) 1992 by QMS Inc. All rights reserved.
%%EndComments
serverdict begin 0 exitserver
/PrinterPort
{
/options exch def
/baud exch def
statusdict begin
25 sccbatch options eq exch baud eq and not
{25 baud options setsccbatch}if
end
}def
[Chan9 Printer Port]
%!PS-Adobe 2.0
%%IncludeFeature: emulation(postscript)
%%Creator: QMS Inc.
%%For: PSExecutive Utilities
%%Copyright (C) 1992 by QMS Inc. All rights reserved.
%%EndComments
serverdict begin 0 exitserver
/PrinterPort
{
/options exch def
/baud exch def
statusdict begin
9 sccbatch options eq exch baud eq and not
{9 baud options setsccbatch}if
end
}def
[Reset Default Parameters]
%!PS-Adobe 2.0
%%IncludeFeature: emulation(postscript)
%%Creator: QMS Inc.
%%Title: Reset Factory Defaults
%%For: PSExecutive Utilities
%%Copyright (C) 1992 by QMS Inc. All rights reserved.
%%EndComments
serverdict begin 0 exitserver
statusdict begin
/resettodefaults where{
resettodefaults}
{
0 60 30 setdefaulttimeouts
true setdostartpage
product setprintername
mark setidlefonts
0 0 setmargins
}ifelse
end
[Output Tray 2000]
%!PS-Adobe 2.0
%%IncludeFeature: emulation(postscript)
%%Creator: QMS Inc.
%%Title: Set Output Tray
%%For: PSExecutive Utilities
%%Copyright (C) 1992 by QMS Inc. All rights reserved.
%%EndComments
serverdict begin 0 exitserver
/SetOutputTray2000
{ /outtray exch def
statusdict /setdefaultoutputtray known
{statusdict begin outtray setdefaultoutputtray end}if }def
[JOB Output Tray 2000]
%!PS-Adobe 2.0
%%IncludeFeature: emulation(postscript)
%%Creator: QMS Inc.
%%Title: Job Set Output Tray
%%For: PSExecutive Utilities
%%Copyright (C) 1992 by QMS Inc. All rights reserved.
%%EndComments
/SetOutputTray2000
{ /outtray exch def
statusdict /setoutputtray known
{statusdict begin outtray setoutputtray end }if }def
[Duplex]
%!PS-Adobe 2.0
%%IncludeFeature: emulation(postscript)
%%Creator: QMS Inc.
%%Title: Duplex ON
%%For: PSExecutive Utilities
%%Copyright (C) 1992 by QMS Inc. All rights reserved.
%%EndComments
serverdict begin 0 exitserver % change password if neccessary
statusdict /defaultduplexmode known
{statusdict begin true defaultduplexmode ne {true setdefaultduplexmode} if
}if end
[Job Duplex]
%!PS-Adobe 2.0
%%IncludeFeature: emulation(postscript)
%%Creator: QMS Inc.
%%Title: Job Duplex ON
%%For: PSExecutive Utilities
%%Copyright (C) 1992 by QMS Inc. All rights reserved.
%%EndComments
statusdict /duplexmode known
{statusdict begin true duplexmode ne {true setduplexmode} if
}if end
[ON Tumble]
%!PS-Adobe 2.0
%%IncludeFeature: emulation(postscript)
%%Creator: QMS Inc.
%%Title: Tumble ON
%%For: PSExecutive Utilities
%%Copyright (C) 1992 by QMS Inc. All rights reserved.
%%EndComments
serverdict begin 0 exitserver
statusdict /defaultduplexmode known
{statusdict begin true dup defaultduplexmode ne {setdefaultduplexmode}
{pop}ifelse true dup defaulttumble ne {setdefaulttumble}
{pop}ifelse }if end
[Job ON Tumble]
%!PS-Adobe 2.0
%%IncludeFeature: emulation(postscript)
%%Title: Job Tumble ON
%%Creator: QMS Inc.
%%For: PSExecutive Utilities
%%Copyright (C) 1992 by QMS Inc. All rights reserved.
%%EndComments
statusdict /duplexmode known
{statusdict begin true dup duplexmode ne {setduplexmode}
{pop}ifelse true dup tumble ne {settumble}
{pop}ifelse }if end
[OFF Tumble]
%!PS-Adobe 2.0
%%IncludeFeature: emulation(postscript)
%%Title: Tumble OFF
%%Creator: QMS Inc.
%%For: PSExecutive Utilities
%%Copyright (C) 1992 by QMS Inc. All rights reserved.
%%EndComments
serverdict begin 0 exitserver
statusdict /defaulttumble known
{statusdict begin false dup defaulttumble ne {setdefaulttumble}
{pop}ifelse }if end
[Job OFF Tumble]
%!PS-Adobe 2.0
%%IncludeFeature: emulation(postscript)
%%Title: Job Tumble OFF
%%Creator: QMS Inc.
%%For: PSExecutive Utilities
%%Copyright (C) 1992 by QMS Inc. All rights reserved.
%%EndComments
statusdict /tumble known
{statusdict begin false dup tumble ne {settumble}
{pop}ifelse }if end
[Simplex]
%!PS-Adobe 2.0
%%IncludeFeature: emulation(postscript)
%%Creator: QMS Inc.
%%Title: Simplex ON
%%For: PSExecutive Utilities
%%Copyright (C) 1992 by QMS Inc. All rights reserved.
%%EndComments
serverdict begin 0 exitserver
statusdict /defaultduplexmode known
{statusdict begin false defaultduplexmode ne {false setdefaultduplexmode} if
}if end
[Job Simplex]
%!PS-Adobe 2.0
%%IncludeFeature: emulation(postscript)
%%Creator: QMS Inc.
%%Title: Job Simplex ON
%%For: PSExecutive Utilities
%%Copyright (C) 1992 by QMS Inc. All rights reserved.
%%EndComments
statusdict /duplexmode known
{statusdict begin false duplexmode ne {false setduplexmode} if }if end
[ON Offset Stack]
%!PS-Adobe 2.0
%%IncludeFeature: emulation(postscript)
%%Title: Offset Stack ON
%%Creator: QMS Inc.
%%For: PSExecutive Utilities
%%Copyright (C) 1992 by QMS Inc. All rights reserved.
%%EndComments
serverdict begin 0 exitserver
statusdict /defaultoutputpositioning known
{statusdict begin true dup defaultoutputpositioning ne
{setdefaultoutputpositioning} {pop}ifelse }if end
[OFF Offset Stack]
%!PS-Adobe 2.0
%%IncludeFeature: emulation(postscript)
%%Title: Offset Stack OFF
%%Creator: QMS Inc.
%%For: PSExecutive Utilities
%%Copyright (C) 1992 by QMS Inc. All rights reserved.
%%EndComments
serverdict begin 0 exitserver
statusdict /defaultoutputpositioning known
{statusdict begin false dup defaultoutputpositioning ne {setdefaultoutputpositioning}
{pop}ifelse }if end
[ON Tray Chaining]
%!PS-Adobe 2.0
%%IncludeFeature: emulation(postscript)
%%Creator: QMS Inc.
%%Title: Tray Chaining ON
%%For: PSExecutive Utilities
%%Copyright (C) 1992 by QMS Inc. All rights reserved.
%%EndComments
serverdict begin 0 exitserver
statusdict /defaulttrayswitch known
{statusdict begin true defaulttrayswitch ne {true setdefaulttrayswitch} if
}if end
[Job ON Tray Chaining]
%!PS-Adobe 2.0
%%IncludeFeature: emulation(postscript)
%%Creator: QMS Inc.
%%Title: Job Tray Chaining ON
%%For: PSExecutive Utilities
%%Copyright (C) 1992 by QMS Inc. All rights reserved.
%%EndComments
statusdict /defaulttrayswitch known
{statusdict begin true defaulttrayswitch ne {statusdict /trayswitch true put} if
}if end
[OFF Tray Chaining]
%!PS-Adobe 2.0
%%IncludeFeature: emulation(postscript)
%%Creator: QMS Inc.
%%Title: Tray Chaining OFF
%%For: PSExecutive Utilities
%%Copyright (C) 1992 by QMS Inc. All rights reserved.
%%EndComments
serverdict begin 0 exitserver
statusdict /defaulttrayswitch known
{statusdict begin false defaulttrayswitch ne {false setdefaulttrayswitch} if
}if end
[Job OFF Tray Chaining]
%!PS-Adobe 2.0
%%IncludeFeature: emulation(postscript)
%%Creator: QMS Inc.
%%Title: Job Tray Chaining OFF
%%For: PSExecutive Utilities
%%Copyright (C) 1992 by QMS Inc. All rights reserved.
%%EndComments
statusdict /defaulttrayswitch known
{statusdict begin false defaulttrayswitch ne
{statusdict /trayswitch false put} if }if end
[Tray Size]
%!PS-Adobe 2.0
%%Creator: QMS Inc.
%%IncludeFeature: emulation(postscript)
%%Title: Tray Size
%%For: PSExecutive Utilities
%%Copyright (C) 1992 by QMS Inc. All rights reserved.
%%EndComments
serverdict begin 0 exitserver
/SetTraySize {
statusdict begin /traysize dup defaultmultipurposetraysize pop ne
{true setdefaultmultipurposetraysize} {pop}ifelse end }def
[lettertray]
%!PS-Adobe 2.0
%%IncludeFeature: emulation(postscript)
%%Creator: QMS Inc.
%%Title: Set Page Type Letter
%%For: PSExecutive Utilities
%%Copyright (C) 1992 by QMS Inc. All rights reserved.
%%EndComments
statusdict begin
lettertray
end
[legaltray]
%!PS-Adobe 2.0
%%IncludeFeature: emulation(postscript)
%%Creator: QMS Inc.
%%Title: Set Page Type Legal
%%For: PSExecutive Utilities
%%Copyright (C) 1992 by QMS Inc. All rights reserved.
%%EndComments
statusdict begin
legaltray
end
[a4tray]
%!PS-Adobe 2.0
%%IncludeFeature: emulation(postscript)
%%Creator: QMS Inc.
%%Title: Set Page Type A4
%%For: PSExecutive Utilities
%%Copyright (C) 1992 by QMS Inc. All rights reserved.
%%EndComments
statusdict begin
a4tray
end
[b5tray]
%!PS-Adobe 2.0
%%IncludeFeature: emulation(postscript)
%%Creator: QMS Inc.
%%Title: Set Page Type B5
%%For: PSExecutive Utilities
%%Copyright (C) 1992 by QMS Inc. All rights reserved.
%%EndComments
statusdict begin
b5tray
end
[executivetray]
%!PS-Adobe 2.0
%%IncludeFeature: emulation(postscript)
%%Creator: QMS Inc.
%%Title: Set Page Type Executive
%%For: PSExecutive Utilities
%%Copyright (C) 1992 by QMS Inc. All rights reserved.
%%EndComments
statusdict begin
executivetray
end
[ledgertray]
%!PS-Adobe 2.0
%%IncludeFeature: emulation(postscript)
%%Creator: QMS Inc.
%%Title: Set Page Type Ledger
%%For: PSExecutive Utilities
%%Copyright (C) 1992 by QMS Inc. All rights reserved.
%%EndComments
statusdict begin
ledgertray
end
[spa4]
%!PS-Adobe 2.0
%%IncludeFeature: emulation(postscript)
%%Creator: QMS Inc.
%%Title: Set Page Type Special A4
%%For: PSExecutive Utilities
%%Copyright (C) 1992 by QMS Inc. All rights reserved.
%%EndComments
statusdict begin
spa4tray
end
[a3]
%!PS-Adobe 2.0
%%IncludeFeature: emulation(postscript)
%%Creator: QMS Inc.
%%Title: Set Page Type A3
%%For: PSExecutive Utilities
%%Copyright (C) 1992 by QMS Inc. All rights reserved.
%%EndComments
statusdict begin
a3tray
end
[wb]
%!PS-Adobe 2.0
%%IncludeFeature: emulation(postscript)
%%Creator: QMS Inc.
%%Title: Set Page Type WB
%%For: PSExecutive Utilities
%%Copyright (C) 1992 by QMS Inc. All rights reserved.
%%EndComments
statusdict begin
wbtray
end
[spletter]
%!PS-Adobe 2.0
%%IncludeFeature: emulation(postscript)
%%Creator: QMS Inc.
%%Title: Set Page Type Special Letter
%%For: PSExecutive Utilities
%%Copyright (C) 1992 by QMS Inc. All rights reserved.
%%EndComments
statusdict begin
splettertray
end
[Get Printer Configuration]
%!PS-Adobe 2.0
%%IncludeFeature: emulation(postscript)
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%Creator: QMS Inc.
%%For: PSExecutive Utilities
%%Title: Get Product Configuration
%%Copyright (C) 1992 by QMS Inc. All rights reserved.
%%EndComments
%%?BeginFeatureQuery: product
statusdict begin
/n 0 def /s 100 string def
product = flush
/pn 32 string def
pn printername = flush
pagecount = flush
dostartpage = flush
/diskonline where {
/diskonline get exec {
{pop /n n 1 add store} s
devforall
}if
}if n = flush
defaulttimeouts = flush = flush = flush
% start get esptimeout
/esptimeout where
{
/esptimeout get exec
}
{ %ifelse
/autoselecttimeout where
{
/autoselecttimeout get exec
}
{%ifelse
(-1)
}ifelse
}ifelse
= flush
% end get esptimeout
/emulationwaittimeout where {
/emulationwaittimeout get exec
}{ (-1)}ifelse = flush
/defaultpapertray where{
/defaultpapertray get exec
}{(-1)}ifelse = flush
/defaultoutputtray where {
/defaultoutputtray get exec
}{ (-1)}ifelse = flush
/papersize where{
/papersize get exec
= flush = flush
}{ (N/A)= flush (N/A)= flush} ifelse
/margins where {
/margins get exec = flush = flush
}{ (-1) = flush }ifelse
/defaultemulation where {
/defaultemulation get 0 exch exec
}
/softwareiomode where {
/softwareiomode get 0 exch exec
}{(-1)}ifelse = flush
/sccbatch where {
/sccbatch get 25 exch exec
= flush = flush
}{ (-1) = flush (-1) = flush }ifelse
/spooltimeout where{
/spooltimeout get exec = flush
}{(-1) = flush}ifelse
/defaultduplexmode where{
/defaultduplexmode get exec
}{false}ifelse = flush
/defaulttumble where{
/defaulttumble get exec
}{false}ifelse = flush
/buffersizes where{
/buffersizes get exec
= flush = flush = flush = flush
}{(-1) = flush (-1) = flush (-1) = flush (-1) = flush}ifelse
/serialbuffersize where{
/serialbuffersize get exec = flush
}{(-1) = flush}ifelse
/parallelbuffersize where{
/parallelbuffersize get exec = flush
}{(-1) = flush}ifelse
/appletalkbuffersize where{
/appletalkbuffersize get exec = flush
}{(-1) = flush}ifelse
/optiobuffersize where{
/optiobuffersize get exec = flush
}{(-1) = flush}ifelse
/defaulttrayswitch where{
/defaulttrayswitch get exec
}{(-1)}ifelse = flush
/defaultresolution where{
/defaultresolution get exec
}{(-1)}ifelse = flush
/defaultgammacorrection where{
/defaultgammacorrection get exec
}{(-1)}ifelse = flush
end
%%?EndFeatureQuery: unknown
[Align Margins]
%!PS-Adobe 2.0 SetMargins
%%IncludeFeature: emulation(postscript)
%%Creator: QMS Inc.
%%For: PSExecutive Utilities
%%Title: SetMargins
%%Copyright (C) 1992 by QMS Inc. All rights reserved.
%%EndComments
%%BeginProcSet: SetMargins
serverdict begin 0 exitserver
/AlignMargins
{ /top exch store
/left exch store
statusdict begin
currentdict /pageorigin known {pageorigin}{margins}ifelse
left add exch top add exch
currentdict /pageorigin known {setpageorigin}{setmargins} ifelse
end stop} bind def
%%EndProcSet:
[Test Align Margins]
%!PS-Adobe
%%IncludeFeature: emulation(postscript)
%%Title: Printer Alignment
%%Creator: Patrick Domning
%%For: QMS, Inc.
%% (C) Copyright 1987,1988,1989,1990,1991,1992 by QMS, Inc.
%% All Rights Reserved.
%%CreationDate: 5/05/87 10:25 AM
%%BoundingBox: 30 30 600 780
%%Pages: 1
%%EndComments
/h_hash {108 142 m 0 4 rl 16 { 4.5 -4 rmoveto 0 4 rl}repeat} def
/v_hash {142 108 m 4 0 rl 16 { -4 4.5 rmoveto 4 0 rl}repeat} def
/m /moveto load def /l /lineto load def /rl /rlineto load def
/s /show load def /sl /setlinewidth load def
1.5 sl 108 144 m 72 0 rl 144 108 m 0 72 rl stroke
.25 sl h_hash v_hash stroke 10 sl
/Times-Bold findfont 65 scalefont setfont
105 550 m 510 550 l 510 655 l stroke 1 sl
100 550 m 510 550 l 510 660 l 100 660 l closepath
gsave 1 setgray fill grestore stroke 120 576 m (PS Executive)s
/Helvetica findfont 36 scalefont setfont
175 300 m (Printer Alignment)s
/Helvetica findfont 12 scalefont setfont
175 275 m (Lines should cross 2 inches from left and bottom edge of page.)s
175 260 m (If they do not, make changes as follows:)s
175 245 m (Each hash mark is 1/16 inch apart. {18.75 dots for 300 dpi})s
175 230 m (You may alter the coordinates by hash marks or by individual)s
175 215 m (dot {for greater precision}.)s
175 190 m (Note: Variances in paper and other mechanical factors will)s
185 175 m ( limit the degree of printer alignment that can be achieved.)s
/Symbol findfont 9 scalefont setfont
120 535 m (\343)s
/Helvetica findfont 9 scalefont setfont
(1988, 1989, 1990, by QMS, Inc.)s
480 535 m (PDFH)s
showpage
%%Trailer
[Get Font List]
%!PS-Adobe 2.0
%%IncludeFeature: emulation(postscript)
%%Title: GetFontList
%%Copyright (C) 1992 by QMS Inc. All rights reserved.
%%EndComments
%%?BeginFontListQuery
/scratch 100 string def
FontDirectory {pop = flush} forall
systemdict /filenameforall known
{(fonts/*) {dup length 6 sub 6 exch
getinterval = flush} scratch filenameforall} if
/* = flush
%%?EndFontListQuery: default
[Font Samples]
%!PS-Adobe 2.0
%%IncludeFeature: emulation(postscript)
%%Title: PrintFontSample
%%Creator: QMS
%%Date: 04/26/91
%%Copyright (C) 1992 by QMS Inc. All rights reserved.
%%EndComments
%%BeginProcSet: PrintFontSample 1.00
/bd { bind def } def
/fs 6 def
/fm{
gsave 0 0 moveto clippath pathbbox grestore
/TM exch 15 sub store
/RM exch store
/BM exch store
/LM exch 36 add store
/y TM store
} bd
/sf { scalefont setfont }bd
/nl { /y y fs sub store LM y moveto } bd
/ph { /Courier findfont 12 sf LM TM moveto fn 100 string cvs
show /y TM 36 sub store} bd
/pp { /Courier findfont 12 sf LM y moveto fs 100 string cvs show ( pt) show
/y y 12 fs gt{ 12 }{ fs } ifelse sub store LM y moveto} bd
/pb { (ABCDEFGHIJKLMNOPQRSTUVWXYZ) show nl (abcdefghijklmnopqrstuvwxyz) show nl
(0123456789-=`~!@#$%^&*\050\051_+[]{}\134|;:'\042,.<>/?) show nl /y y 36 sub store
LM y moveto } bd
/pl { /fs exch store pp fn findfont fs sf pb } bd
/pf { /fn exch store fm ph 6 pl 8 pl 10 pl 12 pl 14 pl 18 pl 24 pl showpage } bd
%%EndProcSet:
[ON OverPrint]
%!PS-Adobe 2.0
%%IncludeFeature: emulation(postscript)
%%Creator: QMS Inc.
%%For: PSExecutive Utilities
%%Title: Turn on black over print
%%Copyright (C) 1992 by QMS Inc. All rights reserved.
%%EndComments
serverdict begin 0 exitserver
statusdict begin
defaultblackoverprint not {true setdefaultblackoverprint} if
true setblackoverprint
end
[OFF OverPrint]
%!PS-Adobe 2.0
%%IncludeFeature: emulation(postscript)
%%Creator: QMS Inc.
%%For: PSExecutive Utilities
%% Title: Turn off black over print
%%Copyright (C) 1992 by QMS Inc. All rights reserved.
%%EndComments
serverdict begin 0 exitserver
statusdict begin
defaultblackoverprint {false setdefaultblackoverprint} if
false setblackoverprint
end
[ON Startup]
%!PS-Adobe 2.0
%%IncludeFeature: emulation(postscript)
%%Creator: QMS Inc.
%%For: PSExecutive Utilities
%%Title: Startup Page On
%%Version: 1.1
%%Copyright (C) 1992 by QMS Inc. All rights reserved.
%%EndComments
serverdict begin 0 exitserver % change password if neccessary
statusdict begin
true dostartpage ne {true setdostartpage} if % turn startup page ON
end
[OFF Startup]
%!PS-Adobe 2.0
%%IncludeFeature: emulation(postscript)
%%Creator: QMS Inc.
%%For: PSExecutive Utilities
%%Title: No more Startup Page
%%Versin: 1.1
%%Copyright (C) 1992 by QMS Inc. All rights reserved.
%%EndComments
serverdict begin 0 exitserver % change password if neccessary
statusdict begin
false dostartpage ne {false setdostartpage} if % turn startup page OFF
end
[Emulation Switch]
%!PS-Adobe 2.0
%%IncludeFeature: emulation(postscript)
%%Creator: QMS Inc.
%%For: PSExecutive Utilities
%%Title: Emulation Switching Code
%%Version: 2.0
%% This file is designed to implement the setsoftwareiomode command
%% in QMS printers which do not have this capability. This command
%% is used to switch emulation modes through software.
%%Copyright (C) 1992 by QMS Inc. All rights reserved.
%%EndComments
/Times-Roman findfont 12 scalefont setfont /Y 360 def
/SNL {100 Y moveto show /Y Y 14 sub def}bind def
/check false def /Abort false def /builtIn false def
userdict /TLCdict known not statusdict /setsoftwareiomode known and
{/builtIn true def} if
userdict /TLCdict known statusdict /setsoftwareiomode known and {
(The persistent routines necessary for emulation switching have already been)SNL
(downloaded. This attempt to reload the routines is being ignored.)SNL
/check true def /Abort true def} if
serverdict /diabloexec known not {()SNL
(Your printer does not have diablo emulation. Any attempts to select this emulation)SNL
(will be ignored.\n)SNL /check true def} if
serverdict /exechplj known not {()SNL
(Your printer does not have LaserJet emulation. Any attempts to select this emulation)SNL
(will be ignored.\n)SNL /check true def} if
serverdict /exechpgl known not {()SNL
(Your printer does not have HPGL 7475A Plotter emulation. Any attempts to select this)SNL
(emulation will be ignored.\n)SNL /check true def} if
Abort {stop}if
builtIn not check and {showpage}if
serverdict begin 0 exitserver
userdict /TLCdict known not {/TLCdict 10 dict def} if
TLCdict begin
/trans false def
/opentrans
statusdict /setsoftwareiomode known
{ {statusdict begin defaulttimeouts 0 eq {pop pop}
{0 setdefaulttimeouts}ifelse}
/*DIABLO false def
/*HPLJ {5 statusdict /setsoftwareiomode get exec} def
/*HPGL {4 statusdict /setsoftwareiomode get exec} def
}
{ {TLCdict /trans true put statusdict begin
serverdict /stdname get (serial) search
{pop pop product (QMS-PS 1500) eq {pop 9 25}
{( 25) eq {25 25} {9 9} ifelse}
ifelse
dup closescc
sccbatch true openscc
}
{pop product (QMS-PS 1500) eq
{9} {25} ifelse true opencen
} ifelse
statusdict /waittimeout 3 put}
/*DIABLO serverdict /diabloexec known
{{1 statusdict /setsoftwareiomode get exec}} {false}ifelse def
/*HPLJ serverdict /exechplj known
{{5 statusdict /setsoftwareiomode get exec}} {false}ifelse def
/*HPGL serverdict /exechpgl known
{{4 statusdict /setsoftwareiomode get exec}} {false}ifelse def
}ifelse
bind def
/svlv1 1234 def
end % TLCdict
userdict /*DIABLO TLCdict /*DIABLO get put
userdict /*HPLJ TLCdict /*HPLJ get put
userdict /*HPGL TLCdict /*HPGL get put
userdict /*PS {0 statusdict /setsoftwareiomode get exec} bind put
statusdict /setsoftwareiomode known {stop}if
%% The file processing ends here if softwareiomode is built in.
statusdict begin
defaulttimeouts 30 gt {30 setdefaulttimeouts}{pop pop}ifelse
/setsoftwareiomode
{ dup 0 eq dup TLCdict /endofemulate 3 -1 roll put
{pop statusdict begin
serverdict /stdname get (serial) search % determine serial or par.
{pop pop product (QMS-PS 1500) eq {pop 9}
{( 25) eq {25} {9} ifelse} ifelse closescc
}
{pop closecen } ifelse end
}{statusdict begin /waittimeout 0 def /jobtimeout 0 def
/manualfeedtimeout 0 def end
dup 1 eq {clear {TLCdict /svlv1 save put
{ {serverdict /diabloexec get exec}stopped
{ {$error /newerror get{handleerror}if}stopped pop
} if
end end
}stopped pstack flush
TLCdict /endofemulate get
{TLCdict /trans get {statusdict begin 0 setsoftwareiomode}if
exit}{clear TLCdict /svlv1 get restore} ifelse
}loop
} if
dup 5 eq {clear {TLCdict /svlv1 save put
{
{serverdict /exechplj get exec}stopped
{ {$error /newerror get{handleerror}if}stopped pop
} if
end end
}stopped pstack flush
TLCdict /endofemulate get
{TLCdict /trans get {statusdict begin 0 setsoftwareiomode}if
exit}{clear TLCdict /svlv1 get restore} ifelse
}loop
} if
dup 4 eq {clear {TLCdict /svlv1 save put
{ {serverdict /exechpgl get exec}stopped pstack flush
{ {$error /newerror get{handleerror}if}stopped pop
} if
end end
}stopped pstack flush
TLCdict /endofemulate get
{TLCdict /trans get {statusdict begin 0 setsoftwareiomode}if
exit}{clear TLCdict /svlv1 get restore} ifelse
}loop
} if
pop % extra number.
} ifelse % 0 or not
}bind def
[Directory Printer Fonts]
%!PS-Adobe 2.0
%%IncludeFeature: emulation(postscript)
%%Title: Directory Printer Fonts
%%Creator: QMS Inc.
%%For: PSExecutive Utilities
%%Copyright (C) 1992 by QMS Inc. All rights reserved.
%%EndComments
/D /def load def
/bd {bind D}bind D /xd {exch D}bd /ld {load D}bd
/lx 18.0 def /ly 7.92 def /hx 593.76 def /hy 784.32 def
gsave clippath pathbbox grestore
/xy xd /xx xd /my xd /mx xd /sx 1 def /sy 1 def /tx 0 def /ty 0 def
/xx xx mx sub def /xy xy my sub def /hx hx lx sub def /hy hy ly sub def
/sx xx hx div def /sy xy hy div def sx sy lt {/sy sx def}if
/ty xy hy sy mul sub 2 div def /tx xx hx sy mul sub 2 div def
/tx tx mx add lx sy mul sub def /ty ty my add ly sy mul sub def
tx ty translate sy sy scale
vmstatus /vmmax exch def /vmused exch def pop
/str 128 string def
/$sort 20 dict def
/SortInit {1 array} def
/compare {gt} def
/Insert {
exch dup 0 get type (nulltype) eq
{exch [ exch 1 array 1 array ] 0 exch put}
{aload pop aload pop 4 2 roll 2 copy compare
{pop 3 -1 roll pop Insert}
{pop exch pop Insert} ifelse
}ifelse
}def
/PrefixWalk{
$sort begin
cvx/!bt exch def bpwalk
end
}def
/PostfixWalk{
$sort begin cvx
/!bt exch def
bbwalk end
}def
/FontsSort&Print{
$sort begin
/tree SortInit def
FontDirectory{
pop str cvs dup 0 get dup 65 lt exch 90 gt or
{pop} {dup length string copy tree exch Insert} ifelse
}forall
/filenameforall where { pop
/str 100 string def
(fonts/*) {
dup length dup /ln exch def string /ss exch def
6 ln 6 sub getinterval ss exch 0 exch putinterval
ss ln 9 sub ( **Disk) putinterval
tree ss Insert
} str filenameforall
} if
tree {ctext} PrefixWalk end
}def
$sort begin
/bpwalk{
dup 0 get type/nulltype eq
{pop}{aload pop aload pop exch bpwalk exch !bt bpwalk} ifelse
}def
/bbwalk{
dup 0 get type/nulltype eq
{pop} {aload pop aload pop bbwalk exch !bt bbwalk} ifelse
}def
end
/ctext{
gsave show grestore 0 -12 rmoveto
currentpoint 30 lt{
300 gt{showpage title}{310 696 moveto}ifelse
}{
pop
}ifelse
}def
/title {
90 720 moveto
/Times-Roman findfont 18 scalefont setfont
gsave (Font Directory)show grestore 0 -24 rmoveto
/Times-Roman findfont 12 scalefont setfont
}def
title
FontsSort&Print
0 -18 rmoveto
(Remaining usable memory: )show
vmmax vmused sub ( )cvs show
( bytes.)show
showpage
[Set Resolution]
%!PS-Adobe 2.0
%%IncludeFeature: emulation(postscript)
%%Title: Resolution
%%Creator: QMS Inc.
%%For: PSExecutive Utilities
%%Copyright (C) 1992 by QMS Inc. All rights reserved.
%%EndComments
serverdict begin 0 exitserver
/SetResolution
{ /res exch def
statusdict begin
res setdefaultresolution end }def
[Set Gamma]
%!PS-Adobe 2.0
%%IncludeFeature: emulation(postscript)
%%Creator: QMS Inc.
%%For: PSExecutive Utilities
%%Title: Gamma Correction
%%Copyright (C) 1992 by QMS Inc. All rights reserved.
%%EndComments
serverdict begin 0 exitserver
/SetGamma
{ /gc exch def
statusdict begin
gc setdefaultgammacorrection end }def
[IOmode Emulation]
0
%!PS-Adobe 2.0
%%IncludeFeature: emulation(postscript)
%%Creator: QMS Inc.
%%For: PSExecutive Utilities
%%Copyright (C) 1992 by QMS Inc. All rights reserved.
%%EndComments
serverdict begin 0 exitserver
/SetPrinterIOEmul {
statusdict begin
/emulationval exch store
emulationval setsoftwareiomode end } def
[Thumb Wheel Emulation]
%!PS-Adobe 2.0
%%IncludeFeature: emulation(postscript)
%%Creator: QMS Inc.
%%Title: Emulation Switching Code
%%For: PSExecutive Utilities
%% This file is designed to implement the setsoftwareiomode command
%% in QMS printers which do not have this capability. This command
%% is used to switch emulation modes through software.
%%Copyright (C) 1992 by QMS Inc. All rights reserved.
%%EndComments
/Times-Roman findfont 12 scalefont setfont /Y 360 def
/SNL {100 Y moveto show /Y Y 14 sub def}bind def
/check false def /Abort false def /builtIn false def
userdict /TLCdict known not statusdict /setsoftwareiomode known and
{/builtIn true def} if
userdict /TLCdict known statusdict /setsoftwareiomode known and {
(The persistent routines necessary for emulation switching have already been)SNL
(downloaded. This attempt to reload the routines is being ignored.)SNL
/check true def /Abort true def} if
serverdict /diabloexec known not {()SNL
(Your printer does not have diablo emulation. Any attempts to select this emulation)SNL
(will be ignored.\n)SNL /check true def} if
serverdict /exechplj known not {()SNL
(Your printer does not have LaserJet emulation. Any attempts to select this emulation)SNL
(will be ignored.\n)SNL /check true def} if
serverdict /exechpgl known not {()SNL
(Your printer does not have HPGL 7475A Plotter emulation. Any attempts to select this)SNL
(emulation will be ignored.\n)SNL /check true def} if
Abort {stop}if
builtIn not check and {showpage}if
serverdict begin 0 exitserver
userdict /TLCdict known not {/TLCdict 10 dict def} if
TLCdict begin
/trans false def
/opentrans
statusdict /setsoftwareiomode known
{ {statusdict begin defaulttimeouts 0 eq {pop pop}
{0 setdefaulttimeouts}ifelse}
/*DIABLO false def
/*HPLJ {5 statusdict /setsoftwareiomode get exec} def
/*HPGL {4 statusdict /setsoftwareiomode get exec} def
}
{ {TLCdict /trans true put statusdict begin
serverdict /stdname get (serial) search
{pop pop product (QMS-PS 1500) eq {pop 9 25}
{( 25) eq {25 25} {9 9} ifelse}
ifelse
dup closescc
sccbatch true openscc
}
{pop product (QMS-PS 1500) eq
{9} {25} ifelse true opencen
} ifelse
statusdict /waittimeout 3 put}
/*DIABLO serverdict /diabloexec known
{{1 statusdict /setsoftwareiomode get exec}} {false}ifelse def
/*HPLJ serverdict /exechplj known
{{5 statusdict /setsoftwareiomode get exec}} {false}ifelse def
/*HPGL serverdict /exechpgl known
{{4 statusdict /setsoftwareiomode get exec}} {false}ifelse def
}ifelse
bind def
/svlv1 1234 def
end % TLCdict
userdict /*DIABLO TLCdict /*DIABLO get put
userdict /*HPLJ TLCdict /*HPLJ get put
userdict /*HPGL TLCdict /*HPGL get put
userdict /*PS {0 statusdict /setsoftwareiomode get exec} bind put
statusdict /setsoftwareiomode known {stop}if
%% The file processing ends here if softwareiomode is built in.
statusdict begin
defaulttimeouts 30 gt {30 setdefaulttimeouts}{pop pop}ifelse
/setsoftwareiomode
{ dup 0 eq dup TLCdict /endofemulate 3 -1 roll put
{pop statusdict begin
serverdict /stdname get (serial) search % determine serial or par.
{pop pop product (QMS-PS 1500) eq {pop 9}
{( 25) eq {25} {9} ifelse} ifelse closescc
}
{pop closecen } ifelse end
}{statusdict begin /waittimeout 0 def /jobtimeout 0 def
/manualfeedtimeout 0 def end
dup 1 eq {clear {TLCdict /svlv1 save put
{ {serverdict /diabloexec get exec}stopped
{ {$error /newerror get{handleerror}if}stopped pop
} if
end end
}stopped pstack flush
TLCdict /endofemulate get
{TLCdict /trans get {statusdict begin 0 setsoftwareiomode}if
exit}{clear TLCdict /svlv1 get restore} ifelse
}loop
} if
dup 5 eq {clear {TLCdict /svlv1 save put
{
{serverdict /exechplj get exec}stopped
{ {$error /newerror get{handleerror}if}stopped pop
} if
end end
}stopped pstack flush
TLCdict /endofemulate get
{TLCdict /trans get {statusdict begin 0 setsoftwareiomode}if
exit}{clear TLCdict /svlv1 get restore} ifelse
}loop
} if
dup 4 eq {clear {TLCdict /svlv1 save put
{ {serverdict /exechpgl get exec}stopped pstack flush
{ {$error /newerror get{handleerror}if}stopped pop
} if
end end
}stopped pstack flush
TLCdict /endofemulate get
{TLCdict /trans get {statusdict begin 0 setsoftwareiomode}if
exit}{clear TLCdict /svlv1 get restore} ifelse
}loop
} if
pop % extra number.
} ifelse % 0 or not
}bind def
[Trans_em]
%!PS-Adobe
%%Version 2.0
%%Copyright (C) 1992 by QMS Inc. All rights reserved.
%%EndComments
serverdict begin 0 exitserver
TLCdict /opentrans get exec
[PS_em]
0
%%Version: 2.0
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%% %%% %%%%%%%%%% %%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%% %%%%%%% %%%%%%%%% %%%% %%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%% %%%%%%% %%%%%%%%% %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%% %%%%%%% %%%%%%%%% %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%% %%%%%%% %%%%%%%%% %%%% %%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%% %%%%%%% %%%% %%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
[HPPCL_em]
%%Version: 2.0
*HPLJ
[HPGL_em]
%%Version 2.0
*HPGL
[Diablo_em]
%%Version: 2.0
*DIABLO
[End]
Download Driver Pack
After your driver has been downloaded, follow these simple steps to install it.
Expand the archive file (if the download file is in zip or rar format).
If the expanded file has an .exe extension, double click it and follow the installation instructions.
Otherwise, open Device Manager by right-clicking the Start menu and selecting Device Manager.
Find the device and model you want to update in the device list.
Double-click on it to open the Properties dialog box.
From the Properties dialog box, select the Driver tab.
Click the Update Driver button, then follow the instructions.
Very important: You must reboot your system to ensure that any driver updates have taken effect.
For more help, visit our Driver Support section for step-by-step videos on how to install drivers for every file type.