2020-06-07 00:06:31 +00:00
|
|
|
;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
|
|
|
|
|
|
|
|
* = $0000
|
|
|
|
!pseudopc $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
|
2020-07-02 20:00:02 +00:00
|
|
|
!word absl >> 8
|
2020-06-07 00:06:31 +00:00
|
|
|
!word absl-$1000
|
|
|
|
!word 0+(absl >> 8)-16
|
|
|
|
!word absh
|
2020-07-02 20:00:02 +00:00
|
|
|
!word absh >> 8
|
2020-06-07 00:06:31 +00:00
|
|
|
!word absh-$f000
|
|
|
|
!word 0+(absh >> 8)+16
|
|
|
|
!word start
|
2020-07-02 20:00:02 +00:00
|
|
|
!word start >> 8
|
2020-06-07 00:06:31 +00:00
|
|
|
!word start+1
|
2020-07-02 20:00:02 +00:00
|
|
|
!word start >> 8
|
2020-06-07 00:06:31 +00:00
|
|
|
!byte $fe,$ed
|
|
|
|
!24 zip
|
|
|
|
!24 absh
|
2020-07-02 20:00:02 +00:00
|
|
|
!24 absh >> 8
|
2020-06-07 00:06:31 +00:00
|
|
|
!24 start
|
2020-07-02 20:00:02 +00:00
|
|
|
!24 start >> 8
|
2020-06-07 00:06:31 +00:00
|
|
|
|
|
|
|
@L23A3 jmp @L1000_1
|
|
|
|
|
|
|
|
} ;!pseudopc
|
|
|
|
!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
|
|
|
|
|
|
|
|
} ;!pseudopc
|