Path: utzoo!news-server.csri.toronto.edu!cs.utexas.edu!swrinde!zaphod.mps.ohio-state.edu!magnus.ircc.ohio-state.edu!news
From: fseipel@hpuxa.ircc.ohio-state.edu (Frank E. Seipel)
Newsgroups: comp.sys.atari.8bit
Subject: DETOKENIZE MAC/65
Message-ID: <1991Mar8.025625.29031@magnus.ircc.ohio-state.edu>
Date: 8 Mar 91 02:56:25 GMT
Sender: news@magnus.ircc.ohio-state.edu
Organization: The Ohio State University
Lines: 102
Originator: fseipel@hpuxa.ircc.ohio-state.edu
Nntp-Posting-Host: hpuxa.ircc.ohio-state.edu


 This one is a BASIC program to turn Mac/65 source code into ASCII
text. It is mostly of use to those who never purchased Mac/65 but have
other assemblers, such as SynAssembler and Atari's Macro Assembler.
Uuencoded. RUN at READY prompt.

----------------------cut here------------------------
begin 0666 DETM65.BAS
M     1P!'0%U ;D0SQ!44ZA41:A(15BH0:143TM%3J3!PLS)PU1/2T7. $$ 
M     0$ 00$ !@ ! 0!! @ ,$  ! ($#8 P! "@ @02(#+H!] $ !4 6    
M   &          <         "          )001#      I! 8,   #H QP<
M $U!0R\V-2!43TM%3B!#3TY615)415*;\@,?'P H0RD@,3DX-R!!3D%,3T<@
M0T]-4%5424Y'F_P#("  5U))5%1%3B!"62!#2$%23$53($)!0TA!3D2;!@0&
M!@";$ 0F)A2 .0Y! E4    L$H$Y#D$"50   "P2@CD.0!4     +!8:!!L;
M%(,[#D!      "P2A#L.004     +!8D!!<-# Y!%'     4%PP.019@    
M%BX$1PT-#D$0<    !00*!0T* \?4D5455).(&9O<B!D:7)E8W1O<GD@;W(@
M;F%M92!O9A1'* \-H,W!PZ^VM: @9FEL9146. 0B!P*#% X'@S0/ !L8# Y!
M%T     4(@H.01!P    %D($(" 7' Y  0     2#D $     !(.        
M$H,63 0=$"D<#D !     !*%%!TI' Y  0     2AA96!!L;!X4B#D$"5   
M "J%(H8;#D$1,    !9@!"4;* \3_4YO="!A($U!0R\V-2!&:6QE(10E"@Y!
M$'     6:@0=$"D<#D !     !*%%!TI' Y  0     2AA9T!"T&*!0M* \.
M1FEL92!L96YG=&@@/2 5A26&) Y! E8    E#D $     !9^!$<-#0Y!$5  
M   4$"@4-"@/'U)%5%523B!F;W(@9&ER96-T;W)Y(&]R(&YA;64@;V841R@/
M#:#/U=30U=2@(&9I;&45%H@$(@<"@Q0.!X,T#P ;& P.01=     %"(*#D$1
M4    !:2!" @%QP.0 (     $@Y "      2#@       !*#%IP$!@8 FZ8$
M%!0 4%)/0T534R!!($Q)3D6;L 0&!@";N@0-#0T.011     %L0$*A I' Y 
M 0     2A10=*1P.0 $     $H84*BD<#D !     !*'%LX$+1$VARV')@Y 
M P     4+2 <#D "     !6%)88D#D$"5@   !4/ 2 5%M@$,A I' Y  0  
M   2A10>-H<MAR8.0 $     %#('A1X.0(@     &PY!$G     6X@0K$0B&
M+0Y  0     9AQ0>*1P.0 $     $H44*RH<#D "     !*%%NP$' <)AA02
M(!P.0 (     %!P*#D$2(    !;V!!<7!X4@#D$!*    !L.01,@    %@ %
M'A$(B"T.00$I    &844'BD<#D !     !*%%@H%(A J' Y  @     2A10>
M-H<MAR8.0 $     %"()B!84!20/!X<B#@       !L:*!P.0 (     %"0*
M#D$2(    !8>!1X0*1P.0 $     $H44'C:'+8<F#D !     !8H!20D*!P.
M0 (     %0\!(!6$-X XA2P\@3B%+"P5#P$@%18R!1<7!X4B#@       !L.
M01)0    %CP%) \'AR(.        &QHH' Y  @     4) H.01(@    %D8%
M'A I' Y  0     2A10>-H<MAR8.0 $     %E %60\'A2$.00$H    &Q4V
MB2V%%",(ABT.00$I    &8D4,"D<#D !     !*%%#TJ' Y  @     2A11+
M-H<MAR8.0 $     %$\)AA19"@Y!$T     66@59#P>%(@Y !P     ;'"D<
M#D !     !*%%"DI' Y  0     2AA1!*!P.0 (     %84EAB0.00)6    
M%11/-H<MAR8.0 (     %%D*#D$30    !9D!4(/!X4B#D (     !L<*1P.
M0 $     $H44*B@<#D "     !6%%10X-H<MAR8.0 $     %$(*#D$30   
M !9N!6<L*!P.0 (     %80W@#B%)0Y! 2@    L/($XA24.00$H    +"P5
M%#@'A2(.0 8     &T4I' Y  0     2A11/# Y!%H     473:'+8<F#D !
M     !1G"@Y!$T     6> 5;#P>%(@Y !0     ;'"D<#D !     !*&%"DI
M' Y  0     2A10W-H<MAR8.0 (     %$$,#D$6@    !1'-H4MAA11# Y!
M%H     46PH.01-     %H(%4 \'A2(.0%D     &QT(ABT.0 $     &8<4
M*BD<#D !     !*%%#<J' Y  @     2A10["8841B@<#D "     !10"@Y!
M$B     6C 4W#P>%(@Y $      ;'"D<#D !     !*%%"DJ' Y  @     2
MA10W-H<MAR8.0 $     %I8%#0T*#D$30    !:@!282-H4M1CH.00&5    
M+!0F!X4B#D$!-@   !L.01!P    %JH%/SPH#PC]15)23U(@(Q6%%0\)($%4
M($Q)3D4@%48Z#D$!A@   "PE1CH.00&'    +"0.00)6    %#\F%K0%!@8 
MF[X%&1D 4T54+550(%1/2T5.(%1!0DQ%4YO(!08& )O2!2,&*!0C* \8H,W!
MPZ^VM: @5$]+14X@0T].5D525$52%MP%(08H%"$H#Q5);FET:6%L:7II;F<@
M87)R87ES+" 5%N8%(A8H#PYP;&5A<V4@=V%I="XN+A0B-HDM#D !     !;P
M!2H)(HH2@Q06!XH>-@Y  0     ;( P.018     %"H*#D$5(    !;Z!2(/
M-HHM#D$!A0   !08-H,N#P(L6!0B# Y!%@     6! 8B#S:*+0Y! 80    4
M&#:#+@\"+%D4(@P.018     %@X&(0\VBBT.0 <     %!<V@RX/ 2 4(0P.
M018     %A@&(0\VBBT.00&)    %!<V@RX/ 2P4(0P.018     %B(&* \V
MBBT.00&3    %!XV@RX^.@Y -      L%"@,#D$6     !8L!B,/-HHM#D$!
M@@   !09-H,N#P,L6"D4(PP.018     %C8&&0\VBBT.00&#    %!DV@RX/
M RDL619 !A4,-H XBBPMB105-H0WB2PN@Q9*!@\/-H$XBBPM0CJ$+!94!A<4
M-HDM0CJ$+"4.0 $     %!<D%EX&!@8 FV@&%!0 2$58($-/3E9%4E-)3TZ;
M<@8&!@";? 8;%PB%+0X        9#D 5     !0;(H,6A@86#S:".(4L+4 Z
M@RP4$PF%%!8D%I &)!0VB2U0.H4G#D 6     "P4)#:&+84FB20.0!8     
M%IH&(Q,J' Y  @     2@CB)+!0C*AP.0 (     $H(XABP6I 8&!B06K@8&
M!@";N 89&0!214%$($1)4TL@1$E214-43U)9F\(&!@8 F\P&,"87' Y  P  
M   2#D &     !(.        $@\%1#HJ+BH4, T.01=5    %M8&'A "' Y 
M P     2@Q04*(,4'@H.01=0    %ML&$0X1' Y  P     4$206X 8&!@";
MZ@81$0!43TM%3B!404),19OT!@8& )O^!B$A 3<Y+$%$0RPW-RQ!3D0L.#0L
M05-,+#8X+$)#0YL(!R$A 38Y+$)#4RPW,"Q"15$L-S$L0DU)+#<R+$).19L2
M!R$A 3<S+$)03"PW-"Q"5D,L-S4L0E93+#0R+$))5)L<!R$A 30S+$)22RPT
M-"Q#3$,L-#4L0TQ$+#0V+$-,29LF!R$A 30W+$-,5BPX,BQ#35 L-# L0U!8
M+#0Q+$-069LP!R$A 3,T+$1%0RPT."Q$15@L-#DL1$59+#<X+$5/4ILZ!R$A
M 3,U+$E.0RPU,"Q)3E@L-3$L24Y9+#,S+$I-4)M$!R$A 3,R+$I34BPX,2Q,
M1$$L,S8L3$18+#,W+$Q$69M.!R$A 3@V+$Q34BPU,BQ.3U L-S8L3U)!+#4S
M+%!(09M8!R$A 34T+%!(4"PU-2Q03$$L-38L4$Q0+#@U+%)/3)MB!R$A 3@W
M+%)/4BPX,RQ30D,L-3DL4T5#+#8P+%-%1)ML!R$A 38Q+%-%22PX,"Q35$$L
M,S@L4U18+#,Y+%-469MV!R$A 38R+%1!6"PV,RQ405DL-C0L5%-8+#8U+%18
M09N !R$A 38V+%184RPV-RQ464$L-3<L4E1)+#4X+%)44YN*!R$A 3(Q+$)2
M02PY,"Q$14$L.3$L24Y!+#DR+%!(6)N4!R$A 3DS+%!(62PY-"Q03%@L.34L
M4$Q9+#@Y+%-46IN>!QD9 3(R+%120BPR,RQ44T(L,CDL*CV;J <?'P$Q-"PN
M14Y$+#(V+#LL,3DL+D]21RPS,"P]F[('(" !,C L+D5152PQ,2PN0EE412PQ
M,BPN4T)95$6;O <A(0$R-2PN0T)95$4L,3,L+D1"651%+#DL+E=/4D2;Q@<=
M'0$Q."PN1%,L,BPN14Q312PS+"Y%3D1)1IO0!QD9 3$P+"Y%4E)/4BPR-"PN
M1DQ/052;V@<A(0$Q+"Y)1BPQ-RPN24Y#3%5$12PR-RPN3$]#04R;Y <='0$Q
M-2PN3U!4+#@L+E!!1T4L,C@L+E-%5)ON!R$A 3 L15)23U(@+2 L-"PN34%#
M4D\L-2PN14Y$39OX!QP< 38L+E1)5$Q%+#,Q+"X]+#$V+"Y404*; @@='0$Q
M.3 L(RPQ.#<L("PQ,S0L)"PQ,S,L))L,"!\? 3$X,"P@/"PQ.#$L(#XL,3,X
M+"<L,34Y+%N;%@@='0$Q-C L72PQ-#8L*RPQ-#DL+RPQ-#@L*IL@"!T= 3$V
M-RQ<+#$U,"PF+#$V-"PA+#$V-2Q>FRH('1T!,34R+#TL,34V+#XL,34W+#PL
M,34X+"V;- @@( $Q-#<L+2PQ-34L/#XL,34T+#X]+#$U,RP\/9L^"!L; 3$W
M.2P@+D]2("PQ.3<L3D\@+#(P,9M("!D9 4Q)4U0L,3<X+" N04Y$("PQ.3F;
M4@@8& %%4E(L,3<W+" N3D]4("PR,#";7 @:&@%%2D5#5"PQ-S8L("Y$148@
M+#$Y.)MF"!X> 4]"2BPQ-S4L("Y2148@+#(P,RQ-3$E35)MP"" @ 3(P-"Q#
M3$E35"PR,#4L3E5-+#(P,BQ84D5&FWH('AX!,3DR+"@L,3@V+"DL,3,Y+"4D
M+#$T,2PJFX0(&!@!,3DQ+$$L,30P+"4L+3$L6%A8FXX(&1D!,"PQ+#(L,RPT
M+#4L-BPW+#@L.9N8"!$1 4$L0BQ#+$0L12Q&FZ((!@85%@" %A89#PY$,CI$
M151/2T5.+D)!4Q8:&AH:&AH:&AH:&AH:&AH:&AH:&AH:&AH:&AH:&AH:&AH:
!&E1/
 
end