//廿四节气
/ A' u; C: O, e+ e; i) M: B! ?; Opy:=if(WEEKDAY<>5,LSOLARTERM(DATE),if(LSOLARTERM(DATE)<>0,LSOLARTERM(DATE),if(LSOLARTERM(DATE+1)<>0,LSOLARTERM(DATE+1),LSOLARTERM(DATE+2))));2 O P0 M3 f$ U5 z: n
时间p:=IF(DATATYPE=1,093100,IF(DATATYPE=2,093500,IF(DATATYPE=3,094500,IF(DATATYPE=4,100000,IF(DATATYPE=5,103000,0)))));
; E, Z: j6 c* V/ j
, ?( v. W- W; g, V' U Z* YPXTJ:=IF(DATATYPE=6,1,IF(DATATYPE>0 AND DATATYPE<6 AND =时间p,1,0));$ J9 _7 ^ n+ G1 ?2 r! }- F
DRAWTEXT(PXTJ=1 and py=1,HIGH,'小寒'),ALIGN0,colorcyan,PXUP20;
* @; b1 [0 E5 k1 u* MDRAWTEXT(PXTJ=1 and py=2,HIGH,'大寒'),ALIGN0,colorcyan,PXUP20;% x& G# p/ Z' {) m0 q6 C3 X
DRAWTEXT(PXTJ=1 and py=3,HIGH,'立★春'),COLORgreen,ALIGN0,PXUP20;" J4 ~6 ~8 N/ { d
DRAWTEXT(PXTJ=1 and py=4,HIGH,'雨水'),COLORgreen,ALIGN0,PXUP20;
% @, r- G. l0 F- ]2 q2 O2 Q3 ~: Z) }2 hDRAWTEXT(PXTJ=1 and py=5,HIGH,'惊蛰'),COLORgreen,ALIGN0,PXUP20;, o" V; Q5 q$ @" b7 {% x1 f8 a
DRAWTEXT(PXTJ=1 and py=6,HIGH,'春分'),COLORgreen,ALIGN0,PXUP20;8 R" T. d# K/ s% l; o5 S' @0 N2 F
DRAWTEXT(PXTJ=1 and py=7,HIGH,'清明'),COLORgreen,ALIGN0,PXUP20;
$ s. R7 ]8 s/ p- ]DRAWTEXT(PXTJ=1 and py=8,HIGH,'谷雨'),COLORgreen,ALIGN0,PXUP20;
* K2 K, ^6 [/ J1 M9 ~) y' @3 F A0 rDRAWTEXT(PXTJ=1 and py=9,HIGH,'立★夏'),COLORMAGENTA,ALIGN0,PXUP20;' u$ P. Z% Q7 K5 I/ ?
DRAWTEXT(PXTJ=1 and py=10,HIGH,'小满'),COLORMAGENTA,ALIGN0,PXUP20;
: H5 c* [! N3 a* l& w" m6 yDRAWTEXT(PXTJ=1 and py=11,HIGH,'芒种'),COLORMAGENTA,ALIGN0,PXUP20;
: d3 V" F8 N" O* P. UDRAWTEXT(PXTJ=1 and py=12,HIGH,'夏至'),COLORMAGENTA,ALIGN0,PXUP20;) _! r! ]$ Y# G' F" w% y$ v
DRAWTEXT(PXTJ=1 and py=13,HIGH,'小暑'),COLORMAGENTA,ALIGN0,PXUP20;7 }4 ]2 M2 n7 H- }4 h
DRAWTEXT(PXTJ=1 and py=14,HIGH,'大暑'),COLORMAGENTA,ALIGN0,PXUP20;1 b- p; [: c- M* ^9 P2 ?
DRAWTEXT(PXTJ=1 and py=15,HIGH,'立★秋'),COLORYELLOW,ALIGN0,PXUP20;5 E6 U* |/ j+ g# O7 q' z( R) @5 |) F( o
DRAWTEXT(PXTJ=1 and py=16,HIGH,'处暑'),COLORYELLOW,ALIGN0,PXUP20;
2 A H: Y8 j. o; J2 p4 h: z5 @7 EDRAWTEXT(PXTJ=1 and py=17,HIGH,'白露'),COLORYELLOW,ALIGN0,PXUP20;
1 B' J. v$ ]0 [+ c" MDRAWTEXT(PXTJ=1 and py=18,HIGH,'秋分'),COLORYELLOW,ALIGN0,PXUP20;
/ ~' ]$ e7 A; i2 PDRAWTEXT(PXTJ=1 and py=19,HIGH,'寒露'),COLORYELLOW,ALIGN0,PXUP20; @! f# m. Z8 p. h
DRAWTEXT(PXTJ=1 and py=20,HIGH,'霜降'),COLORYELLOW,ALIGN0,PXUP20;& M7 z1 m% m% d( C* v
DRAWTEXT(PXTJ=1 and py=21,HIGH,'立★冬'),ALIGN0,colorcyan,PXUP20;3 F K$ h6 Z; C
DRAWTEXT(PXTJ=1 and py=22,HIGH,'小雪'),ALIGN0,colorcyan,PXUP20;
# g- T3 f: t! u; R& R. uDRAWTEXT(PXTJ=1 and py=23,HIGH,'大雪'),ALIGN0,colorcyan,PXUP20;
a+ F2 R* M9 j& a# BDRAWTEXT(PXTJ=1 and py=24,HIGH,'冬至'),ALIGN0,colorcyan,PXUP20;
# U* S+ j; R. b( i7 P7 R2 {--------------------------------------------------, U, E0 S* w, w6 W
1)分钟图显示节气, ?: t5 G, y; h
2)周6/7提前到周五显示 |