1.4.asm

子 程序的调 用程序

DATA       SEGMENT
	GRADE    DW  88H,75H,95H,63H,98H,78H,87H,73H,90H,60H
	COUNT	EQU  ($-GRADE) /2
			ORG 20H
	RANK		DW 10 DUP(?)
	DATA		ENDS
	STACK		SEGMENT  STACK
	STA		DB 20 DUP (20H)
	TOP		EQU  $-STA
	STACK		ENDS
	CODE		SEGMENT
	 ASSUME           CS:CODE,DS:DATA,SS:STACK
                        START:	MOV  AX,DATA
			MOV  DS,AX
                                           MOV  AX,STACK
			MOV  SS,AX
MOV  SP,TOP
			MOV  DI,COUNT             ;成绩的个数
			MOV  BX,0
	           LOOP1:    MOV  AX,GRADE[BX]
	                            MOV  CX,COUNT
			LEA  SI,GRADE             ;成绩的存放地址
	            NEXT:	CMP  AX,[SI]
                                           JNBE   NO_COUNT       ;
			INC   WORD PTR RANK[BX]   ;存放学生名次
	  NO_COUNT:   ADD   SI,2
			LOOP  NEXT
			ADD   BX,2
			DEC   DI
			JNZ   LOOP1
			MOV   AX,4C00H
			INT   21H
	CODE		ENDS
			END	START