機(jī)械專業(yè)的學(xué)生實(shí)驗(yàn)報(bào)告-資料下載頁(yè)
2025-05-14 00:10本頁(yè)面
【正文】 NINC COUNTCMP DL,39。,39。JZ STORECMP DL,13JZ EXITSTORE:MOV GRADE[SI],BXADD SI,2JMP ENTEREXIT:MOV GRADE[SI],BXMOV DL,0AHMOV AH,02HINT 21HRETDECIBIN PROC NEAR MOV BX,0NEWCHAR: MOV AH,1 INT 21H MOV DL,AL SUB AL,30H JL EXIT1 CMP AL,9D JG EXIT1 CBW XCHG AX,BX MOV CX,10 MUL CX XCHG AX,BX ADD BX,AX JMP NEWCHAR EXIT1:RET DECIBIN ENDPINPUT ENDPCODE ENDS END 模塊名： 學(xué)生成績(jī)名次計(jì)算模塊EXTRN GRADE:WORDEXTRN COUNT:WORDPUBLIC RANKPPUBLIC RANKDATA SEGMENT PUBLICRANK DW 50 DUP(?)DATA ENDSCODE SEGMENTASSUME CS:CODE,DS:DATARANKP PROC FARMOV AX,DATAMOV DS,AXMOV DX,COUNTMOV BX,0LOOP1:MOV AX,GRADE[BX]MOV RANK[BX],0MOV CX,COUNTLEA SI,GRADENEXT:CMP AX,[SI]JG NO_COUNTINC RANK[BX]NO_COUNT:ADD SI,2LOOP NEXTADD BX,2DEC DXJNE LOOP1RETRANKP ENDPCODE ENDS END 模塊名： 輸出模塊EXTRN RANK:WORDEXTRN COUNT:WORDPUBLIC OUTPUTDATA SEGMENT PUBLICMESS2 DB 39。RANK :$39。DATA ENDSCODE SEGMENTASSUME CS:CODE,DS:DATAOUTPUT PROC FAR MOV AX,DATA MOV DS,AX LEA DX,MESS2 MOV AH,09H INT 21H MOV SI,0 MOV DI,COUNT NEXT1: MOV BX,RANK[SI] CALL BINIDEC MOV DL,39。,39。 MOV AH,02 INT 21H ADD SI,2 DEC DI JNZ NEXT1 RETBINIDEC PROC NEAR PUSH BX PUSH CX。 MOV CX,100 。 CALL DEC_DIV MOV CX,10 CALL DEC_DIV MOV CX,1 CALL DEC_DIV POP CX POP BX RETBINIDEC ENDPDEC_DIV PROC MOV AX,BX MOV DX,0 DIV CX MOV BX,DX MOV DL,AL ADD DL,30H MOV AH,02H INT 21H RETDEC_DIV ENDPOUTPUT ENDPCODE ENDS END
環(huán)評(píng)公示相關(guān)推薦
鄂ICP備17016276號(hào)-1