[汇编语言].万年历设计报告.docVIP

《万年历》实验设计报告 1006840113 符瑞盛 设计思想 将一连串内存单元（数据缓冲区），看作一个年历的二维平面，视作一个表格，将计算所得的年历数据依次填入此缓冲区，再一并输出。 程序流程图 程序源代码、注释及运行效果 assume cs:code,ds:data data segment tip_in db Please Input A Year:,$ key_in db 8,?,8 dup(?) xq_11 db ? leap_tf db 0 month db Jan. , Feb. , Mar. , Apr. , May. , Jun. , Jul. , Aug. , Sep. , Oct. , Nov. , Dec. days db 31,28,31,30,31,30,31,31,30,31,30,31 ;平年天数 days_lp db 31,29,31,30,31,30,31,31,30,31,30,31 ;闰年天数 xinq db s. m. t. w. t. f. s. data ends table segment zbx db 2800 dup(20h),$ table ends code segment start: mov ax,data mov ds,ax mov ax,table mov es,ax ;table段为年历的行列表格 ;作为ES段,为串传输作准备 lea dx,tip_in mov ah,9 int 21h lea dx,key_in mov ah,10 int 21h mov si,offset key_in+2 sub ax,ax call ctod ;(ax)= 年份的数值 call if_year ;判断是否为闰年 ;leap_tf记录结果 ;闰年为1,平年为0 call year_xq ;xq_11=1月1日的星期 ;余数0,1,2,3,4,5,6,分别对应 ;星期日,一,二,三,四,五,六 mov cx,12 mov ax,1 s_month: push ax call md_in ;调用月子程序 pop ax inc ax loop s_month ;循环12次 ;得整年年历 mov di,78 mov cx,35 mov ax,0a0dh s_lnfd: mov es:[di],ax add di,80 loop s_lnfd ;在每行最后填充回车 call line_feed call line_feed ;换行 mov ax,es mov ds,ax lea dx,zbx mov ah,9 int 21h mov ah,4ch int 21h md_in: push cx push ax mov cl,3 div cl cmp ah,0 jne dingw_0 ;余数为0,代表是一行中最后一月 add ah,3 dec al dingw_0:份 ;开始定位 mov cl,ah sub ah,ah mov dl,9 mul dl mov dl,80 mul dl mov dx,ax dec cl