第一章 设计方案
一、 设计内容
根据提示信息输入任意年份，编写判断闰年的程序，如果是闰年，则在屏幕上显示“Y”，否则显示“N”。
二、 设计分析
利用DOS 21H中断类型的10号键盘功能调用，将键盘接受到的年份数值的字符串按字节存入缓冲区。将字符串中的每个字符转换为对应的十进制数值（利用0-9这10个数的ASCⅡ码值比其本身大30H的关系），利用判断某年是否为闰年的表达式，输入该年是否为闰年的信息。
三、 算法分析
闰年计算是一个非常经典的问题，在学习各种语言时都会遇到这个问题，用来判断某年是否为闰年。具体算法为如果该年份的数值正整数若能被100整除，又能被400整除，或者不能被100整除，却能被4整除，则该数值代表的年份为闰年。
四、 程序流程图
本框图列出了此次课程设计的总流程，显示信息，输入数据，判断格式，判断闰年和
结束程序。客观显示了设计的顺序结构，循环结构及分支结构。
图2-1 程序流程图
第二章 程序设计
1
一、 程序分析
主程序：
显示提示输入年份以及输入的字符内容，和最后输出的判断。
子程序：
1. 判断输入：该模块是对输入的年份的格式的判断，若是错误则显示错误Error，正确则进行下面的操作。
2. 字符串转换格式：将数字字符串转换成数字，以便进行下面的程序操作。
3. 判断闰年：判断输入的年份是否为闰年，若是则输出“This is a leap year!”，若不是则输出“This is not a leap year!”，然后退出。
二、 汇编程序
data segment
inbuff db 5,?,5 dup(?)
prompt db 'Please input the year:','$'
errmsg db 'Input illegal!','$'
2
yes db ' is a leap year','$'
no db ' is not a leap year','$'
mess db 'Continue?(y/n):','$'
newline db 13,10,'$' data ends
code segment
main proc far
assume cs:code,ds:data
start:
push ds
sub ax,ax
push ax
mov ax,data
;回车换行3
mov ds,ax
lop0:
call input
call judge lea dx,mess mov ah,09h int 21h mov ah,01h int 21h
cmp al,'n'
je exit
continue:
lea dx,newline
;是否继续输入年份的判断4
mov ah,09h
int 21h
jmp lop0
exit:
ret
main endp
;输入一个具体的年份,并转换成10进制;返回：
;(ax)=输入的年份
input proc near
push bx
push cx
push dx
5
s1:
lea dx,prompt
mov ah,09h
int 21h lea dx,inbuff
mov ah,0ah
int 21h mov dl,byte ptr inbuff[1] cmp dl,4 jne error mov cx,4
lea bx,inbuff
add bx,2
;提示输出
;键盘输入
;把有效地址为inbuff的字节送给dl ;输入的值判断是否为4位数
;调用输入不合条件时的错误处理 6
mov ax,0
mov dx,0
lop1: ;检查输入有效性
mov dl,10
mul dl
mov dl,byte ptr [bx]
sub dl,30h cmp dl,0
jb error
cmp dl,9
ja error
add ax,dx
inc bx ;将字符转化为数值
;循环体中字符在字符串中的位置bx+17
loop lop1
jmp s2
error: ;错误处理
lea dx,newline
mov ah,09h
int 21h
lea dx,errmsg
mov ah,09h
int 21h
lea dx,newline
mov ah,09h
int 21h
jmp s1
8
s2:
mov cx,ax
lea dx,newline
mov ah,09h
int 21h
mov ax,cx
pop dx
pop cx
pop bx ret
input endp
;判断一个年份是否闰年;输入：
;现场恢复 9
;(ax)=年份
judge proc near
push bx
push cx
push dx
push ax mov cx,4
lea bx,inbuff
add bx,2
lop2:
mov dl,byte ptr [bx] mov ah,02h
int 21h
;保存ax;输出要判断的年份 10
inc bx
loop lop2 ;循环输出年份正确时结果中的年份
lop3:
pop ax
mov dx,0
mov cx,ax mov bx,4 div bx
cmp dx,0
jne notleap
mov ax,cx
mov bx,100 div bx
;保存ax到cx中
;判断是否能被4整除
;判断是否能被100整除
11
cmp dx,0
jne isleap
mov ax,cx
mov bx,400 div bx
cmp dx,0
jne notleap isleap:
lea dx,yes
mov ah,09h int 21h
jmp s3
notleap:
;判断是否能被400整除 12
lea dx,no
mov ah,09h
int 21h
s3:
lea dx,newline mov ah,09h
int 21h pop dx
pop cx
pop bx
ret
judge endp
;换行
;输出年份正确时结果的剩余部分13
code ends
end start
第三章 程序调试
在MF2KI软件中调试，运行上面的程序,初始界面：如图4-1
图4-1
输入年份2008执行程序，回车换行，则显示2008 is leap year；并给出是否继续的提示，输入y，屏幕继续显示提示输入语句；如果输入错误，如abcd则显示Input illegal ！并提示用户继续输入年份，知道输入正确年份为止；输入2010，回车换行，则显示2001 is not leap year；并给出是否继续的提示，输入n，则显示屏幕关闭，程序结束。
运行界面：如图4-2
14
图4-2
利用 DOS 21H中断类型的10号键盘功能调用，将从键盘接收的年份数值型字符串按字节存入缓冲区。将字符串中的每个字符转换为对应的十进制数值（利用0～9这10个数的ASCll码值比其本身大30H的关系），通过判断某年是否为闰年的表达式，判断输出是否为闰年的信息。在缓存BUF中字符转换十六进制数字的过程中也会经常出现寄存器存放、地址指示等错误。其中运用了一些汇编跳转、运算等大量指令，还有子程序的调用等。
15
因篇幅问题不能全部显示，请点此查看更多更全内容