macintosh@felix.UUCP (03/14/87)
[LaserKey DA]
Follows is a DA I wrote to help eliminate some of the abuses of our
public access LaserWriter, which included editing of documents and
printing of multiple copies. Our solution was to remove the keyboard
from the machine, but we then needed a way to allow users to selectivly
print a range of pages. This DA allows that, while preventing printing
of multiple copies. (We check out special disks w/ LW drivers to those
who wish to print, so everyone who prints has access to this DA.)
Copy it as you like, let me know if there are any bug/improvments, or
enhancments to MacWrite along the same lines of thinking as this DA.
Documentation is included.
-Tom Dowdy
CML5A9@IRISHMVS.BITNET
"They say there is strangeness to danger us,
In our theaters and bookstore shelves.
Those who know what's best for us,
Must rise and save us from ourselves."
---
(This file must be converted with BinHex 4.0)
:#%a,CANZF'Pd!&"*9#"3593J!*!%'TX!N!58le"0B@F%6%YPH94[F!"!$pB!3!a
H!%!,YJ#3"e!!N!-N!#!!3$2d!*!'S#-!!1[f!!$,a!"!,()!)!!h!!"%4NP-4%e
29J%!N!N+XC[[F%HF6Qe-Vfm!!!%!N!-+2`!!#6m!N!0bE`i["R!%,`"1V3)k,"p
J$#m'F!)[!%kY!MSX(cmm!!%%6%YPH8-#!*!$4%C*6%406eB"!*!&""F!!!PQ!*!
%4%C*6%406eB"!*!&""FPK`#3$T[[F%F!N!B+X6mZrYa1V39+-#hcpNM!,!"#Ca!
X!!&)J$m!2c`!#%kY"#T+Afm1,`C`"#m!6Ud#1L`IB!`["R!#,`"1V3)k,"mr2!!
"2c`!"#!'2`"1Z[BLB"C#Ccmm!"T)HJ%@2c`!!dkY"()pArDk$#d!![2iCJ$hmMe
mrrrfZ%*(B"3`"q9!3Hi!N!-9!$)!5J%b!B`!!3%!N!I"J!#3!`F-*!!!33"!!*!
$)J"-!'`!S!$)$bj0BA*TEb""EQ4bCA4dD5m03QF[##m*6VS%XL0!!"3[!%kk"(C
1ZJ5!@%p1ZJ#`-"p1ZJ55@%p1G5m03QF[##m*,bN!&%kk"'"B6dkk!0!`(dkk"(*
B6dje51F!`#m03QF[##m*,bN!&%kk"$aB6dkk!03`(dkk"%jB6dcI!`!-D!!"!"T
R"#mi#2a1G5m*,`e#Cbm),`N[+3!86VS%#PK26VS!MM!I6VS%(&K2)Pm[1!Mm6R8
[$8*R,`J[#5mT!"41ZJ2N@%p1ZJ$8-"m[$8kk"!TB6dkk!qjB6dje6PErr#m+)#i
!$#4Z!!K+UJ!HC`*J'&Q26VS!b#!I5'lrr+Kd3US!(LmZrrbSFd*!28!!%#4ZrrK
1AL"I8)p1d#![!!JJ,`!%3N!r3!!-)&p3Mdl3)#m!##![!!4#3$p!!!`JAe#26Y!
JE`!))Lm!"$!S!"S-3!"!E5"Z!Q!)$%!!3@B@B!a"k!!F,a"1ZJ!BB!B[!8kk!"j
BMd*!2d!!$#"I8)p1d#"[!!3`%&e!C`!!!Nje6PErm#!Z!!K1ANje)#m!##"[!!3
J+!!HC`K#U!!H,`#T&%*!2d!!$#"I8)p1d%j@rea)jaJ!5'hrLLmm4%a24dkk"#3
S!%KZrfC)E[qX5'lrpLm%6VS%-N*ZrrK)EIq85'hrR%kk"*4)EIq@5'hrcNkk")K
CMcmZrrC#Tbmmrj!%UA`J(bB!,`-r2!!%5'lrqNKZrra)E[pHUBe)EIr1,blrr%k
k!i)[!cmm!"")E[rk5'lrr%KZrekTM8KYrj`[,[rm6VS$BLm$UB&2l`!i$'i!!Ir
iC`!"8!aZ!!,rq'F!!8C#TdKZrrLTN3aZ!!Arq'eD$'i!$[riEP*)EIr16VS%*&+
!3HhrcN)`!!")EIr16VS%%M)!3HhrcK!ZrrN'!!!`@`!4J"!!,`-r2!!%5'lrqNK
Zrra)E[pHUBe)EIr1,blrr%kk!Z"2l`!3$'i!$rriCM")EIqB5'hrcNkk!jS[!cm
m!!4)E[rk5'lrr%KZrekTM8KYrmi[,[rm6VS#U%r[!"!-EJ!4rrKYA!aZ!"Vrq'j
85'hrR%kk!iT5J%(Yrja#-!!!5'hrR%kk!hJb!%(Yrj`3,[rj"J!!-!3!!"%4J"!
!,`-r2!!35'lrqNKZrra)E[pHUBe)EIqF,blrr%kk!N42l`!3$'i!'rriCJ$qhNK
YrjT)EIqF6VS#r#m$2c`!%%KZrrT)E[rm5'lrAUQ05'hrR#mZrra1ZJ)+6qm!%'!
!rUS-EJ!"rrKQ"%kk!"3[!kQ$,`5TSdcZ!"Mr9%jH6R919[rm51F`!(4A5'lrr#m
#5(J!!dkk!IJJE[rm-A`"!!!8G!N[!NKi!!01ZJ(83N02l`!8B"``!d(Yrmi8-!!
!5)*)`Lm#5(J!!dkk!E43Me*$0!0)`NKYrmj1ZJ+%8i#dJ&L2E`$rd(3*,`*)H!!
$6VS"MN*$8)pJ($!$3HhrR"3`!!")JNM#,`*)H!!$6VS"FN-d!dM#5'hrR%k
k!N"6J,5!@)p[!2r361i!$2rd6Pj1G8kk!&S'J!#3!b"1G5m0+Qm!#%kk!&!UAdj
e,`dJ$3J!N!0Q$#"[!!K`"b$G8FMrr#T[!!JJ(dje+Qm!"%je6VVr`+%H,`K1ZJ!
8d*p1G8kk!!`JE`!%NF#J(dje3IS"pL!36R9)jrr`3NG"qJ(S)KK[!!#Q+KKQ"#S
0QS%Q454,iS&J!N*D8FRrr$!B2KKJ!!#%H!!B'#)%!J%!$`J%!!4R$Z&"%KJ)J3!
,C`6KJ4)BG!%)"!!(CaB8'!L#!!GR$Z&#&"J)JJ!1C`6KJK3BI!*1ZJ"-#)8!$fF
%iB8D'%2c@!!N53J%!!9R(#`"6VS!-!a"!!*R"Qd)fj*J$YY5B!VE%Q!'%YK4bIr
m#!3!"QF%*JhANP()rha-h`rr6R9k!'!%iBdD'&(1rrT1G5m#,bm!##m[!""1ZJ"
fUBm[,`!-6VS!RPK2*"p1G6"[!!BJ,`!)S#p)`%je-'m!"L![!!JLE`!-S5mLL%j
e,`*#Tbm[!!`[,`!86VS!0UQK,bm!%%kk!&jB6b!I*"p1G5m#,bm!##m[!"![,`!
B,bm!)+QS,bm!&%kk!$TB6b3I6R8J,`!%CbBJ3#*)%"PR(K)4%X!3!@EiNmJJ#90
!$)!!N!2rE`BJ2!#3!rm3J#![!!41G5![!!4R%L"!F!!3%'!%%1J!!9()rrT#%#!
[!!41G8j@!!")j`!J)'i!##*Z!!`N5"$CC`*JqL!+61i%!2rm6Pj1GG088N03@5!
J6PB!!#"Z!!JL5&+*5KKR!Q$kNFP#!#))i+%J35!)6Pj1GG088Na&6L!J!*!$GJ#
3"3%!!!J!!&"TBfY3B@GP!*!$!K)!(!#3"EJ!#!$-!%3%"9"bD@jd!*!'d!!)!13
!4!3'3f&ZBf9X!*!&#!!i!"J"1!JK6'&cCA*,CANJ,5#T)$%j1$FJ9'pY)%4[Gf4
j,#"14%0$3!#3"6!!5!"!!)J3!6#J!*!&N!!!B!#J!(J%!6"B!*!&5!")!&J!A!3
"-9J!N!9)!'!!@!"d"!%b@!#3"8J!H!"B!)`%!60`!*!&B!")!(!!A!3"0(!!N!9
J!'!!F!"d"!%eF!#3"@!!H!"`!)`%!6D)!*!&H!")!)J!A!3"0iJ!N!9i!'!!L!"
d"!%iL!#3"AJ!H!#)!)`%!6Qm!*!&U!"3!,`!M!3&3faPBA*%!*!&-!$3!%!"%"!
$-6!`S!#3"C!!!1J!S!%!"!%`@!#3"8J!d!"B!13%!6&B!*!&5!$S!&J!r!3"-PJ
!N!9)!3!!@!%8"!%cF!#3"@!!d!"`!13%!64`!*!&B!$S!(!!r!3"0A!!N!9J!3!
!F!%8"!%fL!#3"AJ!d!#)!13%!6H)!*!&H!$S!)J!r!3"1)J!N!9i!3!!L!%8"!%
j[!#3"DJ!f!#m!43%"80XC@&b!*!''!!)!#J!B!J+4R*[E5"3B@GP1J#3"4J!S!!
S!4J)#&4[)&"KCf8k!!!"!*!$#Mm!!!Nr!*!$FJ!!c#3"f!#3!a`!@J!#4%P86!#
3!aT%6%p(!*!$*N459P)!N!-b`B!!N!3(+3!"0rc"J!!*!*!&!6eX!!`!%L!!!"N
!N!3)8'PMDe"KCf8)8'PMDe"KCf8&!%a,CAP-ie"0B@F)6%YPH5"%Ef0!$pB!3!a
H!%!,YJ#3"e!!N!-N!#!!3$2d!*!'S#-!!1[f!!$,a!"!,()!)!!h!!"A6e*%68&
$33%!N!8-4!!!!YUF6Qi9R%jaVq@2!!B!)3!%!!3!N!2rr`#3"!%!!!`d!"!!%!#
3$`)!N!0)!%J!N!3#f!)Srq$riJ,i!NB$"`8S!r`!!J#3!dJ!5!#3"!,B!LJ!!3#
3!f3!N!-"!!'3!`#3!`%R$`!"!!%!N!d#!"N"N!!!N#%$!*!$!`#3#!N5!%!!!!N
%!!lrmJ!Hrr)!l2rb!EVrN!3!!2q3"!!$!*!$!`#3#!PJ!%!!!!P5!!lrmJ!Hrr)
!l2rb!EVrN!3!!2q3"!!"!*!$!3!!rRd!$!!!#L3#%!!!#D!!K2rb!"lrmJ$Xrr)
"Z[q3"3!-!!!8)@`!"!!%!!S"i!!"!*!$#J&S"S#dE!!-E!BaJ#!#B2!d!%kY"2S
fJ!!"$4!!"J!!$!!!!`!"$3B!"J!!$!!!!`#3!`B!!!`!!!-!#J(J!!%!N!-+!@J
'J%+i#RJ)U`!#!!KJ!!"3)QS!"L(*!!%0!!!'!!!-!!!$!!%0"J!'!!!-!!!$!*!
$"J!!$!!!!`!+!H!!!3#3!`S"D!D!E!$r'M!X!"!l32h%5N0U"MP!!"S!!3eS!!B
!!!`!!"3!!3d+!!B!!!`!!"3!!3d!!!B!!!`!!"3!$8aKFf9b5f9j)$%Z-!d!!!B
!!!`"!"3!!3eX!!B!!!`"!"3!-I33NBpV"X`BK8pj!P$&-N@Jp-D"6eG()8$NFbF
rCr$3!!B!!!`!!"3!%DNJ-6Ni0b"8EfdJ4'phC(N0)!!'!!!-!!!8!"cdj533p%E
fd3p$Afh[G5FrC`p$%b&2$3!!"J!!$!!!&!(Qp8Yi#4MfX'c"L&6hN!$'pY%&pe)
&d#X3-4N#8-8b4D"X`BJ#8&pe31pepLTm$daS&29dFK6bi!pA%2Gf-KN#8%(feIG
K!V%2DapjpL9NN!$8Afd#X3p0E!a6-F)C!P!V%26'J8pA4b&2,!pLpe)2Gf-KN!$
KAU%#82BK"[BU%#8)'K`J+a$QpR%%BrCaJ#814c,bi!pA%'U&$hGM)C!!*3j"pf%
b$KAU%04IE3bf2fGcpR!V%23ejaJ04IE3ma!P#&pY%&+a3$pepYpL&2,J$eF3phA
h@T!!Y[GK$h@"N!"Jp%p"!VBJDUAhFC!!pYAh@"$f*S'3!"-Npj!!A3pV(hRf*@5
3!"pf%bMb`2B[G5!VH!phAh@T"UK3DUAhF#X3p$AR'!jNEfd5&!*3pL%-YMpR'I,
J$daS&25apj!!P4Jr*b"UTIG`+hMbi!m0!"i!!!`!!"3"'!`#!"3"(J`!!"3"TJ`
#!"3"V!`!!"3!N!-'!!!-!!!8!!%0"J!'!!!-!!!8!!%0D!!'!!!-!!!8![Ve5a$
daS&25apj$d6d%(J2BNAhAfHb$hAJe&pY$hGbYc$deXpA4b%2+&3'2hN&+a3'lUI
'*e2bN!$f,hN#X3i8K6$hGiYcpR!P$NFbmX$hHe!V%`peJB!V%2DapjjTJ&-#X3M
%%6!P!6)8!V&d$QpR%%BrCaMbi!pAX6#a$+I2DimX$e"(-Jp-D"6dXIH3!-TB'!F
S'YmX"MN#X6$PJS"J2hAfhf)8"G$fXIHIBPC*!IGK-SmZ!24R5#mX"b$PJS"Jp$A
fhfeMRbheIb`2GlI,$fhh@#$feZ!P!V%28%Fb$&pYpYBj"c!V%'lUI'*e2bi!pA%
,EhB3pY@AeaN&pe326@ceG()B!VBJC"$h@"N2Gh+`+a$daS&29dFK3)8#YL$d0IE
IE@1I,I9`FrGPpV'!p34c,bi!p-D"6dXIH3+a-1@#J'$b)QpLmL$fXIHI,!eDTIG
aN!$f,hN#X3mLp'4IEI)J2hAfhf)8mX!V%`Be+a32)LEf,b)2DapjmX"MN!!V%2)
[9&mL!rGIEIBK6bi!p8X3peJ8"L!VH!jA-JJRUJYS!V%&iR8`A3bf2fGcpR"Mpj!
!8V&!eaUB"c!V%28%Fb$d4fTIC`05""papeG(2fF'$fXIHIBPC*mZ!2+28rGFX'J
26@2h9Um[p$pe)28l%5$4'3JD(#G6mT!!$d1RcfYcpR$drdX14c+!+a#9chAfd6,
bl`d!+J!!$!!!&!$$$!)!&!$)$!!!&!&"$!)!&!&'$!!!&!(!$!)!&!('$!!!&!!
8!!%0"J!'!!!-!!!8!)heF3Y[GK"cJQUKN!#1((DUpj!!pY@AeaN'lUI'*e1!Bj!
!p-D"6dXIH38b8'UJA3Ah9!EZTmBR8i#AMfZ!+f)'33peJC!!*3j(-J8`+a$daS&
29dFK6bl`d!!!"J!!$!!!&!!"$3B!"J!!$!!!&!!"$C!!!!B!!!`!!"3!YI6'J8p
,(hN2E@pj$f)3Pi*(pLpe)C!!e"'[H3j&pfH4N!!VBJFJH!05#&UI,!Bj!e+h2fF
(J-YNpR'3!09!FS#AJNIf,h8R8r,J$ePIG3pYpeJJFmVh@4!VH!PFpepY%b$hHa-
2H9pe$fGrGK"[Gfpj"JaHpj!!A3p-D"6dXIHI,[$3!!!'!!!-!!!8!!%0"J!'!!!
-!!!8!&AdR3pjAh8,EhB3aIEIE4-S"8#2GICrCaJR8imX"8$A13B2B[GIC`A3KIE
4$fYcRb`1S@J3S5$fd3pV0IGr1[$3!!B!!!`!!"3!!3d'!!B!!!`!!"3!#P4[E5"
%EhGNH3d!"J!!$!!!&!!4p$Afh[G5FrC`p$%b&2$3!!!'!!!-!!!8!"91Eh4bC5"
%B@eP,#"*6L!d0M8e0JdN!!B!!!`!!"3!$bJb-6NT)$)c15de0M!`$3!!"J!!$!!
!&!!"$3B!"J!!$!!!&!!A3de-08%j3%P5590)69C6,N**9%j&9!d!!!B!!!`!!"3
!!3d'!!B!!!`!!"3!,I)[9,(hN!#'pj!!+a33H!JNBrCa-BJ#8*BrCa32GBmXm0!
!"J!!$!!!&!!T!256"IG8!V&L&)"MN!$f*9pVJP33LaVhBBmZm0!!"J!!$!!!&!!
P!29,@"$hHe$fXeph$hHf,bH!pL'#$932GBmXm0!!!!B!!!`!!"3!+3$dhh@#"(J
3Bj!!K[GK$h@!e&pY"IG8JDpf'2,[)[$3!!!'!!!-!!!8!*!$!4!3!!%3%!!"%"!
!N!8"8r3J!!%`!#)!N!-3!*!$!93%)!!"8J!-1`%!%!!3!!&88#!!!9i!$$X"!"!
!)!!"9(!J!!&U!!Sl!3#3!`%3%!!"%"!!!4!3!*!&!94-)!!"G!!L!*!$%!#3!`&
8,#!!!CB!$$X"!"!!%!!"9!JJ!!'L!!`l!3!3!#!!!95-)!!"VJ!+1`%!N!-"$!`
!!3`-!!%-$!!"$!`!!3`-!!%-$!!"$!`!!3`-!!)-KJ!"$!`!!Jb*!!%-$!!#$))
!!3`-!!%-$!!#$))!!3`-!!%-$!!"$!`!!3`-!!%-$!!"$!`!!3`-!!%-$!!"$!`
!!3`-!!%-$!!"$!`!!3`-!!%-$!!"$!`!!3`-!*!&-!!"9(`J!!'i!#)!N!--!$!
!!Gp')!!"jJ!-#`%!$!!m!!(I2L!!!I)!$!X"!!`!5!!"hbjK!!(q!"J,!J!-!&3
!!-Y%)!!#&J!-#`)!$!"J!!$,S'N!!L)!+JX"!!`!E!!"hajK!!*-!"`,!3!-!(J
!!94%D3!#D!!L#`%!$!#%!!&8H#!!!GS!$!X"!%J!N!!!!9@F+!!#LJ&N#`!!$!$
B!!$,U#!!"!3!$!X"!'`!j!!!blJS!!33!Mi,!!!-!9!!!-ZB)!!'8!!-#`%!'!&
F!!$,V#J!"P`!B!X"!!`"G!!!bi`J!!Dm!!`,!3!-!B!!!-Z))!!'b!!-#`%!'!'
-!!$,I#J!"Y3!LJX"!!`"T!!!bf`J!!GH!!`,!3!-!E!!!-Yi+!!(DJ"+#`%!$!'
m!!$,G#!!"l3!$!X"!!`"b!!!be3J!!I!!"3,!3!-!G3!!-YS+!!(e!!D#`%!$!(
J!!$,8#!!"qi!)!X"!!`"l!!!bdJJ!!J1!"S,!3!-!IJ!!94!)!!)+!!-#`%!$!)
%!!$,3#!!#$3!)JX"!!`#%!!!bc`J!!K@!!`,!3!-!K`!!Gp++!!)BJ!U#`%!$!)
S!!(I3LJ!#)`!*JX"!!`#0!!"hcSS!!Lb!#J,!3!-!N!!!Gmb+!!)fJ!U#`%!$!*
-!!(I+L!!!rJ!$!X"!!`#@!!"hb)J!!2Z!!S,!3!!"Ni!N!-#!!!-4!![P#J!!!%
!N!-#L!!!!BJ!N!05B5BJ8b"S!"`J8%(S!!)b-!!%NR!!!1**dR!!!,C"E33)6%Y
PH5"%Ef0[!J#3!eG28N40380"!*!-9dp54%e"3d%!N"LF6Qi9!*!'!YS!(#"35HJ
!!YCX!!*)3pC8)&0"k!!)B3$q)QF#5%1@F!!!PN)b-!!%NR!!!**#NN+53M3")&-
b+!!@NQJ!&-,$JX*K)0*S!"3[#cm"U@01G9P2U0JJ8b&I!"a1G5"S!"bJ)dje2`!
`!Z*)5%'b3'm)5%&536!I6R9)3@$i+%-Q&%A8!*!$)#iX1b3!!0!!!#rrB#""63!
J8%d!1J#3#J%!!!&-"P0eEQ4KH3#3#3C0EfjNBAN!N!N(9(9PFf4KH3#3#!PAC@4
ZCA0NBAN!N!B)9'KeFR0NBAN!N!F'4R*TC'&j!*!*#&0KG(9bC'&j!*!("dTKER9
KFRN!N!J)4Q9LFR9KFRN!N!F&6@&bBfJ!N!S&3A"bD@`!N!S$6@&j!*!-"%TeEQ8
!N!X%5R9XH3#3#`C"G@GeFh3!N!N*8f9`G'9YBQ9b!*!'"dpMG'pLCA)!N!J)6Qp
fC@eLCA)!N!F)4'9MC@eLCA)!N!Irr`!$!*!%,#!!!#!!N!-X)!#3"`&1G3#3!a!
2)'9dER*[B@PcC'aSBfC`!!!"!*!$!SJ!!!')!*!$8J!"9(!$VJ#3!a`!8J!"58j
86!!"!"*69&)J!*!$+J!!rrmJ!*!%!94-!!(rrb!!!#3!!93m!Vcrr`!!!A3!!93
deD934@jN(3)!!!:
---