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