:ô > Dis09 1.01 - 24Sep2007 - 6809 disassembly routines @ô PSH/PUL shows U or S instead of U/S, shows R, and ,R modes : (!ݤDis_Name(A%):X%?3=0:="6809" 2$ݤDis_Code(A%,Ptr%,Data%):num%=1 çop%=&16:num%=3:="LBRA &"+¤h0(¤ljr(256*Data%?1+Data%?2),4) >çop%=&17:num%=3:="LBSR &"+¤h0(¤ljr(256*Data%?1+Data%?2),4) &çop%=&3E:="RESET" 0num%=0:="" :#ݤgrp10:num%=num%+1:op%=Data%?1 D~ç(op%€&E0)=&20:num%=num%+1:="LB"+Á"RARNHILSCCCSNEEQVCVSPLMIGELTGTLE",(op%€15)*2+1,2)+" &"+¤h0(¤ljr(256*Data%?1+Data%?2),4) Nçop%=&3F:="SWI2" X/ç(op%€&CF)=&83:="CMPD "+¤mde2((op%€&30)16) b/ç(op%€&CF)=&8C:="CMPY "+¤mde2((op%€&30)16) l/ç(op%€&CF)=&8E:="LDY "+¤mde2((op%€&30)16) vçop%=&8F;num%=0:="" €/ç(op%€&CF)=&8F:="STY "+¤mde2((op%€&30)16) Š/ç(op%€&CF)=&CE:="LDS "+¤mde2((op%€&30)16) ”çop%=&CF:num%=0:="" /ç(op%€&CF)=&CF:="STS "+¤mde2((op%€&30)16) ¨num%=0:="" ²#ݤgrp11:num%=num%+1:op%=Data%?1 ¼çop%=&3F:="SWI3" Æ/ç(op%€&CF)=&83:="CMPU "+¤mde2((op%€&30)16) Ğ/ç(op%€&CF)=&8C:="CMPS "+¤mde2((op%€&30)16) Únum%=0:="" äUݤalu(A%)=Á"SUBCMPSBCxxxANDBITLD ST EORADCOR ADD",A%*3+1,3+(A%=6 „ A%=7 „ A%=10)) î5ݤrot(A%):çA%=1„A%=2„A%=5„A%=11„A%=14:num%=-9:="" øB=Á"NEGxxxxxxCOMLSRxxxRORASRASLROLDECxxxINCTSTxxxCLR",A%*3+1,3) Rݤmde2(A%):çA%=0:num%=num%+2:="#&"+¤h0(Data%?(num%-2),2)+¤h0(Data%?(num%-1),2)  ;ݤmde(A%):çA%=0:num%=num%+1:="#&"+¤h0(Data%?(num%-1),2) 0çA%=1:num%=num%+1:="&"+¤h0(Data%?(num%-1),2)  +çA%=2:num%=num%+1:=¤idx(Data%?(num%-1)) *FçA%=3:num%=num%+2:="&"+¤h0(Data%?(num%-2),2)+¤h0(Data%?(num%-1),2) 4-ݤidx(A%):R$=¤reg1((A%€&60)32):A%=A%€&9F >çA%<16:=Ã(A%€15)+","+R$ H çA%<32:=Ã((A%€15)-16)+","+R$ R&O$="":C$="":ç(A%€16):O$="[":C$="]" \ A%=A%€15 fçA%=0:çO$<>"":num%=0:="" pçA%=0:=O$+R$+"+,"+C$ zçA%=1:=O$+R$+"++,"+C$ „çA%=2:çO$<>"":num%=0:="" çA%=2:=O$+",-"+R$+C$ ˜çA%=3:=O$+",--"+R$+C$ ¢çA%=4:=O$+","+R$+C$ ¬çA%=5:=O$+"B,"+R$+C$ ¶çA%=6:=O$+"A,"+R$+C$ ÀçA%=7:num%=0:"" Ê=çA%=8:num%=num%+1:=O$+"&"+¤h0(Data%?(num%-1),2)+","+R$+C$ ÔSçA%=9:num%=num%+2:=O$+"&"+¤h0(Data%?(num%-2),2)+¤h0(Data%?(num%-1),2)+","+R$+C$ ŞçA%=10:num%=0:="" èçA%=11:=O$+"D,"+R$+C$ ò=çA%=12:num%=num%+1:=O$+"&"+¤h0(Data%?(num%-1),2)+",PC"+C$ üSçA%=13:num%=num%+2:=O$+"&"+¤h0(Data%?(num%-2),2)+¤h0(Data%?(num%-1),2)+",PC"+C$ çA%=14:num%=0:="" çA%=14:çO$="":num%=0:="" MçA%=15:num%=num%+2:=O$+"&"+¤h0(Data%?(num%-2),2)+¤h0(Data%?(num%-1),2)+C$ $="" .ݤreg1(A%)=Á"XYUS",A%+1,1) 8ݤreg2(A%)=Á"XYSU",A%+1,1) BGݤr(A%)=Á"D X Y U S PC????A B CCDP????????",A%*2+1,1-(A%=5 „ A%>9)) L$ݤjr(A%):=Ptr%+2+A%+256*(A%>127) V)ݤljr(A%):=Ptr%+3+A%+65536*(A%>32767) `ݤstk(A%):A$="" jç(A%€1):A$=",CC" tç(A%€2):A$=A$+",A" ~ç(A%€4):A$=A$+",B" ˆç(A%€8):A$=A$+",DP" ’ç(A%€16):A$=A$+",X" œç(A%€32):A$=A$+",Y" ¦*ç(A%€64):A$=A$+Á",U,S",(?Data%€2)+1,2) °ç(A%€128):A$=A$+",PC" º =ÁA$,2) ÿ