设100个无符号数,连续存放在以2000H为首地址的存储区中,编程统计奇数和偶数的个数 用汇编语言编程

汇编程序如下:
Zero EQU 42H ;零的统计
Negetive EQU 41H ;负数的统计
Positive EQU 40H ;正数的统计
Count EQU 100 ;比较个数
ORG 0000H
LJMP MAIN
ORG 0040H
Data_Filter:
PUSH PSW ;函数调用时的现场保护
PUSH ACC
MOV Zero,#0
MOV Negetive,#0
MOV Positive,#0
MOV R2,#0
MOV DPTR,#0x2000
Loop:
MOVX A,@DPTR
CJNE A,#0,NonZero
INC Zero
JMP NEXT
NonZero:
JC Neg
INC Positive
JMP NEXT
Neg:
INC Negetive
NEXT:
INC DPTR
INC R2
CJNE R2,#Count,Loop
POP ACC ;恢复现场
POP PSW
RET
MAIN:
ACALL Data_Filter
SJMP $ ;仅用于测试观察
END