[comp.sys.atari.st] barrel

braner@batcomputer.tn.cornell.edu (braner) (01/22/87)

[]

Here is the promised BARREL program.  It buffers Centronics output in RAM,
and allows saving it to disk or background printing.  It also redirects
Alt-Help screen dumps to RAM, in either SCODE or DEGAS format.  BARREL
replaces BUCKET, and also effectively replaces SCODE.TOS, which was a
'dirty' kludge...

Following are BARREL.DOC, BARREL.TOS and an updated SDECODE.TOS, in a
uuencoded ARC file.  Source code (in AL and C) available upon request.
(Both BARREL and SDECODE use my modified Megamax init.c.)

- Moshe Braner

PS: From what I've heard, there are several versions of ARC out there.
(If you know how to identify the latest and brightest version, tell us all.)
If this does not de-arc on your ARC, try to get another version, or e-mail
me for a non-arc-ed version...

~~~~~~~~~~~~~~~~~~~~~~~~ cut here ~~~~~~~~~~~~~~~~~~~~~~~~
begin 644 barrel.arc
M&@A"05)214PN1$]#    V@D  #4.&ER\1N 1   ,#10("2)%2A$F.D" H(*F
M# @K9>3,"4,G#1N'4H(T 2&DCADS$4&$<4,&!!0Y:=S0"3D%SILW%^6X".@'
MDHV  <7D4=CDS9R&'.6,# EI0 (>8H2ZB0@D3!L[8?"XH./&Q9@W<I:R8>.B
M#)DZ/G J"#CDC9LY:<B$I /4#$PV;^ZD/ ,"+9TZ%-.8G:-#;)8W=4#<&4D'
M!)TW(."@5 D"KANZ9BR6F2,X#5O A=' )#,71![ <D!<;0.GSLK0=>" 2&FX
M8< V94;>02/915&_@ 4#9E.239HU#@_7#6,G.- Y8^24*>-&).4P(#C/60,B
M\D7!#9M_#JQX,N4@;.BT0%*&#1P6 5/.61FFY!LSB1=7?"P2!)HP<LA<A9/'
M]@#<=9R@G&%RY-&9<&0@-L<;L%4WTA@[*9;28::Q ((8IGD&FF[YQ??&&-YA
M%=T;D[EQ AT!2<C8;!1I&!A;*5&WG6&;K5;882XH]%=@=^S6VV_!(2:&0V&(
M<9UP<RP74!EXA#$&'6SLQ&)A5ZDD!TRBW2?4DQ%1=D=$#B7)F'!L.:3B:?X!
M*!AA-,8W(0AFU:=<&V^LY*9*$5DH9DG0)3A&'; Q5D8+;81AD84BIE1:898%
M)-Q(=384FF)OG"%4&Q9B6-AVH?78(:4@SK%@:"B(.&49Q<F10F5;P>E&E,,5
M%Y"?@#)'!V6L64997,W)%5%);LE1*!T6NE&G<_4%.^Q*)04QQ1!))%%=;;>-
MI<".]A%'Y)VGM4 &2JFV>28(EH8!!VUC4&;&E6UX6&Z[6+C*;4A!S"10AC/V
M6 =OC0'99AU)SAN:$#F"@.U]Q;7F$*V!TI%7G,%>&&F*\G59,+97[5M2;&C!
M>@=*=D(G@DOKM0!JB'*(X.ZEK;4HUU8!*0<'&TXZ9%:8913VGFAFT7$E&UGB
MYZ5E:(AD;)DR*=1189%)M&EN2WDETFLY:^8>?&.8>]=B=)4)IVF+5B?BF?2N
MUAQTUI61IK5),/I<JR2C9:1#<K&E\,I.@2#"0 4=)(*] 5V1G8L@R%%'<WP;
MQ(38H7G=]'J&I=$@:] E*:I>S:&P+H-WJS7=8:IA%=#F[7H=AFF(N<5;1*M:
M9O9Z86SU' @9;83A1R'-#'!=##JD'%IJ,7:56O9B:^M:0'F>AG(EH:6'S?!Y
M?3M(H;%VN*YPPA>##$LD!)T;@ X9VI!T?,E<0#$875(.!:. ;=0E"=>=J""<
M,,,)(*"01E<Y0C>##4NXD$>HMRH1T6E :8!/O@CC*,1D#0Y;<P@1BG $9S%N
M6'5)SG*:\Q72S,$%JV((<RPTDHVE:B<5:=",#-><,@4$!1.!S:HH]:[&4"0D
MK/&:Y=!B%@O-Z PY:],8-.,3AUBF#&U0%[OJ$Z@Z],5:"1B"UNHPH#-A!E?-
M$0-^E,.&@"0@"6V #6=NF*W\["="\KFB%XM &CKL1(MRX"((()&!%H"@4, I
MW$O:%;&EW*$N=_F(%Z\ ,H? 48Z/BDX:IC.MZT!" 79,V]UJ)T#<R<&+4H@-
MGQII1)4(:8OEF:,#(BDB+8YA#98"#$FX-1<O(@$_^GD#?S*H'.9$!U!PF(,7
MG_6$"5ZP1<BI)0=QJ4L%)&""%9S"+PL3S W>TH->%(*34'FEPY7D3)V!A 3L
M& 8SG 8$4H0@%6T6FDRVIY7&- )6RI!*:[*2/F:!%20:8$=-B68DA9M,K6QX
M&B]&H0ZN@T0(ZIFABVBK+CF;SQFPZ+ GB25Q!S';:4 $P;<!30A)>((RLR8[
M$JYR-K8LTTZJ!**LW(ULU4.1 IBWO#(\B3)E*AUBH$/)Z46D8!!=G)-H@ZK)
M7&B:[5PE-NFCD_2<Q6%;Z0QTJCF?3MY-!C"  0B0H(>ZY&$]2(P<;*J'ISBF
MIC H8 M%3D"9F=DJ#Z,+ ^28 Y@S%"UB*\%#8>PI%*35!2Y_!&ESADJ7<ITK
M#>E*P<5RDS4W!"1V"W(.=7+:)N6T)UF2D2ABO%;3 =Y4(0QIT2*3I=9O#@:M
M"MA9DNB@4,A>)S6,^^DI@WI-^<RE8"+\:1Q#N=G3'698@(U=E);4QC1(3:\]
M'1]0JRE4U](G:W08HD]16[>BZ5!;S0ND&0K6MO10Q@E/H ((D A!WY8D-7'Z
MF&4.-%-.Z@DQ"23<8,:$F 1)S&[;"<A/?"280MY-DH^C ^ $0A#%B80-B66I
M<EYZMV;:LH.J*<Z3L&(AYA3)-\>=XH!VYD(%&'B8I#$;[31B(=:4@6@L&4(O
MBP"GT"#3@LJB2,&"H+<+/Q,.*EMD0+(&,*GI9+L@GM3OT$(?\(B'/.9!U/AV
M AT:L@P%:CM#CIS0 BLL$G,IF+%N#P04+&!4H[3<H!T17)W#/0ESU(W><31X
M8%RNAC)SJ,,80C4',^SKA?M3F\(&-!C*L+4.;JT+'&HF$JA8Y,%.E1XHV; J
M'9*Y5Q;IH@).8*08X4^M]:E2TW!K%M@"Y8$1+ D9* *=0J%P<$.*E=00M$CJ
M%'6E@V*A&SK#V!+&QSN=.<$53E P7OJRMLMLF=O>BX89,VA^2>+3*H<G-4C'
ME5B\L]&95Z.6V*5V3YV! V C2!D[I"$,2[K(DZZTZC'<T5! 0X&Q0%"'.C!G
M>)U9"IOQDP?!ZB@W;0!886I\MRE,4,03I%BE6"8<:Y?ACUZ3]I/&::%Q64;(
MHE8VY0!90EA>R#*$,M?HL-*&@CFA3L9QV>  UID3*S/%A4$P%CG2WX-82&:Q
M859 ?#R>\N023JD2KYUB,T0X(0U1K_JT0V@&N8D4IWF'7O9Z$CUGM05NXSRF
MBZU)#/(7S\%"(A7)F@&U+S+F$"B'#"6D'7.&P\)44D:TL['P7+0Y[!E$U"5)
M&JS]%6>+7"0#2M*>ZVIC(E^(9FY80T @+&<0!,&;(<F7?04]6Z"1FI$SBC?D
MZ V=8V^7,X>YI *05(:YD]%K;T>!J^?TAH2-9">16@N3"M,=$''FN&]0BZ:)
M*=B5 Q@Q1\OXC=I"\191^#C0)9=0_IJN96-7NV<"M(5F(QE' <58PG*VB[F<
M()\>C5R314,U\_QYCF1TH[K](&;!'JPR^! P4G;#\\>%3Y8#637+-_/5#3E<
M59:DN9CA78-&+Q3YOJ=\^.D[MH80!"?H^26&!Q28$38[4V174D-B17KR01E^
MA2Y*Q""'Q4GYDV0% QU'4 0; 1L.DS:KLG5F01?&!A1&EC<<!6!W<V53$!!"
M4"68@0*KXF9N\&5Q(C_RL5T[=2%YL!+[%033T1D1(P*2(T;79B=:$DNS9$6F
M,0<JHP;R9AA4=!;9 Q\3$A$451%Q\AX4,X6A,8"F$6;JQ2:/,G"ZM1.<ES"M
MMDH#1C.2HS!4<T [X3J:P1M/1S@($R3Y) 8OH5\! 1H(0D%24D5,+E1/4P  
M )$1   U#MM6I0W^%P  #& T   P0=-  D(&'D % )(#)_D:#F  <> $#BJ>
MJ&@#@ "(%@ P@  "K14 #B)(\AH8   P7O\@#?#G LA' !2F 'IC8 *(*,C^
M\0/!$<)-#CIY"L$ 5"B*HMG:G4S11.A&  B<F#0 @HU0$#Q8 H#&D %9G&=1
M I"&"$%+ &<$2 F4(L@_?-!8_5,G8BTB83!E^JO[C]X+ "\0"#GS(ZP2)T&>
MO / 0 F@,P@:_\OF1%<##"Z\TNLJ% D: ( Z,Y"%Y=$+%O_<_8 MK_,!2 "X
M/%JL6EY##D*"2&'2D$ 0?0!TP?@0 T"(#TC  <AP!#DK$VT'-C!ST,D;)6\ 
M". .@ H,'?]HG1G(!,8%!D"PK@?@ CZ  >1UA!FH9+X($%3$HL\_I)0QD *1
M# @*& #\(P\$KP!0@!24, B  ?L!8,)Q $@! A1,8(,)8AC\@($3<W HQ(<A
MCOA"B2+I\0\=3D!3W3]:)#&@%B!0@-LDL.B"(T<7"I%:'7#\XT0=#6$0W'#%
M_8 >!4I\,9\FB7'HRG/1+3@$<J2(@,B7_PA 0A2U# B @0!(<)P_\(B VY?^
MR",G !:"@4 . _WSCSX!D$=%$/GXB0@ 0 @# !\'  #!2@=   $@80$207QF
MHJF//\2PJ4 EFP+#H(,02"!%)(\"\,"EXJ7J@*0( "(AJP+ "LRLF!HA# AZ
M "!"B 84\.$+Z&&Q9)-&0L#G/X($$ X2RC8HR #A(++DD\1!0H"4_NA0)7D(
M$/L//$O&P \  1#@3I;Z"& +E^#\\\>7 K BYGG^4#"? QD"0AX*%F(XD S[
M_2/*2#+PP,<_1L   0!1)/-GP@LW_'#$?_(J !PA^O//A^;ZJ>Z2]+H1+;-@
M"!#? #(  P(?T@(!0U@/R(!-4_P4[*',//CPA\TX']>/*2 D0B\.0F-2]))-
MM,N""'KT@]O)@H#QDD0#M #$/_;TL#4_T(0%PWX!<$*>. 4C@ (0?@30 \P!
M9 PSLT#00+.1,& 0C2M<9\@->;I$H4QLQP7 !PPN" 4-$#S ,% /1OS3+1P7
MV@ S %,8(4010A"1H3(T &$A!# L $L3; SD! ^)^X/# AG* HL2Y%%9!'D&
M7%&,'0'8 O,?1((0C")*%#$?!)MG: 5Y4 2<H1GD$2'%$%$X\X\P4BPQJBO%
MS\< # IDZ,*_B/<]D \@)&Y/AC9DB MY$&0("P@'',</)='@)@002\H   P#
M( <2#!"?^ T$".E8 @P"P XD-! 00[ 0 OS7P 9F" 4+M.! 0+# #&G@6H" 
M0.@ @(TF/$N$\2GAWKBV)&# [ ?0@!D(8 &S%;CA0 0$0! L9 (: D '1/* 
M#X%P0P H((<UL) #?+@%(AD@AQO(D K(8RHW_(D!-]R:/E)7I",)P8KZ@$,#
M,J0 .(2O.W68A3[VH0TV&2!)2Y( ,*1P"",=:PP P.,Q   */@( "@V!PG'V
MH0<09*4.]M.!(9<D- <L$I$#,L<CG6"%@2"!BXT!0 (ZLP 0Z,8)7E@2)0?R
M A=@)9.;U,4"%*";3 K E9U1 #A:8R$!@%*45I#<)0$  E3&4ARZR0#,H/ /
M2URRF)E40"R=H1NO22X([/@')J#A#LD) 0+0E*8A:WG+.HP2 $@X1P @8((;
M(F"7-.C,/PC1&A]0Y@@ R,.^& #/+,S' $H\P1JP0AE]\A,"3/A&K+I)R7](
M(YP#@$$YL0*"%3@*%JN0ST @L$LFJ!,'M!P(.=1I!1( H51( (0/ 8 ["SD#
M"5:41B8_J L%H$ WBWF! C+IA%AJ  J/8("LM'6\79*A,_YP1T8!H(D@5),=
M+$  "(S  J,8 *(A"8^C=HD'H#)CJ'A@@"&*(U7@G$&FF>Q!9Q* #)PZTQ_V
M 0 7*9HZ2P!5$T,UP@L<&BX#_*!UF?S!6#7AC7,Q !:&Z&GJ7 %4. R5 _Y$
M &4:BA5H&.($!=RE,8 JA=8$E ' (&@N]8%0A9J3!/M$  L<"@$1*( 3@=!J
M<8K(5@"( Z@>&"HN& L!J%) JC38)3Y\J8L$8$ WEPP 2_MACW:^,Y[SK.<]
M+>2'T8:D,_WPA]:^8D5^2"JD(RWI0+P0T\3Q(Y,\Z P"ROH(9^HCK6L-+@Z@
M"]='6(@&,GV!71.GCTSR3Q<(X$1?*0-8P09 "M"5PU 9$%PU0)<,EOT&9C4;
MFW ^ 'E6](<03I%)$(B7"[J9KCQ>)A%:J  "I710A<4K!-V@0%@$P,U*9$("
M$P"! :O UDG((X*WH4MR/9B"4'JP3P'\B<<=N0N0#< U!@7 &ECLDS_(8P4&
M$&(@?90J$YR,J(%P<44$N)I, J#3XI '!BAP* BH[$>IBH#*\5'K0$22Y14/
M@,L[)8!V_^&&SO"CJKK@!Q50P,L4 \#-+09"<!7!VP,H KAL"( K"LV'5H;E
ME8^V364?X4YZ_H\C>[%T#F[X#W'\X "NS.0 ; ,#W7@"9C"P-$D/Q!M=$$ &
M5'@$# Z !&"L Q#A (0,:!V,= 0B'(& 1B"FNRX>Q&1;84&";22@&Q$DSAW2
M6,D? 0"+0'"1 L&U!F\-0 _=C$H+G=D'+2"+E<3V,[2.8BP"H,$W=Y"; B>P
MHCM"<H(B\'+"(]:% 721X:UM&&8RH04(",%A=%'@P^'6 I]!0( L &(D("A$
MP0- @8$7O  "0+@N]D&$A3?\X3:1^.4P/O 0RR/?!B!#,^$FE"_^F.7XL''<
M[!%<?VP;"(@6  K"'=M'A%L Y>.'8 6@@VUS0#?EP\=\5% ^>\P'VVP0@!=X
M6P!_>'NBEQ0 (*C.#MTP]J\1A<#014%U:2"=OD/'!=5YD7-J4-T59Q?*T[..
M#:ICXNI3C?INPY+* A@B[OJ8.QL&4"*^=Z8 <, [6P=  ZI[(>Y*Q_K@F4!U
M),3='N110-+)PP$8#Z0/?<$ D19O!JI[X/+ST7SB\ &_2PZ $%3/S2.^#E6Q
M#T0$KB>[X5UM#D0/0!:\)0 V\(Z!\OE#L -@1O!]X7MT!!\6B": ,G61#T<8
MU])A()(#+*V'(AK &PL#QZ=#'991NUKEC[@D 5 0?#GHQM)# )?,A6+I).#.
MY?RP-!$X[WD @#XDHS=_^.!R]N!RYP5/4T!% CA_!0A&EH8$]V=%^&!I0D >
M##!_^N!R$PA/1A"!5P1/MW,@+[  G9$/-M :EB8%5&1\J3>")>@%* A/5Y!Y
M+J@+^@"#.05/4;!< - /?& #?,,/-P!&XC&$=]$11F@/%\*" ^$ K08 A!!K
M%F)ANH /2B "L,$/N!$(*^0.W14;F10#G3$ :(!3 84 Y!)*WN1-E00 =X45
MG2$ RA!K6#0( X$ ;F  ,S,08. !;Y@98>$#8T@#K9$#0) /E' &>FAL_P &
M!+"' *!9 _&'F611NC  #M :#.8/(PA-^2 .)H $8& !,.!0"N!"]X$9-0@ 
M*M :UG N%;< GB@.(H  T380!4 +U=8&=6=*62$DKA!K)O %DH@8"[!0X4*"
MN@  1- :2@ $BC@S?@(&,%"*1H2*8J< <W4AG1$ ^- :0K!/,^50%"$D+!!K
MSQB-C.B(D#B,Q1A.XX2,UGB*,(,?"""-C3@0F. "$^ )$:6'IHB*EV$%\XB*
MX[&(TV@'!0DS!' &$.!*^$:.G0$ 9?@(G[:-=B61NB  S(!3\.$G9H"0C0@$
M K &\F)$LU9KT1!1#@ &),  ^R03#/ &')!) 6"-!$ $@@8,A_$#&GD2.$5N
M#F "_QB.'0&)9Y@::EA0\I!D,H$ ;*  8'%L%F)SIN0 ?UA*1I1)0M"-BK!?
M"C!=^1=G;:!4WF4A*A46 ?"'^!867:D+ 0 &8#E=>R<>;$EA;MF-1C"76T,/
M2=82#F &CK1Z[&9$6F-$+IED @  @3F8A5&881D?"@ &#H XC(D94ZDM8" &
MZ6-$L, W]/ &'H!2#M*9"H ;H-F3OFA?$PD.^\4 BY&5IC13>;F,R@"67:8M
M70 ,J!@ AHB(9R"5QJ:9DZD8;("(IEF,6@F( ) $$^D(G[24N21A$08&)F!\
MY0 (T(0/9  -P. PL&!.@HF=VLD.W.F=0@ %4A!A2<8$DM,&TK")G^8#OO@V
M-_E,YDD&N"<-U>0/O@ %BH@%2# +R& &]@!FXN$#']!-*9 $^  &*: $^, %
M*? %W^@$32 ";/"@)+"A7/ :%UH'#?J@$3JA%7JA0:"A'.JA(&HL;,B'-  "
MYG1=(@4S"B"8F=0 L"0DQM :,HH54N *6$&C/^"&D0:,K6&9## %-U090& &
MF26=?"@2YA2D0TI16V>D':%.@)"DIK2D3?J,9L -Q0@&5 JD0HH 1*JE!:!.
MDZ:D3$H98DJFTND@X?0_"Z4 )+ $T$0 /M "2, U=7B'9F !;^@ -?@/--!,
M-^0 DF-D4^8&@O /6%&HAYJH8,"HC/FHZ%(?DNH/E6JH5YFHB5=>C<JIX]0"
M2_ G+F>5<*@+_F 'Z/BD V$*%D()(%6C1D0>A@ "IPD ?*,/(_4&-O&KP5IK
M&A9B^F!RE!@6]^4/?/":OTD)M?:9#H(9^&@AJ  #+("(T1!A(68/+Q 6,O%*
MJ^FL0+67?C6M]B$ ZCB-=+">DB,%BN"KTZ4/*4.OOHH;BQ">C&D@_T &8& 4
M"V #5VD,TN8GT# ('K6OP/HGR.IORLJLYXHHT$4.TGJ(U H,UBH/[]J(I-.M
M^!-A0G"<E&!\EQ6):I@"< ,+#:(.0\ .GR@"YZ(M,G NOE*SKW8N"7"S=DBS
MQ7&SMZ>S0INS0<L/ 2  /FNT-LL/BPFT33NT1YNT2PNU.[N8TL /!8 '.< '
MBYD/X+ D&U $#:  "I  3R(%1< $"2 &>0 "3? &<X &90 "0B '8> &92 '
M9:L  %"V"5 $;D '>PL"9I &;% &;I!]9:!(?WNV02 '=9L';U '(# '=2"Y
M(( ">? ";I "/P "CQNX;0 '=/"V8A &<B"Y;&"X:2 '<T '(2"Z@&L$B%NW
M;O &=&"XE>L&9#"[HVN[B0L"=/ &;P "8I &9\"[<H"\JLNZP#NZ1;"Z;]"\
M;P 'BIL&;K"\AYNXP NXTRL'U0L"DAL&9*"]W'N[WWNV6]"]=5N^9, ",GJ\
M>RN^L.L"74"[9^L==( &Z$N\QWL'<I &A+N^FZ2[(! &;-"Z_5NWL5L'T'.Y
M=("X#$RWDAL"HSL%86 '=9NZJUL&K1L&<] ":3 'F]NYGQNZVG&VX3N^8U"^
M$[R]KNN]HBN]U-N\ DS _^N^!MR^MPL".4P'A.L&\IN[(%"_U3L'^%O#?9L 
M2> &L:O ;/"_:;NV'P$"8X &QCL'#IP&>F @@*N](% ';D# )OP&9@ ",2 #
M2["Y,= ".2"_, # 6)RW8P#"*>"X@,N_1YR[=7 &:$ 49= &U?NV9C"^F)O%
M">R\'\P&&-S$0O"\( P"VAO%"UP&9. "FRL%92 &QKN[Q4N^@_P&'.P"*?"X
M9XL$!)S ;O"V:U &;[O""; %8Q &IINY_PL' SRXE4L')BS&'LRZ72#+6S %
M0_ $1% $E_O"9:"X9% 'I6O"H1S,(#S,H[L%R7P$03 %RRRYS@S-<"#-QTO-
M;&#-@+L%#QS!P"S)Y4S,NJR],;R\ZSP&:W &XDO&9##,92O+2= &;8#):1 &
MA L":*"Z9# &U_NV[\S+=>#+HSL$MDP'F5NW"UV\#?W+;L#(K"O+1E"]96#/
MO4L&(%#1__L&;L &>3"ZD4S/((W/([W+\2S+2&#0" T';SL'S*RX(/#,T2S+
MV;S-S-L& MW-S9S1/!W.LFS,R*S,ARP'0KV[..W-1@W.<R#+15"ZIZO1(#RZ
M5S#  TW.=!P&,PS&9\O)YKO([DO)O*S57 2X45 'JXP"83 &=VRZ6)RYDCNX
MEUL&0HR^<W#*33P$6BRW'6S(KQN[7<'7A"L'CONX W',3J # Q$$58 %DOU'
M4D %E[W/D(!Q!@  &@A31$5#3T1%+E1/4P  '@\  #4.A&)FOR(5   ,8#0 
M "!!TD !;@:NT , D@,G^1H.8 !QH 0'*IZH: .  (@6 #"   *M%0 .(DCR
M&A@  #!>_R -\.<"R$< %*8 >F-@ H@HR/[Q \$1PDT..GD*P0!4*(JBV=J=
M3-%$Z$8 ")R8- ""C5 0/%@"@(8*  .R.-&B!" -$8*6 ,X(D!(H19!_^*"Q
M^J=.!%M$PF#*]&?W'[T7 %X@$'+F1U@E3H(\>6=6": S"!S_R^9$UP)W+KS2
MZRH4"1H @#HKH(7ET0L6_]S]@"VO\P X7!XQ[KP F1,K_Z@A<1/<,0 -G1UH
MR\WXA0NLQITD5P;E$0- #0F<&:@ !H]__\ ,-!/$76P0"$:F@+*-&P-6V=LG
M!-#]>_B!1IH_SQRV1W)$U>4 Q#;@, #$0&P,Y( 0;!#H'7CB >!!$.QLHTX*
M2&QC#H468KB-. QNHXUW T4H@!->.%'';P,QD"  !+XQ$ 6S$6B<#\G1T%J(
MX*"H(HL (''.  # P(*(V]'WX'T D /"D>; PLJ'' '@Q7OQ<9.D%%@"0 *,
MW+RH  M'<A,A BR$Y660#:KS@@$U@F/<#YTUX(PW_)@%BR%F#,0!" 9$,B4W
M'%Z8X885JH,>-(:D,* X3VHH)94#09 #'P $(.*2$8K1E8923&F.!Q @<0@#
M1P# 0I4*H J 'C("8(!XX;D:QHL,P'  ) !@"D*$,+C:!JZZ\HII&!%ZX*H=
MQ.[:*P!51)BKLYCN8"(3W[CDXXI6#"0DD9WY0T\Z0(0#A \ A*M..T X D2X
MXKBKZ[79 K,MD##L]RDT$ !BY#;,( %,-%-"(T6#RORK#"P-.E.E"P=O@\R_
MR# ,,*N<#N1!I-38<"0R2 P#S2".;@--B FK:>*]W08Y)  ^[*?K2P.!1_ V
MQ.@*CL"8_O-#NKK\PP<5U@$!7I]*VA<A!3/W_'-G_WA!-+W:ILBMMR_'C)6N
MY)J+;K@(L.MNN #(>Z0V2=8'H8(_'  U'E,?A&W5/[;\+<PR4PL !.6<"W0_
MP(0%@P'H("&O 5T#$59G_;#"+B/OZM(/*9#_BS9W&1<9H08_&  U!D0;>#3F
M2L^HZQ1'* %$G_^ 0R( 5-MK]6__F"'D 3 8=Z)G6!#=@M'\&#< ;TKX;C0^
M0A@1(0B:^0QG6&Y[!D-N,A@P3B#E_6,+-,'  (@41C!@Q-YE / /-T_B53(U
M$1H0ZC;4<$QSIK6;#X]Q!*@F#]$";H.-BP 0@/^0)H%+!8!7VW#&I0# 'F9$
MR $+1$8"%P@*@"'A1<9)@&JLD9L.8 H*M1M.[8RC -4((S?H,M!X!C(K6;% 
M5]E# S2 (812$0<-G=D'+EHCNOKAY(( 8%Y8-*@+!2@B-[0B16?X@05C[0U=
M,UN)^?Y1,F*X"@#EHX^K!#"&@6  B#[(H&JDD)LEP@X !1"&KF1P)&S (@A)
ML@00S2#&(D[/.JD" -(H $0]U%$!&D#B0%3@J@#L$8A^^", !+DW(!JBC@EP
M1VZ R A(@F.2">($)*61&]WIKC,)8$1K4GB@/"1) J[*0MIR" ;Q%$ $0)0%
M)#G!'.4-1 1+5 ,4K0>([%ECAC X1!1K]H^;$0-\XB.?^;2!LA A(P4-HH;)
M(N0"5SV@BWMK&^.80+2P2$N;NN '/KIIEO'%A841@D .!4#*T?W#-[K8ASWF
M!YYP ,*>B,FA.?P"@@\$AIC0"(0*BG2V)/$Q0<*H(P+4P4@-1(H8L"A$DDJ5
M(&THU!EEU(4^^ !$>BB4%Y@,@ 44ZHI.AD4 G]0% M#0&A%:PSB>4ZD=3 J>
MU\#O!=^!! &,4X#.(, +>#*+)T_J4QFTE#BV@*E/@4#3?SA'*#B-R4[#TE.5
MHB"H#+A@ '"@4!J8-( I/8 [1FF64B;) :E,4@L! #+BO#0L,3V .9IJ4VK4
ME:>=.0 TL&J<$N25&$0C :;0*  AG,(X(,@K1A\Q4!-P:15""((4F( 7I*5G
M!4(A 2!>4 #$YI457Z5 7@U!-,-Z5A<'L$1N!LH R$J6LOA &@%(L C.GO8 
M>I@D4I6*6BC0U050!2X^\(I:'? U+'Y%K0N(IE4LU/$ //@J2HFJ"P/8@ZPJ
M-*6"THK. /(*@ +$!M*LH%5 /'>1CQAJ #MC %U@-U5D2)NKB( T!O0 4P'X
MASV2Y2HWR#=53D": H1 G/UV]Q]RT"HIZF@ T#["@PP,(7'H&)825A<3*"SK
M"F5%*R' T#PRI"$$&"-"-!C'/]6%0W6NDYU8T4"KQ& P%J2;4@-( +MFW6ZJ
M5-E=?["#Q#<T#@_82X( #:A !P+ BPX: ',P6 &"](<O\J7?)/&*!V$)P 7]
MAU.)H/1(<@I+Y H@#JRR6"8"0!H97-IEF3 /S,89LR_,C!TW(PT(=>TR /H 
M@#C%N3,%T 2=!\)GI'' SV'!D2X*  @>UID LDU>A&A!96L  [])\H"D*S6X
M3U%CA@J @/F0:00^E^\?[,!RII# D,.$12;FA;.8 <V"0<-:S7E6$Y\1#8 Q
M(V#0>];C0(# Z@"PH,T#H *O(T< <M@ZV8;FM:()H Q'9R?21AA<DD0@[<X0
M0!4M98, I@H (A* EH\03S^@<$$!''J(WC[B(]JM@SH2@ \TIBX!;(!C &A7
MBSM&6@OS80=L,:!'LZN#EP=R@#L,8 8>V161#&"# \!! '(0 !@* (4!W(  
M=P#  09PA8:# !((<,')B00) P3!"79(PQS2\ 8W!"$$7P( /PY@ (D<8" $
MD$8 ,Q7 4!A#(@5H2 5V[HF!)( ! VD +AI2  %(! 0,=SC$02!Q657\XAG?
M>,<_'O*1ESSD,F$!T9-.@88@H.$/C[A,O&YQC&N<XQX'N<A)WG @_6 _G1& 
M,D+GAD$,! %N,,#KP."!OT,GT;:!0FL$5 UAG$'Q2B/ ZU@V$,?S!P!,L(T*
M6L.R?_CC!0N@D#4@8 (D@,$",%@!?2X-@ %@!O6= <#H'V&-/%$ !*EGQ^I%
M@ !I2+$ M(!%(-J #<]#S15$,\$7.)^8!9@@(0C O2X 0(36J.[RG()![&>/
M*0B<00$OD'U, X"/':V!/C^0/46"Q@*B?1_S$-*\FJ1/?2$%@/78-WX*0'L#
M8 8(D#F8X (3X FK("L"2'N7804/B"EIAG_A80<3V!%G  &Z8UKREWMH4!UM
MDWZR$G]F$7CHL&)&4SL6" 9 ( !K\ ]_H"0'(##1T( .  8DP #O)Q,,\ ;O
MEBGC1P!$0&S @!@F.'\G41TG<" .8 (-: !"\'[Z-Q#8@@"I,3O (0\,D! R
M@0!LH !@(541X@^.YP">YQSP%Q9"T!D!8 I!I0"_(Q1G1@!MD![ Q0\1(@W&
M$0">9UILZ(9\$(=S.%PG]8>'%8BZ$ !B0(A&0P]=2'0.8 8.  +"!0VN0!^_
M0Q\Z&(E6-XF5"%ST@(F:>" *  8.D"\ X "8,88Z!0:>\AP*  NN8!AOX $B
M) ^62!^\4HN'T6?[\6?;QP]8Q1AI*(O&T8;;9PYQ6(==  RT%P"49WEBF%,$
M  :GN!AL4'F[6$):.!!J^'E)D'NJ4$9::'H$9GI@8 )4Y@_ET$OL0 V2 $P0
M  O81XGM^(X4(H\S) 10( 7$X0^12%G^T ;24'IF> !:@P#W%0 P8'K[* FP
M) WF(650<'E8@ 2S@ QF8 \P@ (!Y ,?L"TID 34X @IH 34H @I\ 748 A.
MT 0BP 8G20(TJ0BO\9(J4I(GF9(KV9(ZZ00S69,WF9,P60<\B9(JR9(N"9-!
M,)2.8),K:91U4R(T  +8!P&E @BP@"D*0(G&T0 I]0_&T!I8B152D(D(H)5(
M8%Y]1EW_X JMH8H,, 4)P0"J8P:R4Y6P(Q+8EY98P99NB3]0TVB/0)=V61FK
MPPW4!P9^B99J*9@_0US_( 5S^1QU>9=YR9CG* ]"4B371Q\DL 04(@!JT )(
MH%]=:'A8808C]1P.H'W_X%6/T ,)X0#JF"E,T(6"\ ^M^9JK*)M@D!NVN8JY
M&0#5Y :"X ^_>8:RB1NU>9O'"0$ML 3_H _I:(: IPO^H 7VMSH#80H10@D0
M( %MV97T@32&  (*T(O7B9X \ 8VT9X 4(OZ(#!S* ]/I0]/)0^>)XS^,(AY
MP@#3*#"T^ _R@!F9@PI&4GG1$)!/90_(AE+!.&O<:018-8TJ) #@IS1T )"F
M)P6*P)YSJ ]@,!<C2I^+8(^K>&ID  9&L0 V )O&($7@,3(D,)_N>9_ D)_[
MV9__::']X&P#6J# <* )VH(0T*#"\*#HN(UJ!%S^8'#I8C4I,%B<8#3JL$ P
M @Y#('P0( )YHE,RD"< (*;94:;E5J:&AZ9D:J9N2@!J>J9C*J?\$  "P*9T
MFJ;\8'5Q.J=_>J=YR@]M6J=E:G72P \%@ >78G76\!!UT  E% 9M4 8@\ 9F
M  )FD 9L8*ET\ 8@( :62@9E, 9O0*IDH -8!P"26@5N$ 9BT*D@\*F7"@=E
MX :SB@9A0 >:RJEE$ *2RJHE] :\&@8@8 >WD@9D  )#\ 9M  =R4 9S, =E
ML*Q3, ;1>JN]VJG J@#"2@6ZRJN;*JLRIZEO( =8QP1/< 4 T 1%0 1)4 5-
MX"U)< 1(,! @$*US\ 9L4 =T0'-NT*T#002E>JJ6&@9ND =W$ 9Y\ ,@@ )Y
M\ )ND )8)ZD$:ZIDD ;^Y0)N%G4*4 1R( ?GFJ]E$ 89ZU_;^JO!*JE#@ :E
MN@9S4 =M  )D\ ;2Z@8G(*YI0 <"*ZE0H*]S  ((FP<@L 9E0+2T2JV6"@=I
M, 9T4 ?1R@+!R@:[6@;H"JW2&K1#6[1'.ZN@&JU/*P=NX +!*JP_J[&\2JH8
M6ZT@P+1."[5EX+ 0*[$4*ZQ3$ 9V,*H%BZIMV[1AZZF@FK%SL 9R&[$3NZH6
M6P1'$ 13<*GHZ@0M8 5), 5)\ 1.8*YRT :[^K!D0+>JZK%.0*F6BJDIZ[6A
M:JEW( <[2P>W^KG"^@1Y*P>IN[.66@9X('/_BK+C&K</:[AUVZJO&JN 6ZO:
M2@?AFK(]^[$A.[*SF[MG@+PKJP!&X*L@T+RLBZLQ.P9C(*UF4 =LP 9Y0+;>
K:K%[>[!N0*PNBZZ[6[ATBW5#8+DZ,!!!4 58$+\,) 548+_!"@E5UW,:    
 
end

nfrech@ALMSA-1.ARPA ("Norman R. Frech") (06/16/88)

Could someone please provide me with some information on barrel.prg and
possibly e-mail me a copy?

Thanks,

Norm Frech  <nfrech@almsa-1.arpa>

************************************************************************* 
"Verbatim regurgitation is against my principles" - Neal, The Young Ones.
*************************************************************************