417.asm

来自「微机原理与接口技术的部分课后题（十几题经典的）程序」· 汇编 代码 · 共 64 行

DATA SEGMENT
     NUM DB 57H,23H,98H,0A7H,9DH,01H,23H,0FFH,0EDH,0A8H
     POV DB 10 DUP(0)
     NET DB 10 DUP(0)
     NP DB 00H
     NN DB 00H
     MESG1 DB 'The number of positive is :','$'
     MESG2 DB 'The number of negative is :','$'
     MESG3 DB 0AH,0DH,'$'
DATA ENDS
CODE SEGMENT
 ASSUME DS:DATA,CS:CODE
   CMPR PROC NEAR
        CMP AL,00H
        JG L1
        JL L2
     L1:LEA DI,POV
        MOV [DI][BX],AL
        ADD NP,1H
        JMP L3
     L2:LEA DI,NET
        MOV [DI][BX],AL
        ADD NN,1H
        JMP L3
     L3:INC SI
        ADD BX,1
        RET
   CMPR ENDP
   STDOUT1 PROC NEAR
        ADD [SI],30H
        MOV DL,[SI]
        MOV AH,02H
        INT 21H
        RET
   STDOUT1 ENDP  
   STDOUT2 PROC NEAR
        MOV DX,BX
        MOV AH,09H
        INT 21H
        RET
   STDOUT2 ENDP
 START: MOV AX,DATA
        MOV DS,AX
        LEA SI,OFFSET NUM
        MOV CL,10
        MOV BX,00H
     LP:MOV AL,[SI]
        CALL CMPR
        DEC CL
        JNZ LP
        LEA BX,MESG1
        CALL STDOUT2
        LEA SI,NP
        CALL STDOUT1
        LEA BX,MESG3
        CALL STDOUT2
        LEA BX,MESG2
        CALL STDOUT2
        LEA SI,NN
        CALL STDOUT1
        MOV AH,4CH
        INT 21H
CODE ENDS
END START