ORG 0000H
LJMP 0100H
ORG 0100H
MOV SP,#60H
START: MOV 51H,#00H
MOV R0, #21H
MOV R7, #30H
XH: MOV A ,@RO
MAIN: CLR C
SUBB A, 51H
JNC JM
SJMP AGAIN
JM: MOV 51H, @R0
AGAIN: INC R0
DJNZ R7, XH
ENDD: SJMP ENDD
RET
END