ex hl,de ;*** line 1/16 *** set 3,h set 4,h ;*** line 3/16 *** ld bc,#80 ld de,#C005 ld a,(hl) : and #55 : ld (hl),a dec l : ld (hl),b dec l : ld a,(hl) : and #AA : ld (hl),a res 3,h set 5,h ;*** line 5/16 *** ld (hl),#40 inc l : ld (hl),#90 inc l : ld (hl),b inc l : ld (hl),b inc l : ld (hl),b inc l : ld a,(hl) : and #55 : ld (hl),a set 3,h ;*** line 6/16 *** ld a,(hl) : and #55 : ld (hl),a dec l : ld (hl),b dec l : ld (hl),c dec l : ld (hl),#20 dec l : ld (hl),e dec l : ld a,(hl) : and #AA : ld (hl),a res 4,h ;*** line 7/16 *** ld (hl),#44 inc l : ld (hl),d inc l : ld (hl),b inc l : ld (hl),c inc l : ld (hl),b res 3,h ;*** line 8/16 *** ld a,(hl) : and #55 : ld (hl),a dec l : ld (hl),b dec l : ld (hl),b dec l : ld (hl),d dec l : ld (hl),#40 ld a,l : add #40 : ld l,a : ld a,h : adc #E0 : ld h,a ;*** line 9/16 *** inc l : ld (hl),e inc l : ld (hl),#1A inc l : ld (hl),c inc l : ld (hl),b inc l : ld (hl),b set 3,h ;*** line 10/16 *** ld (hl),b dec l : ld (hl),b dec l : ld (hl),#44 dec l : ld (hl),#F dec l : ld (hl),e set 4,h ;*** line 11/16 *** ld (hl),e inc l : ld (hl),#1E inc l : ld (hl),d inc l : ld (hl),#C8 inc l : ld (hl),b res 3,h ;*** line 12/16 *** ld (hl),b dec l : ld (hl),d dec l : ld (hl),#44 dec l : ld (hl),#F dec l : ld (hl),e set 5,h ;*** line 13/16 *** ld (hl),#10 inc l : ld (hl),#F inc l : ld (hl),d inc l : ld (hl),c inc l : ld (hl),c set 3,h ;*** line 14/16 *** ld (hl),b dec l : ld (hl),b dec l : ld (hl),c dec l : ld (hl),#1A dec l : ld (hl),#10 res 4,h ;*** line 15/16 *** ld (hl),#44 inc l : ld (hl),#F inc l : ld (hl),d inc l : ld (hl),d inc l : ld (hl),c res 3,h ;*** line 16/16 *** ld (hl),c dec l : ld (hl),#C4 dec l : ld (hl),d dec l : ld (hl),#F dec l : ld (hl),#14 ret ; #DBG curx=3 flux=71 on 176