MOV R7,#40h
  MOV A,#'0'
SPACELOOP:
   LCALL WRITE
   INC A
   DJNZ R7,SPACELOOP