longsym equ $123456 org $1000 clc xce sep #$30 jmp L0000 org $0000 L0000 bit: L0000 L0003 lda L0000 lda L0003 dfb $d0,$ba dfb $30,$b8 dfb $62,$b5,$ff bvs L0016 brl L0080 lodat dfb $00 dfb $01 dfb $02 L0016 lda lodat+1 dfb $82,$a5,$ff org $0080 L0080 bit: L0080 jml L440000 org $ffc0 LFFC0 bit LFFC0 LFFC3 dfb $82,$3d,$00 org $440000 L440000 cmpl L440000 L440004 ldal L440000 lda: L440000 lda L0000 bmi L440004 dfb $62,$b2,$ff dfb $d0,$b0 dfb $82,$a9,$ff dat44 dw dat44 adr dat44 org $44ffc0 L44FFC0 cmpl L44FFC0 high44 beq L44FFCB dfb $30,$3c dfb $82,$39,$00 L44FFCB jml L2000 org $2000 L2000 bit L2000 pea dat44 pea ^dat44 bne L200E jml [lodat] L200E nop jsr j2 j2 jsr j2+3 jsr j2-3 jsl longsym rts