谁有AR-24节气的公式

来源：百度知道 编辑：UC知道 时间：2024/05/26 02:23:08
是股道黄金版的，表示忠心感谢

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,'