;Project was edited to add a label in the middle of a dense hex region, and add ;a duplicate label. BMI equ $30 ;opcode mnemonic zip equ $cd absl equ $1029 absh equ $feed biggie equ $123456 thirty2 equ $12345678 ;32-bit constant test plataddr equ $3000 ;address only in platform file projalsa equ $3200 ;same val as projalso org $012345 start clc xce sep #$30 lda #zip lda #zip+16 lda #zip+64 lda #absh lda #absh+$100 lda #absl lda #absl-$100 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-$1000 lda #>absl-$1000 lda #^absl lda #absh lda #>absh lda #absh+$1000 lda #>absh+$1000 lda #^absh+$10000 lda #start lda #>start lda #^start lda #biggie lda #>biggie lda #^biggie bra :skipdata dfb zip dfb absh dfb start dfb ^start dw zip dw absl dw >absl dw absl-$1000 dw >absl-$1000 dw absh dw >absh dw absh+$1000 dw >absh+$1000 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 :skipdata lda #^biggie-$10000 mvn #^biggie,#^biggie-$110000 mvp #^start,#^start+$110000 mvn #18,#1 mvp #%00000001,#%00010010 per :skipdata brl :nextchunk :nextchunk jml :L1000_1 org $1000 :L1000_1 nop :L1000 nop :L1000_0 nop :l1000 sep #$30 mx %11 lda plataddr lda $3100 lda projalsa lda $3300 bra :calls nop :targ nop nop :L1016 per :targ-1 per :targ per :targ+1 jsr :targ-1 jsr :targ jsr :targ+1 :L1028 bra :targ-1 :L102A bra :targ :L102C bra :targ+1 :L102E brl :targ-1 :L1031 brl :targ :L1034 brl :targ+1 :L1037 jmp :targ-1 :L103A jmp :targ :L103D jmp :targ+1 :L1040 jml :targ-1 jml :targ jml :targ+1 :calls jsr :L1016 jsr :L1028 jsr :L102A jsr :L102C jsr :L102E jsr :L1031 jsr :L1034 jsr :L1037 jsr :L103A jsr :L103D jsr :L1040 jsr $1044 jsr $1048 brl :L118E :bulk hex 808182838485868788898a8b8c8d8e8f808182838485868788898a8b8c8d8e8f ;bulky hex 808182838485868788898a8b8c8d8e8f808182838485868788898a8b8c8d8e8f hex 808182838485868788898a8b8c8d8e8f808182838485868788898a8b8c8d8e8f hex 808182838485868788898a8b8c8d8e8f :string asc 'This is a long string. Put a label and comment on it to confir' ;stringy asc 'm that the label and comment only appear on the first line. T' asc 'he quick brown fox jumps over the lazy dogs.' :L118E lda #thirty2+$300 lda #^thirty2 rep #BMI mx %00 lda #thirty2+3 lda #>thirty2+$400 lda #^thirty2 rts