Article 343 of comp.binaries.cbm:
Xref: undergrad.math.uwaterloo.ca comp.binaries.cbm:343
Path: undergrad.math.uwaterloo.ca!watserv3.uwaterloo.ca!torn!newsfeed.internetmci.com!info.ucla.edu!agate!darkstar.UCSC.EDU!cats.ucsc.edu!hermit
From: hermit@cats.ucsc.edu (William R. Ward)
Newsgroups: comp.binaries.cbm
Subject: Display 80 Characters on C64 (Part 1/1)
Date: 27 May 1996 09:21:00 GMT
Organization: http://www.mds.mdh.se/~dat95pkn
Lines: 203
Approved: thoot@starbase.neosoft.com (comp.binaries.cbm)
Message-ID: <4obs5s$gi6@darkstar.UCSC.EDU>
NNTP-Posting-Host: ese.ucsc.edu
Warning: Poster tried to forge this article as  Peter.T.Karlsson@abc.se (Peter Karlsson)


Programs discussed earlier in comp.sys.cbm, giving 80 column output on
a C64. International version (original, I don't know who wrote it), and
a Swedish/Finnish version.  The Swedish version was patched by Peter
Karlsson <m9944@abc.se>.

begin 600 80char.t64
M0S8T('1A<&4@:6UA9V4@9FEL90                   0(  @   #@P($-(
M05)!0U1%4E,@4$52($Q)3D4@( &" 0AL&   @          X,"!414-+14X@
M(" @(" @ 8(!"' 8  #K$        %-6+B X,"!414-+14X@(" ;"/X!34^R
M,C X.E16LC$Y,#J7-C0V+%16 "H(OP>>(#(Q,# @3U1$    ZNKJZNKJZNIX
MH&"I"(0BA2.@ *G(A &$)(4EL2*1),C0^>8CYB6E)<G8D.^I-X4!6$P R" &
MR&P H"!DR:D A=2%V" <RJD[C1'0J6B-&-"ID(T W2#\R7BI,8T4 ZG.C14#
MJ>:-) .IS(TE ZE5C28#J<B-)P.I (WRSZV& HT@T(TAT%A@ZNI(I9K) _ #
M3-7Q:$B%UXI(F$BEUR!TR&BH:*IH&%A@JBE@\!J*((3F($C,&&7'KH8"((3.
M(-K)I=CP L;88. -\"O@C? GI=CP">"4\!_&V$RPR. 4\!:EU/ 2BA #..E 
M"8"NA@(@A,X@VLE@BA #..G@"JJ]V<B-+@.]VLB-+P-L+@/7RM?*U\K7RM?*
M6<G7RM?*7LEDR=?*U\K7RFK)>,G7RM?*@<F5R9K)I\G7RM?*U\K7RM?*U\K7
MRM7)VLGJR>_)U\KTR=?*U\K7RM?*U\K7RM?*U\K7RM?*U\KYR?S)U\H%R@K*
M%\H<RF3*E<J:RI_*I,JIRJ[*L\JXRKW*S<K2RJD!3-C*J8"-D0)@J0"-D0)@
MJ0"%TX78A=0@%\I,@<FM&- ) HT8T&#FUJ76R1G0!<;6(+O.(%3+(.O*8*F 
MA<=@J0"%TX76(%3+(.O*8*73T -,O<I(I-.NA@*QT<;3((3.YM/FTZ73R5#0
MZL;3J2"NA@(@A,YHA=/&TV"I DS8RN;3I=/)4- 'J0"%TR"!R6"I!4S8RJD&
M3-C*J0A,V,I,:LFM&- I_8T8T&"I $S8RJ76\ +&UB!4RR#KRF"I (7'8*D8
MA=8@E\[&UA#Y3)K)(%3+H$^I()'1B!#[(.O*H">MA@*1\X@0^ZDHA=,@+\N@
MH*D B)'=T/NI (73("_+H*"I (B1W=#[8*!/L=')(- HI=.-\,^I3X73I-/,
M\,_P#HBNA@*QT2"$SL;33'7*J2"NA@(@A,[FV&"I"4S8RJD*3-C*J0M,V,JI
M#$S8RJD-3-C*J0Y,V,JI#TS8RJD$3-C*QM,0"Z76\ 4@"LJI3X738*D'3-C*
MJ0-,V,I@"@H*"HV& JWOSRD/#88"C88"8*76"JJ]_<J%\[W^RAAIV(7T8   
M* !0 '@ H #( /  & %  6@!D &X > !" (P E@"@ *H M "^ (@ T@#< .8
M \ #I=8*JJ73*?X8?6;+A=V]9\MI (7>!MTFW@;=)MZIX!AEWH7>8*76"JJ]
M9LN%T;UGRQAIP(728   4 "@ /  0 &0 > !, *  M "( -P \ #$ 1@!+ $
M  50!: %\ 5 !I &X 8P!X 'I-.,\,^QT2"HSJV- BD$\ F@ .K*T/R(T/F@
M4*G A-&%TJ  A.&%XK'1D>'(T/GFTN;BI=+)R)#OH$"IX83=A=Z@ *G@A.&%
MXK'=D>'(T/GFWN;BI>+)_I#OH"BIV(3SA?2@ (3AA>*Q\Y'AR-#YYO3FXJ7B
MR=N0[[DGVYG_VLC P)#UJ1B%UB JRJWPSX73J02%S6#JZNKJZNKJZNKJZNKJ
MZNKJZNKJZNKJZNKJZNK)_] "J7Y(*>"B!=UDS/ %RA#XH@!H*1\=:LQ@X,"@
M8$ @8$!@0  @AM<@><P@W<Q@I-.1T:  C///R0 0!Z#_C///*7^L]<_P @F 
MA=^I&H7@!M\FX ;?)N &WR;@("_+I=,I = 7H >QW2D/D=VQWTWSSRGP$=V1
MW8@0[&"@!['=*?"1W;'?3?//*0\1W9'=B!#L8*732JBEUY'S8*69T NETX7*
MI=:%R4QHS<D#T F%T*75A<A,:,U,<_$@=,BEQH7,\/IXI<_P$*D A<^I H7-
MKH<"I<X@A,X@M.7)@] 0H@EXAL:]YNR==@+*T/?PSLD-T,>@3X30L=')(- #
MB-#WR(3(H "$TX34I<DP&*;6Y,G0$J7*A=/%R) *L"N82(I(I=#PF*33L=&%
MURD_!M<DUQ ""8"0!*;4T 1P @E YM,@A.;$R- 7J0"%T*D-IIG@ _ &IIK@
M _ #('3(J0V%UVBJ:*A,S,[J(.K_K2'0C>_/I0%(J0"% :7,T"K&S= FJ1Z%
MS:331L^NAP*QT; 2YL^%SJ732JBQ\XV' JZ& J7.28 @A,ZM[\\I#\WTS_ [
MC?3/I=9(J1B%UB#KRJ GL?,I\ WTSY'SB!#TQM80ZZV& BGP#?3/C88"K8<"
M*? -],],ULY,M,U,M\UHA0&M&- I LWUS_ ]C?7/I=-(I=9(()K)I-.QT2E_
MR2#P"= "D 6QT2"HSJ73R4_0!J76R1CP!B#:R4Q0SFB%UFB%TR!4RR#KRDQA
MZ@AXJ*4!2*D A0&8('#,:(4!*& (>*4!2*D A0$@*LIHA0$H8 AXJ*4!2*D 
MA0&8('G,:(4!*& (>*4!2*D A0$@F,MHA0$H8*77R=[0 JG_&&"-AP)HA=8@
MZ\I,-\[JZNKJZNKJZNKJZNKJZNKJZNKJZNKJZNKJZNKJZNI-3T1)1DE%1"!&
M3U(@(" @("!#4"]-(" @("!"62 @($]41"\X,S$PZNKJZNKJZNKJZNKJZNKJ
MZNKJZNKJZNKJZNKJZNKJZNKJZNKJZNKJZNKJZNKJZNKJZNKJZNKJZNKJZNKJ
MZNKJZNKJZNKJZNKJZNKJZNKJZNKJZNKJZNKJZNKJZNKJZNKJZNKJZNKJZNKJ
MZNKJZNKJZNKJZNKJZNKJZNKJZNKJZNKJZNKJZNKJZNKJZNKJZNKJZNKJZNKJ
MZNKJZNKJZNKJZNKJZNKJZNKJZNKJZNKJZNKJZNKJZNKJZNKJZNKJZNKJZNKJ
MZNKJZO#JZ@#_  #JZNKJZNKJZNKJ ")5=W=$,P  (E5W5555  !F5695568 
M ")51$15(@  9E55555F  !W1'=$1'<  '=$9D1$1   (E5$=U4B  !557=5
M554  '<B(B(B=P  =Q$1$54B  !$569$9E4  $1$1$1$=P  57=55555  !F
M5555554  '=55555=P  9E559D1$   B5555(A$  &95569550  ,T0B$54B
M  !W(B(B(B(  %555555=P  5555554B  !55555=U4  %55(B)550  5555
M(B(B  !W$2(B1'<  &9$1$1$9@  ,R)W(B)W   S$1$1$3,  ")W(B(B(@  
M ")$=T0B             "(B(B( (@  554       !5=U5W554  #-F(C-W
M(@  51$B(D15   B554B57<  !$B        (D1$1$0B   B$1$1$2(     
M52)5     "(B=R(B        (D0      '<            B   1$2(B1$0 
M ")55555(@  (F8B(B)W   B51$B1'<  &81(A$19@  5555=Q$1  !W1"(1
M52(  #-$9E55(@  =U41(B(B   B52)552(  ")553,19@     B "(     
M "( (D0  !$B1$0B$0    !W '<   !$(A$1(D0  ")5$2( (@      _P  
M     ")W=R( 1$1$1$1$1$0   #_        _P       /\             
M /\  $1$1$1$1$1$(B(B(B(B(B(     S"(B(B(B(B(1    (B(B(LP   "(
MB(B(B(B(_XB(1$0B(A$1$1$B(D1$B(C_B(B(B(B(B/\1$1$1$1$1   B=W=W
M(@        #_     %5W=R( B(B(B(B(B(@     $2(B(IF99F9F9IF9   B
M5555(@     B52(B !$1$1$1$1$1   B(G<B(@ B(B(B_R(B(HA$B$2(1(A$
M(B(B(B(B(B(   "(=U55 /]W=S,S$1$           #,S,S,S,S,S     #_
M_____P                  _XB(B(B(B(B(JE6J5:I5JE41$1$1$1$1$0  
M  "J5:I5_^[NS,R(B  1$1$1$1$1$2(B(B(S(B(B     #,S,S,B(B(B,P  
M      #N(B(B        __\     ,R(B(B(B(B+_         /\B(B(B(B(B
M[B(B(HB(B(B(B(B(S,S,S,S,S,PS,S,S,S,S,___        ____        
M     /___Q$1$1$1$1'_     ,S,S,PS,S,S     "(B(B+N    S,S,S   
M  #,S,S,,S,S,P B57=W1#,   !F$3-5,P  1$1F555F    (E5$52(  !$1
M,U55,P   ")5=T0B   B1&9$1$0    S554S$68 1$1F5555   B &8B(G< 
M !$ ,Q$152( 1$159F95  !F(B(B(G<   !5=U5550   &955555    (E55
M52(   !F555F1$0  #-553,1$0  9E5$1$0    S1"(19@  1&9$1%4B    
M555553,   !55555(@   %5557=5    554B554   !5554S$68  '<1(D1W
M  !F1$1$1&8  #,B=R(B=P  ,Q$1$1$S   B=R(B(B(    B1'=$(@      
M       B(B(B "(  %55        57=5=U55   S9B(S=R(  %41(B)$50  
M(E55(E5W   1(@       ")$1$1$(@  (A$1$1$B     %4B50     B(G<B
M(@       ")$      !W            (@  $1$B(D1$   B555552(  ")F
M(B(B=P  (E41(D1W  !F$2(1$68  %5557<1$0  =T0B$54B   S1&9552( 
M '=5$2(B(@  (E4B554B   B554S$68     (@ B       B ")$   1(D1$
M(A$     =P!W    1"(1$2)$   B51$B "(      /\     (E5W5555  !F
M5695568  ")51$15(@  9E55555F  !W1'=$1'<  '=$9D1$1   (E5$=U4B
M  !557=5554  '<B(B(B=P  =Q$1$54B  !$569$9E4  $1$1$1$=P  57=5
M5555  !F5555554  '=55555=P  9E559D1$   B5555(A$  &95569550  
M,T0B$54B  !W(B(B(B(  %555555=P  5555554B  !55555=U4  %55(B)5
M50  5555(B(B  !W$2(B1'< (B(B(O\B(B*(1(A$B$2(1"(B(B(B(B(B5:I5
MJE6J5:HSF<QF,YG,9@          S,S,S,S,S,P     ______\         
M         /^(B(B(B(B(B*I5JE6J5:I5$1$1$1$1$1$     JE6J5<R9,V;,
MF3-F$1$1$1$1$1$B(B(B,R(B(@     S,S,S(B(B(C,         [B(B(@  
M     /__     #,B(B(B(B(B_P        #_(B(B(B(B(NXB(B*(B(B(B(B(
MB,S,S,S,S,S,,S,S,S,S,S/__P       /___P            #___\     
M$:I$      #,S,S,,S,S,P     B(B(B[@   ,S,S,P     S,S,S#,S,S,@
M1?^J+W.B    R@@;"/X!34^R,C X.E16LC$Y,#J7-C0V+%16 "H(OP>>(#(Q
M,# @3U1$    ZNKJZNKJZNIXH&"I"(0BA2.@ *G(A &$)(4EL2*1),C0^>8C
MYB6E)<G8D.^I-X4!6$P R" &R&P H"!DR:D A=2%V" <RJD[C1'0J6B-&-"I
MD(T W2#\R7BI,8T4 ZG.C14#J>:-) .IS(TE ZE5C28#J<B-)P.I (WRSZV&
M HT@T(TAT%A@ZNI(I9K) _ #3-7Q:$B%UXI(F$BEUR!TR&BH:*IH&%A@JBE@
M\!J*((3F($C,&&7'KH8"((3.(-K)I=CP L;88. -\"O@C? GI=CP">"4\!_&
MV$RPR. 4\!:EU/ 2BA #..E "8"NA@(@A,X@VLE@BA #..G@"JJ]V<B-+@.]
MVLB-+P-L+@/7RM?*U\K7RM?*6<G7RM?*7LEDR=?*U\K7RFK)>,G7RM?*@<F5
MR9K)I\G7RM?*U\K7RM?*U\K7RM7)VLGJR>_)U\KTR=?*U\K7RM?*U\K7RM?*
MU\K7RM?*U\KYR?S)U\H%R@K*%\H<RF3*E<J:RI_*I,JIRJ[*L\JXRKW*S<K2
MRJD!3-C*J8"-D0)@J0"-D0)@J0"%TX78A=0@%\I,@<FM&- ) HT8T&#FUJ76
MR1G0!<;6(+O.(%3+(.O*8*F A<=@J0"%TX76(%3+(.O*8*73T -,O<I(I-.N
MA@*QT<;3((3.YM/FTZ73R5#0ZL;3J2"NA@(@A,YHA=/&TV"I DS8RN;3I=/)
M4- 'J0"%TR"!R6"I!4S8RJD&3-C*J0A,V,I,:LFM&- I_8T8T&"I $S8RJ76
M\ +&UB!4RR#KRF"I (7'8*D8A=8@E\[&UA#Y3)K)(%3+H$^I()'1B!#[(.O*
MH">MA@*1\X@0^ZDHA=,@+\N@H*D B)'=T/NI (73("_+H*"I (B1W=#[8*!/
ML=')(- HI=.-\,^I3X73I-/,\,_P#HBNA@*QT2"$SL;33'7*J2"NA@(@A,[F
MV&"I"4S8RJD*3-C*J0M,V,JI#$S8RJD-3-C*J0Y,V,JI#TS8RJD$3-C*QM,0
M"Z76\ 4@"LJI3X738*D'3-C*J0-,V,I@"@H*"HV& JWOSRD/#88"C88"8*76
M"JJ]_<J%\[W^RAAIV(7T8   * !0 '@ H #( /  & %  6@!D &X > !" (P
M E@"@ *H M "^ (@ T@#< .8 \ #I=8*JJ73*?X8?6;+A=V]9\MI (7>!MTF
MW@;=)MZIX!AEWH7>8*76"JJ]9LN%T;UGRQAIP(728   4 "@ /  0 &0 > !
M, *  M "( -P \ #$ 1@!+ $  50!: %\ 5 !I &X 8P!X 'I-.,\,^QT2"H
MSJV- BD$\ F@ .K*T/R(T/F@4*G A-&%TJ  A.&%XK'1D>'(T/GFTN;BI=+)
MR)#OH$"IX83=A=Z@ *G@A.&%XK'=D>'(T/GFWN;BI>+)_I#OH"BIV(3SA?2@
M (3AA>*Q\Y'AR-#YYO3FXJ7BR=N0[[DGVYG_VLC P)#UJ1B%UB JRJWPSX73
MJ02%S6#JZNKJZNKJZNKJZNKJZNKJZNKJZNKJZNKJZNK)_] "J7Y(*>"B!=UD
MS/ %RA#XH@!H*1\=:LQ@X,"@8$ @8$!@0  @AM<@><P@W<Q@I-.1T:  C///
MR0 0!Z#_C///*7^L]<_P @F A=^I&H7@!M\FX ;?)N &WR;@("_+I=,I = 7
MH >QW2D/D=VQWTWSSRGP$=V1W8@0[&"@!['=*?"1W;'?3?//*0\1W9'=B!#L
M8*732JBEUY'S8*69T NETX7*I=:%R4QHS<D#T F%T*75A<A,:,U,<_$@=,BE
MQH7,\/IXI<_P$*D A<^I H7-KH<"I<X@A,X@M.7)@] 0H@EXAL:]YNR==@+*
MT/?PSLD-T,>@3X30L=')(- #B-#WR(3(H "$TX34I<DP&*;6Y,G0$J7*A=/%
MR) *L"N82(I(I=#PF*33L=&%URD_!M<DUQ ""8"0!*;4T 1P @E YM,@A.;$
MR- 7J0"%T*D-IIG@ _ &IIK@ _ #('3(J0V%UVBJ:*A,S,[J(.K_K2'0C>_/
MI0%(J0"% :7,T"K&S= FJ1Z%S:331L^NAP*QT; 2YL^%SJ732JBQ\XV' JZ&
M J7.28 @A,ZM[\\I#\WTS_ [C?3/I=9(J1B%UB#KRJ GL?,I\ WTSY'SB!#T
MQM80ZZV& BGP#?3/C88"K8<"*? -],],ULY,M,U,M\UHA0&M&- I LWUS_ ]
MC?7/I=-(I=9(()K)I-.QT2E_R2#P"= "D 6QT2"HSJ73R4_0!J76R1CP!B#:
MR4Q0SFB%UFB%TR!4RR#KRDQAZ@AXJ*4!2*D A0&8('#,:(4!*& (>*4!2*D 
MA0$@*LIHA0$H8 AXJ*4!2*D A0&8('G,:(4!*& (>*4!2*D A0$@F,MHA0$H
M8*77R=[0 JG_&&"-AP)HA=8@Z\I,-\[JZNKJZNKJZNKJZNKJZNKJZNKJZNKJ
MZNKJZNKJZNI-3T1)1DE%1"!&3U(@(" @("!#4"]-(" @("!"62 @($]41"\X
M,S$PZNKJZNKJZNKJZNKJZNKJZNKJZNKJZNKJZNKJZNKJZNKJZNKJZNKJZNKJ
MZNKJZNKJZNKJZNKJZNKJZNKJZNKJZNKJZNKJZNKJZNKJZNKJZNKJZNKJZNKJ
MZNKJZNKJZNKJZNKJZNKJZNKJZNKJZNKJZNKJZNKJZNKJZNKJZNKJZNKJZNKJ
MZNKJZNKJZNKJZNKJZNKJZNKJZNKJZNKJZNKJZNKJZNKJZNKJZNKJZNKJZNKJ
MZNKJZNKJZNKJZNKJZNKJZNKJZNKJZO#JZ@#_  #JZNKJZNKJZNKJ ")5=W=$
M,P  (E5W5555  !F5695568  ")51$15(@  9E55555F  !W1'=$1'<  '=$
M9D1$1   (E5$=U4B  !557=5554  '<B(B(B=P  =Q$1$54B  !$569$9E4 
M $1$1$1$=P  57=55555  !F5555554  '=55555=P  9E559D1$   B5555
M(A$  &95569550  ,T0B$54B  !W(B(B(B(  %555555=P  5555554B  !5
M5555=U4  %55(B)550  5555(B(B  !W$2(B1'<  %4B57=550  57=5555W
M   B52)5=U4  ")W(B(B(@   ")$=T0B             "(B(B( (@  554 
M      !5=U5W554  #-F(C-W(@  51$B(D15   B554B57<  !$B        
M(D1$1$0B   B$1$1$2(     52)5     "(B=R(B        (D0      '< 
M           B   1$2(B1$0  ")55555(@  (F8B(B)W   B51$B1'<  &81
M(A$19@  5555=Q$1  !W1"(152(  #-$9E55(@  =U41(B(B   B52)552( 
M ")553,19@     B "(      "( (D0  !$B1$0B$0    !W '<   !$(A$1
M(D0  ")5$2( (@      _P       ")W=R( 1$1$1$1$1$0   #_        
M_P       /\              /\  $1$1$1$1$1$(B(B(B(B(B(     S"(B
M(B(B(B(1    (B(B(LP   "(B(B(B(B(_XB(1$0B(A$1$1$B(D1$B(C_B(B(
MB(B(B/\1$1$1$1$1   B=W=W(@        #_     %5W=R( B(B(B(B(B(@ 
M    $2(B(IF99F9F9IF9   B5555(@     B52(B !$1$1$1$1$1   B(G<B
M(@ B(B(B_R(B(HA$B$2(1(A$(B(B(B(B(B(   "(=U55 /]W=S,S$1$     
M      #,S,S,S,S,S     #______P                  _XB(B(B(B(B(
MJE6J5:I5JE41$1$1$1$1$0    "J5:I5_^[NS,R(B  1$1$1$1$1$2(B(B(S
M(B(B     #,S,S,B(B(B,P        #N(B(B        __\     ,R(B(B(B
M(B+_         /\B(B(B(B(B[B(B(HB(B(B(B(B(S,S,S,S,S,PS,S,S,S,S
M,___        ____             /___Q$1$1$1$1'_     ,S,S,PS,S,S
M     "(B(B+N    S,S,S     #,S,S,,S,S,P B57=W1#,   !F$3-5,P  
M1$1F555F    (E5$52(  !$1,U55,P   ")5=T0B   B1&9$1$0    S554S
M$68 1$1F5555   B &8B(G<  !$ ,Q$152( 1$159F95  !F(B(B(G<   !5
M=U5550   &955555    (E5552(   !F555F1$0  #-553,1$0  9E5$1$0 
M   S1"(19@  1&9$1%4B    555553,   !55555(@   %5557=5    554B
M554   !5554S$68  '<1(D1W  !59A$S53,  %4B5555(@ B &81,U4S   B
M=R(B(B(    B1'=$(@             B(B(B "(  %55        57=5=U55
M   S9B(S=R(  %41(B)$50  (E55(E5W   1(@       ")$1$1$(@  (A$1
M$1$B     %4B50     B(G<B(@       ")$      !W            (@  
M$1$B(D1$   B555552(  ")F(B(B=P  (E41(D1W  !F$2(1$68  %5557<1
M$0  =T0B$54B   S1&9552(  '=5$2(B(@  (E4B554B   B554S$68     
M(@ B       B ")$   1(D1$(A$     =P!W    1"(1$2)$   B51$B "( 
M     /\     (E5W5555  !F5695568  ")51$15(@  9E55555F  !W1'=$
M1'<  '=$9D1$1   (E5$=U4B  !557=5554  '<B(B(B=P  =Q$1$54B  !$
M569$9E4  $1$1$1$=P  57=55555  !F5555554  '=55555=P  9E559D1$
M   B5555(A$  &95569550  ,T0B$54B  !W(B(B(B(  %555555=P  5555
M554B  !55555=U4  %55(B)550  5555(B(B  !W$2(B1'<  %4B57=550  
M57=5555W   B52)5=U4 5:I5JE6J5:HSF<QF,YG,9@          S,S,S,S,
MS,P     ______\                  /^(B(B(B(B(B*I5JE6J5:I5$1$1
M$1$1$1$     JE6J5<R9,V;,F3-F$1$1$1$1$1$B(B(B,R(B(@     S,S,S
M(B(B(C,         [B(B(@       /__     #,B(B(B(B(B_P        #_
M(B(B(B(B(NXB(B*(B(B(B(B(B,S,S,S,S,S,,S,S,S,S,S/__P       /__
M_P            #___\     $:I$      #,S,S,,S,S,P     B(B(B[@  
A ,S,S,P     S,S,S#,S,S,@1?^J+W.B    R@A,20  
 
end
-- 
William R Ward          Bay View Consulting   http://www.bayview.com/~hermit/
hermit@bayview.com     1803 Mission St. #339        voicemail +1 408/479-4072
hermit@cats.ucsc.edu  Santa Cruz CA 95060 USA           pager +1 408/458-8862