int 21h
mov cl, SNumber mov ch, 0 mov di, 0 mov si, 0
ShowBigThanAverage:
mov ax, SumScore[si] cmp ax, Average jl ShowBigOk
mov dl, SumRank[di] mov al, type student mul dl
mov bx, ax call Output add si, 2 inc di
loop ShowBigThanAverage
ShowBigOk:
mov dx, offset OtherLine mov ah, 09h int 21h pop si pop dx pop cx pop bx pop ax ret
SumAverage endp
;============================================================= ;子程序名:Output
;功能:将ax中的二进制以十进制形式输出
;============================================================== Output proc near push di push bx push ax push dx lea di,Buf add di,6
mov byte ptr[di],'$' mov bx,10 CHANGE:dec di mov dx,0
div bx add dl,30h
mov byte ptr[di],dl cmp ax,0 jnz CHANGE mov dx,di mov ah,09h int 21h pop dx pop ax pop bx pop di ret
Output endp
;============================================================= ;子程序名:GetAddress
;功能:将指定个学生的偏移地址顺序保存到StudAddress
;============================================================= GetAddress proc near
push si ;保护相关寄存器 push bx push cx lea si,Stu ;使di指向第一个学生的偏移地址
lea bx,StudAddress ;使bx指向存学生偏移地址的缓冲区 mov cx,10 ;共有指定个学生 LoopAdd:
mov word ptr[bx],word ptr si
add bx,2 ;使bx指向存学生偏移地址的缓冲区的下一个地址 add si,50 ;使di指向下一个学的生偏移地址 loop LoopAdd pop cx pop bx pop di ret
GetAddress endp
;============================================================= ;子程序名:SortStudent
;功能:根据学生分数进行排序
;用冒泡法根据学生分数对分数从大到小排序 ;同时将对应的偏移地址进行排序
;============================================================= SortStudent proc near
push dx push cx push bx push ax push di push si mov cx,10 dec cx LoopChange0:
push cx ;保护外循环的CX值
lea bx,SumScore ; bx指向学生分数偏移地址 lea si,StudAddress ;si指向存学生偏移地址的地址
LoopChange1: ;将学生分数和下一个学生分数分别送入al,dl并比较大小
;若当前学生分数小于下一个分数要交换其分数
mov dx,word ptr[bx+2] ;此分数对应的学生的偏移地址 mov ax,word ptr[bx]
cmp ax,dx
ja EndExchange ;若大于则转而比较下两个分数值 ;交换偏移地址
mov ax,word ptr [si+2] ;指定向ax中传入2个字节数据 mov dx,word ptr [si] mov [si],ax mov [si+2],dx
;交换分数值 mov ax,word ptr[bx+2] mov dx,word ptr[bx] mov word ptr[bx],ax mov word ptr[bx+2],dx EndExchange:
add si,2 ;指向下一个学生偏移地址的地址 add bx,2 ;指向下一个存学生分数的地址 loop LoopChange1
pop cx ;保护外循环的CX值 loop LoopChange0 pop si pop di pop ax pop bx pop cx pop dx ret
SortStudent endp
;============================================================= ;子程序名:MessTb ;功能:输出1个Tab键
;============================================================= MessTb proc near
push dx ;保护相关寄存器 push ax
lea dx,MessTab ;指向输出1个Tab键缓冲区 mov ah,9 ;调用字符串输出程序 int 21h pop ax pop dx ret
MessTb endp
;=================================================================== ;子程序名:Stop
;功能是让程序停止运行一下,输入回车键继续执行
;=================================================================== Stop proc near
push ax ;保护相关寄存器 push dx push cx
mov ah,1 ;回车 int 21h pop cx pop dx pop ax ret Stop endp code ends end start