6502/6502bench
1
0
Fork 0
mirror of https://github.com/fadden/6502bench.git synced 2024-12-04 11:49:58 +00:00
Code Issues Projects Releases Wiki Activity
e42bb2d262
6502bench/SourceGen/SGTestData/Expected/20100-label-dp_cc65.S

304 lines
6.6 KiB
ArmAsm
Raw Normal View History

Add 20100-label-dp test The 20102-label-dp test is "allops-common-65816" with direct-page labels. 20100-label-dp is the same thing, but with the 6502 version instead.
2020-10-19 23:02:28 +00:00
.setcpu "6502X"
; .segment "SEG000"
.org $1000
jsr L1035
jsr L1038
jsr L1059
jsr L107D
jsr L109E
jsr L10BD
jsr L10C0
jsr L10E1
jsr L1100
jsr L1103
jsr L1116
jsr L1124
jsr L1169
jsr L11AE
jsr L11F3
jsr L1238
nop
nop
nop
brk
.byte $80
L1035: ora (L0080,x)
jam
L1038: slo (L0080,x)
.byte $04,$80
ora z:L0080
asl z:L0080
slo z:L0080
php
ora #$80
asl A
anc #$80
.byte $0c,$86,$00
ora a:L0086
asl a:L0086
slo a:L0086
bpl @L1056
@L1056: ora (L0080),y
.byte $12
L1059: slo (L0080),y
.byte $14,$80
ora z:L0080,x
asl z:L0080,x
slo z:L0080,x
clc
ora L0086,y
.byte $1a
slo L0086,y
.byte $1c,$86,$00
ora a:L0086,x
asl a:L0086,x
slo a:L0086,x
jsr L0086
and (L0080,x)
.byte $22
L107D: rla (L0080,x)
bit z:L0080
and z:L0080
rol z:L0080
rla z:L0080
plp
and #$80
rol A
.byte $2b,$80
bit a:L0086
and a:L0086
rol a:L0086
rla a:L0086
bmi @L109B
@L109B: and (L0080),y
.byte $32
L109E: rla (L0080),y
.byte $34,$80
and z:L0080,x
rol z:L0080,x
rla z:L0080,x
sec
and L0086,y
.byte $3a
rla L0086,y
.byte $3c,$86,$00
and a:L0086,x
rol a:L0086,x
rla a:L0086,x
rti
L10BD: eor (L0080,x)
.byte $42
L10C0: sre (L0080,x)
.byte $44,$80
eor z:L0080
lsr z:L0080
sre z:L0080
pha
eor #$80
lsr A
alr #$80
jmp @L10D3
@L10D3: eor a:L0086
lsr a:L0086
sre a:L0086
bvc @L10DE
@L10DE: eor (L0080),y
.byte $52
L10E1: sre (L0080),y
.byte $54,$80
eor z:L0080,x
lsr z:L0080,x
sre z:L0080,x
cli
eor L0086,y
.byte $5a
sre L0086,y
.byte $5c,$86,$00
eor a:L0086,x
lsr a:L0086,x
sre a:L0086,x
rts
L1100: adc (L0080,x)
.byte $62
L1103: rra (L0080,x)
.byte $64,$80
adc z:L0080
ror z:L0080
rra z:L0080
pla
adc #$80
ror A
arr #$80
jmp (L0086)
L1116: adc a:L0086
ror a:L0086
rra a:L0086
bvs @L1121
@L1121: adc (L0080),y
.byte $72
L1124: rra (L0080),y
.byte $74,$80
adc z:L0080,x
ror z:L0080,x
rra z:L0080,x
sei
adc L0086,y
.byte $7a
rra L0086,y
.byte $7c,$86,$00
adc a:L0086,x
ror a:L0086,x
rra a:L0086,x
.byte $80,$80
sta (L0080,x)
.byte $82,$80
sax (L0080,x)
sty z:L0080
sta z:L0080
stx z:L0080
sax z:L0080
dey
.byte $89,$80
txa
ane #$80
sty a:L0086
sta a:L0086
stx a:L0086
sax a:L0086
bcc @L1166
@L1166: sta (L0080),y
.byte $92
L1169: sha (L0080),y
sty z:L0080,x
sta z:L0080,x
stx z:L0080,y
sax z:L0080,y
tya
sta L0086,y
txs
tas L0086,y
shy a:L0086,x
sta a:L0086,x
shx L0086,y
sha L0086,y
ldy #$80
lda (L0080,x)
ldx #$80
lax (L0080,x)
ldy z:L0080
lda z:L0080
ldx z:L0080
lax z:L0080
tay
lda #$80
tax
lax #$80
ldy a:L0086
lda a:L0086
ldx a:L0086
lax a:L0086
bcs @L11AB
@L11AB: lda (L0080),y
.byte $b2
L11AE: lax (L0080),y
ldy z:L0080,x
lda z:L0080,x
ldx z:L0080,y
lax z:L0080,y
clv
lda L0086,y
tsx
las L0086,y
ldy a:L0086,x
lda a:L0086,x
ldx a:L0086,y
lax a:L0086,y
cpy #$80
cmp (L0080,x)
.byte $c2,$80
dcp (L0080,x)
cpy z:L0080
cmp z:L0080
dec z:L0080
dcp z:L0080
iny
cmp #$80
dex
axs #$80
cpy a:L0086
cmp a:L0086
dec a:L0086
dcp a:L0086
bne @L11F0
@L11F0: cmp (L0080),y
.byte $d2
L11F3: dcp (L0080),y
.byte $d4,$80
cmp z:L0080,x
dec z:L0080,x
dcp z:L0080,x
cld
cmp L0086,y
.byte $da
dcp L0086,y
.byte $dc,$86,$00
cmp a:L0086,x
dec a:L0086,x
dcp a:L0086,x
cpx #$80
sbc (L0080,x)
.byte $e2,$80
isc (L0080,x)
cpx z:L0080
sbc z:L0080
inc z:L0080
isc z:L0080
inx
sbc #$80
nop
.byte $eb,$80
cpx a:L0086
sbc a:L0086
inc a:L0086
isc a:L0086
beq @L1235
@L1235: sbc (L0080),y
.byte $f2
L1238: isc (L0080),y
.byte $f4,$80
sbc z:L0080,x
inc z:L0080,x
isc z:L0080,x
sed
sbc L0086,y
.byte $fa
isc L0086,y
.byte $fc,$86,$00
sbc a:L0086,x
inc a:L0086,x
isc a:L0086,x
; .segment "SEG001"
.org $0080
L0080: bit z:@L0082
@L0082: bit @L0082
bit @L0082
L0086: bit a:L0086
Reference in New Issue Copy Permalink