2018-09-28 17:05:11 +00:00
|
|
|
;Project was edited to add a label in the middle of a dense hex region, and add
|
|
|
|
;a duplicate label.
|
|
|
|
zip equ $cd
|
|
|
|
absl equ $1029
|
|
|
|
absh equ $feed
|
|
|
|
biggie equ $123456
|
2018-10-24 20:17:03 +00:00
|
|
|
thirty2 equ $12345678 ;32-bit constant test
|
2019-10-23 05:43:10 +00:00
|
|
|
|
2019-10-10 20:49:21 +00:00
|
|
|
plataddr equ $3000 ;address only in platform file
|
|
|
|
projalsa equ $3200 ;same val as projalso
|
2018-09-28 17:05:11 +00:00
|
|
|
|
|
|
|
org $012345
|
|
|
|
start clc
|
|
|
|
xce
|
|
|
|
sep #$30
|
|
|
|
lda #zip
|
|
|
|
lda #zip+16
|
|
|
|
lda #zip+64
|
|
|
|
lda #<absh
|
|
|
|
lda #>absh
|
|
|
|
lda #<absh+64
|
|
|
|
lda #>absh+256
|
|
|
|
lda #<absl
|
|
|
|
lda #>absl
|
|
|
|
lda #<absl-64
|
|
|
|
lda #>absl-256
|
|
|
|
lda #<start
|
|
|
|
lda #>start
|
|
|
|
lda #^start
|
|
|
|
pea $feed
|
|
|
|
pea start
|
|
|
|
pea $0001
|
|
|
|
pea $3456
|
|
|
|
pea $0012
|
|
|
|
pea absh
|
|
|
|
pea start
|
|
|
|
pea ^start
|
|
|
|
pea biggie
|
|
|
|
pea ^biggie
|
|
|
|
lda zip+1
|
|
|
|
lda: zip+1
|
|
|
|
ldal zip+1
|
|
|
|
lda absh-1
|
|
|
|
ldal absh-1
|
|
|
|
lda absh+1
|
|
|
|
ldal absh+1
|
|
|
|
lda start+1
|
|
|
|
ldal start+1
|
|
|
|
lda start-1
|
|
|
|
ldal start-1
|
|
|
|
lda biggie+1
|
|
|
|
ldal biggie+1
|
|
|
|
lda biggie-1
|
|
|
|
ldal biggie-1
|
|
|
|
rep #$30
|
|
|
|
mx %00
|
|
|
|
lda #zip
|
|
|
|
lda #zip+16
|
|
|
|
lda #zip+64
|
|
|
|
lda #absl
|
|
|
|
lda #>absl
|
|
|
|
lda #absl-4096
|
|
|
|
lda #>absl-4096
|
|
|
|
lda #^absl
|
|
|
|
lda #absh
|
|
|
|
lda #>absh
|
|
|
|
lda #absh+4096
|
|
|
|
lda #>absh+4096
|
|
|
|
lda #^absh+65536
|
|
|
|
lda #start
|
|
|
|
lda #>start
|
|
|
|
lda #^start
|
|
|
|
lda #biggie
|
|
|
|
lda #>biggie
|
|
|
|
lda #^biggie
|
2019-11-17 01:15:03 +00:00
|
|
|
bra :skipdata
|
2018-09-28 17:05:11 +00:00
|
|
|
|
|
|
|
dfb zip
|
|
|
|
dfb <absh
|
|
|
|
dfb >absh
|
|
|
|
dfb <start
|
|
|
|
dfb >start
|
|
|
|
dfb ^start
|
|
|
|
dw zip
|
|
|
|
dw absl
|
|
|
|
dw >absl
|
|
|
|
dw absl-4096
|
|
|
|
dw >absl-4096
|
|
|
|
dw absh
|
|
|
|
dw >absh
|
|
|
|
dw absh+4096
|
|
|
|
dw >absh+4096
|
|
|
|
dw start
|
|
|
|
dw >start
|
|
|
|
dw ^start
|
|
|
|
dw start+1
|
|
|
|
dw >start
|
|
|
|
dw ^start
|
|
|
|
ddb absh
|
|
|
|
adr zip
|
|
|
|
adr absh
|
|
|
|
adr >absh
|
|
|
|
adr start
|
|
|
|
adr >start
|
|
|
|
adr ^start
|
|
|
|
adrl zip
|
|
|
|
adrl absh
|
|
|
|
adrl >absh
|
|
|
|
adrl start-1
|
|
|
|
adrl >start
|
|
|
|
adrl ^start
|
|
|
|
|
2019-11-17 01:15:03 +00:00
|
|
|
:skipdata lda #^biggie-65536
|
2019-08-08 20:02:01 +00:00
|
|
|
mvn #^biggie,#^biggie-1114112
|
|
|
|
mvp #^start,#^start+1114112
|
|
|
|
mvn #18,#1
|
|
|
|
mvp #%00000001,#%00010010
|
2019-11-17 01:15:03 +00:00
|
|
|
per :skipdata
|
|
|
|
brl :nextchunk
|
2018-09-28 17:05:11 +00:00
|
|
|
|
2019-11-17 01:15:03 +00:00
|
|
|
:nextchunk jml :L1000_1
|
2018-09-28 17:05:11 +00:00
|
|
|
|
|
|
|
org $1000
|
2019-11-17 01:15:03 +00:00
|
|
|
:L1000_1 nop
|
|
|
|
:L1000 nop
|
|
|
|
:L1000_0 nop
|
|
|
|
:l1000 sep #$30
|
2018-09-28 17:05:11 +00:00
|
|
|
mx %11
|
|
|
|
lda plataddr
|
|
|
|
lda $3100
|
|
|
|
lda projalsa
|
|
|
|
lda $3300
|
2019-11-17 01:15:03 +00:00
|
|
|
bra :calls
|
2018-09-28 17:05:11 +00:00
|
|
|
|
|
|
|
nop
|
2019-11-17 01:15:03 +00:00
|
|
|
:targ nop
|
2018-09-28 17:05:11 +00:00
|
|
|
nop
|
2019-11-17 01:15:03 +00:00
|
|
|
:L1016 per :targ-1
|
|
|
|
per :targ
|
|
|
|
per :targ+1
|
|
|
|
jsr :targ-1
|
|
|
|
jsr :targ
|
|
|
|
jsr :targ+1
|
|
|
|
:L1028 bra :targ-1
|
2018-09-28 17:05:11 +00:00
|
|
|
|
2019-11-17 01:15:03 +00:00
|
|
|
:L102A bra :targ
|
2018-09-28 17:05:11 +00:00
|
|
|
|
2019-11-17 01:15:03 +00:00
|
|
|
:L102C bra :targ+1
|
2018-09-28 17:05:11 +00:00
|
|
|
|
2019-11-17 01:15:03 +00:00
|
|
|
:L102E brl :targ-1
|
2018-09-28 17:05:11 +00:00
|
|
|
|
2019-11-17 01:15:03 +00:00
|
|
|
:L1031 brl :targ
|
2018-09-28 17:05:11 +00:00
|
|
|
|
2019-11-17 01:15:03 +00:00
|
|
|
:L1034 brl :targ+1
|
2018-09-28 17:05:11 +00:00
|
|
|
|
2019-11-17 01:15:03 +00:00
|
|
|
:L1037 jmp :targ-1
|
2018-09-28 17:05:11 +00:00
|
|
|
|
2019-11-17 01:15:03 +00:00
|
|
|
:L103A jmp :targ
|
2018-09-28 17:05:11 +00:00
|
|
|
|
2019-11-17 01:15:03 +00:00
|
|
|
:L103D jmp :targ+1
|
2018-09-28 17:05:11 +00:00
|
|
|
|
2019-11-17 01:15:03 +00:00
|
|
|
:L1040 jml :targ-1
|
2018-09-28 17:05:11 +00:00
|
|
|
|
2019-11-17 01:15:03 +00:00
|
|
|
jml :targ
|
2018-09-28 17:05:11 +00:00
|
|
|
|
2019-11-17 01:15:03 +00:00
|
|
|
jml :targ+1
|
2018-09-28 17:05:11 +00:00
|
|
|
|
2019-11-17 01:15:03 +00:00
|
|
|
:calls jsr :L1016
|
|
|
|
jsr :L1028
|
|
|
|
jsr :L102A
|
|
|
|
jsr :L102C
|
|
|
|
jsr :L102E
|
|
|
|
jsr :L1031
|
|
|
|
jsr :L1034
|
|
|
|
jsr :L1037
|
|
|
|
jsr :L103A
|
|
|
|
jsr :L103D
|
|
|
|
jsr :L1040
|
2018-09-28 17:05:11 +00:00
|
|
|
jsr $1044
|
|
|
|
jsr $1048
|
2019-11-17 01:15:03 +00:00
|
|
|
brl :L118E
|
2018-09-28 17:05:11 +00:00
|
|
|
|
2019-11-17 01:15:03 +00:00
|
|
|
:bulk hex 808182838485868788898a8b8c8d8e8f808182838485868788898a8b8c8d8e8f ;bulky
|
2018-09-28 17:05:11 +00:00
|
|
|
hex 808182838485868788898a8b8c8d8e8f808182838485868788898a8b8c8d8e8f
|
|
|
|
hex 808182838485868788898a8b8c8d8e8f808182838485868788898a8b8c8d8e8f
|
|
|
|
hex 808182838485868788898a8b8c8d8e8f
|
2019-11-17 01:15:03 +00:00
|
|
|
:string asc 'This is a long string. Put a label and comment on it to confir' ;stringy
|
2018-09-28 17:05:11 +00:00
|
|
|
asc 'm that the label and comment only appear on the first line. T'
|
|
|
|
asc 'he quick brown fox jumps over the lazy dogs.'
|
|
|
|
|
2019-11-17 01:15:03 +00:00
|
|
|
:L118E lda #<thirty2+2
|
2018-10-24 20:17:03 +00:00
|
|
|
lda #>thirty2+768
|
|
|
|
lda #^thirty2
|
|
|
|
rep #$30
|
|
|
|
mx %00
|
|
|
|
lda #thirty2+3
|
|
|
|
lda #>thirty2+1024
|
|
|
|
lda #^thirty2
|
|
|
|
rts
|
2018-09-28 17:05:11 +00:00
|
|
|
|