//廿四节气 b1 c y8 ?; F6 k
py:=if(WEEKDAY<>5,LSOLARTERM(DATE),if(LSOLARTERM(DATE)<>0,LSOLARTERM(DATE),if(LSOLARTERM(DATE+1)<>0,LSOLARTERM(DATE+1),LSOLARTERM(DATE+2))));/ p$ E2 ~+ [! {; X- n7 C0 {+ r/ [
时间p:=IF(DATATYPE=1,093100,IF(DATATYPE=2,093500,IF(DATATYPE=3,094500,IF(DATATYPE=4,100000,IF(DATATYPE=5,103000,0)))));2 Z! n/ q; r* j3 z% o0 s( x
) F* P0 j3 |9 \ ]
PXTJ:=IF(DATATYPE=6,1,IF(DATATYPE>0 AND DATATYPE<6 AND =时间p,1,0));
% K) L+ R' t3 Y8 _' t# D6 q* vDRAWTEXT(PXTJ=1 and py=1,HIGH,'小寒'),ALIGN0,colorcyan,PXUP20;
. ?) M' t, Q2 I1 Z* m sDRAWTEXT(PXTJ=1 and py=2,HIGH,'大寒'),ALIGN0,colorcyan,PXUP20;
! k) @( j8 n1 f* YDRAWTEXT(PXTJ=1 and py=3,HIGH,'立★春'),COLORgreen,ALIGN0,PXUP20;
9 ~$ Q( F% u2 p9 H9 e' _4 i5 UDRAWTEXT(PXTJ=1 and py=4,HIGH,'雨水'),COLORgreen,ALIGN0,PXUP20;
2 C9 y' F! u4 I* Y* {9 g/ ]DRAWTEXT(PXTJ=1 and py=5,HIGH,'惊蛰'),COLORgreen,ALIGN0,PXUP20;! B# s( I Z/ s; L0 q
DRAWTEXT(PXTJ=1 and py=6,HIGH,'春分'),COLORgreen,ALIGN0,PXUP20;: ~7 m" {3 s: T
DRAWTEXT(PXTJ=1 and py=7,HIGH,'清明'),COLORgreen,ALIGN0,PXUP20;
5 H( b" }/ P$ Y fDRAWTEXT(PXTJ=1 and py=8,HIGH,'谷雨'),COLORgreen,ALIGN0,PXUP20;, @* m* U; G0 a' v! T
DRAWTEXT(PXTJ=1 and py=9,HIGH,'立★夏'),COLORMAGENTA,ALIGN0,PXUP20;
3 l; ?0 ^& Q* ]/ E. `/ ODRAWTEXT(PXTJ=1 and py=10,HIGH,'小满'),COLORMAGENTA,ALIGN0,PXUP20;
" Z; \) K% u S2 vDRAWTEXT(PXTJ=1 and py=11,HIGH,'芒种'),COLORMAGENTA,ALIGN0,PXUP20;
9 ?: a4 F% v X' v# P( nDRAWTEXT(PXTJ=1 and py=12,HIGH,'夏至'),COLORMAGENTA,ALIGN0,PXUP20;
% O+ q# [& \+ @; N9 [* S& f( }DRAWTEXT(PXTJ=1 and py=13,HIGH,'小暑'),COLORMAGENTA,ALIGN0,PXUP20;
2 b& j, T6 c7 c1 I4 D# `! @* DDRAWTEXT(PXTJ=1 and py=14,HIGH,'大暑'),COLORMAGENTA,ALIGN0,PXUP20;
" b0 ]1 h0 t# K) ?2 S% m6 k( I1 [' g) [DRAWTEXT(PXTJ=1 and py=15,HIGH,'立★秋'),COLORYELLOW,ALIGN0,PXUP20;
7 L# |7 Y- P5 N( D5 eDRAWTEXT(PXTJ=1 and py=16,HIGH,'处暑'),COLORYELLOW,ALIGN0,PXUP20;
/ I8 S+ L$ B: y0 Q2 j2 ~% yDRAWTEXT(PXTJ=1 and py=17,HIGH,'白露'),COLORYELLOW,ALIGN0,PXUP20;$ g2 x5 o) A% I7 i1 v
DRAWTEXT(PXTJ=1 and py=18,HIGH,'秋分'),COLORYELLOW,ALIGN0,PXUP20;
# J: b1 d" W- M9 b5 X. ^DRAWTEXT(PXTJ=1 and py=19,HIGH,'寒露'),COLORYELLOW,ALIGN0,PXUP20;
2 b8 w7 e/ C" UDRAWTEXT(PXTJ=1 and py=20,HIGH,'霜降'),COLORYELLOW,ALIGN0,PXUP20;2 q1 `0 h& x% P! a' O0 m
DRAWTEXT(PXTJ=1 and py=21,HIGH,'立★冬'),ALIGN0,colorcyan,PXUP20;
; n9 _5 H+ E: r7 x; H9 ?7 {DRAWTEXT(PXTJ=1 and py=22,HIGH,'小雪'),ALIGN0,colorcyan,PXUP20;
1 t n- L0 s$ o2 MDRAWTEXT(PXTJ=1 and py=23,HIGH,'大雪'),ALIGN0,colorcyan,PXUP20;) w; e- D8 A- q7 `# I A! A$ c* b
DRAWTEXT(PXTJ=1 and py=24,HIGH,'冬至'),ALIGN0,colorcyan,PXUP20;2 N# r. r2 r, [) w5 U7 H
--------------------------------------------------
1 D" Z8 H/ i9 x% W& S$ q, P1)分钟图显示节气9 \; d* [5 d1 O# {' w' O4 T
2)周6/7提前到周五显示 |