汇编实验-4.docx

山东大学实验报告 2016 年 月 日 姓名 刘方铮 ，学号 201411130001 系年级 计算机科学与技术系2014级 科目 汇编语言 题目 统计学生成绩result、显示月份名direct和显示错误信息show_err 实验源程序清单 统计学生成绩，result.asm： ;************************************************************** datarea segment ;定义相关成绩和相应数据段 grade dw 56,69,84,82,73,88,99,63,100,80 s5 dw 0 s6 dw 0 s7 dw 0 s8 dw 0 s9 dw 0 s10 dw 0 datarea ends ;***************************************************************** ;****************************************************************** prognam segment main proc far assume cs:prognam,ds:datarea start: push ds sub ax,ax push ax mov ax,datarea mov ds,ax mov s5 ,0 mov s6 ,0 mov s7 ,0 mov s8 ,0 mov s9 ,0 mov s10 ,0 mov cx ,10 mov bx ,offset grade compare: mov ax,[bx] cmp ax,60 ;比较60小于跳转5 jl five cmp ax,70 ;比较70小于跳转6 jl six cmp ax,80 ;比较80小于跳转7 jl seven cmp ax,90 ;比较90小于跳转8 jl eight cmp ax,100 ;比较100小于跳转9 jne nine inc s10 jmp short change_addr nine: inc s9 jmp short change_addr eight: inc s8 jmp short change_addr seven: inc s7 jmp short change_addr six: inc s6 jmp short change_addr five: inc s5 change_addr: add bx,2 loop compare ret main endp ;--------------------------------------------------------------------------- prognam ends ;*************************************************************************** end start 显示月份名direct ;*********************************************************** datasg segment para data three db 3 mess db month?,13,10,$ monin label byte max db 3 act db ? mon 3 dup(?) alfmon db ???,13,10,$ montab db JAN,FEB,MAR,APR,MAY,JUN, db JUL,AUG,SEP,OCT,NOV,DEC datasg ends ;*********************************************************** codesg segment para code assume cs:codesg,ds:datasg,es:datasg ;-----------------------------------