:ô > Dis09 1.00 - 24Sep2007 - 6809 disassembly routines : ݤDis_Name(A%)="6809" ($ݤDis_Code(A%,Ptr%,Data%):num%=1 2HX%!0=0:$(X%+4)=¤_diss:çnum%<1:num%=1:$(X%+4)="EQUB &"+¤h0(Data%?0,2) <X%?3=num%:=num% Fݤ_diss:op%=?Data%:num%=1 P/ç(op%€&CF)=&83:="SUBD "+¤mde2((op%€&30)16) Z/ç(op%€&CF)=&C3:="ADDD "+¤mde2((op%€&30)16) dçop%=&87:num%=0:="" nçop%=&C7:num%=0:="" xBç(op%€&CF)=&87:="ST"+½(65+(op%€64)64)+" "+¤mde((op%€&30)16) ‚/ç(op%€&CF)=&8C:="CMPX "+¤mde2((op%€&30)16) Œ/ç(op%€&CF)=&CC:="LDD "+¤mde2((op%€&30)16) –1çop%=&8D:num%=2:="BSR &"+¤h0(¤jr(Data%?1),4)  .ç(op%€&CF)=&8D:="JSR "+¤mde((op%€&30)16) ªçop%=&CD:num%=0:="" ´/ç(op%€&CF)=&CD:="STD "+¤mde2((op%€&30)16) ¾/ç(op%€&CF)=&8E:="LDX "+¤mde2((op%€&30)16) È/ç(op%€&CF)=&CE:="LDU "+¤mde2((op%€&30)16) Òçop%=&8F:num%=0:="" Ü/ç(op%€&CF)=&8F:="STX "+¤mde2((op%€&30)16) æçop%=&CF:num%=0:="" ğ/ç(op%€&CF)=&CF:="STU "+¤mde2((op%€&30)16) ú]ç(op%€&80)=&80:=¤alu(op%€15)+½(65+(op%€64)64)+" "+À" ",(op%€&8E)=&86)+¤mde((op%€&30)16) 2ç(op%€&E0)=&40:=¤rot(op%€15)+½(65+(op%€16)16) /ç(op%€&EF)=&6E:="JMP "+¤mde2((op%€&30)16) 8ç(op%€&E0)=&60:=¤rot(op%€15)+" "+¤mde((op%€&30)16) "qç(op%€&F0)=&20:num%=num%+1:="B"+Á"RARNHILSCCCSNEEQVCVSPLMIGELTGTLE",(op%€15)*2+1,2)+" &"+¤h0(¤jr(Data%?1),4) ,çop%=&0E:="JMP "+¤mde(1) 6-ç(op%€&F0)=&00:=¤rot(op%€15)+" "+¤mde(1) @çop%=&10:=¤grp10 Jçop%=&11:=¤grp11 Tçop%=&12:="NOP" ^çop%=&13:="SYNC" hçop%=&19:="DAA" rçop%=&1A:="ORCC "+¤mde(0) |çop%=&1C:="ANDCC "+¤mde(0) †çop%=&1D:="SEX" aç(op%€&FE)=&1E:num%=num%+1:=Á"EXGTFR",(op%€1)*3+1,3)+" "+¤r(Data%?1 16)+","+¤r(Data%?1 €15) š2ç(op%€&FC)=&30:="LEA"+¤reg2(op%€3)+" "+¤mde(2) ¤/çop%=&34:num%=num%+1:="PSHS "+¤stk(Data%?1) ®/çop%=&35:num%=num%+1:="PULS "+¤stk(Data%?1) ¸/çop%=&36:num%=num%+1:="PSHU "+¤stk(Data%?1) Â/çop%=&37:num%=num%+1:="PULS "+¤stk(Data%?1) Ìçop%=&39:="RTS" Öçop%=&3A:="ABX" àçop%=&3B:="RTI" êçop%=&3C:="CWAI" ôçop%=&3D:="MUL" şçop%=&3F:="SWI" >ç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" &num%=0:="" 0#ݤgrp10:num%=num%+1:op%=Data%?1 :~ç(op%€&E0)=&20:num%=num%+1:="LB"+Á"RARNHILSCCCSNEEQVCVSPLMIGELTGTLE",(op%€15)*2+1,2)+" &"+¤h0(¤ljr(256*Data%?1+Data%?2),4) Dçop%=&3F:="SWI2" N/ç(op%€&CF)=&83:="CMPD "+¤mde2((op%€&30)16) X/ç(op%€&CF)=&8C:="CMPY "+¤mde2((op%€&30)16) b/ç(op%€&CF)=&8E:="LDY "+¤mde2((op%€&30)16) lçop%=&8F;num%=0:="" v/ç(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) *-ݤidx(A%):R$=¤reg1((A%€&60)32):A%=A%€&9F 4çA%<16:=Ã(A%€15)+","+R$ > çA%<32:=Ã((A%€15)-16)+","+R$ H&O$="":C$="":ç(A%€16):O$="[":C$="]" R A%=A%€15 \çA%=0:çO$<>"":num%=0:="" fçA%=0:=O$+R$+"+"+C$ pçA%=1:=O$+R$+"++"+C$ zç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) .ݤreg2(A%)=Á"XYSU",A%+1,1) 8Gݤr(A%)=Á"D X Y U S PC????A B CCDP????????",A%*2+1,1-(A%=5 „ A%>9)) B0ݤjr(A%):çA%<128:=Ptr%+2+A% ‹ =Ptr%+2-256+A% L5ݤljr(A%):çA%<32768:=Ptr%+3+A% ‹ =Ptr%+3-65536+A% Vݤstk(A%):A$="" `ç(A%€1):A$="CC" jç(A%€2):A$=A$+",A" tç(A%€4):A$=A$+",B" ~ç(A%€8):A$=A$+",DP" ˆç(A%€16):A$=A$+",X" ’ç(A%€32):A$=A$+",Y" œç(A%€64):A$=A$+",S/U" ¦ç(A%€128):A$=A$+",PC" °çÀA$,1)=",":A$=ÁA$,2) º=A$ ÿ