[comp.binaries.atari.st] v15i001: dcadump -- Dump screen to printer as ASCII text

koreth@twitterpater.eng.sun.com (Steven Grimm) (06/05/91)

Submitted-by: uace0@menudo.uh.edu (Michael B. Vederman)
Posting-number: Volume 15, Issue 1
Archive-name: dcadump

DC ASCII Dump is another Program of the Week by Double Click Software.
DC ASCII Dump will dump a TOS or GEM screen to a file or printer as TEXT!

100% assembly.  ST, STe and TT compatible.

Michael B. Vederman / Double Click Software

table
 !"#$%&'()*+,-./0123456789:;<=>?
@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_
begin 644 dcadump.arc
M&@AD8V%D=6UP+F1O8P  ^@T  *\6!5/?ZBD:   ,*B -  %B")HR8]: >%.'z
M#@@Z!T&$<>.&H9LQ9=J4<>-P(AD0<^ @3!.&S4(S9LK(6>@&!)$A(*:@>7-'y
M)0@Q9=C0!!%P0 ,%/U^""#)E2)(D+NNT@0/"3@P7,'[^'/(&3AXY:<Z@<8ABx
M3 H0,7+DB.&2H1@V90JR29,PYALS=.Z$D5-&J@(H<MZ<D1.FS<T\():420,1w
MQ!&59,K,D>CF8Q.V:,+D!"'$!0@K91++:3/1KE"B1I$24<K4*500:1:' 6%$v
M2I$B5X*X!@$G[]Z^EH>R=@U;=A':MOGZ3<TR[1TTD$'D80B"<YZ?9NCF!$PFu
M-1VL8AJ687&SH7+F8R96=#@FLIPS:<V\64EXX<J2=&Q"3%M;KW#W/\>\X;B1t
MSN*W#T5$QAMC*-5?&'2DL1]J+4T$&&<4J90;$6:AI19;"DWQ5EQSI447'6&Ds
MX<8</Y5DDGY68:650V7@,08;=<R1AAT>9K758BUB! >++L(H(XT@5#?'=6EDr
ME^!^+MC5 R1.> 83:$<EM11P(OH78%KQX>'0'&5LQ-*5((TA74MTO '"8/.]q
M1R5_*ZTG$0AFI('63\?)F9:(9Q)VT$I4/#&%>X85T41S;R26)% *)-%2GW^Vp
M4>AVJ-%QPF(BE.3HD P..5$9#,TA@D0.Q7E&'5BY<<9"WLW75!IER'46EBW2o
M<>A/B@8ZJ*.)<4?8I"!4"L):=-!A85YU:-6=0S&&\:H+GU(144EGK*>G7W<Pn
MQ,9';G1)1HF_ON$0@'"\L=8<R)G*V$?SD?F&F6W441X(^BW5$((*DIF&1@^9m
M.>";U]51EP)TU:;8@4>ZT<*Q(!R4APL"$92$&=_5(1%=#,9'UY"9,?AF### l
M4 )M*J4TAD-9TO$3&:2=].81@H8Y)G?+28Q3L#:AA>QB:U1TQZP*+-DDHC\Mk
MF<%4^XE*JHBG?E94E*,M%30D0R.J=&A2,A798G&9"1'26)NIGQM&TZ6#76%\j
M=<6>6)HY1QA SB%FERVAO-1BQWDI-QQ(YPNGG3^)\142.Y499,JJNCTF" ?'i
M::&;M56IDET^4.%UT5F1:AS:+CVYM&@IKTWC8HHK-K8"+4#"<PQ?25%'2R\%h
M040534!AA M02'%$;D$TB)8<#HGQ!AX@W"&G26' (=)</,OPU1!KM;6@JD,\g
MX80121QQ;)ENY.9L>G:"E!-"9:XD/!O$&U\&\G;-L/Q,;W )9G5TC;P>8(+?f
MO3=:7>?V<,3P-J_0@D]8 G=4!3_PS>\G(! (<3R7,3&$H2V"4U5];M,&_4$Le
M9OW#T)>&,!&,L&& $1&1>E"S&"<\@0H(% @#T:6UB$Q0.#R+W.3 5CF*U2U-d
MF1O*YJHVN+GI+72 DF"I+#:ZT@7!+J@#@10VTI>TM.YUL9M=[:PGN"?"#@H_c
MH)WM[)+  =2-8C\@X>@2:  C$$1P#*$#'%)E)B >3%5 ')])< (2MF4L@@)*b
M0_S"!YB8I3 !7PM;QI3U!AIQ)T9Y4Y4;FJ@#'0[A"U"$@@OPP)TOI@5XQ E"a
M"[200@- X8QF2N,:26:FQK')+D_# *U&!"+RY6UJ3"--*B$GN4RUTB1"D8*-z
M'/*2(D)"E8A*(A38\$ G#L%U5Y2B[306LY7XSEMU8(J0%!*$*O0)3N+23/)2y
M5X9GDBPB\1JEA B2!>;(T7MI68U&YK V]+"D!8:#&PC&DP8SY"%O?E1 %R&"x
MH!Q"B7-3(HZ(-$6^S!RJBRD<P,'<U (DIFYUF4-F%+5X.X+D3B*[Z]WO@C<\w
MB9@/?8A2WH6<1Z:(),$)4Z!"$)C A.LAB9SF["B7TMD<Q;0S+?N!Y]N\1$][v
M(BVA&.0G+S5'M:8Q1:"L-)%!4=DS2$S@)U60D;E@"5 X/.VIB)*A1$8V(P09u
MTY&Q7(HO-_ 3%7P%+S8% 0^BYP0J2.$)3/#!"GBP4BH400I."()=Y<H#)!2!t
M"5#P 6HNR)P.:6PUC *.??H"J!-, 0E/N +23I#0DO',K"! *SO5RE:WPI6Os
M=;UK7O<Z5RE4#PE4B D2DF $*O#5KX 5;#WY9U@\K89E34CH"QGKIGX24#%Kr
M*!,<>&9"NS:REG,0'AW>I2I1>B<Z;_"+$!VW$L&M!HCJJ6YD''(W[JPGH79@q
M2QE:0",YK(T[,EH*&P CL,VJB@=,*$)K5<M:UW*T,*HB))#64 ; Q$L,(J+7p
M?N; LZ=%C:H\9,*]""/@$1DX*$0-*U/.:3\3/216P"F#R(0%&.CZ!;%^4BP%o
M7Q#/C? ,P49M3A@ $QD@U>=5;5A,_/3BAC3H(6_EF<L#+;88V]I*Q,)AP4\4n
M(Y(QD(1\],,PGHR$O?^L!"-LREAU2J*7F_Q.,=I#SF*NIK=]*1<-/U&57 "#m
MXI3!82Y<PEI$2MP2%,RV/=4A@QM.0 >8@<=:'Z&C7 CS4P6LY@OES<,7NF6Nl
M!.$KN^\C30H*W%0(_,0)L D!02!]!4F#@-(A>)JC$14$.X2(F*^:)TTRC:C]k
M85 G-/J(4!X;V210P<YU. 'YN@6D54/V"G<E]4^<)=#%L/H**CX#6RS]:Q"<j
MP E5,(*N%;#JF=1D)0$C)D;4G!;<!@FXPE5M9%F3A/C":75<7="701!-O7&)i
M1FZ <$R<;1-<U0%_ >JGS?@7WE9=6$OW4PQW +Q(.7383G/@3@QN$*1ZIH0Nh
M'/D)WD9F.6QN!D$!/Q<(4% &=)])2WP9V5=D,P3N,$$+2.".%I+P28^ 0 M/g
M>,+$RC,C+-LEJEB*B%"@H,'$S$$A#YSV'.:GMWK?(=\];I ; &/MW5;0+D^0f
MPR'=UVR:V*2 (ULOG/+BERHDX4\S<,$,)IY>.$B=#'PYU76[A\>T\""P?6L(e
M]C1F=:QK7>(OTN""?KUHI"N=?^%IR4!OF4.9./T]U!Z*7?&JUR18X3?%QI,3d
M.$4$X((@ZU%1 *(K[B5'42Q<SUZV$=XM]7#2*]3CMG!*N9/2=#8&!%1(;3BUc
M8][<<,QC$F%G1LZ2AV4;!"'_2U5$@M XDX1E+#%)K:*RJY'W\(XMBV,=3/R>b
M^5TKC-9WHL.RG^ &J9- !CEP00YJ8.D@W#QB*TE,26R"Z-6@J/9<A$0'5@ )a
M!J2P U. 0A&,LE*7%&&E[V>_^Q%UF*&N^^\.!Q8OL'5O 3&J\B&?1B48L6S>z
M]R8A,1(E<1-S<08AX@:P!B\3D3!VU'?LMA*(MA_6%Q;:5P,35P53D ++-@7Wy
MXG6 P26G%R-O,DWWA09O<GXJTW3*U11/ 0. 8AID87(D((+;MVPH$ 9D\!$Dx
M, ,H8()?X28D4 ,HD%V#<09N\!7DD@;&@S0O$!F-L1:FPAU4@ 4@<#%ID!@<w
MH1I'" (XX (R4 ,? R)XD )VP6O_@1(VL1%DL!A*L#II$0,")Q9/81=-\&G<v
M$3U$P!U6<'5!('%- !/KH1ETDQ/Q4@8\LR0-\!-"4 59P!V9N(F4H8E/<XD*u
M@ 0;B$%K) <YQB7H(G,P001%, 5+T">?Y"9"84W=YFI)\(I-H1(RLB R !4_t
M(!!VL3_C<8%.!WY<P@8&Z$)H$09ST'  @DCFPA K\8PB(0=B &1]06!V(0+;s
MXSY&IQH4$P8I91'582HA\"D'(Q@M(01&J!+^41XJP1UZ)1M(015R,%P/41)Kr
MT&<)- *$I'M?98M,@(NZ: >_&'D_X8VL:'^P*(LD]";7""']01MS\2T0TP8Mq
MF <8TP;IF% '(P4+P@1UL 819P3F:!, 0A7RPB5R0".\HH*G$@0@@A5VP4&Sp
M!H-H) >:X5V IQ#-U"WA81((:"=RP&A+L@ _T01/,!LG!0761&I)22N$)3%Ko
MP5\!0AQ&QQU[<3[29Q="D!;/2#&",V\PF#,[<1S]5(;GXV3P$ET:<8;\TV+In
MY#O>08T@L2%R01>'<@7I-(YL,&:JX09XH" Z:28',1?!LUV,L1S9HH%=4T?Hm
MARCE)#%Y-X;G\RXP:"GMPR*!9DG+MB0'@(F ,8AR\C2CR6P5DA;,HT$: A=[l
M^2]0H')"\ 1B> ,T$ ,R  ,V\!. $R/8 X:W>0,R@)M* @D(0)J9-1/9\C3)k
MJ9IU$&JMV1:OR2$4 P*-A (W$ /JDP,W< ,M8 ,UL)O':0 _07U>^"]+8IX*j
MP#(UEA:0< "-Y!)/4 5"$%\M, 0%.01+,'''1 5E$"W^]G@P((<*P))K- 4Ji
M 23821 W4 ,ST#$L4 /?F4 $@ )'H'+U:%J8T1C<T2&KP9T&"G/9XA"08 #Sh
M60?%! - $)=U," N4 =HX *940?J)@1"\"<G.I_:*:(Y0 ,TT (PP#$XP%0^g
MXWQ:&1R,M4#1Y'6L\A%XHBHXL18:%F\.T1Y5H1)>I1J+\8!&%B>9(60*D"UZf
M8A,4$IT6,IT9HI>&A0*JXGE#]Q45H5WIU! S85X@$1FS-AXWD19KH2QSH@"Ve
M-73PHD<%$F,@<A&7 W%O0'D>V%N$"G7?PAZ-H4?@TRV;Y29DT!=AX$YEHG!Yd
M<8UT !@B4B!R0!<?X2;/:(>H^A=@4B!#$ETJ^1Z$ZBU[ C+FM2#.^"87\VXFc
MHP  XB!P$@:^"BB)L6$:HRK14BANZ9+A-6T@T:14FF?T T[1=69#5R*GAR<5b
M4:BHJ!2:HJA=JJ<F\:;7*JQT]*>AUJD5B"E?PR5QX"\<<60GPZGNY"8ZD:D0a
M4Q]Q8B4H<$.WZB9\*D'M(R, !BS5JA*< C%R02(*P"5GQA?Q(75&&%ZJJ#=8z
M"FUMN1^ VF'K,5. 6@9?,1>ID3<>!B8Q@E-RH' ALQX0@A$J\XSOLJQY""C.y
M*E[<V%0_ QH(9&-A9'5M<&8N<')G , &  "Q%F)O.CT "   #& T  !@ ,/ x
M *8&%C (:4& @6 &&B(R) P9 @( 0/(348 D+$*D!*%H$4D9-G! Z!%@!\X!w
M8! F !LHH!XP'?_ F#&@\I\Y)]"0X($ X </ $B<!.'R:,1,  ,HN!'@I,Z+v
MHD>3(-!!<\25?#3MG1$ 2@$$' 28P-(A8,(9!S)IW@L#(( E"&P'B%A)@<\#u
M6$<%G&$ & "!,P;V!O#'YP (/ 2<L%@)P(>. .94)#&1A 02%$(!X+AL30?It
M*452@E!BPT!<  +PB5A"PX"$"+(@F+'"($]=FOK.<)"% K89([UA Q],W+ 9s
M&\T-F($Q)-W#:,2B+/O'3,)E0&;0%!9Q1D+A$X,+NT!<.(09**]C@['A/8"6r
M,P1:@V%1&(09" SDH!QL]YC! 2V!C6'!:G( ((,!DH04A##$1!-,:[-%H<P_q
M*2DAQ2)2  $+'P#\408 _WB!5P 8<  , @4,9 8!U.@3@ 52*&)"$U$T\X\.p
M<   @P$A D-,-L"0P$1*L)AP!C]2.,(!/P T,"4 "D3QS#\4N.! $/KT P]>o
M %CC'0#3"*-#/^.,900 2@#PGU$ 1* 4%8\H <@9/( )@"E"G/$" G3RH!04n
M>0*R!@H_8%79"USQXLDE+QS0*)U */7$.P PH!06CX# %2KX@0"$%! HQ129m
M>)A!5@)5J00 'T'"4)P ,SPE #\R0#!#,, !$DRN PT 0)"RD!C &0K (4"Rl
ML(T%AP'$0B6 'Y6A\ \_<D! Y@N%"89 88<)( <"C@0SQ2$S'$.3/U5!(843k
M7 4QQ1!?$%%%$U"X$(1&*8#PAF%/Z), +4/@\] TZ'3*,  4/,S!"PD,BH1Oj
M<0*@*:<,! HF2W0)8 :8 R  1P!T!0#.&5:0?,F(L(DQD#EE(($7 6*8H4#(i
M!A@A(  ',/-Q,'0!  Z8_" RA#X$X) R%5=]C$K1RBCQB1FT%"W-S2N<H0K)h
M*YR<LB)@>$+R/T5CPBS)[13MB!D6T/G"G:$"P4!Q;Y;P%4WT@ + ",@42P 6g
MB8"0!0AH ,!$$ V# 'BQ"( 0!>**,PZ XX%#Q0"=D3F!9WQS >"/'&#N(X\2f
M&)C!#P,@ ,"%&?I(H;0^_@0#03:J5X'(XU!A &8 6==EAU $<$!G#!^#$X8$e
M2@4Z*)U.')IH5<\?E4!92H&2 %/Q@@7T,G0*@(0> W!#9P_2NP# &E2,/P Jd
M3> #  DO./"#I4?]L'&GO0 S'<FJ6-H^L# +1)B!! 4T PC&MX_VX0$ @+@?c
MIO;'@"#(#Q"P0(05O'< \.&O,I]Z1%6*H(\!"($$R% !$DB0"(K]C@A%XX((b
MO@"'?\A !P/PP!EP\((&0* "!!A($"YU% >$4 D=4!T#2N ZV FA!76ATPY4a
M]0@I-$(#5%(!%@'@@BVJ0 @5J,K2!, +&0!BC.00 2+\!(^B1:8.01JC'R" z
M 1G I(YWM",=[2B$*(C@* 3!  R.@@PG" $&;!%%59:@#P%X(U!(: -LZ'0$y
MZ=$I W33 2^"H(-H5  .<D B8J* C'_HHRI3N"*5N/"Q V@ &ZJC'J&.8H+Hx
M<0^.08 &9(SPF@.D DSZ\($2=(,!","$2CJ P"J5"0 5,-,%S/QBJNKP& +(w
M0P2)(P$#T/ 0XQ @80[8P B242P(C  ?!<@() 9 B1!0:9V82&=5!G( 9] 3v
M&_2DQT 00(%]BF"?+M "; 1 @P"L<P-%  !"B9 &.91A#'1X@QSR  (XA($.u
M: !!1$% ACJT(241;=068-"%+5 $!/8:0A*2  (B>#0E=HB!"V# !S%0= EEt
M2 -&07"$,LB!#&68 Q] 8 (0-"$-8T!#&$X" BN4 :AR:$,8W,"'(;P!#GF0s
M0QK.@ 8Z@* 7((A!#G(0 SX0X0UU$ ,;R@""(; !J6L P13>8 8ZW"$,#@5!r
M29/@ACG0(0QL8$-5W^ &,VR5#T7 @TZ[ ( MQ*"D($"L'.0@48&Y 01S"(,=q
MRN""=>IU"R"H0D:?D%'&-D !&X"#"GS0TB&@= YC<.E'01#3F8* !RK80!Q.p
MNUH0@, )3Z "")+@A"E0(0A,8$(1B.!;W)ZV2JA5+6M/&@38RA:F,H7!;7,;o
M!Q! @;)GD$,8VB P!6*4K5<H0QG6<%J;@@"G.LUH3W\:5*(:%:E*9:H07-#4n
MI_I4JFXXK56QJE6N>A6L8B5K2]&J5K:Z%:YRI:M=\5J&YW*2E56@PA.X0)&1m
M[ L*/W"!O(Z@$0*(P@,6H  3)  !'FB ' A   9(8 DQ((#%#B"!#[R "3#Pl
+  $&0  !(!$C&@"(k
 j
end