partline(1,1),COLORYELLOW;
2 x) X0 g: @- A4 U- `jqd:=LSOLARTERMday(date);
; S, q5 u. y5 P1 \8 y3 dfd:=date;
# G4 ^; ]9 w |& ?2 e, Z0 j2 H* jtj:=(jqd-ref(jqd,1)<>DATEDIFF(ref(fd,1),fd))*((month)*2-(jqd>day)-(day<=16));" ?$ o5 e" [; t8 }' g
drawtext(tj=1 ,0.5,'小寒'),COLORYELLOW;
6 v. Y1 M5 d$ `$ y# ^ pdrawtext(tj=2 ,0.5,'大寒'),COLORYELLOW;
% }* S N2 z0 X9 G$ @0 B) sdrawtext(tj=3 ,0.5,'立春'),COLORGREEN;
! e% y/ p+ Z! Tdrawtext(tj=4 ,0.5,'雨水'),COLORGREEN;
( [+ f6 v! y# ldrawtext(tj=5 ,0.5,'惊蛰'),COLORGREEN;
' _* Z, J) f/ S; X2 bdrawtext(tj=6 ,0.5,'春分'),COLORGREEN;
- G/ X! D: E& M, ?; c* |5 t' d; \( bdrawtext(tj=7 ,0.5,'清明'),COLORYELLOW;
/ \, W: E" {, h! Y: vdrawtext(tj=8 ,0.5,'谷雨'),COLORYELLOW;
: M" c7 q, v0 T7 z0 i7 c( J% ydrawtext(tj=9 ,0.5,'立夏'),COLORRED;- S2 P' g/ V9 Q! M* `/ V9 w, ~2 i
drawtext(tj=10,0.5,'小满'),COLORRED;; Y, W; v, Z+ E8 {+ m+ J9 ` D
drawtext(tj=11,0.5,'芒种'),COLORRED;2 Y5 |% f1 v6 U& F
drawtext(tj=12,0.5,'夏至'),COLORRED;8 m# B3 P* |+ H
drawtext(tj=13,0.5,'小暑'),COLORYELLOW;0 I; q3 g5 F- n, L8 ^1 @+ j I
drawtext(tj=14,0.5,'大暑'),COLORYELLOW;
. p, L9 s4 a- `2 X* Tdrawtext(tj=15,0.5,'立秋'),COLORBBBBBB;
: ?% v$ e }+ ]drawtext(tj=16,0.5,'处暑'),COLORBBBBBB;- q- A/ l4 h/ ^* @/ y1 L* o. F
drawtext(tj=17,0.5,'白露'),COLORBBBBBB;: H, a( Z6 } J2 Z8 x, `* d' v
drawtext(tj=18,0.5,'秋分'),COLORBBBBBB;
5 f% I5 d1 V- L3 x. Adrawtext(tj=19,0.5,'寒露'),COLORYELLOW;
1 Z9 s1 F5 e. _; S4 }$ |% kdrawtext(tj=20,0.5,'霜降'),COLORYELLOW;
@8 S2 e7 J: i, udrawtext(tj=21,0.5,'立冬'),COLORFF9900;, b6 Y1 n' w4 t1 p; ]. c3 y5 E
drawtext(tj=22,0.5,'小雪'),COLORFF9900;
* J5 [) C2 ?* h( Bdrawtext(tj=23,0.5,'大雪'),COLORFF9900;+ Y+ _" f1 j$ ~5 [
drawtext(tj=24,0.5,'冬至'),COLORFF9900;8 q2 ?& |+ R4 P) m
6 o, e0 I* W8 i6 O
drawtext(tj=1 ,2.5,'丑月'),COLORYELLOW;
: u2 G! b2 f4 A' P7 @, Y2 Xdrawtext(tj=3 ,2.5,'寅月'),COLORGREEN;
6 { ]& X: j) N4 `1 cdrawtext(tj=5 ,2.5,'卯月'),COLORGREEN;
: Z- _; q: }- Y1 O/ ndrawtext(tj=7 ,2.5,'辰月'),COLORYELLOW;& g( z+ T$ k& N/ K- ]% T' b
drawtext(tj=9 ,2.5,'巳月'),COLORRED;$ H4 _6 o) g/ ]- w0 P/ w2 b
drawtext(tj=11,2.5,'午月'),COLORRED;5 m2 s( g1 G* t9 L/ E
drawtext(tj=13,2.5,'未月'),COLORYELLOW;
3 C# x: x4 d9 D5 b4 H6 D7 y/ e) Z4 Edrawtext(tj=15,2.5,'申月'),COLORBBBBBB;/ s) |2 A. W9 a: U) j
drawtext(tj=17,2.5,'酉月'),COLORBBBBBB;
: y! d* l6 y2 n, Q) `# o& wdrawtext(tj=19,2.5,'戌月'),COLORYELLOW;
) O4 |9 M$ D$ \' ?! T* o; G- X# `6 e9 Bdrawtext(tj=21,2.5,'亥月'),COLORFF9900;; p' _- I+ g+ U7 I
drawtext(tj=23,2.5,'子月'),COLORFF9900;
; \& l5 U7 I) l8 E* C" P* H7 |3 z9 x J9 m
stickline(tj=1 or tj=2 or tj=7 or tj=8 or tj=13 or tj=14 or tj=19 or tj=20,0.5,1.5,8,0),COLORYELLOW;- C9 U# [( d% m `5 Z1 @
stickline(tj>=3 and tj<=6,0.5,1.5,8,0),COLORGREEN;
: d+ |, d" a0 Z8 h8 W% h9 n, w9 `stickline(tj>=9 and tj<=12,0.5,1.5,8,0),COLORRED;
& D* i) T+ G# ^) G, D/ Nstickline(tj>=15 and tj<=18,0.5,1.5,8,0),COLORBBBBBB;
5 Q6 C: |! l( D; |stickline(tj>=21 and tj<=24,0.5,1.5,8,0),COLORFF9900;2 t" u. I, D3 ]+ u2 d+ ~
3 h: r# C V8 I
drawnumber(tj,3.5,tj,0),COLORBROWN;+ d% u. i; u, l
cond:=if(tj>=6,tj-6,tj+18)*15;. M1 k) L, { k
drawnumber(tj ,-0.5,cond,0),COLORGREEN;% P7 e$ c$ d9 v, j, h4 |3 [8 R! T
drawnumber((tj/3)=intpart(tj/3) and tj<>0,-0.5,cond,0),COLORRED;
4 G( ]( o: _+ D$ J* R-1,pointdot,colorblack;
- F6 z! g$ l) Egz:=GANZHI(date,0,2);& _- d# I0 F8 P N) N C
stickline(BETWEEN(gz,39,50),0.85,1.05,4,0),COLORYELLOW; |