片内RAM50H~5FH的内容传递到片外RAM2000H~200FH并统计其正数,负数,零的个数，请用汇编。谢谢了。

片内RAM50H~5FH的内容传递到片外RAM2000H~200FH并统计其正数,负数,零的个数，请用汇编。谢谢了。

ORG 0000H
LJMP MAIN
ORG 0030H
MAIN:
MOV R0,#50H
MOV R7,#16
MOV DPTR,#2000H
MOV R2,#0
MOV R3,#0
MOV R4,#0
LOOP:
MOV A,@R0
JB ACC.7,LPF
JZ LP0
LPZ:
INC R2
SJMP LPJ
LP0:
INC R3
SJMP LPJ
LPF:
INC R4
LPJ:
MOVX @DPTR,A
INC R0
INC DPTR
DJNZ R7,LOOP
MOV A,R2
MOV P0,A ;显示正数个数
XCH A,R3
MOV P1,A ;显示0个数
XCH A,R4
MOV P2,A ;显示负数个数
SJMP $
END

//R7正数的个数
//R6零的个数
//R5负数的个数
CLR A
MOV R7,A
MOV R6,A
MOV R5,A
MOV R0,#50H
MOV DPTR,#2000H
LOOP:
MOV A,@R0
MOVX @DPTR,A
INC R0
INC DPTR
JNZ LOOP_1
INC R6 //0
JMP LOOP_3
LOOP_1:
JNB ACC.7,LOOP_2
INC R5 //-
JMP LOOP_3
LOOP_2:
INC R7 //+
LOOP_3:
CJNE R0,#60H,LOOP
JMP $
END