星期判斷微機(jī)匯編

學(xué)號(hào)：課程設(shè)計(jì)題目星期判斷的程序?qū)W院自動(dòng)化學(xué)院專業(yè)電氣工程及其自動(dòng)化班級(jí)電氣1304姓名指導(dǎo)教師2015年12月26日課程設(shè)計(jì)任務(wù)書學(xué)生姓名：專業(yè)班級(jí)：電氣指導(dǎo)教師：工作單位：自動(dòng)化學(xué)院題目:星期判斷的程序初始條件：星期判斷程序輸入年、月、日，能夠判斷當(dāng)日的星期數(shù)，并進(jìn)行輸出?！部稍O(shè)某年的1月1日為起點(diǎn)，注意閏年問(wèn)題〕；要求完成的主要任務(wù):〔包括課程設(shè)計(jì)工作量及其技術(shù)要求，以及說(shuō)明書撰寫等具體要求〕設(shè)計(jì)任務(wù)及要求分析方案比擬及認(rèn)證說(shuō)明系統(tǒng)原理闡述硬件設(shè)計(jì)課題需要說(shuō)明：硬件原理，電路圖，采用器件的功能說(shuō)明軟件設(shè)計(jì)課題需要說(shuō)明：軟件思想，流程圖，源程序及程序注釋調(diào)試記錄及結(jié)果分析總結(jié)參考資料附錄：芯片資料或程序清單，軟件演示屏幕拷貝圖或硬件實(shí)物圖時(shí)間安排： 12月3日~12月6日：收集資料，方案選擇12月7日~12月19日：整體流程，程序細(xì)節(jié)，調(diào)試程序12月21日~12月30日:課程設(shè)計(jì)報(bào)告撰寫1月4：交報(bào)告，程序演示，辯論指導(dǎo)教師簽名：年月日系主任〔或責(zé)任教師〕簽名：年月日目錄TOC\o"1-3"\h\u19317摘

要 據(jù)區(qū)里。其次程序的核心轉(zhuǎn)換思想是運(yùn)用蔡勒公式W

=

[C/4]

-

2C

+

y

+

[y/4]

+

[13

*

(M+1)

/

5]

+

d

–

