org   $1000
         clc
         xce
         sep   #$ff
         jsr   L1100
         jsr   L1107
         jmp   L2000

         org   $1100
L1100    bit   L1100
L1103    lda   #$11
         ldx   #$11
L1107    ldy   #$11
         per   L1103
         bra   L1103

         org   $1100
L1100_0  bit   L1100_0
         lda   #$22
L1105    ldx   #$22
         ldy   #$22
         per   L1105
         jmp   L1105

         org   $1100
L1100_1  bit   L1100_1
         lda   #$33
         ldx   #$33
L1107_0  ldy   #$33
         per   L1107_0
         bra   L1107_0

         org   $2000
L2000    bit   L2000
         beq   $2018
         bra   L2020

         org   $2020
L2020    bit   L2020
         beq   $2029
         brl   L2080

offend   nop
         org   $2080
L2080    bit   L2080
         lda   offend
         jsr   offend
         lda   $2029
         jsr   $2029
         lda   L2080-1
         jsr   L2080-1
         lda   L2080
         jsr   L2080
         lda   $00
         beq   L2100
         dfb   $ad

         org   $2100
L2100    nop
         nop
         jmp   L3000

         org   $2800
         dfb   $00
         dfb   $28
         ds    14,$00
         org   $2820
         ds    18,$00

         org   $3000
L3000    bit   L3000
         lda   #$44
         ldx   #$44
         ldy   #$44
         brl   fwd

ulabel   dfb   $00
         dfb   $01
         org   $3100
L3100    dfb   $02

fwd      bit   fwd
         lda   ulabel
         lda   ulabel+1
         lda   $300e
         lda   $300f
         lda   L3100
         beq   L3182
         dfb   $ea
         dfb   $ea
         org   $3180
         dfb   $00
         dfb   $01

L3182    bit   L3182
         lda   label1
         lda   label1+1
         lda   label1+112
         bra   L3200

label1   dfb   $ea
         dfb   $ea

         org   $3200
L3200    bit   L3200
         dfb   $00
         dfb   $01