1. psexec44.exe Driver
  2. PSEXECMD.INF File Contents

PSEXECMD.INF Driver File Contents (psexec44.exe)

 DOWNLOAD NOW
PSEXECMD.INF Driver Update Utility 
[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 }bind 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 }bind 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 }bind 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 } bind 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
serverdict begin 0 exitserver
statusdict begin /manualfeed true def end

[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
serverdict begin 0 exitserver
statusdict begin /manualfeed false def end

[Enable Job 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 Job 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 
   /getallfontcachesizes
   {
      0 0 0 fontcache _buffersize
   } bind readonly def
   end
   /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
} bind 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
} bind 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
} bind 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
} bind 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
} bind 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
}bind 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
}bind 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
}bind 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
}bind 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
}bind 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
}bind 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
}bind 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
}bind 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
}bind 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 }bind 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 }bind 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 end
}if

[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 end
}if 


[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 end }if

[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 end }if 

[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 end }if

[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 end }if

[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 end
}if 

[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 end }if 

[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 end }if 


[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 end }if 

[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 end
}if 

[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 begin /trayswitch true def 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 end
}if

[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 begin /trayswitch false def end


[Letter]
%!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
statusdict begin letter end

[Legal]
%!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
statusdict begin legal end

[A4]
%!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
statusdict begin a4 end

[B5]
%!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
statusdict begin b5 end

[Executive]
%!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
statusdict begin executivepage end

[Monarch Envelope]
%!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
statusdict begin monarchenvelope end

[DL Envelope]
%!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
statusdict begin dlenvelope end

[COM10 Envelope]
%!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
statusdict begin com10envelope end

[COM9 Envelope]
%!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
statusdict begin com9envelope end

[C5 Envelope]
%!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
statusdict begin c5envelope 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 }bind 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
serverdict begin 0 exitserver
statusdict begin /letter true setdefaultmultipurposetraysize 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
serverdict begin 0 exitserver
statusdict begin /legal true setdefaultmultipurposetraysize 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
serverdict begin 0 exitserver
statusdict begin /a4 true setdefaultmultipurposetraysize 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
serverdict begin 0 exitserver
statusdict begin /executivepage true setdefaultmultipurposetraysize end

[envelopetray]
%!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
serverdict begin 0 exitserver
statusdict begin /envelope true setdefaultmultipurposetraysize 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
serverdict begin 0 exitserver
statusdict begin /b5 true setdefaultmultipurposetraysize end

[envelope]
%!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
serverdict begin 0 exitserver
statusdict begin /envelope true setdefaultmultipurposetraysize end

[monarchtray]
%!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
serverdict begin 0 exitserver
statusdict begin /envelope true setdefaultmultipurposetraysize end

[dltray]
%!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
serverdict begin 0 exitserver
statusdict begin /envelope true setdefaultmultipurposetraysize end

[com10tray]
%!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
serverdict begin 0 exitserver
statusdict begin /envelope true setdefaultmultipurposetraysize end

[com9tray]
%!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
serverdict begin 0 exitserver
statusdict begin /envelope true setdefaultmultipurposetraysize end

[c5tray]
%!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
serverdict begin 0 exitserver
statusdict begin /envelope true setdefaultmultipurposetraysize end





[a3tray]
%!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
serverdict begin 0 exitserver
statusdict begin
a3tray
end


[a5tray]
%!PS-Adobe 2.0 
%%IncludeFeature: emulation(postscript)
%%Creator: QMS Inc.
%%Title:  Set Page Type A5
%%For: PSExecutive Utilities
%%Copyright (C) 1992 by QMS Inc.  All rights reserved.
%%EndComments
serverdict begin 0 exitserver
statusdict begin
a5tray
end

[a6tray]
%!PS-Adobe 2.0 
%%IncludeFeature: emulation(postscript)
%%Creator: QMS Inc.
%%Title:  Set Page Type A6
%%For: PSExecutive Utilities
%%Copyright (C) 1992 by QMS Inc.  All rights reserved.
%%EndComments
serverdict begin 0 exitserver
statusdict begin
a6tray
end

[b4tray]
%!PS-Adobe 2.0 
%%IncludeFeature: emulation(postscript)
%%Creator: QMS Inc.
%%Title:  Set Page Type B4
%%For: PSExecutive Utilities
%%Copyright (C) 1992 by QMS Inc.  All rights reserved.
%%EndComments
serverdict begin 0 exitserver
statusdict begin
b4tray
end

