咨詢內(nèi)容：

老師修改成博弈大師能用的

PARTLINE(1,1),COLORYELLOW;
jqd:=LSOLARTERMDAY(DATE);
fd:=DATE;
tj:=(jqd-REF(jqd,1)<>DATEDIFF(REF(fd,1),fd))*((MONTH)*2-(jqd>DAY)-(DAY<=16));
DRAWTEXT(tj=1 ,0.5,'小寒'),COLORYELLOW;
DRAWTEXT(tj=2 ,0.5,'大寒'),COLORYELLOW;
DRAWTEXT(tj=3 ,0.5,'立春'),COLORGREEN;
DRAWTEXT(tj=4 ,0.5,'雨水'),COLORGREEN;
DRAWTEXT(tj=5 ,0.5,'驚蟄'),COLORGREEN;
DRAWTEXT(tj=6 ,0.5,'春分'),COLORGREEN;
DRAWTEXT(tj=7 ,0.5,'清明'),COLORYELLOW;
DRAWTEXT(tj=8 ,0.5,'谷雨'),COLORYELLOW;
DRAWTEXT(tj=9 ,0.5,'立夏'),COLORRED;
DRAWTEXT(tj=10,0.5,'小滿'),COLORRED;
DRAWTEXT(tj=11,0.5,'芒種'),COLORRED;
DRAWTEXT(tj=12,0.5,'夏至'),COLORRED;
DRAWTEXT(tj=13,0.5,'小暑'),COLORYELLOW;
DRAWTEXT(tj=14,0.5,'大暑'),COLORYELLOW;
DRAWTEXT(tj=15,0.5,'立秋'),COLORBBBBBB;
DRAWTEXT(tj=16,0.5,'處暑'),COLORBBBBBB;
DRAWTEXT(tj=17,0.5,'白露'),COLORBBBBBB;
DRAWTEXT(tj=18,0.5,'秋分'),COLORBBBBBB;
DRAWTEXT(tj=19,0.5,'寒露'),COLORYELLOW;
DRAWTEXT(tj=20,0.5,'霜降'),COLORYELLOW;
DRAWTEXT(tj=21,0.5,'立冬'),COLORFF9900;
DRAWTEXT(tj=22,0.5,'小雪'),COLORFF9900;
DRAWTEXT(tj=23,0.5,'大雪'),COLORFF9900;
DRAWTEXT(tj=24,0.5,'冬至'),COLORFF9900;

DRAWTEXT(tj=1 ,2.5,'丑月'),COLORYELLOW;
DRAWTEXT(tj=3 ,2.5,'寅月'),COLORGREEN;
DRAWTEXT(tj=5 ,2.5,'卯月'),COLORGREEN;
DRAWTEXT(tj=7 ,2.5,'辰月'),COLORYELLOW;
DRAWTEXT(tj=9 ,2.5,'巳月'),COLORRED;
DRAWTEXT(tj=11,2.5,'午月'),COLORRED;
DRAWTEXT(tj=13,2.5,'未月'),COLORYELLOW;
DRAWTEXT(tj=15,2.5,'申月'),COLORBBBBBB;
DRAWTEXT(tj=17,2.5,'酉月'),COLORBBBBBB;
DRAWTEXT(tj=19,2.5,'戌月'),COLORYELLOW;
DRAWTEXT(tj=21,2.5,'亥月'),COLORFF9900;
DRAWTEXT(tj=23,2.5,'子月'),COLORFF9900;

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;
STICKLINE(tj>=3 AND tj<=6,0.5,1.5,8,0),COLORGREEN;
STICKLINE(tj>=9 AND tj<=12,0.5,1.5,8,0),COLORRED;
STICKLINE(tj>=15 AND tj<=18,0.5,1.5,8,0),COLORBBBBBB;
STICKLINE(tj>=21 AND tj<=24,0.5,1.5,8,0),COLORFF9900;

DRAWNUMBER(tj,3.5,tj,0),COLORBROWN;
cond:=IF(tj>=6,tj-6,tj+18)*15;
DRAWNUMBER(tj ,-0.5,cond,0),COLORGREEN;
DRAWNUMBER((tj/3)=INTPART(tj/3) AND tj<>0,-0.5,cond,0),COLORRED;
-1,POINTDOT,colorblack;
gz:=GANZHI(DATE,0,2);
STICKLINE(BETWEEN(gz,39,50),0.85,1.05,4,0),COLORYELLOW;

?

?來源:程序化99網(wǎng)（ www.kzuj.com.cn ）

博易技術(shù)人員： 您好，目前不支持取節(jié)氣的函數(shù)，所以上述公式無法修改。 來源 程序化久久網(wǎng)