1 cpu 6804 2 3 include stddef04.inc 4 5 clra 6 clrx 7 clry 8 coma 9 rola 10 asla 11 inca 12 incx 13 incy 14 deca 15 decx 16 decy 17 tax 18 tay 19 txa 20 tya 21 rts 22 rti 23 nop 24 25targ: beq targ 26 bne targ 27 blo targ 28 bcs targ 29 bhs targ 30 bcc targ 31 32 jmp $123 33 jsr $456 34 35 add (x) 36 add (y) 37 add $30 38 add #$40 39 sub (x) 40 sub (y) 41 sub $50 42 sub #$60 43 cmp (x) 44 cmp (y) 45 cmp $70 46 cmp #$80 47 and (x) 48 and (y) 49 and $90 50 and #$a0 51 52 lda (x) 53 sta (y) 54 lda $82 55 sta $40 56 lda #55 57 58 ldxi #0 59 ldyi #-1 60 61 mvi $12,#$45 62 63 dec $82 64 inc $40 65 dec (y) 66 inc (x) 67 68 bset 1,$12 69 bclr 3,$34 70 71 brset 5,$56,targ 72 brclr 7,$78,targ 73