基于汇编语言的闰年判断程序设计

基于汇编语言的闰年判断程序设计

第一章 设计方案 一、 设计内容

根据提示信息输入任意年份，编写判断闰年的程序，如果是闰年，则在屏幕上显示“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!','$' 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 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 mov ah,09h int 21h jmp lop0 exit: ret

2

main endp

;输入一个具体的年份,并转换成10进制 ;返回：

;(ax)=输入的年份 input proc near push bx push cx push dx 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 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 loop lop1 jmp s2

error: lea dx,newline mov ah,09h int 21h lea dx,errmsg mov ah,09h int 21h

lea dx,newline

;提示输出 ;键盘输入

;把有效地址为inbuff的字节送给dl ;输入的值判断是否为4位数

;调用输入不合条件时的错误处理 ;检查输入有效性 ;将字符转化为数值 ;循环体中字符在字符串中的位置bx+1;错误处理 3

mov ah,09h int 21h jmp s1 s2:

mov cx,ax

lea dx,newline mov ah,09h int 21h

mov ax,cx pop dx pop cx

pop bx ret input endp

;判断一个年份是否闰年 ;输入： ;(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 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 cmp dx,0

jne isleap

;现场恢复 ;保存ax;输出要判断的年份 ;循环输出年份正确时结果中的年份;保存ax到cx中

;判断是否能被4整除 ;判断是否能被100整除 4

mov ax,cx

mov bx,400 ;判断是否能被400整除 div bx cmp dx,0

jne notleap isleap:

lea dx,yes mov ah,09h int 21h jmp s3 notleap:

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 code ends

end start

第三章 程序调试

在MF2KI软件中调试，运行上面的程序,初始界面：如图4-1

图4-1

输入年份2008执行程序，回车换行，则显示2008 is leap year；并给出是否继续的提示，输入y，屏幕继续显示提示输入语句；如果输入错误，如abcd则显示Input illegal ！并提示用户继续输入年份，知道输入正确年份为止；

5

输入2010，回车换行，则显示2001 is not leap year；并给出是否继续的提示，输入n，则显示屏幕关闭，程序结束。 运行界面：如图4-2

图4-2

利用 DOS 21H中断类型的10号键盘功能调用，将从键盘接收的年份数值型字符串按字节存入缓冲区。将字符串中的每个字符转换为对应的十进制数值（利用0～9这10个数的ASCll码值比其本身大30H的关系），通过判断某年是否为闰年的表达式，判断输出是否为闰年的信息。在缓存BUF中字符转换十六进制数字的过程中也会经常出现寄存器存放、地址指示等错误。其中运用了一些汇编跳转、运算等大量指令，还有子程序的调用等。

6