func_drawblock_2:
;                                           $FCB7,$FCB9,$FCB3,$FCB5      
;Draw2Block de,hl,24,148,22,32 --> ram,vram,lines,wram,wvram,addvram


LD A,($FCB7) ;number of lines

drawblock_3:
PUSH AF

PUSH DE
PUSH HL

;EX AF,AF'
;Call $53
;EXX
;LD A,(7)
;LD C,A
;EXX
;EX AF,AF'

;EX DE,HL
push hl
push de

call func_prep_write_vram

pop de
pop hl
EX DE,HL

LD A,(7)
LD C,A

;drawblock_4:

LD A,($FCB3)
LD B,A

drawblock_5:

OUTI
;NOP
JR NZ,drawblock_5

;LD DE,($FCB9) ;width ram line
;ADD HL, DE

;LD DE,($FCB5)

;HL=HL+$FCB5
;DE=DE+$FCB9

POP HL
POP DE

PUSH HL
PUSH DE
POP HL
LD DE,($FCB9)
ADD HL,DE
PUSH HL
POP DE
POP HL

PUSH DE
LD DE,($FCB5)
ADD HL,DE
POP DE

POP AF

DEC A
JR NZ,drawblock_3

RET
