//廿四节气
* i( m* \+ W0 g% W6 Ipy:=if(WEEKDAY<>5,LSOLARTERM(DATE),if(LSOLARTERM(DATE)<>0,LSOLARTERM(DATE),if(LSOLARTERM(DATE+1)<>0,LSOLARTERM(DATE+1),LSOLARTERM(DATE+2))));2 o9 ]7 i$ G1 L: e
时间p:=IF(DATATYPE=1,093100,IF(DATATYPE=2,093500,IF(DATATYPE=3,094500,IF(DATATYPE=4,100000,IF(DATATYPE=5,103000,0)))));
# w" ?, V- L8 W# P: O
7 k8 A# D& R( S* h! C4 a- ]PXTJ:=IF(DATATYPE=6,1,IF(DATATYPE>0 AND DATATYPE<6 AND =时间p,1,0));! n$ ?1 Q7 x8 k e0 Y
DRAWTEXT(PXTJ=1 and py=1,HIGH,'小寒'),ALIGN0,colorcyan,PXUP20;
5 @+ `0 U- O% Q( Q6 CDRAWTEXT(PXTJ=1 and py=2,HIGH,'大寒'),ALIGN0,colorcyan,PXUP20;
- w7 g/ l! X+ Q) P& A" e0 MDRAWTEXT(PXTJ=1 and py=3,HIGH,'立★春'),COLORgreen,ALIGN0,PXUP20;3 V- f0 {: R& \2 v k7 L+ _
DRAWTEXT(PXTJ=1 and py=4,HIGH,'雨水'),COLORgreen,ALIGN0,PXUP20;0 C% x' s) ^. }$ F/ f1 O
DRAWTEXT(PXTJ=1 and py=5,HIGH,'惊蛰'),COLORgreen,ALIGN0,PXUP20;
! x6 L5 }# L1 [2 ~1 N- G) hDRAWTEXT(PXTJ=1 and py=6,HIGH,'春分'),COLORgreen,ALIGN0,PXUP20;
. l( m2 d. p# r$ u: lDRAWTEXT(PXTJ=1 and py=7,HIGH,'清明'),COLORgreen,ALIGN0,PXUP20;
8 o& _* c8 ]$ _DRAWTEXT(PXTJ=1 and py=8,HIGH,'谷雨'),COLORgreen,ALIGN0,PXUP20; ?9 B$ {5 M' M" f
DRAWTEXT(PXTJ=1 and py=9,HIGH,'立★夏'),COLORMAGENTA,ALIGN0,PXUP20;
3 k) I! Y1 V c/ U. \$ n; _4 m8 WDRAWTEXT(PXTJ=1 and py=10,HIGH,'小满'),COLORMAGENTA,ALIGN0,PXUP20;
. O. C/ w4 P! S5 KDRAWTEXT(PXTJ=1 and py=11,HIGH,'芒种'),COLORMAGENTA,ALIGN0,PXUP20;
( A5 o m- v' f& C( [: F- j4 iDRAWTEXT(PXTJ=1 and py=12,HIGH,'夏至'),COLORMAGENTA,ALIGN0,PXUP20;
6 B5 E0 c% F) Q6 T/ _DRAWTEXT(PXTJ=1 and py=13,HIGH,'小暑'),COLORMAGENTA,ALIGN0,PXUP20;* m* u$ z# y) k `! j ^
DRAWTEXT(PXTJ=1 and py=14,HIGH,'大暑'),COLORMAGENTA,ALIGN0,PXUP20;
3 \8 _$ y" V9 F, ^& ZDRAWTEXT(PXTJ=1 and py=15,HIGH,'立★秋'),COLORYELLOW,ALIGN0,PXUP20;
! `- P( N# U3 s/ |, m& W+ hDRAWTEXT(PXTJ=1 and py=16,HIGH,'处暑'),COLORYELLOW,ALIGN0,PXUP20;/ `- y" l$ E* B3 {$ J- n o: B
DRAWTEXT(PXTJ=1 and py=17,HIGH,'白露'),COLORYELLOW,ALIGN0,PXUP20;
3 ^ T6 l) C+ A2 nDRAWTEXT(PXTJ=1 and py=18,HIGH,'秋分'),COLORYELLOW,ALIGN0,PXUP20;
) T! Z/ y( O3 M5 aDRAWTEXT(PXTJ=1 and py=19,HIGH,'寒露'),COLORYELLOW,ALIGN0,PXUP20;# m" X. o) T& z v) d3 y
DRAWTEXT(PXTJ=1 and py=20,HIGH,'霜降'),COLORYELLOW,ALIGN0,PXUP20;$ c8 f6 d& ? `
DRAWTEXT(PXTJ=1 and py=21,HIGH,'立★冬'),ALIGN0,colorcyan,PXUP20;1 ^+ C8 H5 V( r' q9 D
DRAWTEXT(PXTJ=1 and py=22,HIGH,'小雪'),ALIGN0,colorcyan,PXUP20;
/ n b8 @( O4 x0 TDRAWTEXT(PXTJ=1 and py=23,HIGH,'大雪'),ALIGN0,colorcyan,PXUP20;" l. ]' D/ }6 F+ v
DRAWTEXT(PXTJ=1 and py=24,HIGH,'冬至'),ALIGN0,colorcyan,PXUP20;, J2 v- ]# k4 C6 D$ ?. }7 K
--------------------------------------------------
2 ?! m2 m; @5 J: h' Q5 E1 N1 g; y1)分钟图显示节气; n$ s7 ^2 p$ ?) H/ C6 H
2)周6/7提前到周五显示 |