ORG 800H
MVI B,10
SK1 MOV C,B
MOV D,E
SK2 MOV A,D
CPI 0
JZ SK3
MVI A,' '
RST 1
DCR D
JNZ SK2
SK3 MVI A,'#'
RST 1
DCR C
JNZ SK2
MVI A,10
RST 1
MVI A,13
RST 1
MOV A,B
SUI 1
JZ KON
INR E
DCR B
DCR B
JNZ SK1
KON HLT
Offline