mirror of
https://github.com/fadden/6502bench.git
synced 2024-07-14 05:28:55 +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.
123 lines
2.3 KiB
ArmAsm
123 lines
2.3 KiB
ArmAsm
!cpu 6502
|
|
* = $1000
|
|
!word $1000 ;PRG-style header
|
|
|
|
!pseudopc $1000 {
|
|
jsr L1100
|
|
jsr L1107
|
|
jmp L2000
|
|
|
|
} ;!pseudopc
|
|
!pseudopc $1100 {
|
|
L1100 bit L1100
|
|
L1103 lda #$11
|
|
ldx #$11
|
|
L1107 ldy #$11
|
|
clv
|
|
bvc L1103
|
|
|
|
} ;!pseudopc
|
|
!pseudopc $1100 {
|
|
@L1100_0 bit @L1100_0
|
|
lda #$22
|
|
@L1105 ldx #$22
|
|
ldy #$22
|
|
jmp @L1105
|
|
|
|
} ;!pseudopc
|
|
!pseudopc $1100 {
|
|
@L1100_1 bit @L1100_1
|
|
lda #$33
|
|
ldx #$33
|
|
@L1107_0 ldy #$33
|
|
sec
|
|
bcs @L1107_0
|
|
|
|
} ;!pseudopc
|
|
!pseudopc $2000 {
|
|
L2000 bit L2000
|
|
beq $2018
|
|
bne @L2020
|
|
|
|
} ;!pseudopc
|
|
!pseudopc $2020 {
|
|
@L2020 bit @L2020
|
|
beq $2028
|
|
bne L2080
|
|
|
|
offend nop
|
|
} ;!pseudopc
|
|
!pseudopc $2080 {
|
|
L2080 bit L2080
|
|
lda offend
|
|
jsr offend
|
|
lda $2028
|
|
jsr $2028
|
|
lda L2080-1
|
|
jsr L2080-1
|
|
lda L2080
|
|
jsr L2080
|
|
lda $00
|
|
beq @L2100
|
|
!byte $ad
|
|
|
|
} ;!pseudopc
|
|
!pseudopc $2100 {
|
|
@L2100 nop
|
|
nop
|
|
jmp @L3000
|
|
|
|
} ;!pseudopc
|
|
!pseudopc $2800 {
|
|
!byte $00
|
|
!byte $28
|
|
!fill 14,$00
|
|
} ;!pseudopc
|
|
!pseudopc $2820 {
|
|
!fill 18,$00
|
|
|
|
} ;!pseudopc
|
|
!pseudopc $3000 {
|
|
@L3000 bit @L3000
|
|
lda #$44
|
|
ldx #$44
|
|
ldy #$44
|
|
jmp fwd
|
|
|
|
ulabel !byte $00
|
|
!byte $01
|
|
} ;!pseudopc
|
|
!pseudopc $3100 {
|
|
!byte $02
|
|
|
|
fwd bit fwd
|
|
lda ulabel
|
|
lda ulabel+1
|
|
lda $300e
|
|
lda $300f
|
|
lda fwd-1
|
|
beq @L3182
|
|
!byte $ea
|
|
!byte $ea
|
|
} ;!pseudopc
|
|
!pseudopc $3180 {
|
|
!byte $00
|
|
!byte $01
|
|
|
|
@L3182 bit @L3182
|
|
lda label1
|
|
lda label1+1
|
|
lda L3200
|
|
clv
|
|
bvc L3200
|
|
|
|
label1 !byte $ea
|
|
!byte $ea
|
|
|
|
} ;!pseudopc
|
|
!pseudopc $3200 {
|
|
L3200 bit L3200
|
|
!byte $00
|
|
!byte $01 ;execution continues off end of file
|
|
} ;!pseudopc
|