汇编语言程序设计：[2]判断闰年程序

1、打开masm汇编编译程序，新建一个masm源文件脚本。DATAS SEGMENT ;此处输入数据段代码 DATAS ENDSSTACKS SEGMENT ;此处输入堆栈段代码STACKS ENDSCODES SEGMENT ASSUME CS:CODES,DS:DATAS,SS:STACKSSTART: MOV AX,DATAS MOV DS,AX ;此处输入代码段代码 MOV AH,4CH INT 21HCODES ENDS END START

2、在正文中输入我们的程序代码，并将文件命名为testleap.asmdata segment ;定义数据段 infon d芟鲠阻缒b 0dh,0ah,'xiaobo leap test Designed by 1wangxiaobo@163.com',0dh,0ah,'Please input a year: $' Y db 0dh,0ah,'This is a leap year! $' N db 0dh,0ah,'This is not a leap year! $' w dw 0 buf db 8 db ? db 8 dup(?)data endsstack segment stack db 200 dup(0)stack endscode segment assume ds:data,ss:stack,cs:code start:mov ax,data mov ds,ax lea dx,infon ;在屏幕上显示提示信息 mov ah,9 int 21h lea dx,buf ;从键盘输入年份字符串 mov ah,10 int 21h mov cl, [buf+1] lea di,buf+2 call datacate call ifyears jc a1 lea dx,n mov ah,9 int 21h jmp exit a1: lea dx,y mov ah,9 int 21h exit: mov ah,4ch int 21h datacate PROC near push cx; dec cx lea si,buf+2 tt1: inc si loop tt1 ;lea si,cx[di] pop cx mov dh,30h mov bl,10 mov ax,1 l1: push ax sub byte ptr [si],dh mul byte ptr [si] add w,ax pop ax mul bl dec si loop l1 retdatacate ENDP ifyears proc near push bx push cx push dx mov ax,w mov cx,ax mov dx,0 mov bx,4 div bx cmp dx,0 jnz lab1 mov ax,cx mov bx,100 div bx cmp dx,0 jnz lab2 mov ax,cx mov bx,400 div bx cmp dx,0 jz lab2 lab1: clc jmp lab3 lab2: stc lab3: pop dx pop cx pop bx ret ifyears endpcode ends end start

3、运行我们编辑的文件，按提示输入 例 四位数字 1988 就会显示This is a leap year!表示为闰年 如果不是显示This is not a leap year! 就是闰年xiaobo leap test Designed by 1wangxiaobo@163.comPlease input a year: 1988This is a leap year! Press any key to continue