coma

MVI C,00H
MVI D,05H
MVI A,00H
LXI H,2050H
AGAIN:ADD M
JNC NEXT
INR C
NEXT:INX H
DCR D
JNC AGAIN
LOOP:STA 2055H
MOV A,C
STA 2056H
HLT