[comp.sys.ibm.pc] Here is an lpr-like

tr@thumper.UUCP (05/07/87)

Keithe at Tektronix complained that the MKS tools don't come with an
lpr-like program.  Here is such a one.  I use it a lot.  It is
shareware; you are asked to send $10 or whatever it is worth, even
if that is $0.  Please note that it uses tab stops of 4 so you have to
reset that on the command line.

begin 644 lp.arc
M&@A,4"Y%6$4 )"0D)"0D-AD  +H*%ZA8U0 D   ,3;0 $" !0   ( 8&^/</
MA   $   \%,0(0!(!_X4A/3OXC=<]OZA0R(!E\1$1OR9!(!2'ZZ#*/&M'"5$
MP2@@"A890=#C()T!Z18 0%>KP$HHZ,)-R#)HYS^=" H!JP-4FH"F"@3H5#!I
MT8%)B@Y@ZM$"P,]T_ !L[7H R")L@'X H)ING5HC7+VBM-?47@"=]M[&G0O4
MV5U[8,4B)6 A"Q3 D[ @.@ Y+*9T>@"\!#!* 8!TI#1+[/QYD^:#HQA\EB2:
ML^ITB4YS=O 9D.R6E16C\R$@2[HUMXW@RXT):8K>Z:P,+54@'93#B8OC @, 
MZ3H#@X@1V(RTGP3?,X;^B"!4[CX 8P#\ D &@#D : !$ ]!&/@ W %H!@ ,@
M]!P MI@%P#4 V $ ,@#<,:!! :03PC_I]!( .@D(D,XB 0SBASZ$I=,# *$8
M(!\X4(3RT!8[#-,'4!: ^%!/ *P8%(@BPL@'4!'AHB!29QB0!7?H[/'=2BUI
MB$^'/@"@H3\='@# /W;X@XX5!_RH276X1(34* AD1P!*_DAU5HM98LE)=>AP
M@)UV0+HPI"[5K>454JQ,X*680%'P9)2X_(( %+CP@B8A&1)C0#I):-9,G'BQ
MA=1.7J+$CU1T=;"G/U#R(^<!2$U1J &9HG.,C^E$<%=>G.+R#)J?%.!E.K*<
MZB@ZF#20Q2@/I1.*K'.B<XBMHXB8#B02;8J4'< B\-D?O'**3AG $@"BM#;B
MJ)DX:!I1P(\'(:5%!+Y-T2R@6J(C@)W:I2,7+DPB]<&V0,X ;CHL - #0W2U
MX4\/[='!3 _QT57&/SW41Y<;!-/1X1T$*TC'(.L$DPX(_1R%3CX09#',2NB@
M\$ H-0&1BXB9W)//(L+0I$ H..U@0$UGY6A! $C-0@"W:!Z3L2([%0>R M& 
M4P -7&&1R $;2X1..0ZPK(#+, ,E+2X,#>.TR"2;C/)-*^,4]-"H;BR*2+0X
M0*01_&RVE]I&T&,B2T;($^*(C\6]Q0K#@#F(#YYUB(%F#RWBA3^3X TF+H%[
M(4_A><<-I0+H4)5%2_?^0Q<T&?J1UEEX*.F#:AUJH!D1-*/#S@ _^HG4/+WU
MX!E=#ZWCSMGXI.-D4_C\)9Q.^+@LXHWIM @E [B@47H_ WC9%#^Z\[/.-7OW
M3=??.M'3%#TT0XD +FMD;P<#Z("2/#$(Z*1/ 4DD $1T)1S3(1)[,@"E/AT3
MH+P1?@$6BK2"([;(,B4[F3#V@J=T7"!^N.!#Z0XQ/ONAK7GI&,!G*@ A8=Q%
M'ZXS"U >$+_YH:,:#4P'*B[8@P9H,!T<4-(#=9(VF.!O>!YT10@#04+5G"4!
M=_&'I-)1'_/U (=G@1]@7":ML_R-;?; Q1]*MX_>+ ^"(4!@0I"RA08"IB]_
M<8"R H@R2NTB':+;&VTZ9$+MX4(0I7/#5=(E@[OP8P<ID1$)W/A$.,H#>!P<
M'BXV43I'K)$ ZQ#'V?B1#@_X@X5UC!L>$>B)TIWACX%,VE#(0+Q0E"XK/ZI&
MZ030&UQ<HW3Z","/Q%$Z>8@2%P,0 %+4<<H(J!(=I/R1%EZIC5.6XI72.*4[
M7JF,4[9@ $@1QBF# $QTZ.*49"BF+$ZYB&*JXI2I**8H3KF-8FKBE/$HIB1.
M20("($41I_R"-]&!QA^)8IQZ..4TQBF'4QZ@ $A1PREM $]TB.&4>ZBG%D0I
M27248@&X:!52EG!*<=1S"*<T@0&0LH-3NF&AZ)C!*6\!T16<LA\0'<$PG;6!
M4TX&*1,X92N<M8"".FL ITS!G]!QGA^M8:7S (#&..:#!2S"#PBX CJ.(--%
MP*-R=."!$M7BC1$,PZ<.4LLQ)C&( SSE +A0UF..40 1168*BOC  H:QA<E0
M[1_#6,<Q/F26?)30+/3H@>CH (U%&*.?ZL@)3A=1!%4NH@ H&H8<\J"((A@ 
M$R7X&UVF5C5<[.,?4ZTJ *Z:5:-V]0"#Z$,1@5(  .AT$JBC:P(>4P1O]E4W
M=&A =@S@4[+^@02%L,=91!35STBP3(FU*A:PJE6N>K5J=/U2 09@C$34=1%+
M]4I3 \"^CO2S"0IH!%Z@8$8[K'1%H^UG#7*RDU&@(+E&8 !S[:  7,1@I5\8
MGP'Z>0$%_,,&U]4>.A+EI7X.0*X( ,2'Z)+"QP'W"-%!B@F4I)W*U6$[55L'
M-U;23VDD !?*^)-ZI=5>CODB 3<M'W>!F\$Z4, *N# A4BK 7P+X%\!@M8).
M&:R=?CH"PG[(25T?@]<4R>$!4"E!1Z"@4TIT^*@[F2I;AAN9R0#6N!RSPH']
MM(CAC!4'"9@# X [B&,L8#$R74<[^GD#%&^O6/  1!]$1!<> *"O?RV!M.AB
MPJ_2&!TQZ+!//UL<=.AC 5E8A#>VNF:_ O8A=%%6;I&"TQ])!!%^=6L_MU$^
MG.)"'@@8A044 &; 1F2PFJE:H\7<(;GL^:YW.RH\K+!G-B-E#PL8K7\_ %O@
M*I:QM7TLD0K@6P%\%<<*&+5A$6MJV=+6L5X]":OK2N#(3C8=E=6I"D2I61C5
M@0/<4:X"H.!I=!P@U(8"*B.V<M3.)J( FN4L :J8-UY+*[:+G6U6M_K8K>A8
MN <@KF3$(F, ]-,;!T 'L=2"CP).32+#N,+C%LS?\7),%T[]'CKNX(\?2:)\
MM:MLD[%]C$+\XRR>P84^_C$*9AP8WX_3*3D4<*>I "5VUZ K,-6KB 1XJ;3X
MV@Z^W5HW!A3 23V&:K=TXG+93H;F_2P"5(F,#RUSV5I-MNF1$R 'E;M['>=8
M=:M]2P#@;@Q3Z)@ 97#:;'(@( N4VN!MB@!AJBJ+Z4D;YQRV!28Q"1( 7^(Z
MXN)$55N/V[:420G8<:$%*?&"M'.=L#&,$)VR>SP=8QB 3O95@A,V0?#910D[
M5H((0Z!!)2Y,6T):0K4_Q$01!, $F,ARPAR=!&UNY;MEP#3X'L#@A*P]/6Y2
MT@,5G%!T-&\* P3 EKV$ON\I24=XSA:8O>/>'^A3'_O&#)0)'"87GKE'. :0
MD@) XQ][6<<T2N^"$Y9!+;X?/>M=?Q;89U?VM-?+[K(O%C"E(P>MB4DZ/'-[
M[1^R^>E;GV4H31?C\P[Y % ^\X'__)BLHZVLQP8G-$?M5WXIT0B*,P6QEUT$
MP!:+< 4"L 5'DP@0>'XYQ"\G]#<(* \*^'W9%7X'D D2>  4:"$MLH$=R #@
MQQ8K( TC6(*#EPX=T0B.YP^ (E4;Z!4/* !2@!2SEQT(@!+JD X,$  Y2!D0
MF L2L0M*DS[ DV8T^'B XAE0<(0[V#$)T(.^4BA!: 3J@ ME 05-H0Y/X84Q
MAT( $(4VB M4:(40J(59P(5"F ZFD(8U.(75X88\B!2'((=>F Z'8(=2"%MZ
MJ(7& X1S&!]Z*(1( 0Y5@A+PD Y<D(:*HX,0:'XBHA/L@!)+EA)5: AGH$-F
MN&[T8B_I00?5@('U1S!OT"'LL"__00>JT -UT"%D0#"=0Q=[\ _KP MJN )>
M"(DZ 0]PA ]_ !29*!R0J"%I01<9<!A]\0]P! _'N'Y[H@_ ]0_0D 5(=S;N
M8#LJY ZZXPXZH0Z"(1=TX0%WX0[%"#SVYX5C2%R6,57:R(W.P(RO!XTO-(W5
M*!2X,$79N(WK8 [IH"Q0<DC'4(_IP C\T$\[('A^L&1VX # E0D]B(#E@X2]
ML044@@ %@&2) 05.X%8QAY$*> PBJ( P]@4"$ F', WHD L'\((0N #"4 ?"
M(&CL(A*[=%,2Z0 8:8D"H(0 P(1#H0,' #RU&)0:60(NY \FR90[F L'893H
M\ 0'D L,L0O_\ ?H8 (S.8$0"%S1@ \6685>D)$[F 4<*0<'$#3[]Y$)$)(C
M:0PEF98G698IN0@KV9(OB0X;$)8D"($B)I5OB!0-\ ] ^'0B001:074%,!8)
M00<(H B1^4-S40!' %SKL YGXP^6.19E40?$\Y2;>0PS$IH]L *$<9HKL6:1
M&7SRQV[$EP[/Z%;XIWQ3A5^6P6W.]Q3PL [4L"1-@GWW@ WI$#AOM9/H("$1
M1E?\@ 1!$S1@HE,^($J/@PYE$6?PD'43@WT[< QTH %; 4?^8 >DE7L29&XB
MA@XPX"J&HI-0%P>ZXY$2% WH@)]  ":AX (YT9W <!;^J +_.0HL8!/^N0B.
M663I@$/ Y5-TI17#L6+ E5=T$ ,1RF+3"0X#< QY50<@$*&. EQ7M0@?, !<
M=301"@3KHQ=UM0[$<%?F*0=2(*,I40<05E>)X)CID&:#MZ$=.@K^V9\*L*-:
ML6)$RJ*1H:(% (PV2*1+&G<ZA&W&(*3==1*_1572<E3'X#+^60<M8!+C! @W
M4V0?1F F$0#71B196@#?A@Z>D05$RJ J %8<<P9WX9'\ )R#P =X)C61!E9S
MFG!J\5M&M@/&< <V1:'&D%=VX $96J$N%@%N%9YWT "1VJ@N)@#KP P1:J1N
MU6K 9:4$1A%;< 564 6+<#K@\ _35PY=X 5?(!5<Y0)\.0C#( #CH  NL ,'
M0)FX2@#B8 \N\ \G4*R/)!$2T0M]$ "%T YU( ",T TNP @>P <2L @>\! K
MT V!<!X08 </T B> !&,  PK@ VTH 3-$ )," &.4 RQ0 #3, [ZX C5L CC
ML _\\ O7E0M$H  K\ Q!$ WI, X$L + , ^KX @&4"\K\ ]:^0<FH @E  C\
MT -T8 &$0 YT0 #RX IT  ^*X "VH0+MX LTM!GKD  *JPJ+< ^,< R.\ U0
M$*\FL @^H P)< 7C@ "L0 @!.@"J( [XH + H J.T U'$ CG@"F)L+,)$+4&
MM@C$4!:)1@T)8*W.L+4.  T)@ X'M X"@ 580 M,T*[%Z@)Z4!)*XP#_@*9*
M0P!/,5=X 01!TXB],0HPT%T8L&RAT+=1NA6C( - PZ$&T+>P*9EF49F7B4-U
MH)F<N0[RU2%JH%2/L7=\9S2090"&&P"A8+AKAQ2,T#KXH@&X0!N D@'+-KKH
MT#VCA0L(@A0#DP6G>8X=DA"J.9F..Q:0:S82L9MG&#O3D YY$+<G0;<VT+?G
M9;CH4 _KX"46\Q SI30QX ^AL&C:J%Y.I3&JR@Z"0P"T0 2P  #M*@<-@ J 
M0 <)@ H#0 =-"@Q T 7#H+#TRS'_T ^/\Q(CYUSH0&+^IC3HT ];40(29$(]
M *%X47@"0!>591(\X%-F%+Q'807H<+E :*82T0<E4, &01<'-,%80L$ P -(
M,03\A7!@="J%1P!TP4$Z58L_<E@5=V"XM<  @ #U!S@C# !P @ ]J%/MD<''
M, S?BZHZ00 =&ZV&  Z"0UI.4#Y6(%<_V:YS8  U_%6RV@6T2@L_0+:TX!;<
M\(!-]P2DQ9)6C,46]VJTX .+,,9H' )S< !97#4*.PRT( 1OK A'4#Y74,9G
M+ !6G&AKS!"+  UX' 1OO(-63,>%#%9W_,970 N<-I9_0 #M^@5S7,>0# Q'
MQ0T3NP[8-L9FS \BM@AWH!67S JN@*-""P[XH+!?X 62) <#  3K4 ](L [R
M\,:F? 6+\ =:<0<$P JJ(+1UH ^SO A'( "TZLO +,R+\ T*.[$A"UQX@P1?
M\,F<\,NHK,J O /^0 <?( <1@#SY, #Q\ 1.8 _!$ !T$ "DP,[7X<[P+,\&
M2P<", ^E,,N=\,G W,PZR[,=BA0XE 71"ERSZLF+W,PNH[5S  $IHF0N8V!R
M@,4\>\>C8G%[^E7/S TKP)*)X %:^\E\+  J0 X\$ 9\8  \H ?"S (@\-$G
MG=(\$ 0MS0-:(,P$,-.>? _:<)R#H WNM@/34 <.L /!0 <*< ?QBP3Y4+_R
M.PP#$ P3, WU&PP;@-4C$ PC@-4+$ P+@-4S$ PS@-7W  WW( W#  CA\ -T
M8 #3*0WBH ]M_=9Q'0WZ$ W84-=W#==RK0Y\[==7$+&%( UY@ ! +=1$?02%
ML UYL #WL WWD V#L T $ CW<!#H@'X.1P<'L-C8,-0 L,U7L!X <-B)+=JD
M[=B0'=J4;=F8C0ZTL0C!L C3L [/@ Z59=NX/0R/70<>L /*< <3\!C"T(+W
M$ ]O@07+O0C*@-LKL W#\-S1C=55@,3,O0_3O0+MD L),=?14 W1, TKX X;
M\ UX0 % ( [OD YZ(M[D/0T#X X3\ UYP [B  _U?=^+T Q;/ Q0( 7W, [-
MK7_8X-S+A]7**@35 0 2)"T8 0=R@!^0T 1L  <Z  )UX 9KX 9O< =N  )F
MP 9A< 8@< (E, 8GX!D9ON%A( 9S4 =R0 8@  =A  =E( <@@ 9ED 9G@ 9T
M  )OP.-M$ 9R< 9IX :>$08 \.(@, 9AX 8G,.1OH.,C7@)S0.)%3N1U0 =P
M\.6>418H, =T,.5D@.0VON1A3@<I  !R\.0:'N537N5$CN4@H.4N/N=WD 9D
M0 =H  )M4 =F#@)B4 8W_@9SD 9TD 9V4 9[ON& CNASL 9Y  )IL.5F$ 9L
MP 9+?@:1#@)T\ 9O(.A3?NE(?@9UT 9EX 9T, <RG01T3N5#3@9EP.D@T.> 
MCNE,#0!)X 9SL.-#[@9E< <@, <^7@9#;@(W+@=E, =;S@-2H.PT[@8^L.$ 
MT ">H>4@T (W?N*(7@)DH.W:GNV>4>Y0+@9A8.-C@ 9('@9C0 <[CNE9/@?G
M?N\ P 100.)IP :(3N%+WNAN@.)?WN^,?NF/+@>+_@8C'@,N( .&?NE-$ 9T
M,.1"8.)Z .D X!E3D 5.\ 10, 5), 4ZX!D@</(@D.$@L 57WN@,/P==P._^
MOO)FT.]EX (XWP6>001%, 5#( 5)  54D 3L7/((@?),  >8ON5A<.QIT 9P
M,/, [^KS7O">3@>7;NN+?@;$;N.C?NRM;N,XKN1N0/%E8.-O\.5M+NIO8/(H
MW_13+^]RX (G3P4^;NAEX.YVD 9=_@9FD/)*G^E1SO!T( =OX.\V+@:7/@9O
MT 9'[@8V[NG$#@*IONJM_NIN?_*Z'NAW@ 9IT.ZB?O>$/N]'?NESH.-CD 9F
M<.DMS_=ESP8D;N)GL.5?S^ER'_J(;NN;7@=LT.LHW^P!/^\X+@=AP.IRK^F'
MSP8A?O81C_LR7P9EG@)LC_? 3_5DX)]'7_=W7^(GSO3.;O2_WP)S#@5R$/ ]
M?NNVSN,,#P*W#OICK_'A[P8;3@:E[@1O,.1Q?_[K/N\HH/MAP/MNGOG=/@<;
MCN.CC_=T< =ET.H@, 7)COG9W^UC,/\,;^<X/OK=#@)#0/A+7@=IC_QR !!#
M0/A+7@=IC_QMYH! 0::,F3!UV-!)H0  B(<@6MC1 <)*&3EBWLPI Z+-FX(-
M(49$ \()Q8UT0)AY(Z<-""1ETIQ!DY+.FY(@V*1Q4T8@08,(%?:P88.A0X@M
M[I0\62;EE31DZ)"TB7,,FC!RPHRA<U$@G(LY=W+\>3 AG1XX8!@5V<*E21 H
M<>KD":()UC,[082I^0:.7C=D0&2D8]/E&S,J6;HD&_3LC+5(4[ZE$D8,7)MP
M!):Q<S%/U3=LZK1QX[-@6:$T(#]L$9A($2M)AA1A"AC$FSITX. &0=4U;-D#
M33?N 46*$]41!XKQG(;.1C9F4E"$(V>G<Y5RWKB<0R<,8*R!=^JFTY *FC0"
MT8.HLU$.W#IPX+#D&GC.83IWL)9A\3>\0#+HT5&=&+B5$=@=S:%Q6TI6W56&
M"PT9P5)'+'&TTTHM[97&&V[P1T<>7X%P A-01/3#">6AP1$;?E%G'5BXI:'3
MAR#D)] =U1%6AAL@Y#6$8)[911@(0K 1AAX<>><?=F64T1!5WN7!(4=W*%BC
M=]<UY\)#2:2DWAA]Y5'=3/3QIV1'87CFQALIB<&1?6P$QE)#;*HH!X(;@0 @
M=P,6&!B&((#91AL7I3%&&F&P <(98>2%H%0+\J9BC3ERQ2.8I.U('@"'2<K1
M&W?P),>6(&1Q&YJ>H7!F$B H&**4==0H(QLI+)H&9SVF%$9^GD'IAI1T5?E&
M0V-XMUZ>S=GFGGS<Y6H;CU&"H)L8.HTA6$)L-)571N"! &M8:W!$W1MV0&5@
M0VOJI6,;<'@I4!MA%,3;38ERY9Y4ZA$ZQQQAG)%D;>DV*(>_/:;'KD8&0@A 
M$HA]JU.XDJHW[AE9N72F&3N%EQ)[!B7$'QS9AI'G1K55N==F8,'ZY'ENK)'K
M"3?.1]*9Q4)K!H:!V:1#0PD(F5*11SJ9  TPQ !"$2*GA$,.($PA8)/D)>!$
M&4J9*L<:_#F1!0@Q%"T##@TQ[.VI) >V5TYE) T""5V#$(031.@EF)$MZXE>
MN#KJQ0:'9\@JE=Q3!#%%$?PE<0(;;#14MMY\>QIH'7+(H2D(G,DQQX8\=HJO
M5]E1'(;%>[O1]Z,DV0?Y&$X" *:\9WHD>:#:@=P41V2\,89HFFK(H<)R . [
M '*L (   -SA>P #W"&\  .$<7P"82R? !['%X#'\@4  ,D" 1RO_0$!=-\]
M). 3/WX67L] 0PTVW+!T96.8YCL(D"0 P_WWTR\!)    <D##("$ OQW@ 1 
MP@ !@ 0%@,! ( 0 " HXH  4V$ @@( (#8&$$G0P 0!0X0TW@=>O]#*P.;A 
M>PD &@                                                      
#    
 
end
-- 
Tom Reingold
INTERNET:       tr@bellcore.bellcore.com
UUCP: 		..!decvax!ucbvax!ulysses!bellcore!tr
		     ihnp4!mhuxt/

keithe@tekgvs.TEK.COM (Keith Ericson) (05/12/87)

In article <689@thumper.UUCP> tr@thumper.UUCP writes:
>Keithe at Tektronix complained that the MKS tools don't come with an
>lpr-like program.  Here is such a one.  I use it a lot.  It is
>shareware...

I de-ARC'd it, downloaded it to my AT Clone, and tried it: it works!
My check, and blank disk, are in the mail (well, as soon as I get
some labels typed...)

I got a response from MKS and there is news about the Toolkit which
can be released on May 15th - I'll post it then.

keith