[b6tray]
%!PS-Adobe 2.0 
%%IncludeFeature: emulation(postscript)
%%Creator: QMS Inc.
%%Title:  Set Page Type B6
%%For: PSExecutive Utilities
%%Copyright (C) 1992 by QMS Inc.  All rights reserved.
%%EndComments
serverdict begin 0 exitserver
statusdict begin
b6tray
end

[universaltray]
%!PS-Adobe 2.0 
%%IncludeFeature: emulation(postscript)
%%Creator: QMS Inc.
%%Title:  Set Page Type universal
%%For: PSExecutive Utilities
%%Copyright (C) 1992 by QMS Inc.  All rights reserved.
%%EndComments
serverdict begin 0 exitserver
statusdict begin
universaltray
end

[11x17tray]
%!PS-Adobe 2.0 
%%IncludeFeature: emulation(postscript)
%%Creator: QMS Inc.
%%Title:  Set Page Type 11x17
%%For: PSExecutive Utilities
%%Copyright (C) 1992 by QMS Inc.  All rights reserved.
%%EndComments
serverdict begin 0 exitserver
statusdict begin
11x17tray
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
serverdict begin 0 exitserver
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
serverdict begin 0 exitserver
statusdict begin
spa4tray
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
serverdict begin 0 exitserver
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
serverdict begin 0 exitserver
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
   %%?BeginQuery:Level
   /defaultpslevel where
      {pop defaultpslevel}{0}ifelse = flush
   %%?EndQuery:1
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 5 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 Smoothing ON]
%!PS-Adobe 2.0
%%IncludeFeature: emulation(postscript)
%%Creator: QMS Inc.
%%For: PSExecutive Utilities
%%Title:  Resolution Smoothing 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 defaultdoret ne {true setdefaultdoret} if  % turn Smoothing ON
end

[Set Smoothing OFF]
%!PS-Adobe 2.0
%%IncludeFeature: emulation(postscript)
%%Creator: QMS Inc.
%%For: PSExecutive Utilities
%%Title:  Resolution Smoothing OFF
%%Version: 1.1
%%Copyright (C) 1992 by QMS Inc.  All rights reserved.
%%EndComments
serverdict begin 0 exitserver     % change password if neccessary
statusdict begin
false defaultdoret ne {false setdefaultdoret} if  % turn Smoothing OFF
end

[Set MultiResEqu]
%!PS-Adobe 2.0 
%%IncludeFeature: emulation(postscript)
%%Title: MultiRes Equation
%%Creator: QMS Inc.
%%For: PSExecutive Utilities
%%Copyright (C) 1992 by QMS Inc.  All rights reserved.
%%EndComments
serverdict begin 0 exitserver
/SetMultiResEqu
{  /res exch def
   statusdict begin
   res setdefaultmreqn end }bind def

[Set SmoothEqu]
%!PS-Adobe 2.0 
%%IncludeFeature: emulation(postscript)
%%Title: Smoothing Equation
%%Creator: QMS Inc.
%%For: PSExecutive Utilities
%%Copyright (C) 1992 by QMS Inc.  All rights reserved.
%%EndComments
serverdict begin 0 exitserver
/SetSmoothEqu
{  /res exch def
   statusdict begin
   res setdefaultreteqn end }bind def


[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 }bind 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 }bind def

[Language Level]
%!PS-Adobe 2.0 
%%IncludeFeature: emulation(postscript)
%%Creator: QMS Inc.
%%For: PSExecutive Utilities
%%Title: Set Language Level
%%Copyright (C) 1992 by QMS Inc.  All rights reserved.
%%EndComments
serverdict begin 0 exitserver
/SetLanguageLevel{
statusdict begin
/langval exch store
langval setdefaultpslevel end } bind def


[Set HPGL Plotter]
%!PS-Adobe 2.0 
%%IncludeFeature: emulation(postscript)
%%Creator: QMS Inc.
%%For: PSExecutive Utilities
%%Title: Set HPGL Plotter Model
%%Copyright (C) 1992 by QMS Inc.  All rights reserved.
%%EndComments
serverdict begin 0 exitserver
/SetPlotter{
statusdict begin
/hpglplotter exch store
hpglplotter sethpglplotter end } bind def

[Set HPGL Paper]
%!PS-Adobe 2.0 
%%IncludeFeature: emulation(postscript)
%%Creator: QMS Inc.
%%For: PSExecutive Utilities
%%Title: Set HPGL Paper Type
%%Copyright (C) 1992 by QMS Inc.  All rights reserved.
%%EndComments
serverdict begin 0 exitserver
/SetPaper{
statusdict begin
/hpglpapertype exch store
hpglpapertype sethpglpapertype end } bind def

