mirror of
https://github.com/fadden/6502bench.git
synced 2024-07-19 21:29:14 +00:00
2065f4ef9e
This worked, sort of. The problem is that SourceGen will revert to hex output in certain situations, such as a broken symbolic reference. There happens to be one in the ZIPPY example, and it's on a relative branch. The goal with the segment stuff is to allow cc65 to treat the source as relocatable code. In that context, a relative branch to an absolute address doesn't make any sense, so the assembler reports a range error. We don't currently have a mechanism that guarantees no references are broken (and no affordance for finding them), so we can't make this mode the default yet. Instead, we continue to use the generic config, but generate the correct set of lines as comments. (issue #39)
287 lines
5.9 KiB
ArmAsm
287 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
|
|
.byte $00,$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)
|
|
.byte $42,$00
|
|
eor $00,S
|
|
.byte $44,$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
|
|
.byte $54,$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
|