mirror of
https://github.com/fadden/6502bench.git
synced 2024-12-11 13:50:13 +00:00
39b7b20144
This is the first step toward changing the address region map from a linear list to a hierarchy. See issue #107 for the plan. The AddressMap class has been rewritten to support the new approach. The rest of the project has been updated to conform to the new API, but feature-wise is unchanged. While the map class supports nested regions with explicit lengths, the rest of the application still assumes a series of non-overlapping regions with "floating" lengths. The Set Address dialog is currently non-functional. All of the output for cc65 changed because generation of segment comments has been removed. Some of the output for ACME changed as well, because we no longer follow "* = addr" with a redundant pseudopc statement. ACME and 65tass have similar approaches to placing things in memory, and so now have similar implementations.
295 lines
5.8 KiB
ArmAsm
295 lines
5.8 KiB
ArmAsm
!cpu 65816
|
|
* = $1000
|
|
!as
|
|
!rs
|
|
sec
|
|
xce
|
|
jsr L101F
|
|
jsr L10AB
|
|
jsr L10F2
|
|
jsr L1106
|
|
jsr L1109
|
|
jsr L112C
|
|
jsr L11F9
|
|
jsr L11FC
|
|
nop
|
|
nop
|
|
nop
|
|
brk
|
|
|
|
!byte $80
|
|
|
|
L101F ora (L0080,x)
|
|
cop $80
|
|
ora $80,S
|
|
tsb+1 L0080
|
|
ora+1 L0080
|
|
asl+1 L0080
|
|
ora [L0080]
|
|
php
|
|
ora #$80
|
|
asl
|
|
phd
|
|
tsb+2 L0086
|
|
ora+2 L0086
|
|
asl+2 L0086
|
|
ora+3 L0089
|
|
bpl @L1041
|
|
@L1041 ora (L0080),y
|
|
ora (L0080)
|
|
ora ($80,S),y
|
|
trb+1 L0080
|
|
ora+1 L0080,x
|
|
asl+1 L0080,x
|
|
ora [L0080],y
|
|
clc
|
|
ora L0086,y
|
|
inc
|
|
tcs
|
|
trb+2 L0086
|
|
ora+2 L0086,x
|
|
asl+2 L0086,x
|
|
ora+3 L0089,x
|
|
jsr L0086
|
|
and (L0080,x)
|
|
jsl L0089
|
|
and $80,S
|
|
bit+1 L0080
|
|
and+1 L0080
|
|
rol+1 L0080
|
|
and [L0080]
|
|
plp
|
|
and #$80
|
|
rol
|
|
pld
|
|
bit+2 L0086
|
|
and+2 L0086
|
|
rol+2 L0086
|
|
and+3 L0089
|
|
bmi @L1089
|
|
@L1089 and (L0080),y
|
|
and (L0080)
|
|
and ($80,S),y
|
|
bit+1 L0080,x
|
|
and+1 L0080,x
|
|
rol+1 L0080,x
|
|
and [L0080],y
|
|
sec
|
|
and L0086,y
|
|
dec
|
|
tsc
|
|
bit+2 L0086,x
|
|
and+2 L0086,x
|
|
rol+2 L0086,x
|
|
and+3 L0089,x
|
|
rti
|
|
|
|
L10AB eor (L0080,x)
|
|
!byte $42,$80
|
|
eor $80,S
|
|
mvp #$84,#$83
|
|
eor+1 L0080
|
|
lsr+1 L0080
|
|
eor [L0080]
|
|
pha
|
|
eor #$80
|
|
lsr
|
|
phk
|
|
jmp @L10C2
|
|
|
|
@L10C2 eor+2 L0086
|
|
lsr+2 L0086
|
|
eor+3 L0089
|
|
bvc @L10CE
|
|
@L10CE eor (L0080),y
|
|
eor (L0080)
|
|
eor ($80,S),y
|
|
mvn #$84,#$83
|
|
eor+1 L0080,x
|
|
lsr+1 L0080,x
|
|
eor [L0080],y
|
|
cli
|
|
eor L0086,y
|
|
phy
|
|
tcd
|
|
jml @L10E7
|
|
|
|
@L10E7 eor+2 L0086,x
|
|
lsr+2 L0086,x
|
|
eor+3 L0089,x
|
|
rts
|
|
|
|
L10F2 adc (L0080,x)
|
|
per $0ff6
|
|
adc $80,S
|
|
stz+1 L0080
|
|
adc+1 L0080
|
|
ror+1 L0080
|
|
adc [L0080]
|
|
pla
|
|
adc #$80
|
|
ror
|
|
rtl
|
|
|
|
L1106 jmp (L0086)
|
|
|
|
L1109 adc+2 L0086
|
|
ror+2 L0086
|
|
adc+3 L0089
|
|
bvs @L1115
|
|
@L1115 adc (L0080),y
|
|
adc (L0080)
|
|
adc ($80,S),y
|
|
stz+1 L0080,x
|
|
adc+1 L0080,x
|
|
ror+1 L0080,x
|
|
adc [L0080],y
|
|
sei
|
|
adc L0086,y
|
|
ply
|
|
tdc
|
|
jmp (L0086,x)
|
|
|
|
L112C adc+2 L0086,x
|
|
ror+2 L0086,x
|
|
adc+3 L0089,x
|
|
bra @L1138
|
|
|
|
@L1138 sta (L0080,x)
|
|
brl @L113D
|
|
|
|
@L113D sta $80,S
|
|
sty+1 L0080
|
|
sta+1 L0080
|
|
stx+1 L0080
|
|
sta [L0080]
|
|
dey
|
|
bit #$80
|
|
txa
|
|
phb
|
|
sty+2 L0086
|
|
sta+2 L0086
|
|
stx+2 L0086
|
|
sta+3 L0089
|
|
bcc @L115B
|
|
@L115B sta (L0080),y
|
|
sta (L0080)
|
|
sta ($80,S),y
|
|
sty+1 L0080,x
|
|
sta+1 L0080,x
|
|
stx+1 L0080,y
|
|
sta [L0080],y
|
|
tya
|
|
sta L0086,y
|
|
txs
|
|
txy
|
|
stz+2 L0086
|
|
sta+2 L0086,x
|
|
stz+2 L0086,x
|
|
sta+3 L0089,x
|
|
ldy #$80
|
|
lda (L0080,x)
|
|
ldx #$80
|
|
lda $80,S
|
|
ldy+1 L0080
|
|
lda+1 L0080
|
|
ldx+1 L0080
|
|
lda [L0080]
|
|
tay
|
|
lda #$80
|
|
tax
|
|
plb
|
|
ldy+2 L0086
|
|
lda+2 L0086
|
|
ldx+2 L0086
|
|
lda+3 L0089
|
|
bcs @L11A0
|
|
@L11A0 lda (L0080),y
|
|
lda (L0080)
|
|
lda ($80,S),y
|
|
ldy+1 L0080,x
|
|
lda+1 L0080,x
|
|
ldx+1 L0080,y
|
|
lda [L0080],y
|
|
clv
|
|
lda L0086,y
|
|
tsx
|
|
tyx
|
|
ldy+2 L0086,x
|
|
lda+2 L0086,x
|
|
ldx+2 L0086,y
|
|
lda+3 L0089,x
|
|
cpy #$80
|
|
cmp (L0080,x)
|
|
rep #$00
|
|
cmp $80,S
|
|
cpy+1 L0080
|
|
cmp+1 L0080
|
|
dec+1 L0080
|
|
cmp [L0080]
|
|
iny
|
|
cmp #$80
|
|
dex
|
|
wai
|
|
cpy+2 L0086
|
|
cmp+2 L0086
|
|
dec+2 L0086
|
|
cmp+3 L0089
|
|
bne @L11E5
|
|
@L11E5 cmp (L0080),y
|
|
cmp (L0080)
|
|
cmp ($80,S),y
|
|
pei (L0080)
|
|
cmp+1 L0080,x
|
|
dec+1 L0080,x
|
|
cmp [L0080],y
|
|
cld
|
|
cmp L0086,y
|
|
phx
|
|
stp
|
|
|
|
L11F9 jml [L0086]
|
|
|
|
L11FC cmp+2 L0086,x
|
|
dec+2 L0086,x
|
|
cmp+3 L0089,x
|
|
cpx #$80
|
|
sbc (L0080,x)
|
|
sep #$00
|
|
sbc $80,S
|
|
cpx+1 L0080
|
|
sbc+1 L0080
|
|
inc+1 L0080
|
|
sbc [L0080]
|
|
inx
|
|
sbc #$80
|
|
nop
|
|
xba
|
|
cpx+2 L0086
|
|
sbc+2 L0086
|
|
inc+2 L0086
|
|
sbc+3 L0089
|
|
beq @L122A
|
|
@L122A sbc (L0080),y
|
|
sbc (L0080)
|
|
sbc ($80,S),y
|
|
pea L0086
|
|
sbc+1 L0080,x
|
|
inc+1 L0080,x
|
|
sbc [L0080],y
|
|
sed
|
|
sbc L0086,y
|
|
plx
|
|
xce
|
|
jsr (L0086,x)
|
|
sbc+2 L0086,x
|
|
inc+2 L0086,x
|
|
sbc+3 L0089,x
|
|
!pseudopc $0080 {
|
|
L0080 bit+1 @L0082
|
|
@L0082 bit+1 @L0082
|
|
bit+1 @L0082
|
|
L0086 bit+2 L0086
|
|
L0089 lda+3 L0089
|
|
} ;!pseudopc
|