ifleap.asm

基于汇编语言的判断闰年的简单程序

data            segment
	infon   db     20   
                                db     ?   
                                db       20     dup(?)   
;infon            db 0dh,0ah,'Please input the file's name: $'
file             db    'c:\masm\l.txt' , 0       ;文件名
buf db 29
        db ?
        db 20 dup(?)
;buf             db   256 dup(0)        ;文件内容暂存区
error_message    db   0ah , 'error !' , '$'    ;出错时的提示
handle           dw  ?                ;保存文件号
data             ends
code            segment
                assume  cs:code  , ds:data
start:
              mov ax , data
              mov ds , ax
              lea dx,infon  ;在屏幕上显示提示信息
              mov ah,9
              int 21h
              
              lea dx,buf    ;从键盘输入字符串
              mov ah,10
              int 21h
         mov     bx,   offset  infon[1]   
      mov     al,   [bx] ;   number   of   bytes   entered   
      cbw   
      add     bx,   ax   
      mov     word   ptr   [bx+2],   240ah ;   adds   0ah,   '$'   to   its   end   
              mov dx , offset file
              mov al , 0
              mov ah , 3dh
              int 21h                  ;打开文件
              jc error                  ;若打开出错，转error
              mov handle , ax           ;保存文件号
              mov bx , ax
              mov cx , 255
              mov dx , offset buf
              mov ah , 3fh
              int 21h                  ;从文件中读255字节→buf
              jc error                  ;若读出错，转error
              mov bx , ax              ;实际读到的字符数送入bx
              mov buf[bx] , '$'          ;在文件结束处放置一“$”符
              mov dx , offset buf
              mov ah , 9
              int 21h                            ;显示文件内容
              mov bx , handle
              mov ah , 3eh
              int 21h                            ;关闭文件
              jnc end1             ;若关闭过程无错，转到end1处返回dos
error:
              mov dx , offset error_message
              mov ah , 9
              int 21h                            ;显示错误提示
end1:
             mov ah , 4ch
             int 21h
code   ends
             end  start