汇编课程设计:闰年判断程序详解

程序说明:
这是一个判断某一年是否为润年的程序,运行可执行程序Ifleap.exe后,输入具体的年份,
可输出是本年是否为闰年的提示信息。
函数图:
子函数流程图

data segment    ;定义数据段
    infon db 0dh,0ah,'Please input a year: $'	;infon ,双字节,回车换行,内容
    Y db 0dh,0ah,'This is a leap year! $'	;y ,双字节,回车换行,内容
    N db 0dh,0ah,'This is not a leap year! $' 	;n ,双字节,回车换行,内容($是结束符)
    w dw 0		;w为双字类型
    buf db 8		;开辟8个双字节类型的缓冲区,未赋值
        db ?		
        db 8 dup(?)		
data ends

stack segment stack
    db 200 dup(0)	;开辟200个双字节类型的存储空间。(保护现场用到)
stack ends

code segment
          assume ds:data,ss:stack,cs:code
    start:mov ax,data	;寄存器间的数据交换,把data给了数据段
          mov ds,ax
          
          lea dx,infon  ;在屏幕上显示提示信息
          mov ah,9
          int 21h

          lea dx,buf    ;从键盘输入年份字符串
          mov ah,10
          int 21h
          
          mov cl, [buf+1] 	;把buf+1地址指向的内容给cl,buf长度
          lea di,buf+2		;把buf+2的地址给di,buf偏移地址
          call datacate  ;调用函数datacate,传递参数
          call ifyears	;调用函数ifyears,由参数判断是否为闰年
          jc a1			;若产生进位就跳到a1处
          
          lea dx,n		;dx加载n的地址'This is not a leap year!'
          mov ah,9		;显示dx内的内容
          int 21h
          jmp exit		;跳到exit
    a1:   lea dx,y		;dx加载y的地址'This is a leap year!'
          mov ah,9
          int 21h
    exit: mov ah,4ch	;结束本程序,返回 DOS 操作系统
          int 21h
       
 
;实现将字符串的闰年转换为数字存储在ax中
datacate proc near;	;段内调用,子函数1
          push cx;      ;保护现场                                               
          dec cx		
          lea si,buf+2	;把buf+2的地址给si
     tt1: inc si		;移动到字符串指定位置
          loop tt1		;循环函数是个递增函数, loop指令的格式是:loop标号,cpu执行loop指令的时候,要进行两步操作
						;1:(cx)=(cx)-1    
						;2:判断cx中的值,不为零则转至标号处执行,如果为零,则向下执行
          ;lea si,cx[di]
          pop cx		;恢复现场
     
      
          mov dh,30h	
          mov bl,10		;乘数设置为10
          mov ax,1		
      l1: push ax		;保护现场
          sub  byte ptr [si],dh		;没有寄存器参与的内存单元访问指令(DMA),si-dh保存在si中
          mul  byte ptr [si]		;没有寄存器参与的内存单元访问指令(DMA),ax*si,结果放在eax中,这里的寄存器si是16位,被乘数在ax中也是16位。
          							;MUL r/m(寄存器或者内存)  ;mul是字内乘法,把si对应的地址内一个字的长度赋给
									;如果参数是 r8/m8,   将把 AL 做乘数, 结果放在 AX
									;如果参数是 r16/m16, 将把 AX 做乘数, 结果放在 EAX
									;如果参数是 r32/m32, 将把 EAX 做乘数, 结果放在 EDX:EAX
          add w,ax		;w+ax,结果存入w,存入的是数字
          pop ax		;恢复现场
          mul bl		;bl*al,结果存放在ax中
          dec si		;si中的内容减一
          loop l1		;l1循环,cx判断次数
          ret
 datacate endp

;实现ax中年份的判断
   ifyears proc near		;段内调用,子函数2
           push  bx 		;保护现场(保护谁,就用到谁)
           push  cx
           push  dx
           mov ax,w			;把w值赋给cx,w值为
           mov   cx,ax		;把ax值赋给cx
           mov  dx,0		
           mov  bx,4		;ax/4
           div  bx			;ax/bx,结果在ax中,余数在dx中
           					;如果除数是8位,那么除法的结果AL保存商,AH保存余数,
       						;如果除数是16位,那么除法的结果 AX保存商,DX保存余数。
           cmp  dx,0		;比较余数和0,结果存入cf标志位(进位标志位)
           jnz  lab1		;如果非0,跳转到lab1处
           mov   ax,cx		
           mov  bx,100		;ax/100
           div  bx			
           cmp dx,0			;比较余数和0,结果存入cf标志位(进位标志位)
           jnz  lab2		;如果非0,跳到lab2
           mov  ax,cx		
           mov bx,400		;ax/400
           div  bx			
           cmp  dx,0		;比较余数和0,结果存入cf标志位(进位标志位)
           jz  lab2			;cf=0跳到lab2
     lab1: clc				;清除cf标志位,设置cf=0
           jmp lab3			;跳到lab3
     lab2: stc				;cf置1
     lab3: pop  dx			;恢复现场
           pop  cx		
           pop  bx
           ret
   ifyears endp
code ends
   end start

参数传递:
主函数与DATACATE的参数传递方式为约定单元法,约定单元为BUF、 W。
主函数与IFYEARS的参数传递方式为约定单元法,约定单元为W。

中断向量的计算
中断向量处理程序地址为1C8B:000D和1c8b:0015 .
本题用到了21H函数库,入口地址为0:84h。
CS=421h+2h=86h
IP=4
21h=84h

猜你喜欢

转载自blog.csdn.net/hairi1234/article/details/85125647