匯編輸入成績輸出最高分最低分及平均分

1、word匯編輸入成績 輸出最高分最低分及平均分2009-05-31 22:53DATAS SEGMENT   SCORE DB 10 DUP()   INPUT DB 4,0,4 DUP()    ；定義輸入4個(gè)字符   ALL DB 'ALL SCORE ','$'   HIG DB 'HIGHEST SCORE ','$'   LW DB 'LOWEST SCORE ','$

2、'   AVERY DB 'AVERAGE SCORE ','$'   HI DB    LO DB    SA DB 10     ；改變SA的值可以輸入不同個(gè)數(shù)的成績   AVER DB 2 DUP()DATAS ENDSSTACKS SEGMENTSTACK DW 50 DUP()STACKS ENDSCODES SEGMENT    ASSUME CS:CODES,DS:DATA

3、S,SS:STACKSSTART:    MOV AX,DATAS    MOV DS,AX    LEA SI,SCORE    MOV CX,0    MOV CL,SA    CMP CL,SA    JZ P0P: DEC SI    INC CXP0:MOV DX,OFFSET INPUT    MOV AH,10&#

4、160;   INT 21H    MOV DI,DX    MOV AH,2    MOV DL,10    INT 21H    INC DI    MOV AX,0LOOP2:INC DI    MOV BL,10    MOV BH,DI    CMP BH,51H   

5、 JZ P    CMP BH,13    JZ LOOP1    SUB BH,30H    MUL BL    ADD AL,BH    JMP LOOP2LOOP1:MOV SI,AX    INC SI    LOOP P0    ；以上輸入并處理成十進(jìn)制數(shù)局部  MOV CL,SA ；求最高分，最低

6、分，及平均分    DEC CX    MOV BX,0    LEA DI,SCOREP2: MOV DL,SA    DEC DX    CMP CX,DX    JNZ P1    MOV BL,DI    MOV AL,DI    MOV AH,DI    INC DIP1: MOV DX,

7、0    MOV DL,DI    CMP AL,DI    JBE P3    MOV AL,DIP3: CMP AH,DI    JNC P4    MOV AH,DIP4: ADD BX,DX    INC DI    LOOP P2    MOV BYTE PTRHI,AH    MOV B

8、YTE PTRLO,AL    MOV AX,BX    MOV CL,SA    DIV CL    MOV BYTE PTRAVER,AL    MOV AL,AH    MOV CH,SA    MUL CH    DIV CL    MOV BYTE PTRAVER+1,AL    LEA

9、DX,ALL    MOV AH,9    INT 21H    MOV CX,0    MOV CL,SA    LEA DI,SCOREP7: MOV AX,0    MOV BH,13    MOV AL,DI    CALL DISP    INC DI    MOV DL,' &#

10、39;    MOV AH,2    INT 21H    LOOP P7    CALL NEWLINE    LEA DX,AVERY    MOV AH,9    INT 21H    MOV AX,0    MOV BH,13    MOV AL,AVER   

11、 CALL DISP    MOV DL,'.'    MOV AH,2    INT 21H    MOV AL,AVER+1    CALL DISP    CALL NEWLINE    LEA DX,HIG    MOV AH,9    INT 21H    MOV AX,0

12、    MOV BH,13    MOV AL,HI    CALL DISP    CALL NEWLINE    LEA DX,LW    MOV AH,9    INT 21H    MOV AX,0    MOV BH,13    MOV AL,LO    CA

13、LL DISP    CALL NEWLINE    MOV AH,4CH    INT 21HDISP PROC NEAR   ；輸出函數(shù)P6: CMP AL,10    JL P5    MOV BL,10    DIV BL    MOV BH,AHP5: MOV DL,AL    ADD DL,30H    MOV AH,2    INT 21H    CMP BH,13    JZ EXIT    MOV AL,BH    MOV BH,13    JMP P6EXIT:RETDISP ENDPNEWLINE PROC NEAR   ；回車換行