[Set HPGL Origin]
%!PS-Adobe 2.0 
%%IncludeFeature: emulation(postscript)
%%Creator: QMS Inc.
%%For: PSExecutive Utilities
%%Title: Set HPGL Origin
%%Copyright (C) 1992 by QMS Inc.  All rights reserved.
%%EndComments
serverdict begin 0 exitserver
/SetHPGLOrigin
{
   /xorigin exch def
   /yorigin exch def
   statusdict begin
   xorigin yorigin sethpglorigin
   end
}bind def

[Set HPGL Scaling]
%!PS-Adobe 2.0 
%%IncludeFeature: emulation(postscript)
%%Creator: QMS Inc.
%%For: PSExecutive Utilities
%%Title: Set HPGL Scaling
%%Copyright (C) 1992 by QMS Inc.  All rights reserved.
%%EndComments
serverdict begin 0 exitserver
/SetHPGLScaling
{
   statusdict begin 
	  /newval exch store
	  /sethpglscaling where {
	     pop statusdict begin hpglscaling newval ne{
	        newval sethpglscaling
	     }if
	  end } if
} bind def


[HPGL Reverse ON]
%!PS-Adobe 2.0 
%%IncludeFeature: emulation(postscript)
%%Creator: QMS Inc.
%%For: PSExecutive Utilities
%%Title: Set HPGL Reverse Image 
%%Copyright (C) 1992 by QMS Inc.  All rights reserved.
%%EndComments
serverdict begin 0 exitserver
statusdict /hpglreverseimage known
{statusdict begin  true dup hpglreverseimage ne 
{sethpglreverseimage} {pop}ifelse end }if 

[HPGL Reverse OFF]
%!PS-Adobe 2.0 
%%IncludeFeature: emulation(postscript)
%%Creator: QMS Inc.
%%For: PSExecutive Utilities
%%Title: Set HPGL Reverse Image 
%%Copyright (C) 1992 by QMS Inc.  All rights reserved.
%%EndComments
serverdict begin 0 exitserver
statusdict /hpglreverseimage known 
{statusdict begin false dup hpglreverseimage ne 
{sethpglreverseimage} {pop}ifelse end }if


[HPGL Enhanced ON]
%!PS-Adobe 2.0 
%%IncludeFeature: emulation(postscript)
%%Creator: QMS Inc.
%%For: PSExecutive Utilities
%%Title: Set HPGL Enhanced Mode
%%Copyright (C) 1992 by QMS Inc.  All rights reserved.
%%EndComments
serverdict begin 0 exitserver
statusdict /hpglenhancedmode known
{statusdict begin  true dup hpglenhancedmode ne 
{sethpglenhancedmode} {pop}ifelse end }if 

[HPGL Enhanced OFF]
%!PS-Adobe 2.0 
%%IncludeFeature: emulation(postscript)
%%Creator: QMS Inc.
%%For: PSExecutive Utilities
%%Title: Set HPGL Enhanced Mode
%%Copyright (C) 1992 by QMS Inc.  All rights reserved.
%%EndComments
serverdict begin 0 exitserver
statusdict /hpglenhancedmode known
{statusdict begin  false dup hpglenhancedmode ne 
{sethpglenhancedmode} {pop}ifelse end }if 
 

[HPGL Expand ON]
%!PS-Adobe 2.0 
%%IncludeFeature: emulation(postscript)
%%Creator: QMS Inc.
%%For: PSExecutive Utilities
%%Title: Set HPGL Expand Mode
%%Copyright (C) 1992 by QMS Inc.  All rights reserved.
%%EndComments
serverdict begin 0 exitserver
statusdict /hpglexpandmode known
{statusdict begin  true dup hpglexpandmode ne 
{sethpglexpandmode} {pop}ifelse end }if 

[HPGL Expand OFF]
%!PS-Adobe 2.0 
%%IncludeFeature: emulation(postscript)
%%Creator: QMS Inc.
%%For: PSExecutive Utilities
%%Title: Set HPGL Expand Mode
%%Copyright (C) 1992 by QMS Inc.  All rights reserved.
%%EndComments
serverdict begin 0 exitserver
statusdict /hpglexpandmode known
{statusdict begin  false dup hpglexpandmode ne 
{sethpglexpandmode} {pop}ifelse end }if 


