]> git.sur5r.net Git - cc65/blob - test/dasm/4510-disass.s
add support for detecting 45GS02
[cc65] / test / dasm / 4510-disass.s
1 .setcpu "4510"
2
3 ZP = $12
4 ABS = $2345
5
6 start:
7    brk
8    ora (ZP,x)
9    cle
10    see
11    tsb ZP
12    ora ZP
13    asl ZP
14    rmb0 ZP
15    php
16    ora #$01
17    asl
18    tsy
19    tsb ABS
20    ora ABS
21    asl ABS
22    bbr0 ZP,label1
23
24 label1:
25    bpl label2
26    ora (ZP),y
27    ora (ZP),z
28    lbpl start ; bpl start
29    trb ZP
30    ora ZP,x
31    asl ZP,x
32    rmb1 ZP
33    clc
34    ora ABS,y
35    inc
36    inz
37    trb ABS
38    ora ABS,x
39    asl ABS,x
40    bbr1 ZP,label2
41
42 label2:
43    jsr ABS
44    and (ZP,x)
45    jsr ($2345)
46    jsr ($2456,x)
47    bit ZP
48    and ZP
49    rol ZP
50    rmb2 ZP
51    plp
52    and #$01
53    rol
54    tys
55    bit ABS
56    and ABS
57    rol ABS
58    bbr2 ZP,label3
59
60 label3:
61    bmi label4
62    and (ZP),y
63    and (ZP),z
64    lbmi start ; bmi start
65    bit ZP,x
66    and ZP,x
67    rol ZP,x
68    rmb3 ZP
69    sec
70    and ABS,y
71    dec
72    dez
73    bit ABS,x
74    and ABS,x
75    rol ABS,x
76    bbr3 ZP,label4
77
78 label4:
79    rti
80    eor (ZP,x)
81    neg
82    asr
83    asr ZP
84    eor ZP
85    lsr ZP
86    rmb4 ZP
87    pha
88    eor #$01
89    lsr
90    taz
91    jmp ABS
92    eor ABS
93    lsr ABS
94    bbr4 ZP,label5
95
96 label5:
97    bvc label6
98    eor (ZP),y
99    eor (ZP),z
100    lbvc start ; bvc start
101    asr ZP,x
102    eor ZP,x
103    lsr ZP,x
104    rmb5 ZP
105    cli
106    eor ABS,y
107    phy
108    tab
109    map
110    eor ABS,x
111    lsr ABS,x
112    bbr5 ZP,label6
113
114 label6:
115    rts
116    adc (ZP,x)
117    rtn #$09
118    bsr start
119    stz ZP
120    adc ZP
121    ror ZP
122    rmb6 ZP
123    pla
124    adc #$01
125    ror
126    tza
127    jmp ($2345)
128    adc ABS
129    ror ABS
130    bbr6 ZP,label7
131
132 label7:
133    bvs label8
134    adc (ZP),y
135    adc (ZP),z
136    lbvs start ; bvs start
137    stz ZP,x
138    adc ZP,x
139    ror ZP,x
140    rmb7 ZP
141    sei
142    adc ABS,y
143    ply
144    tba
145    jmp ($2456,x)
146    adc ABS,x
147    ror ABS,x
148    bbr7 ZP,label8
149
150 label8:
151    bra label9
152    sta (ZP,x)
153    sta ($0f,sp),y
154    lbra start ; bra start
155    sty ZP
156    sta ZP
157    stx ZP
158    smb0 ZP
159    dey
160    bit #$01
161    txa
162    sty ABS,x
163    sty ABS
164    sta ABS
165    stx ABS
166    bbs0 ZP,label9
167
168 label9:
169    bcc labelA
170    sta (ZP),y
171    sta (ZP),z
172    lbcc start ; bcc start
173    sty ZP,x
174    sta ZP,x
175    stx ZP,y
176    smb1 ZP
177    tya
178    sta ABS,y
179    txs
180    stx ABS,y
181    stz ABS
182    sta ABS,x
183    stz ABS,x
184    bbs1 ZP,labelA
185
186 labelA:
187    ldy #$01
188    lda (ZP,x)
189    ldx #$01
190    ldz #$01
191    ldy ZP
192    lda ZP
193    ldx ZP
194    smb2 ZP
195    tay
196    lda #$01
197    tax
198    ldz ABS
199    ldy ABS
200    lda ABS
201    ldx ABS
202    bbs2 ZP,labelB
203
204 labelB:
205    bcs labelC
206    lda (ZP),y
207    lda (ZP),z
208    lbcs start ; bcs start
209    ldy ZP,x
210    lda ZP,x
211    ldx ZP,y
212    smb3 ZP
213    clv
214    lda ABS,y
215    tsx
216    ldz ABS,x
217    ldy ABS,x
218    lda ABS,x
219    ldx ABS,y
220    bbs3 ZP,labelC
221
222 labelC:
223    cpy #$01
224    cmp (ZP,x)
225    cpz #$01
226    dew ZP
227    cpy ZP
228    cmp ZP
229    dec ZP
230    smb4 ZP
231    iny
232    cmp #$01
233    dex
234    asw ABS
235    cpy ABS
236    cmp ABS
237    dec ABS
238    bbs4 ZP,labelD
239
240 labelD:
241    bne labelE
242    cmp (ZP),y
243    cmp (ZP),z
244    lbne start ; bne start
245    cpz ZP
246    cmp ZP,x
247    dec ZP,x
248    smb5 ZP
249    cld
250    cmp ABS,y
251    phx
252    phz
253    cpz ABS
254    cmp ABS,x
255    dec ABS,x
256    bbs5 ZP,labelE
257
258 labelE:
259    cpx #$01
260    sbc (ZP,x)
261    lda ($0f,sp),y
262    inw ZP
263    cpx ZP
264    sbc ZP
265    inc ZP
266    smb6 ZP
267    inx
268    sbc #$01
269    eom
270    nop
271    row ABS
272    cpx ABS
273    sbc ABS
274    inc ABS
275    bbs6 ZP,labelF
276
277 labelF:
278    beq labelG
279    sbc (ZP),y
280    sbc (ZP),z
281    lbeq start ; beq start
282    phw #$089a
283    sbc ZP,x
284    inc ZP,x
285    smb7 ZP
286    sed
287    sbc ABS,y
288    plx
289    plz
290    phd ABS
291    phw ABS
292    sbc ABS,x
293    inc ABS,x
294    bbs7 ZP,labelG
295
296 labelG:
297    brk
298