基于單片機的萬年歷程序

基于單片機的萬年歷程序

;真正的萬年歷:?84?bytes?的?51?ASM

;==SUB_WNL===?萬年歷?==*?Deng?Miao?*??2004-06-01?*****?GuangZhou?******
??????????SJ????DATA???30H?;?世紀??BCD??00?TO?99???
??????????NH????DATA???31H?;?年號??BCD??00?TO?99????0000?TO?9999?年
??????????YF????DATA???32H?;?月份??BCD??01?TO?12

???org?000h
?????MOV?SP,?#40H
?????MOV?SJ,?#21H?;2004-05
?????MOV?NH,?#01H
?????MOV?YF,?#4H???
?????ACALL?SUB_WNL
?????SJMP?$???

;===============SUB_WNL===================
?????;?入口：
????????;??SJ????DATA???30H?;?世紀??BCD??00?TO?99???
????????;??NH????DATA???31H?;?年號??BCD??00?TO?99????0000?TO?9999?年
????????;??YF????DATA???32H?;?月份??BCD??01?TO?12
?????;?出口
????????;?ACC???--??本月天數?BCD?28?to?31
????????;?B?????--??本月1日的星期數?1?to?6?==?星期1?to?星期6
????????;????????????????????????????????0?--?星期日
?????;?使用:??ACC,?B,?R5,?R6?
?????;?STACK:??3?bytes?(不包括調用）
??????ORG?50H

?