文华软件60甲子日指标公式,给做期货的朋友参考!
<p>以下是文华软件60甲子日指标公式,给做期货的朋友参考!（无源码的请下载附件导入）</p><div class="con" id="rjsmad1"></div>
<p>DRAWKLINE(0.75,COLORRED,1,COLORCYAN,0);<br>
G1:=INTPART(YEAR/100);<br>
G2:=YEAR-G1*100;<br>
G3:=4*G1+INTPART(G1/4)+5*G2+INTPART(G2/4)+INTPART(3*(IF(MONTH=1,21,IF(MONTH=2,23,MONTH))+1)/5)+DAY-3;<br>
G4:=G3-INTPART(G3/10)*10;<br>
KTEXT(G4=0,0,H,1,COLORGREEN,'葵');<br>
KTEXT(G4=1,0,H,1,COLORGREEN,'甲');<br>
KTEXT(G4=2,0,H,1,COLORGREEN,'乙');<br>
KTEXT(G4=3,0,H,1,COLORGREEN,'丙');<br>
KTEXT(G4=4,0,H,1,COLORGREEN,'丁');<br>
KTEXT(G4=5,0,H,1,COLORGREEN,'戊');<br>
KTEXT(G4=6,0,H,1,COLORGREEN,'己');<br>
KTEXT(G4=7,0,H,1,COLORGREEN,'庚');<br>
KTEXT(G4=8,0,H,1,COLORGREEN,'辛');<br>
KTEXT(G4=9,0,H,1,COLORGREEN,'壬');<br>
G6:=8*G1+INTPART(G1/4)+5*G2+INTPART(G2/4)+INTPART(3*(IF(MONTH=1,25,IF(MONTH=2,26,MONTH))+1)/5)+DAY+7+IF((MONTH/2-INTPART(MONTH/2))=0,6,0);<br>
G7:=G6-INTPART(G6/12)*12;<br>
KTEXT(G7=1,0,L,1,COLORGREEN, ' 子');<br>
KTEXT(G7=2,0,L,1,COLORGREEN, ' 丑');<br>
KTEXT(G7=3,0,L,1,COLORGREEN, ' 寅');<br>
KTEXT(G7=4,0,L,1,COLORGREEN, ' 卯');<br>
KTEXT(G7=5,0,L,1,COLORGREEN, ' 辰');<br>
KTEXT(G7=6,0,L,1,COLORGREEN, ' 巳');<br>
KTEXT(G7=7,0,L,1,COLORGREEN, ' 午');<br>
KTEXT(G7=8,0,L,1,COLORGREEN, ' 未');<br>
KTEXT(G7=9,0,L,1,COLORGREEN, ' 申');<br>
KTEXT(G7=10,0,L,1,COLORGREEN, ' 酉');<br>
KTEXT(G7=11,0,L,1,COLORGREEN, ' 戍');<br>
KTEXT(G7=0,0,L,1,COLORGREEN, ' 亥');<br>
</p>
页:
[1]