1進(jìn)行轉(zhuǎn)換，調(diào)用子程序并將最后結(jié)果顯示在屏幕上。四、程序框圖開始開始輸入年月日輸入年月日提示錯(cuò)誤是否提示錯(cuò)誤是否繼續(xù)判斷正誤判斷正誤 N蔡勒公式進(jìn)行轉(zhuǎn)換結(jié)束是否繼續(xù)顯示星期 N 蔡勒公式進(jìn)行轉(zhuǎn)換結(jié)束是否繼續(xù)顯示星期 YN五、源程序及程序注解stacksSEGMENTstackDB200DUP(0)stacksENDSdatasegmentYeardw0Monthdb0Daydb0tempdb10dup(0)countdw?ErrMsgdb0dh,0ah,'Inputwrong!pleaseinputagain!','$'str1db0dh,0ah,'pleaseinputyearmonthday:',0dh,0ah,'$'str2db0dh,0ah,'WhetherornottocontinueinquiriesYes/No',0dh,0ah,'$'weekstr0db'TodayisSunday','$'weekstr1db'TodayisMonday','$'weekstr2db'TodayisTuesday','$'weekstr3db'TodayisWednesday','$'weekstr4db'TodayisThursday','$'weekstr5db'TodayisFriday','$'weekstr6db'TodayisSaturday','$'adw?bdw?ccdw?ddw?wdb0dataends;定義了變量和信息codesegmentassumecs:code,ds:data,ss:stacksstart:movax,datamovds,axleadx,str1;提醒你輸入年月日movah,9h;顯示字符串int21hcallGetYearMonthDay;調(diào)用子程序輸入正確的年月日calldisplay;調(diào)用子程序通過(guò)計(jì)算得出星期sel:leadx,str2;提醒你選擇退出程序還是繼續(xù)movah,9hint21hmovah,1;輸入你的選擇〔鍵盤輸入并回顯〕int21hcmpal,'Y'jestartcmpal,'y';輸入y或Y繼續(xù)程序jestartcmpal,'N'jeexitcmpal,'n';輸入n或N退出程序jeexitjmpselexit:movah,4chint21h;退出GetYearMonthDayprocnear;子程序輸入正確的年月日pushaxpushcxpushsipushdi;壓棧inputagain:movYear,0movMonth,0movDay,0movsi,0;把年月日重新歸零repeatY:movah,1;輸入年int21hcmpal,0dh;換行jeEndY;回車結(jié)束年的輸入cmpal,20h;判斷是否是是空格鍵SPjeEndY;空格結(jié)束年的輸入cmpal,1bh;判斷是否是退出ESCjeExitDos0;退出鍵那么退出程序cmpal,30h;和0比擬jbErr;小于0轉(zhuǎn)到錯(cuò)誤提示cmpal,39h;和9比擬jaErr;大于9轉(zhuǎn)到錯(cuò)誤提示subal,30h;把讀入的數(shù)據(jù)轉(zhuǎn)化為二進(jìn)制保存到temp[si]中movtemp[si],alincsi;si加1jmprepeatYErr:leadx,ErrMsgmovah,9hint21hmovah,2;顯示輸出movdl,0dhint21h;換行movdl,0ahint21h;回車jmpinputagain;跳回到inputagain重新輸入年月日EndY:movbx,10;把10存入bxmovdi,si;把si的值傳給dimovsi,0;再把si清零NextYBit:movah,0moval,temp[si];再把存在temp[si]中的數(shù)據(jù)存入almovcount,di;把di中的轉(zhuǎn)到countsubcount,si;count=count-sideccount;count-1movcx,count;把自減后的count存入cxjcxzskipY;cx為0轉(zhuǎn)移lopmul:mulbx;*10,主要實(shí)現(xiàn)把年按千位,百位,十位,各位存放looplopmul;cx-1循環(huán)skipY:addYear,ax;把a(bǔ)x中存入的年的值賦給yearincsi;si自加1cmpsi,di;比擬si和dijneNextYBit;不相等轉(zhuǎn)移;主要實(shí)現(xiàn)把年按千位，百位，十位，各位存放pushdxmovah,2movdl,0dh;換行int21hmovdl,0ah;回車int21hpopdxjmpskiplap;跳到月的輸入ExitDos0:jmpExitDos退出skiplap:movsi,0;si清零repeatM:movah,1int21hcmpal,0dhjeEndMon;換行cmpal,20hjeEndMon;空格結(jié)束輸入cmpal,1bhjeExitDos1;ESC退出程序cmpal,30hjbErr1;小于0報(bào)錯(cuò)cmpal,39hjaErr1subal,30hmovtemp[si],alincsijmprepeatMErr1:jmpErrExitDos1:jmpExitDosEndMon:movdi,si;把si的值傳給dimovsi,0;再把si清零movbl,10;把10存入blNextMBit:moval,temp[si]movcount,disubcount,sideccountmovcx,countjcxzskipMlpmul:mulbllooplpmulskipM:addMonth,alincsicmpsi,dijneNextMBitcmpMonth,12jaErr1pushdxmovah,2movdl,0dh;回車int21hmovdl,0ah;換行int21hpopdxjmpskiplap1skiplap1:movsi,0repeatD:movah,1int21hcmpal,0dhjeEndDaycmpal,20hjeEndDaycmpal,1bhjeExitDoscmpal,30hjbErr2cmpal,39hjaErr2subal,30hmovtemp[si],al;把讀入的數(shù)據(jù)轉(zhuǎn)化為二進(jìn)制保存到temp[si]中incsijmprepeatDErr2:jmpErr1EndDay:movdi,si;把si的值傳給dimovsi,0;再把si清零movbl,10;把10存入blNextDBit:moval,temp[si]movcount,disubcount,sideccountmovcx,countjcxzskipDlpmul1:mulbllooplpmul1skipD:addDay,alincsicmpsi,dijneNextDBitcallGetrightday;調(diào)用子程序確定每個(gè)月的最大天數(shù)moval,[si];把存放器si中的值存入alcmpDay,al;用輸入的day和al比擬jaErr2;假設(shè)day大于al那么報(bào)錯(cuò)pushdxmovah,2movdl,0dhint21hmovdl,0ahint21hpopdxpopdipopsipopcxpopaxretExitDos:movah,4chint21hGetYearMonthDayendpGetrightdayprocnear;此子程序用來(lái)判斷年份是否為閏年pushbxpushcxPushdxmovsi,offsetwmovax,Yearmovcx,axmovdx,0movbx,4divbxmovb,dxcmpdx,0jnzlab1movax,cx;接著判斷年份是否為100的倍數(shù)movbx,100divbxmovcc,dxcmpdx,0jnzlab2movax,cx;再判斷是否為400的倍數(shù)movbx,400divbxmovd,dxcmpdx,0jzlab2lab1:;確定平年各月的天數(shù)cmpMonth,1jel1cmpMonth,3jel1cmpMonth,5jel1cmpMonth,7jel1cmpMonth,8jel1cmpMonth,10jel1cmpMonth,12jel1cmpMonth,4jel2cmpMonth,6jel2cmpMonth,9jel2cmpMonth,11jel2moval,28mov[si],aljmplab3l1:moval,31mov[si],aljmplab3l2:moval,30mov[si],aljmplab3lab2:cmpMonth,1jel1cmpMonth,3jel1cmpMonth,5jel1cmpMonth,7jel1cmpMonth,8jel1cmpMonth,10jel1cmpMonth,12jel1cmpMonth,4jel2cmpMonth,6jel2cmpMonth,9jel2cmpMonth,11jel2moval,29mov[si],aljmplab3lab3:popdxpopcxpopbxretGetrightdayendpdisplayprocnearcmpmonth,2jglab11addmonth,12subyear,1;小于等于2那么月加12，年再減1再計(jì)算lab11:xorax,axxorbx,bxxorcx,cxxordx,dxdecyearmovax,yearmovcx,axmovdx,0movbl,4divbxaddcx,axxorax,axxorbx,bxmovax,yearmovdx,0movbl,100divbxsubcx,axxorax,axxorbx,bxxordx,dxmovax,yearmovbx,400divbxaddcx,axxorax,axmovdx,0movbx,0incmonthmoval,monthmovbl,13mulblxorbx,bxmovbl,5divbxaddcx,axxorax,axxordx,dxcmpmonth,13janoaddd;當(dāng)此時(shí)month大于13時(shí)，即月為1、2月時(shí)不用考慮加1cmpb,0jnenoadddcmpcc,0jneadddcmpd,0jeadddaddd:addday,1;day+1jmpdodnoaddd:jmpdod;day不用加一dod:moval,dayaddcx,ax;把day送個(gè)cxxorax,axxorbx,bxxordx,dxmovax,cxmovbl,7divbxmova,dx;把由公式的來(lái)的和除以7，取余cmpa,0jes0cmpa,1jes1cmpa,2jes2cmpa,3jes3cmpa,4jes4cmpa,5jes5leadx,weekstr6movah,9hint21hjmpexit1s0:leadx,weekstr0movah,9hint21hjmpexit1s1:leadx,weekstr1movah,9hint21hjmpexit1s2:leadx,weekstr2movah,9hint21hjmpexit1s3:leadx,weekstr3movah,9hint21hjmpexit1s4:leadx,weekstr4movah,9hint21hjmpexit1s5:leadx,weekstr5movah,9hint21hexit1:retdisplayendpcodeendsendstart六、調(diào)試