//廿四节气
py:=if(WEEKDAY<>5,LSOLARTERM(DATE),if(LSOLARTERM(DATE)<>0,LSOLARTERM(DATE),if(LSOLARTERM(DATE+1)<>0,LSOLARTERM(DATE+1),LSOLARTERM(DATE+2))));
时间p:=IF(DATATYPE=1,093100,IF(DATATYPE=2,093500,IF(DATATYPE=3,094500,IF(DATATYPE=4,100000,IF(DATATYPE=5,103000,0)))));
PXTJ:=IF(DATATYPE=6,1,IF(DATATYPE>0 AND DATATYPE<6 AND =时间p,1,0));
DRAWTEXT(PXTJ=1 and py=1,HIGH,'小寒'),ALIGN0,colorcyan,PXUP20;
DRAWTEXT(PXTJ=1 and py=2,HIGH,'大寒'),ALIGN0,colorcyan,PXUP20;
DRAWTEXT(PXTJ=1 and py=3,HIGH,'立★春'),COLORgreen,ALIGN0,PXUP20;
DRAWTEXT(PXTJ=1 and py=4,HIGH,'雨水'),COLORgreen,ALIGN0,PXUP20;
DRAWTEXT(PXTJ=1 and py=5,HIGH,'惊蛰'),COLORgreen,ALIGN0,PXUP20;
DRAWTEXT(PXTJ=1 and py=6,HIGH,'春分'),COLORgreen,ALIGN0,PXUP20;
DRAWTEXT(PXTJ=1 and py=7,HIGH,'清明'),COLORgreen,ALIGN0,PXUP20;
DRAWTEXT(PXTJ=1 and py=8,HIGH,'谷雨'),COLORgreen,ALIGN0,PXUP20;
DRAWTEXT(PXTJ=1 and py=9,HIGH,'立★夏'),COLORMAGENTA,ALIGN0,PXUP20;
DRAWTEXT(PXTJ=1 and py=10,HIGH,'小满'),COLORMAGENTA,ALIGN0,PXUP20;
DRAWTEXT(PXTJ=1 and py=11,HIGH,'芒种'),COLORMAGENTA,ALIGN0,PXUP20;
DRAWTEXT(PXTJ=1 and py=12,HIGH,'夏至'),COLORMAGENTA,ALIGN0,PXUP20;
DRAWTEXT(PXTJ=1 and py=13,HIGH,'小暑'),COLORMAGENTA,ALIGN0,PXUP20;
DRAWTEXT(PXTJ=1 and py=14,HIGH,'大暑'),COLORMAGENTA,ALIGN0,PXUP20;
DRAWTEXT(PXTJ=1 and py=15,HIGH,'立★秋'),COLORYELLOW,ALIGN0,PXUP20;
DRAWTEXT(PXTJ=1 and py=16,HIGH,'处暑'),COLORYELLOW,ALIGN0,PXUP20;
DRAWTEXT(PXTJ=1 and py=17,HIGH,'白露'),COLORYELLOW,ALIGN0,PXUP20;
DRAWTEXT(PXTJ=1 and py=18,HIGH,'秋分'),COLORYELLOW,ALIGN0,PXUP20;
DRAWTEXT(PXTJ=1 and py=19,HIGH,'寒露'),COLORYELLOW,ALIGN0,PXUP20;
DRAWTEXT(PXTJ=1 and py=20,HIGH,'霜降'),COLORYELLOW,ALIGN0,PXUP20;
DRAWTEXT(PXTJ=1 and py=21,HIGH,'立★冬'),ALIGN0,colorcyan,PXUP20;
DRAWTEXT(PXTJ=1 and py=22,HIGH,'小雪'),ALIGN0,colorcyan,PXUP20;
DRAWTEXT(PXTJ=1 and py=23,HIGH,'大雪'),ALIGN0,colorcyan,PXUP20;
DRAWTEXT(PXTJ=1 and py=24,HIGH,'冬至'),ALIGN0,colorcyan,PXUP20;
--------------------------------------------------
1)分钟图显示节气
2)周6/7提前到周五显示 |