mirror of
https://github.com/fadden/6502bench.git
synced 2024-12-10 21:49:27 +00:00
4e08810278
The label localizer is now always on. The regression tests turned it off by default, but that's no longer allowed, so the generated output has changed for many of them. The tests themselves were not altered.
289 lines
5.9 KiB
ArmAsm
289 lines
5.9 KiB
ArmAsm
.setcpu "65816"
|
|
; .segment "SEG000"
|
|
.org $1000
|
|
.a8
|
|
.i8
|
|
sec
|
|
xce
|
|
jsr L101F
|
|
jsr L10AB
|
|
jsr L10F2
|
|
jsr L1106
|
|
jsr L1109
|
|
jsr L112C
|
|
jsr L11F9
|
|
jsr L11FC
|
|
nop
|
|
nop
|
|
nop
|
|
brk
|
|
|
|
.byte $00
|
|
|
|
L101F: ora ($00,x)
|
|
cop $00
|
|
ora $00,S
|
|
tsb $00
|
|
ora $00
|
|
asl $00
|
|
ora [$00]
|
|
php
|
|
ora #$00
|
|
asl A
|
|
phd
|
|
tsb a:$0000
|
|
ora a:$0000
|
|
asl a:$0000
|
|
ora f:$000000
|
|
bpl @L1041
|
|
@L1041: ora ($00),y
|
|
ora ($00)
|
|
ora ($00,S),y
|
|
trb $00
|
|
ora $00,x
|
|
asl $00,x
|
|
ora [$00],y
|
|
clc
|
|
ora $0000,y
|
|
inc A
|
|
tcs
|
|
trb a:$0000
|
|
ora a:$0000,x
|
|
asl a:$0000,x
|
|
ora f:$000000,x
|
|
jsr $0000
|
|
and ($00,x)
|
|
jsl $000000
|
|
and $00,S
|
|
bit $00
|
|
and $00
|
|
rol $00
|
|
and [$00]
|
|
plp
|
|
and #$00
|
|
rol A
|
|
pld
|
|
bit a:$0000
|
|
and a:$0000
|
|
rol a:$0000
|
|
and f:$000000
|
|
bmi @L1089
|
|
@L1089: and ($00),y
|
|
and ($00)
|
|
and ($00,S),y
|
|
bit $00,x
|
|
and $00,x
|
|
rol $00,x
|
|
and [$00],y
|
|
sec
|
|
and $0000,y
|
|
dec A
|
|
tsc
|
|
bit a:$0000,x
|
|
and a:$0000,x
|
|
rol a:$0000,x
|
|
and f:$000000,x
|
|
rti
|
|
|
|
L10AB: eor ($00,x)
|
|
wdm $00
|
|
eor $00,S
|
|
mvp #$00,#$00
|
|
eor $00
|
|
lsr $00
|
|
eor [$00]
|
|
pha
|
|
eor #$00
|
|
lsr A
|
|
phk
|
|
jmp @L10C2
|
|
|
|
@L10C2: eor a:$0000
|
|
lsr a:$0000
|
|
eor f:$000000
|
|
bvc @L10CE
|
|
@L10CE: eor ($00),y
|
|
eor ($00)
|
|
eor ($00,S),y
|
|
mvn #$00,#$00
|
|
eor $00,x
|
|
lsr $00,x
|
|
eor [$00],y
|
|
cli
|
|
eor $0000,y
|
|
phy
|
|
tcd
|
|
jml @L10E7
|
|
|
|
@L10E7: eor a:$0000,x
|
|
lsr a:$0000,x
|
|
eor f:$000000,x
|
|
rts
|
|
|
|
L10F2: adc ($00,x)
|
|
per $0ff6
|
|
adc $00,S
|
|
stz $00
|
|
adc $00
|
|
ror $00
|
|
adc [$00]
|
|
pla
|
|
adc #$00
|
|
ror A
|
|
rtl
|
|
|
|
L1106: jmp ($0000)
|
|
|
|
L1109: adc a:$0000
|
|
ror a:$0000
|
|
adc f:$000000
|
|
bvs @L1115
|
|
@L1115: adc ($00),y
|
|
adc ($00)
|
|
adc ($00,S),y
|
|
stz $00,x
|
|
adc $00,x
|
|
ror $00,x
|
|
adc [$00],y
|
|
sei
|
|
adc $0000,y
|
|
ply
|
|
tdc
|
|
jmp ($0000,x)
|
|
|
|
L112C: adc a:$0000,x
|
|
ror a:$0000,x
|
|
adc f:$000000,x
|
|
bra @L1138
|
|
|
|
@L1138: sta ($00,x)
|
|
brl @L113D
|
|
|
|
@L113D: sta $00,S
|
|
sty $00
|
|
sta $00
|
|
stx $00
|
|
sta [$00]
|
|
dey
|
|
bit #$00
|
|
txa
|
|
phb
|
|
sty a:$0000
|
|
sta a:$0000
|
|
stx a:$0000
|
|
sta f:$000000
|
|
bcc @L115B
|
|
@L115B: sta ($00),y
|
|
sta ($00)
|
|
sta ($00,S),y
|
|
sty $00,x
|
|
sta $00,x
|
|
stx $00,y
|
|
sta [$00],y
|
|
tya
|
|
sta $0000,y
|
|
txs
|
|
txy
|
|
stz a:$0000
|
|
sta a:$0000,x
|
|
stz a:$0000,x
|
|
sta f:$000000,x
|
|
ldy #$00
|
|
lda ($00,x)
|
|
ldx #$00
|
|
lda $00,S
|
|
ldy $00
|
|
lda $00
|
|
ldx $00
|
|
lda [$00]
|
|
tay
|
|
lda #$00
|
|
tax
|
|
plb
|
|
ldy a:$0000
|
|
lda a:$0000
|
|
ldx a:$0000
|
|
lda f:$000000
|
|
bcs @L11A0
|
|
@L11A0: lda ($00),y
|
|
lda ($00)
|
|
lda ($00,S),y
|
|
ldy $00,x
|
|
lda $00,x
|
|
ldx $00,y
|
|
lda [$00],y
|
|
clv
|
|
lda $0000,y
|
|
tsx
|
|
tyx
|
|
ldy a:$0000,x
|
|
lda a:$0000,x
|
|
ldx a:$0000,y
|
|
lda f:$000000,x
|
|
cpy #$00
|
|
cmp ($00,x)
|
|
rep #$00
|
|
cmp $00,S
|
|
cpy $00
|
|
cmp $00
|
|
dec $00
|
|
cmp [$00]
|
|
iny
|
|
cmp #$00
|
|
dex
|
|
wai
|
|
cpy a:$0000
|
|
cmp a:$0000
|
|
dec a:$0000
|
|
cmp f:$000000
|
|
bne @L11E5
|
|
@L11E5: cmp ($00),y
|
|
cmp ($00)
|
|
cmp ($00,S),y
|
|
pei ($00)
|
|
cmp $00,x
|
|
dec $00,x
|
|
cmp [$00],y
|
|
cld
|
|
cmp $0000,y
|
|
phx
|
|
stp
|
|
|
|
L11F9: jml [$0000]
|
|
|
|
L11FC: cmp a:$0000,x
|
|
dec a:$0000,x
|
|
cmp f:$000000,x
|
|
cpx #$00
|
|
sbc ($00,x)
|
|
sep #$00
|
|
sbc $00,S
|
|
cpx $00
|
|
sbc $00
|
|
inc $00
|
|
sbc [$00]
|
|
inx
|
|
sbc #$00
|
|
nop
|
|
xba
|
|
cpx a:$0000
|
|
sbc a:$0000
|
|
inc a:$0000
|
|
sbc f:$000000
|
|
beq @L122A
|
|
@L122A: sbc ($00),y
|
|
sbc ($00)
|
|
sbc ($00,S),y
|
|
pea $0000
|
|
sbc $00,x
|
|
inc $00,x
|
|
sbc [$00],y
|
|
sed
|
|
sbc $0000,y
|
|
plx
|
|
xce
|
|
jsr ($0000,x)
|
|
sbc a:$0000,x
|
|
inc a:$0000,x
|
|
sbc f:$000000,x
|