.org 0 brset 0,h'00,reltst1 brset 0,h'ff,reltst1 brset 1,h'00,reltst1 brset 1,h'ff,reltst1 brset 2,h'00,reltst1 brset 2,h'ff,reltst1 brset 3,h'00,reltst1 brset 3,h'ff,reltst1 brset 4,h'00,reltst1 brset 4,h'ff,reltst1 brset 5,h'00,reltst1 brset 5,h'ff,reltst1 brset 6,h'00,reltst1 brset 6,h'ff,reltst1 brset 7,h'00,reltst1 brset 7,h'ff,reltst1 reltst1: brclr 0,h'00,reltst1 brclr 0,h'ff,reltst1 brclr 1,h'00,reltst1 brclr 1,h'ff,reltst1 brclr 2,h'00,reltst1 brclr 2,h'ff,reltst1 brclr 3,h'00,reltst1 brclr 3,h'ff,reltst1 brclr 4,h'00,reltst1 brclr 4,h'ff,reltst1 brclr 5,h'00,reltst1 brclr 5,h'ff,reltst1 brclr 6,h'00,reltst1 brclr 6,h'ff,reltst1 brclr 7,h'00,reltst1 brclr 7,h'ff,reltst1 bset 0,h'00 bset 0,h'ff bset 1,h'00 bset 1,h'ff bset 2,h'00 bset 2,h'ff bset 3,h'00 bset 3,h'ff bset 4,h'00 bset 4,h'ff bset 5,h'00 bset 5,h'ff bset 6,h'00 bset 6,h'ff bset 7,h'00 bset 7,h'ff bclr 0,h'00 bclr 0,h'ff bclr 1,h'00 bclr 1,h'ff bclr 2,h'00 bclr 2,h'ff bclr 3,h'00 bclr 3,h'ff bclr 4,h'00 bclr 4,h'ff bclr 5,h'00 bclr 5,h'ff bclr 6,h'00 bclr 6,h'ff bclr 7,h'00 bclr 7,h'ff add #h'00 add #h'ff add 100 add h'00,x add h'ff,x add 1000 add h'00,x1 add h'ff,x1 add 1000,x add h'00,x2 add h'ff,x2 add 1000,x2 adc #h'00 adc #h'ff adc 100 adc h'00,x adc h'ff,x adc 1000 and #h'00 and #h'ff and 100 and h'00,x and h'ff,x and 1000 bit #h'00 bit #h'ff bit 100 bit h'00,x bit h'ff,x bit 1000 cmp #h'00 cmp #h'ff cmp 100 cmp h'00,x cmp h'ff,x cmp 1000 eor #h'00 eor #h'ff eor 100 eor h'00,x eor h'ff,x eor 1000 lda #h'00 lda #h'ff lda 100 lda h'00,x lda h'ff,x lda 1000 ora #h'00 ora #h'ff ora 100 ora h'00,x ora h'ff,x ora 1000 sta 100 sta h'00,x sta h'ff,x sta 1000 sub #h'00 sub #h'ff sub 100 sub h'00,x sub h'ff,x sub 1000 sbc #h'00 sbc #h'ff sbc 100 sbc h'00,x sbc h'ff,x sbc 1000 clra clrx clr 100 clr h'00,x clr h'ff,x clr 0,x coma comx com 100 com h'00,x com h'ff,x com 0,x nega negx neg 100 neg h'00,x neg h'ff,x neg 0,x deca decx dec 100 dec h'00,x dec h'ff,x dec 0,x inca incx inc 100 inc h'00,x inc h'ff,x inc 0,x rola rolx rol 100 rol h'00,x rol h'ff,x rol 0,x rora rorx ror 100 ror h'00,x ror h'ff,x ror 0,x lsla lslx lsl 100 lsl h'00,x lsl h'ff,x lsl 0,x asra asrx asr 100 asr h'00,x asr h'ff,x asr 0,x lsra lsrx lsr 100 lsr h'00,x lsr h'ff,x lsr 0,x tsta tstx tst 100 tst h'00,x tst h'ff,x tst 0,x jmp x jmp 0,x jmp 100,x jmp 1000,x jmp 100,x1 jmp 0,x1 jmp 100 jmp 1000 jsr x jsr 0,x jsr 100,x jsr 1000,x jsr 100,x1 jsr 0,x1 jsr 100 jsr 1000 ldx #h'00 ldx #h'ff ldx x ldx 0,x ldx 100,x ldx 1000,x ldx 100,x1 ldx 0,x1 ldx 100 ldx 1000 cpx #h'00 cpx #h'ff cpx x cpx 0,x cpx 100,x cpx 1000,x cpx 100,x1 cpx 0,x1 cpx 100 cpx 1000 stx x stx 0,x stx 100,x stx 1000,x stx 100,x1 stx 0,x1 stx 100 stx 1000 tax txa nop rti rts swi wait clc cli rsp sec sei stop bra reltst brn reltst bhi reltst bls reltst bcc reltst bcs reltst reltst: bne reltst beq reltst bhcc reltst bhcs reltst bpl reltst bmi reltst bmc reltst bms reltst bil reltst bih reltst bsr reltst synctst1: brset forbit0,forward1,reltst2 brset forbit0,forward2,reltst2 brset forbit1,forward1,reltst2 brset forbit1,forward2,reltst2 brset forbit2,forward1,reltst2 brset forbit2,forward2,reltst2 brset forbit3,forward1,reltst2 brset forbit3,forward2,reltst2 brset forbit4,forward1,reltst2 brset forbit4,forward2,reltst2 brset forbit5,forward1,reltst2 brset forbit5,forward2,reltst2 brset forbit6,forward1,reltst2 brset forbit6,forward2,reltst2 brset forbit7,forward1,reltst2 brset forbit7,forward2,reltst2 reltst2: brclr forbit0,forward1,reltst2 brclr forbit0,forward2,reltst2 brclr forbit1,forward1,reltst2 brclr forbit1,forward2,reltst2 brclr forbit2,forward1,reltst2 brclr forbit2,forward2,reltst2 brclr forbit3,forward1,reltst2 brclr forbit3,forward2,reltst2 brclr forbit4,forward1,reltst2 brclr forbit4,forward2,reltst2 brclr forbit5,forward1,reltst2 brclr forbit5,forward2,reltst2 brclr forbit6,forward1,reltst2 brclr forbit6,forward2,reltst2 brclr forbit7,forward1,reltst2 brclr forbit7,forward2,reltst2 bset forbit0,forward1 bset forbit0,forward2 bset forbit1,forward1 bset forbit1,forward2 bset forbit2,forward1 bset forbit2,forward2 bset forbit3,forward1 bset forbit3,forward2 bset forbit4,forward1 bset forbit4,forward2 bset forbit5,forward1 bset forbit5,forward2 bset forbit6,forward1 bset forbit6,forward2 bset forbit7,forward1 bset forbit7,forward2 bclr forbit0,forward1 bclr forbit0,forward2 bclr forbit1,forward1 bclr forbit1,forward2 bclr forbit2,forward1 bclr forbit2,forward2 bclr forbit3,forward1 bclr forbit3,forward2 bclr forbit4,forward1 bclr forbit4,forward2 bclr forbit5,forward1 bclr forbit5,forward2 bclr forbit6,forward1 bclr forbit6,forward2 bclr forbit7,forward1 bclr forbit7,forward2 add #forward1 add #forward2 add 100 add forward1 add forward1,x add forward2,x add 1000 add forward1,x1 add forward2,x1 add 1000,x add forward1,x2 add forward2,x2 add 1000,x2 add forward3,x add forward1,x1 add forward2,x1 add forward3,x2 adc #forward1 adc #forward2 adc 100 adc forward1,x adc forward2,x adc 1000 and #forward1 and #forward2 and 100 and forward1,x and forward2,x and 1000 bit #forward1 bit #forward2 bit 100 bit forward1,x bit forward2,x bit 1000 cmp #forward1 cmp #forward2 cmp 100 cmp forward1,x cmp forward2,x cmp 1000 eor #forward1 eor #forward2 eor 100 eor forward1,x eor forward2,x eor 1000 lda #forward1 lda #forward2 lda 100 lda forward1,x lda forward2,x lda 1000 ora #forward1 ora #forward2 ora 100 ora forward1,x ora forward2,x ora 1000 sta 100 sta forward1,x sta forward2,x sta 1000 sub #forward1 sub #forward2 sub 100 sub forward1,x sub forward2,x sub 1000 sbc #forward1 sbc #forward2 sbc 100 sbc forward1,x sbc forward2,x sbc 1000 clra clrx clr 100 clr forward1 clr forward2 clr forward1,x clr forward2,x clr 0,x coma comx com 100 com forward1,x com forward2,x com 0,x nega negx neg 100 neg forward1,x neg forward2,x neg 0,x deca decx dec 100 dec forward1,x dec forward2,x dec 0,x inca incx inc 100 inc forward1,x inc forward2,x inc 0,x rola rolx rol 100 rol forward1,x rol forward2,x rol 0,x rora rorx ror 100 ror forward1,x ror forward2,x ror 0,x lsla lslx lsl 100 lsl forward1,x lsl forward2,x lsl 0,x asra asrx asr 100 asr forward1,x asr forward2,x asr 0,x lsra lsrx lsr 100 lsr forward1,x lsr forward2,x lsr 0,x tsta tstx tst 100 tst forward1,x tst forward2,x tst 0,x tst 0,x1 tst h'ff,x1 jmp x jmp 0,x jmp 100,x jmp 1000,x jmp 100,x1 jmp 0,x1 jmp 100 jmp 1000 jsr x jsr 0,x jsr 100,x jsr 1000,x jsr 100,x1 jsr 0,x1 jsr 100 jsr forward2 ldx #forward1 ldx #forward2 ldx x ldx 0,x ldx 100,x ldx 1000,x ldx 100,x1 ldx 0,x1 ldx 100 ldx 1000 cpx #forward1 cpx #forward2 cpx x cpx 0,x cpx 100,x cpx 1000,x cpx 100,x1 cpx 0,x1 cpx 100 cpx 1000 stx x stx 0,x stx 100,x stx 1000,x stx 100,x1 stx 0,x1 stx 100 stx 1000 tax txa nop rti rts swi wait clc cli rsp sec sei stop bra reltst3 brn reltst3 bhi reltst3 bls reltst3 bcc reltst3 bcs reltst3 reltst3: bne reltst3 beq reltst3 bhcc reltst3 bhcs reltst3 bpl reltst3 bmi reltst3 bmc reltst3 bms reltst3 bil reltst3 bih reltst3 bsr reltst3 synctst2: .equ forward1,h'00 .equ forward2,h'ff .equ forward3,1000 .equ forbit0,0 .equ forbit1,1 .equ forbit2,2 .equ forbit3,3 .equ forbit4,4 .equ forbit5,5 .equ forbit6,6 .equ forbit7,7 .org h'1000 .end