//廿四节气
7 w. @$ e: S4 O. _" N [6 u, ypy:=if(WEEKDAY<>5,LSOLARTERM(DATE),if(LSOLARTERM(DATE)<>0,LSOLARTERM(DATE),if(LSOLARTERM(DATE+1)<>0,LSOLARTERM(DATE+1),LSOLARTERM(DATE+2))));
* Z* R& D) r- z! ?: r' j时间p:=IF(DATATYPE=1,093100,IF(DATATYPE=2,093500,IF(DATATYPE=3,094500,IF(DATATYPE=4,100000,IF(DATATYPE=5,103000,0)))));( G4 c- y( Z( m6 g
6 B- |4 H7 p/ e% B
PXTJ:=IF(DATATYPE=6,1,IF(DATATYPE>0 AND DATATYPE<6 AND =时间p,1,0));
& b2 U# H1 M8 F9 j2 R# SDRAWTEXT(PXTJ=1 and py=1,HIGH,'小寒'),ALIGN0,colorcyan,PXUP20;8 N8 F" w# T/ a) @9 [6 r
DRAWTEXT(PXTJ=1 and py=2,HIGH,'大寒'),ALIGN0,colorcyan,PXUP20;
3 r5 a8 k- X- r1 _+ P( a! oDRAWTEXT(PXTJ=1 and py=3,HIGH,'立★春'),COLORgreen,ALIGN0,PXUP20;+ ?9 R9 b( m" B1 }' c0 E
DRAWTEXT(PXTJ=1 and py=4,HIGH,'雨水'),COLORgreen,ALIGN0,PXUP20;2 H3 G! w% z& N0 Q/ S' ~
DRAWTEXT(PXTJ=1 and py=5,HIGH,'惊蛰'),COLORgreen,ALIGN0,PXUP20;
; R/ @* i; b0 i$ o6 p: v: c4 mDRAWTEXT(PXTJ=1 and py=6,HIGH,'春分'),COLORgreen,ALIGN0,PXUP20;6 ~: B) L2 V, o) F# e( p
DRAWTEXT(PXTJ=1 and py=7,HIGH,'清明'),COLORgreen,ALIGN0,PXUP20;" G: B( v1 M# U. V- f5 v! K
DRAWTEXT(PXTJ=1 and py=8,HIGH,'谷雨'),COLORgreen,ALIGN0,PXUP20;- @+ H4 U r( [8 H1 Q3 Y, @! ` q% G
DRAWTEXT(PXTJ=1 and py=9,HIGH,'立★夏'),COLORMAGENTA,ALIGN0,PXUP20;
6 I7 O: t' F# u3 ^; e% ODRAWTEXT(PXTJ=1 and py=10,HIGH,'小满'),COLORMAGENTA,ALIGN0,PXUP20;& n; G, A3 v. x( U
DRAWTEXT(PXTJ=1 and py=11,HIGH,'芒种'),COLORMAGENTA,ALIGN0,PXUP20;
2 X/ W. k$ ~# g9 c# K2 ^9 @DRAWTEXT(PXTJ=1 and py=12,HIGH,'夏至'),COLORMAGENTA,ALIGN0,PXUP20;
; K! k5 P+ s' x. N" S! uDRAWTEXT(PXTJ=1 and py=13,HIGH,'小暑'),COLORMAGENTA,ALIGN0,PXUP20;' T/ f) W: a, b' ?9 N6 ]. H
DRAWTEXT(PXTJ=1 and py=14,HIGH,'大暑'),COLORMAGENTA,ALIGN0,PXUP20;, h$ Y7 c/ a9 a. K
DRAWTEXT(PXTJ=1 and py=15,HIGH,'立★秋'),COLORYELLOW,ALIGN0,PXUP20;
1 {; Z9 Q/ S. `. KDRAWTEXT(PXTJ=1 and py=16,HIGH,'处暑'),COLORYELLOW,ALIGN0,PXUP20;/ j% \# H( i9 @1 W5 Z
DRAWTEXT(PXTJ=1 and py=17,HIGH,'白露'),COLORYELLOW,ALIGN0,PXUP20;! m0 S' y, u$ k% i
DRAWTEXT(PXTJ=1 and py=18,HIGH,'秋分'),COLORYELLOW,ALIGN0,PXUP20;
0 h/ h/ L1 ?9 X% K. _DRAWTEXT(PXTJ=1 and py=19,HIGH,'寒露'),COLORYELLOW,ALIGN0,PXUP20;
T ]/ d q$ s0 C6 g/ F1 |% YDRAWTEXT(PXTJ=1 and py=20,HIGH,'霜降'),COLORYELLOW,ALIGN0,PXUP20;
7 c( b+ V) M7 ~ bDRAWTEXT(PXTJ=1 and py=21,HIGH,'立★冬'),ALIGN0,colorcyan,PXUP20;% `; C3 k3 B9 |( K6 u8 u
DRAWTEXT(PXTJ=1 and py=22,HIGH,'小雪'),ALIGN0,colorcyan,PXUP20;# J% ^2 @3 M8 x. B0 L. e
DRAWTEXT(PXTJ=1 and py=23,HIGH,'大雪'),ALIGN0,colorcyan,PXUP20;, R$ ?6 s' D& o! Z/ u
DRAWTEXT(PXTJ=1 and py=24,HIGH,'冬至'),ALIGN0,colorcyan,PXUP20;
: V/ v# j0 ~. z ]--------------------------------------------------
+ P7 X& H% e m O$ j1)分钟图显示节气
; F- U9 ^, A& S/ v2 w0 @2)周6/7提前到周五显示 |