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