macintosh@felix.UUCP (02/24/87)
[PSPrinter.hqx: DA to print PostScript Files]
PSPrinter.hqx (Desk Accessory)
-------------------------------
PSPrinter is a desk accessory that sends PostScript files
directly to your AppleTalked LaserWriter. I wrote it a while
back so that our LaserWriters would not have to be directly
connected to our Mainframe: troff people can just download
their output to a text file on their Mac (via terminal emulators)
and send the resulting file to the LaserWriter via PSPrinter.
Files sent to a LaserWriter via PSPrinter must be of type TEXT,
and they must be complete PostScript files: PSPrinter does
not send any information to the printer except to lengthen the
default timeout, and to initialize the LaserWriter's coordinate
system ("initmatrix").
This is a public domain program. The source should be available
in a separate posting to mod.sources.mac.
Scott Gillespie
Reed College
---
(This file must be converted with BinHex 4.0)
:#P"6)&"bD@jdCA)!4%C*6%406eB!N!JDXHEV!*!%!3#3!aRV!!!Bk`#3!mCK!*!
$,c`!N!3[22q3"+Pm)"mT3!!!,b`!!+Q"6Pi+8&-J8(*TER4PFL!#!*!$4%C*6%4
06eB"!!!,!+J0T`!!4%C*6%406eB"!!!,!+J0Te)X!*!-!YQET(09!*!''V%r2!!
&3IS!+L!)9)![!#mm!*!$)5mm!*!$!@%!N!01G3iJD@jTG'eKG(*TH!d+)!%M)(0
dBA4eFf4TBh3J,hGKDA4dD@ePEh9d)$B`-#"`GA30#L!r2!!(,c`!"3!!,c`!N!3
[2!#3"'%!N!01G8j@qr4K!*!$3LG#Cf%!N!0K!*!%(`"Q!'3!m!'N!!%"!!%!N!A
#i3T1CAFJ4'PKE'pR!*!$(`"@!%S!p!'S!!%"!!%!N!A#i`T1CAFJ4'PKE'pR!*!
$V!!%!*!&83!E!(-"'3Jc9'mJBf&ZBf9X,#"SEfaN)'4[GfiJG'KP)"%JDf9j)'&
ZC#"dHA"P)("PFQP[C#!S,LNZE`#3"4`!%`"1!5m)"#*H-#)!N!9f!!J!K`$A#"j
$D'&bB@0dCA*c)(*PE@&TEQPZCb"dEb"`FQPZG$S!N!9f!0`!K`%G#!#3"JF!"`!
B!'N)$8j[Gb"3FQPZG'PZCcT[!*!$)J!"!*!&8J%R!'S"G33#6dX!N!8+!%N!63&
k#!*H-3!!!6S!!J#3#Cd"A3J!N!B$!!S!C3&F#)&38b"3FQPZG'9b)*!$$5#3"@*
j)&0MEh4d)%GTE'aPFh"TC5"!)&*PC@3J3fpXE'9RC3d09'KTFb"NCA0V)'&MBf9
cFfpbH5"cC@jNFb"3Eh0dFf0bDA"d)'CTE'9c)(4[)(4SC5"MGA*bC@jdE(NJBfK
[Ff9Z)("bD@jdCA)Z)!#3"@F!#J#B!9S)Ld&ZH5"dCAKd)'CTE'8JE@&j)'*P)(0
PE'9MG'9N)(GTG'JJG'KP)#G3FQPZG#"3Eh0d8f0bDA"d)%CTE'8ZN!-R)'0[E@e
KEQ3X)'*eG#"[EQaj)("bEh"PFQaj)'0bC@&dC@3J8'pcG&0MFQP`G#"QD@aPFb"
hD@aX)("bD@jd)'0[FR*PBh4XH5iJCQPXCA-JGfPXE#"`FQPZG#"MEh*bC@0dE(N
Z!*!%$!"B!%B!aJ(+`Z*993!!!FJ!"Me8D'9bC5"SBA-JBQ9PEL"KEL"*,dmJCA*
bEh)Z)#"CEh9b)'CTE'8JBfpeE'3JEQpd)'*P)("bD@jdC@3Z,P4SCA*P)'Pc)'j
[G#"PEQpeCfJJE@9YEh*j)(4[)("bD@jd)(P[GA)JCQPXC5jq9'KP)%aKFf9b9h*
TG'9b)'0KEQj[G#"LC5"XEf0KG'9N)#dY)'eKDf8JFh9bC5"jEh8JD'&fC5"dD'8
JE@&NC5"dD'8JF(*[F'9b)&"bD@jdCA)JFf9XC@0dD@pZ)(GTG'JJG'KP)%0SEfp
cCA)JC'9cDb"KBf0PFh0[FRNZ3da[Fh3JBfpZG'&MG#"hDA4S)(4SC5"3FQPZG'9
b,L!J@@peFL"NEf0eE@9ZG#"MEh9XC#"ZEh3JBQ8JF(*TER4PC#j45@iJEh*NCA)
JG'mJF(*TER3X)(P[G5"YGA0d)(0PE'9MG#"K)%aKFf9b9h*TG'9b)(GTG'JJG'K
P)%0SEfpcCA)JC'9cDb"KBf0PFh0[FRNZ3d%JF(*TER4TEQFJCA*bEh)JD'&c)'p
MBh9bFQ9N,L!J@@peFL"NEf0eE@9ZG#"MEh9XC#"ZEh3JBQ8JF(*TER4PC#i!N!0
T`Z%!N!MrN!2l#P"6)&"bD@jdCA)B8(*TER3J8'pcG&0MFQP`G#"'D@aP,T!$!*!
%!5d!N!363@*[GA3J8&-J8(*TER4PFLk3!`#3"!p4G@Pd)&"6)&"bD@jdCA)!N!F
8+#3!!$`"DJ#3!h3!C!&X!'3"(JX!8&-J8(*TER4PFJ#3#8B!'3&(!I$rr`#3&L!
I51F!`%(krq3[#+Kd60m$!%MR!2J[1[r8,`"1G@(J+'N!&0Rm!*!$)'!!!JTKd%I
k!M"+U3!8CJ!!QL4))#X!@JD!!*!$)+%H)dJ!&%T!C`i[#6mm!!+Tb#*IB!!"iLK
)fI`!N!-J1AcrN!2f3LcrlbP*rqJT5[rN3UcrmN(krfT+%'G'51F!F%+R3UG)H[p
35(Vr1$mm!3""q[p-2a"`rbm!2c`"!%+RU4-JAdcI$J!aI!!*!%SaI!!%!%3T52r
b)dJ!(M&T!"J!E(!#FJ"K!!&'B!!"B'%!rbC+U3!8Cc)SD3!8fI`!N!-J+8Mrj%I
k!A"`%R)!B3!"(LCXrqJJD`!8S4p+U`!HC`B[+`!HU43L5d+T!"j#U3!83N#SFdc
I(`"1G@%!rYK(qJ%f+'N!&0Rm!*!$)#P)rq3`+!!D$%!!3'Fm$%!!3@F5$%!!3fF
B4IVqR$5!*8J!!Q!dF"Cb!'%!!,4J!!$12bJ!($mS!"j`'R)%B3!!S%*RU6KJ!!#
f*'J!($)5F!(MB-"V!&jR)#m+,`T`(R)%BA`NAdIk!-*+,2r[CJ!!MJa5rrpR!!#
'-")-3!!$Ca3-3!!&C`i-3!!'CcS-3!!"CaKJD$!U!!3#3!$r2`!r+J!1F!Tb"'%
fB&)[,2rbU(-[#JDA!*!$#UKa,bS!#R!'FJ4K'Q!f,bS!!UNLF!jb!#m+B3SNAbm
U!!+T)f!H)$-!!%U!Ca$A`%UXrr*R"LmXrr+SFdl6)&rI`8l35LcrlfF+)Qcrk$m
T!"LTYkKc60mI!$!S!!B)!!!*CJK#3#mi#2a1G8*!6R8!"3!!"*`!N!i%k!!!"2J
!!!2Z!*!(D!!!%4J!!"'!!*!'%B!!N!B4J!#3"K'!!*!'%B!!N!B4J!#3"l)!N!T
19[m!5Qi!#'B!!!a`!"e!!!TJ!!$1(A`!!3!+-#i!#'!!!%CJ!!#mB!!!FMem!!8
!#'!!!'JpI!!"!!KJ!!"H2A`!!J!)B!!!9$em!!-!#'!!!%SpI!!%!!KJ!!"!2A`
!"J!)B!!!0Ja!!)"R!2qf$%!!"@F!rlB-32rPC`$rZ!a!rj4R!2qk$%$[qfF!rl`
-31rmC`$r[Q!!rm4)E[m!3QFr2!!"B3!2I$mZ!!KK!!`5,b`!"%KZr`""qJ!`,`K
"qJ!X,`LTLd*R3QFr2!!#B3!28Lmm!*!%UBB`(fF!!!*1AL"Ih[`!!Nl3!!d!$8j
@rrB[,J!12bi!$%KZrrB[,J!)5'lrq+Q06PiJAplm!!T1d%j@rr`[,J!12bi!$%K
ZrraK!2r+,blrr#mZ!!LTMdjH)&rHr!!+6Y"19[rL,bi!#%KZrq*K!!0F,bi!$Mm
Z!!a)E[rLB3$rZNjH)&rHr!!+6Y"19J!!,b`!!$mm!!3[,J!)B3$ra%jH)&rHr!!
%6Y"19J!!,bi!#%(k!%)[#%(k!$i[#%(k!$S[#+Q,3UG#Ccmm!!&K!!jk,c`!N!3
[22q3"+Pm)"mT3!!!,b`!!+Q"6PiJAplm!!41d!!0!!d!$5mX!!#TJdje2c`!"bm
m!!%!!#mm!*!%,c`!N!4K!!,m2c`!"8(k!$JJ#&5!,`![2!#3!``[2!#3!`&K!!,
H2c`!"8(k!#SJ#&5!,`![2!#3!b%[2!#3!`&K!!,!6R81)'PZDA4YBA4bDAJ0#L!
")b"cG'&dGA0ND@0d)#phB@PdG'PYC@peG#!f-$!JF(9d$3SJ2c`!"bmm!!8!!#m
m!*!%,c`!N!4K!!*`6R919[[dB3$r8N)R3QGK!!f!B3$pD"!ICJ!!TNKZqri[,!!
%2c`!!$mX!!KK!!0Q2bllrNKZqr4K!!2Z,b`!"'%!rVjJ!!!@2bllrNKZqraK!!J
S5Qllr'B!!&S[,[[dB3$qJ#em!!!%!2[i2bllrNKZr!")E[[iB3!&1$mm!!9)E[`
!,bllq#mm!*!$!@%!!GiJ,[[iNDllp%)R3QGK!!c`B3$mf"!IC`!!"Q!!!!CJ!2q
@B3$qR$mZqrjK!!*QB3$r*%jH6R919[rk3UG#Ccmm!!0K!!c+,c`!N!3[22q3"+P
m)"mY32rm,c`!N!4)E[rkUC%[,[rmUB01ANje6PErrMmX!!S`,J!+X&p@`%3!C`!
!"Q!!!)3`,J!)B!!!C'%!rk*J!!"dB3!"('!!!'aK!!ZS)(`!!!P(%""%!!*!!2m
-3!!$9X"%!'F!!"C#*cmm!!9K!2`L%"pR!!!#B!!!1NKX!!4)E!!)5'lrrQ%!#FK
+E[rqC`!!"Q%!rS*J!!!D$%!!!fF!rjJ-3!!%C`$rQ!a!!!&R!2qB6PiJAplm!!4
1d$mm!!+Tb%je3IS!5#!)+8!!"%*R2c`!!@%!#pi`(cP!!!T#*f%!$$!3(fF!!!S
r,!!+B3!-Q%+R2b`!#UQr)"mT3!!-,b`!$$mm!!#T0DNh6R8!G$mX!!UT0LmX!!b
T-UNh6R9#*f%!#qi3(fF!!!Sr,!!+B3!-9Nje6PB!!#m+2c`!!#!Z!!`JEJ!)UHi
Y3!!-,8J!##4I6PiJAplm!!K1d%+RB3!!%L!I")!!N!-4)%!3[!!"6R919J!!,``
YA`!)6Pj1G8j@rri[,J!),bi!%#eI!!JYA`!33QFr22rp2bi!&%KZ!!KK!!!5-"m
p32rq6PiJAplm!!j1d%j@rl!r,J!13HlrX0$m!"J`RcmZ!!a"l[q`d2`!'M#I5Ui
!#'F!!"T)E[q`"TF!N!-F)'i!##*IF!-Lf&()rra#CdKZrl!I2!!!B3!!%M!I28!
!%%jH)&rHr!!)6Y"19J!!6PiLAa!I)&pQ"+!%B!+N"$k!6Y&1AL"Ih[`!"Nl36PB
!!%*R2bi!#'%!!")`(cP!!""1AL"Ih[`!!Nl36PErX$mZ!!K"l[q`d2`!'$#I3QG
)E[q`(c`!!'%!!")`(ce!!!T1AL"Ih[`!!Nl36PB!!%jH)Pm3(b"ICJ5J!@!#T!%
qJ%l46PiJAplm!!C1d%j@!!![,J!-3H`!%Y$m!")JRcmZ!!K"l!!5d2`!&M#I-#i
!#Km!3H`!%Y$m!"X3Rd(X!",3r!!D3K""l!!5d2`!(%+3!%*R5'`!%Kmm!!"K!!!
L-"mj3!!33H`!%Y$m!"Jr%#"Z!"!`RdjH)&rHr!!-6Y"19J!!6PiLAa!I)&pQ"+!
!B!+N!$k!6Y&1AL"Ih[`!"Nl36PErr$mZ!!a)E[rmB3!!0MmZ!!`[2!#3"$mm!!*
K!!$'2bi!$#mZ!!KK!!!B2bi!$#mZrraK!!%d6PiJAplm!!C1d%j@!!!-EJ#3!`a
G`%3!C`!!%MPmrmd!%#"Z!!K#N!"J!!!@3QFr,J!-,bi!#'%!!")`(cP!!""1AL"
Ih[`!"Nl36PErX$mZ!!a"l[q`d2`!'$#I3QG)E[q`(c`!!'%!!#)`(ce!!!j"l[q
`d2`!,Lm3)'i!###I6PiJAplm!!C1d%j@!!"1AL*I%"mJAfB%S"KJ!U3B2S"1d8j
H)&rHr!!'6Y"19J!!$'i!N!-1AF"%!'F!!!`jI2r0!""J!!"!2bi!$N(X!",3r!!
B-*mr,J!)3H`!%Y$m!#``RbmZ!!T"l!!5d2`!,L#I3QG)E!!5(c`!!'%!!")`(cP
!!""1AL"Ih[`!#%l36PB!!%jH)Pm3(b"ICJ5J4'!#T%3qJ%l46PiJAplm!!C1d%j
@!!!r,J!-,bi!#$mm!!&K!2pS6PiJAplm!!C1d%j@rra#E!!3$'lrr`!39m"%!'F
!!'SJEJ!)5T!!C`!!A'!!!$!J,J!-8S!Y3!!-)'i!##!38i![!#"Z!!JJRb"Z!!J
J%!b!!*!%9m"%!'B!!#T)E[rq5'lrr'%!!%4)E[rq5'lrr'%!!-J`,[rq(`!JEJ!
-%*pJ!2qXB!!!'N*R2bi!%#mZ!!J[,J!-B3!"TM!I18!!%%jH)&rHr!!+6Y"19[r
`B!!!&N)R2c`!+%KZrr"K!!"+%"pQ!!!'B!$rkN(Zrr!J#&L!)%!`%%M!JI`!J%*
!5%!r!#"Z!!``Rd(Zrr!J#!D!!*!$$L"!2a!JEJ!)-*p1AL"Ih[`!#%l36PB!!#m
+-#i!$#"Z!!LJ-6e!!!`Y5!!)*&m`,J!-5J"A`%3!(8!!$NjH)&rHr!!'6Y"19[r
q)'i!$$!3!N!!rce!rri-EJ!$rrjA`%3!C`!!$$em!(rrrQ!!!-)JEJ!)-"!#3!%
!C`!!Y$!ZrrjJ!!#!2A`!'rrqB!!!SMem!"crrQ!!!*JpI!!GrrjJ!!#12A`!([r
qB!!!K$em!"rrrQ!!!(S-EJ"lrrjG`%3!(`!-EJ"JrrjH`%3!`"pR!!!-"'i!B2r
qB!!!*!aZ!&[rrPh!4!!I!!aZ!%$rrPl!4!$!(fF!!!J%EJ"!rrjJ!!!Z$%!!,'F
!rh`-3!!ZC`$rIJa!!#pR!2q!$%!!1fF!ri)-3!!kC`$rK'!!riS`,[rq!N!!Icm
!)'i!$$#I6PiJAplm!!K1d%j@rl!r,J!33HlrX0$m!"J`RbmZ!!K"l[q`d2`!)##
I)'i!$#m33HlrX0$m!#3JRd(Zrl$3r!!X3P""l[q`d2`!,N+3!%*R5'lrX"mm!!"
K!!!L-"mp3!!53HlrX0$m!#J[%#"Z!!`JRdjH)&rHr!!+6Y"19J!!6PiLAa!I)&p
Q"+!#B!+N!Mk!6Y&1AL"Ih[`!"Nl36PErjN*X!"!-E[rr!!aA`%3!C`!!,%)R2c`
!+%KZrr#TF4!I!N!!r`a!!!"A`%3!!N!!rcm!)'i!#$#IB!!!R!aZrrJ!$&I!4!!
I!!aZrrS!$&I!4!#!(fF!!%C#CcmZ!!`r2!!#,c`!N!4K!!"f-"mj3!!33H`!%L!
)"S!!N!-F)%!J%!b!!*!%9m"%!!*!!2mr!#"Z!!J`Rf!!!$`r,J!-5'lrl'%!qdK
#CcmZ!!a)E[rSB3!!UM!I18!!%#mZrqJJ,[rXX*pA`%3!!N!!rcm!)'i!#$#I6Pi
JAplm!!C1d%j@rl!r,J!13HlrX0$m!"J`RcmZ!!a"l[q`d2`!'M#I3QG)E[q`(c`
!!'%!!$!`(ce!!""+VJ!)C`!!'#mZ!!K"l[q`d2`!(#*IF!-Lf&()rra1AL"Ih[`
!#%l36PB!!%jH)Pm3(b"ICJ5J"@!#T!8qJ%l46PiJAplm!!C1d%j@rl!r,J!-3Hl
rX0$m!"J`Rd*R5'lrX"mm!!"K!!!L-"mp3!!13HlrX0$m!"`[%#"Z!!JJRdjH)&r
Hr!!'6Y"19J!!6PiLAa!I)&pQ"+!4B!+N%6k!6Y&1AL"Ih[`!"Nl36PErpN+R3IS
!m#!)9)!J3#m32bi!#UQJ)"mY32rm$'i!!3!)AF"%!"m!)'lrr#"32a!`,J!)X&p
H`%3!J4FJ,[rm5S"A`%3!J"pR!!!-)'i!$%)3B!!!Q#"Zrr`J%&5!,8$rq&0Z!!J
`,J!)C`!!0N*ZrrCJ!!!B2bi!#&*ZrrB`,[rfX&pA`%3!CJ!!'#"ZrrJ3%!*!!2p
53%M!dDlrq'!!rpBJE[ri%"!#3!$r28$rpM!ZrrBI!#"Z!!`3RdTZrrCR!!!UB!!
!$P0ZrrB`,[rfC`!!'L"ZrrM3l[rf(a!JEJ!-d1lrpK#IB!$rhNjH)&rHr!!)6Y!
&)&088L019J!!2c`!C$mm!%B[,J!33IS!+#!)9)![!$mm!!%[,J!-,bi!##mm!*!
%B3!!%NjH)&rHr!!-6Y!&)&4&@&419J!!2bi!)$mZ!"j"qJ"D,`J[2!#3"$mZ!"3
[,J!@,bi!#%KX!'Jr2!!#UHT)E!"S"TF!N!-+)'i!'L#I3H`!D"!3!N!!rcm!)'i
!$$#I3H`!D&b)2a!JEJ!3-*p1AL"Ih[`!'Nl3!5!JE`!-)&"`!m!S!%4br--i#8D
"1!P')M`!$!!!B"BL2!!%J!4J$L)m!!J!#'!')M`!"!!-F!2!1!P'B&iL2!!!J!"
`"Q"8)M`!$)!!F!GJ5L)m!!5!!'!f)M`!")!%B#iL2!!%J!KJ*L)m!!3!$'!H)M`
!"!!3B"BL2!!)J"4J$L)m!!5!''!')M`!#)!FF!4J##)m!"5!!(!&3IS!8%M3'"!
S!5CI@Bm[2&"%48Br!+QJ)"pR+LK!#03!"b"8F!!3"0(!,`K#&b"I6T!!5N4U"!L
8!!FL5d(k!"4-d"J36Y%ar2p!#84)40l%B1J!N!a`'%*R8FMrr%(k!"3[5!!5)%q
J!0lm!$)a`!P%6R8',P"bD@jd)*lm!$)J6c&mrrd!'+!"B0iJAb*I)"mL(c3I,`L
Hr!!b2d)!'Lp"!"`[3!!J,dN!*$pmrrd!'#"2S!4JXQ'FCMCb!'!#FJ&C6bmm8e4
5)$mmi!#TS#!ICb`L3&92#0%!"bm4UCF`(`L4!!GK$%T"C`Br!+QDB3*1G6(i#Q!
*4'F#@%p1G6(mrd!*4%je2hJ*4!!%6R8JAc(I#841d%j@!!"#Cf%!!"B`(i"Z!!J
p3!!+6PiJAplm!!*1d%j@!!"#*f%!!$J3(fB!!""`!$e!!!KJ!!!NB!!!)%*RB3!
!9$!I4%"631Y)!N!(r`"!`!!p3!!)B!!!!NjH6R919J!!3UGK!!!J)"m%J!#3!`S
J3!a3rrpA`%3!(8!!#'!!!!*1ANje6PB!!#m-,9m!#%jH6R919J!!3UGK!!!@)&r
3r!!B-"!p3!!)B!!!!NjH6R919J!!3UGK!2r-)"m'J2q3!qJJ3#!3,8!!#'!!!!*
1ANje6PB!!$mZ!!K#Tf%!rp)JAp$m!#B`RdjH)&rHr!!#6Y!!!!%!N!-Ck`!!'1X
!N!2'!!$-*!(B!*!$(!#k!!9%6%p(!!%!-N4*9%`!!J"+38a59!#3!fj69&)M!*!
$HNe&6P8!N!1'4&*@8J#3!j,#iIrr!*!&!69Q`Z2rr`#3!b-!!69U`Z(rr`#3!dB
!N!6#i[rr!*!$pJ#3"-,Mrrm!!!%F!!%djX,Lrrm!!!*f!*!%`Z(rr`!!!SB!N!6
#iIrr!!!%8J#3"4F!!#!!",m!N!3,!&"6)&"bD@jdCA)SS!:
---