harsh

LXI H,8000
MVI D,08H
MVI B,00H
MVI C,01H
MOV A,B
ADD C
STA 8001H
MOV B,C
MOV C,A
DRC D
JNC 1006
HLT