mirror of
https://github.com/fadden/6502bench.git
synced 2024-06-30 06:29:32 +00:00
5f472b60cf
Split ".org" into ".arstart" and ".arend" (address range start/end). Address range ends are now shown in the code list view, and the pseudo-op can be edited in app settings. Address range starts are now shown after notes and long comments, rather than before, which brings the on-screen display in sync with generated code. Reworked the address range editor UI to include the new features. The implementation is fully broken. More changes to the AddressMap API, putting the resolved region length into a separate ActualLength field. Added FindRegion(). Renamed some things. Code generation changed slightly: the blank line before a region-end line now comes after it, and ACME's "} ;!pseudopc" is now just "}". This required minor updates to some of the regression test results.
110 lines
2.6 KiB
ArmAsm
110 lines
2.6 KiB
ArmAsm
;Project was edited to add a label in the middle of a dense hex region, and add
|
|
;a duplicate label.
|
|
!cpu 6502
|
|
BMI1 = $30 ;opcode mnemonic
|
|
zip = $cd
|
|
absl = $1029
|
|
absh = $feed
|
|
|
|
plataddr = $3000 ;address only in platform file
|
|
projalsa = $3200 ;same val as projalso
|
|
|
|
* = $2345
|
|
start lda #zip
|
|
lda #zip+16
|
|
lda #zip-192
|
|
lda #<absh
|
|
lda #>absh
|
|
lda #<absh-192
|
|
lda #(>absh)+1
|
|
lda #<absl
|
|
lda #>absl
|
|
lda #<absl+192
|
|
lda #(>absl)-1
|
|
lda #<start
|
|
lda #>start
|
|
lda zip+1
|
|
lda+2 zip+1
|
|
lda absh-1
|
|
lda absh+1
|
|
lda start+1
|
|
lda start-1
|
|
jmp @L23A3
|
|
|
|
!byte zip
|
|
!byte <absh
|
|
!byte >absh
|
|
!byte <start
|
|
!byte >start
|
|
!word zip
|
|
!word absl
|
|
!word absl >> 8
|
|
!word absl-$1000
|
|
!word 0+(absl >> 8)-16
|
|
!word absh
|
|
!word absh >> 8
|
|
!word absh-$f000
|
|
!word 0+(absh >> 8)+16
|
|
!word start
|
|
!word start >> 8
|
|
!word start+1
|
|
!word start >> 8
|
|
!byte $fe,$ed
|
|
!24 zip
|
|
!24 absh
|
|
!24 absh >> 8
|
|
!24 start
|
|
!24 start >> 8
|
|
|
|
@L23A3 jmp @L1000_1
|
|
|
|
!pseudopc $1000 {
|
|
@L1000_1 nop
|
|
@L1000 nop
|
|
@L1000_0 nop
|
|
@l1000 lda plataddr
|
|
lda $3100
|
|
lda projalsa
|
|
lda $3300
|
|
jmp calls
|
|
|
|
nop
|
|
targ nop
|
|
nop
|
|
L1015 jsr targ-1
|
|
jsr targ
|
|
jsr targ+1
|
|
L101E jmp targ-1
|
|
|
|
L1021 jmp targ
|
|
|
|
L1024 jmp targ+1
|
|
|
|
L1027 jmp targ-1
|
|
|
|
L102A jmp targ
|
|
|
|
L102D jmp targ+1
|
|
|
|
calls jsr L1015
|
|
jsr L101E
|
|
jsr L1021
|
|
jsr L1024
|
|
jsr L1027
|
|
jsr L102A
|
|
jsr L102D
|
|
jmp L1160
|
|
|
|
!hex 808182838485868788898a8b8c8d8e8f808182838485868788898a8b8c8d8e8f ;bulky
|
|
!hex 808182838485868788898a8b8c8d8e8f808182838485868788898a8b8c8d8e8f
|
|
!hex 808182838485868788898a8b8c8d8e8f808182838485868788898a8b8c8d8e8f
|
|
!hex 808182838485868788898a8b8c8d8e8f
|
|
!text "This is a long string. Put a label and comment on it to confir" ;stringy
|
|
!text "m that the label and comment only appear on the first line. T"
|
|
!text "he quick brown fox jumps over the lazy dogs."
|
|
|
|
L1160 adc #BMI1
|
|
rts
|
|
|
|
}
|