[Set HPGL Pens]
%!PS-Adobe 2.0 
%%IncludeFeature: emulation(postscript)
%%Creator: QMS Inc.
%%For: PSExecutive Utilities
%%Title: Set HPGL Pens
%%Copyright (C) 1992 by QMS Inc.  All rights reserved.
%%EndComments
serverdict begin 0 exitserver
/SetHPGLPen 
{
   statusdict begin
   /pc exch def
   /pw exch def
   /pn exch def
   pn pw pc sethpglpen
   end
}bind def

[Set HPCL Line Termination]
%!PS-Adobe 2.0 
%%IncludeFeature: emulation(postscript)
%%Creator: QMS Inc.
%%For: PSExecutive Utilities
%%Title: Set HPCL Line Termination
%%Copyright (C) 1992 by QMS Inc.  All rights reserved.
%%EndComments
serverdict begin 0 exitserver
/SetPCLLineTerm 
{
   statusdict begin 
	  /newval exch store
	  /setpcllinetermination where {
	     pop statusdict begin pcllinetermination newval ne{
	        newval setpcllinetermination
	     }if
	  end } if
} bind def

[Set HPCL Symbol Set]
%!PS-Adobe 2.0 
%%IncludeFeature: emulation(postscript)
%%Creator: QMS Inc.
%%For: PSExecutive Utilities
%%Title: Set HPCL Symbol Set
%%Copyright (C) 1992 by QMS Inc.  All rights reserved.
%%EndComments
serverdict begin 0 exitserver
/SetPCLSymblSet 
{
   statusdict begin 
	  /newval exch store
	  /setpclsymbolset where {
	     pop statusdict begin pclsymbolset newval ne{
	        newval setpclsymbolset
	     }if
	  end } if
} bind def


[Set HPCL Font Number]
%!PS-Adobe 2.0 
%%IncludeFeature: emulation(postscript)
%%Creator: QMS Inc.
%%For: PSExecutive Utilities
%%Title: Set HPCL Font Number
%%Copyright (C) 1992 by QMS Inc.  All rights reserved.
%%EndComments
serverdict begin 0 exitserver
/SetPCLFontNumb
{
   statusdict begin 
	  /newval exch store
	  /setpclfontnumber where {
	     pop statusdict begin pclfontnumber newval ne{
	        newval setpclfontnumber
	     }if
	  end } if
} bind def

[Set HPCL Lines of Text]
%!PS-Adobe 2.0 
%%IncludeFeature: emulation(postscript)
%%Creator: QMS Inc.
%%For: PSExecutive Utilities
%%Title: Set HPCL Lines Of Text
%%Copyright (C) 1992 by QMS Inc.  All rights reserved.
%%EndComments
serverdict begin 0 exitserver
/SetPCLLinesOfText
{
   statusdict begin 
	  /newval exch store
	  /setpcllinesoftext where {
	     pop statusdict begin pcllinesoftext newval ne{
	        newval setpcllinesoftext
	     }if
	  end } if
} bind def

[Set HPCL Reset State]
%!PS-Adobe 2.0 
%%IncludeFeature: emulation(postscript)
%%Creator: QMS Inc.
%%For: PSExecutive Utilities
%%Title: Set HPCL Reset State
%%Copyright (C) 1992 by QMS Inc.  All rights reserved.
%%EndComments
serverdict begin 0 exitserver
/SetPCLReset
{
   statusdict begin 
	  /newval exch store
	  /setpclreset where {
	     pop statusdict begin pclreset newval ne{
	        newval setpclreset
	     }if
	  end } if
} bind def


[Set Parallel EOD None]
%!PS-Adobe 2.0 
%%IncludeFeature: emulation(postscript)
%%Creator: QMS Inc.
%%For: PSExecutive Utilities
%%Title: Set Parallel EOD - None
%%Copyright (C) 1992 by QMS Inc.  All rights reserved.
%%EndComments
serverdict begin 0 exitserver
/SetParEODNone
{
   statusdict begin 
	  /newval exch store
	  /setparalleloptions where {
	     pop statusdict begin paralleloptions newval ne{
	        newval setparalleloptions
	     }if
	  end } if
} bind def


