;*********************************************************
; 根据公历换算出节气子程序
;*********************************************************
JIEQI_ZHUANHUAN: NOP;
MOV R7,YEAR_SG;
MOV A,YEAR_SG;
CJNE A,#03H,TESHU_YEAR_04;
MOV A,MONTH_SG;
CJNE A,#10H,TESHU_MONTH_11;
MOV A,DATE_SG;
CJNE A,#09H,NO_TESHU_DATE;
MOV JIEQI_1,#11111111B
MOV JIEQI_2,#11111111B
MOV JIEQI_3,#01111111B;今天是2003年10月9号,今天是特殊年的"寒露"
LJMP END_JIEQI;
TESHU_MONTH_11: CJNE A,#11H,NO_TESHU_DATE;
MOV A,DATE_SG;
CJNE A,#23H,NO_TESHU_DATE;
MOV JIEQI_1,#11111111B
MOV JIEQI_2,#11111111B
MOV JIEQI_3,#11101111B;今天是2003年11月23号,今天是特殊年的"小雪"
LJMP END_JIEQI;
TESHU_YEAR_04: CJNE A,#04H,TESHU_YEAR_07;
MOV A,MONTH_SG;
CJNE A,#01H,NO_TESHU_DATE;
MOV A,DATE_SG;
CJNE A,#21H,NO_TESHU_DATE;
MOV JIEQI_1,#11111111B
MOV JIEQI_2,#11111111B
MOV JIEQI_3,#11111110B; 今天是2004年1月21号,今天是特殊年的"大寒"
LJMP END_JIEQI;
TESHU_YEAR_07: CJNE A,#07H,NO_TESHU_DATE;
MOV A,MONTH_SG;
CJNE A,#10H,NO_TESHU_DATE;
MOV A,DATE_SG;
CJNE A,#09H,NO_TESHU_DATE;
MOV JIEQI_1,#11111111B
MOV JIEQI_2,#11111111B
MOV JIEQI_3,#01111111B; 今天是2007年10月9号,今天是特殊年的"寒露"
LJMP END_JIEQI;
NO_TESHU_DATE: MOV A,YEAR_SG ;将年月日转化为HEX 格式
MOV B,#16
DIV AB
MOV YEAR_SG,B
MOV B,#10
MUL AB
ADD A,YEAR_SG
MOV YEAR_SG,A
MOV A,MONTH_SG;
CJNE A,#02H,MONTH_3;是2月吗?
MOV A,DATE_SG;
CJNE A,#03H,DATE_02_04;是2月3号吗?
LCALL JIEQI_WEIZHI;
MOV A,#0;
MOVC A,@A+DPTR;
RLC A;
JC NO_JIEQI_1;
MOV JIEQI_1,#01111111B; 今天是立春
LJMP END_JIEQI;
DATE_02_04: CJNE A,#04H,DATE_02_18;是2月4号吗?
LCALL JIEQI_WEIZHI;
MOV A,#0;
MOVC A,@A+DPTR;
RLC A;
JNC NO_JIEQI_1;
MOV JIEQI_1,#01111111B; 今天是立春
LJMP END_JIEQI;
DATE_02_18: CJNE A,#18H,DATE_02_19;是2月18号吗?
LCALL JIEQI_WEIZHI;
MOV A,#0;
MOVC A,@A+DPTR;
RLC A;
RLC A;
JC NO_JIEQI_1;
MOV JIEQI_1,#10111111B; 今天是雨水
LJMP END_JIEQI;
DATE_02_19: CJNE A,#19H,NO_JIEQI_1;是2月19号吗?