[Set Parallel EOD QMS]
%!PS-Adobe 2.0 
%%IncludeFeature: emulation(postscript)
%%Creator: QMS Inc.
%%For: PSExecutive Utilities
%%Title: Set Parallel EOD - QMS
%%Copyright (C) 1992 by QMS Inc.  All rights reserved.
%%EndComments
serverdict begin 0 exitserver
/SetParEODQMS
{
   statusdict begin 
	  /newval exch store
	  /setparalleloptions where {
	     pop statusdict begin paralleloptions newval ne{
	        newval setparalleloptions
	     }if
	  end } if
} bind def


[Set Parallel EOD HP]
%!PS-Adobe 2.0 
%%IncludeFeature: emulation(postscript)
%%Creator: QMS Inc.
%%For: PSExecutive Utilities
%%Title: Set Parallel EOD - HP
%%Copyright (C) 1992 by QMS Inc.  All rights reserved.
%%EndComments
serverdict begin 0 exitserver
/SetParEODHP
{
   statusdict begin 
	  /newval exch store
	  /setparalleloptions where {
	     pop statusdict begin paralleloptions newval ne{
	        newval setparalleloptions
	     }if
	  end } if
} bind def


[Set Serial EOD None]
%!PS-Adobe 2.0 
%%IncludeFeature: emulation(postscript)
%%Creator: QMS Inc.
%%For: PSExecutive Utilities
%%Title: Set Serial EOD - None
%%Copyright (C) 1992 by QMS Inc.  All rights reserved.
%%EndComments
serverdict begin 0 exitserver
/SetSerEODNone
{
   statusdict begin 
	  /newval exch store
	  /setserialoptions where {
	     pop statusdict begin serialoptions newval ne{
	        newval setserialoptions
	     }if
	  end } if
} bind def


[Set Serial EOD QMS]
%!PS-Adobe 2.0 
%%IncludeFeature: emulation(postscript)
%%Creator: QMS Inc.
%%For: PSExecutive Utilities
%%Title: Set Serial EOD - QMS
%%Copyright (C) 1992 by QMS Inc.  All rights reserved.
%%EndComments
serverdict begin 0 exitserver
/SetSerEODQMS
{
   statusdict begin 
	  /newval exch store
	  /setserialoptions where {
	     pop statusdict begin serialoptions newval ne{
	        newval setserialoptions
	     }if
	  end } if
} bind def


[Set Serial EOD HP]
%!PS-Adobe 2.0 
%%IncludeFeature: emulation(postscript)
%%Creator: QMS Inc.
%%For: PSExecutive Utilities
%%Title: Set Serial EOD - HP
%%Copyright (C) 1992 by QMS Inc.  All rights reserved.
%%EndComments
serverdict begin 0 exitserver
/SetSerEODHP
{
   statusdict begin 
	  /newval exch store
	  /setserialoptions where {
	     pop statusdict begin serialoptions newval ne{
	        newval setserialoptions
	     }if
	  end } if
} bind def

[Download Font to Disk]
%!PS-Adobe-2.0 FontToDisk
%%Title: FontToDisk
%%Creator: QMS Inc.
%%For: PSExecutive Utilities
%%BeginProcSet: FontToDisk 1.0
/bd {bind def}def
/df{
    /ef{status {pop pop pop pop true}{false} ifelse} bd
    /es {exch store} bd
    /dest es
    /buf 512 string def
    /sourcef (%stdin) (r) file def
    dest ef not{
    	/destf dest (w) file def
    	{
         	sourcef buf readstring
   	{ destf exch writestring }
         	{ dup length 0 gt
            	 {destf exch writestring} {pop} ifelse
           	sourcef closefile
           	destf closefile
           	exit
         	} ifelse
    	} loop
	}{
		{
			sourcef buf readstring not
			{ sourcef closefile exit } if
		}loop
   } ifelse
}bd
%%EndProcSet: 


[Download Font to RAM]
%!PS-Adobe 2.0
%%IncludeFeature: emulation(postscript)
%%Copyright (C) QMS Inc.  All rights reserved.
%%For: PSExecutive
%%EndComment
%%BeginProcSet: FontToRam 1.0
serverdict begin 0 exitserver
(%stdin) (r) file cvx exec
%%EndProcSet:


[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 } bind 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

[HPPCL_em]
%%Version: 2.0
 *HPLJ

[HPGL_em]
%%Version 2.0
 *HPGL

[Diablo_em]
%%Version: 2.0
 *DIABLO

[End]
Download Driver Pack

How To Update Drivers Manually

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.

Copyright © 1996 - 2026 DriverGuide is an iCentric Corporation Company.    All rights reserved.
Privacy Policy
server: web3, load: 1.26