周易八卦风水免费源码

送大家一个八卦幅图指标，当做主图指标也可以，权当娱乐。比较好的卦象 乾卦、升卦、豫卦、泰卦，自己可对照复盘。

DRAWTEXT_FIX(ISLASTBAR ,0.06,0.01,1,DYBLOCK),COLORWHITE;

DRAWTEXT_FIX(ISLASTBAR ,0.065,0.01,0,HYBLOCK),COLORYELLOW;

DRAWTEXT_FIX(ISLASTBAR ,0.015,0.05,0,ZDBLOCK),COLORFF7F00;

DRAWTEXT_FIX(ISLASTBAR ,0.145,0.05,0,GNBLOCK),COLORRED;

DRAWTEXT_FIX(ISLASTBAR ,0.015,0.09,0,FGBLOCK),COLORLIMAGENTA;

DRAWTEXT_FIX(ISLASTBAR ,0.015,0.13,0,ZSBLOCK),COLORMAGENTA;

DRAWTEXT_FIX(CURRBARSCOUNT=1,0.015,0.17,0,'总股本（亿）:'),COLORLIBLUE;

DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.09,0.17,0,FINANCE(1)/100000000),COLORLIBLUE;

DRAWTEXT_FIX(CURRBARSCOUNT=1,0.015,0.21,0,'流通股本（亿）:'),COLORCYAN;

DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.10,0.21,0,FINANCE(7)/100000000),COLORCYAN;

AAA1:=STRCAT('沪深总上涨家数:',CON2STR(DYNAINFO(60),0));

AAA2:=STRCAT('沪深总下跌家数:',CON2STR(DYNAINFO(61),0));

DRAWTEXT_FIX(ISLASTBAR,0.015,0.25,0,AAA1),COLORRED;

DRAWTEXT_FIX(ISLASTBAR,0.015,0.29,0,AAA2),COLORGREEN;

DRAWKLINE(HIGH,OPEN,LOW,CLOSE);

STICKLINE(C/REF(C,1)>=1.0985 AND PERIOD==5,C,O,2,0),COLORRED;

STICKLINE(REF(CLOSE,1)/CLOSE>=1.0985 AND PERIOD==5,C,O,2,0),COLORLICYAN;

乾坤MA20:MA(C,20),COLORYELLOW;

甲子MA60:MA(C,60),COLORRED;

Z1:=INTPART(FRACPART(REF(C,1)/10000)*10),COLORWHITE,NODRAW;

Z2:=INTPART(FRACPART(REF(C,1)/1000)*10),COLORYELLOW,NODRAW;

Z3:=INTPART(FRACPART(REF(C,1)/100)*10),COLORRED,NODRAW;

Z4:=INTPART(FRACPART(REF(C,1)/10)*10),COLORGREEN,NODRAW;

Z5:=INTPART(FRACPART(REF(C,1)/1)*10),COLORCYAN,NODRAW;

Z6:=INTPART(ROUND(FRACPART(REF(C,1)*10)*10)),COLORCYAN,NODRAW;

J1:=INTPART(FRACPART(REF(C,0)/10000)*10),COLORWHITE,NODRAW;

J2:=INTPART(FRACPART(REF(C,0)/1000)*10),COLORYELLOW,NODRAW;

J3:=INTPART(FRACPART(REF(C,0)/100)*10),COLORRED,NODRAW;

J4:=INTPART(FRACPART(REF(C,0)/10)*10),COLORGREEN,NODRAW;

J5:=INTPART(FRACPART(REF(C,0)/1)*10),COLORCYAN,NODRAW;

J6:=INTPART(ROUND(FRACPART(REF(C,0)*10)*10)),COLORCYAN,NODRAW;

上卦:IF(INTPART(FRACPART((Z1+Z2+Z3+Z4+Z5+Z6)/8)*8)=0,8,INTPART(FRACPART((Z1+Z2+Z3+Z4+Z5+Z6)/8)*8)),COLORFFFFFF,NODRAW;

下卦:IF(INTPART(FRACPART((J1+J2+J3+J4+J5+J6)/8)*8)=0,8,INTPART(FRACPART((J1+J2+J3+J4+J5+J6)/8)*8)),COLORLICYAN,NODRAW;

爻辞:IF(INTPART(FRACPART(((Z1+Z2+Z3+Z4+Z5+Z6)+(J1+J2+J3+J4+J5+J6))/6)*6)=0,6,INTPART(FRACPART(((Z1+Z2+Z3+Z4+Z5+Z6)+(J1+J2+J3+J4+J5+J6))/6)*6)),COLORFF00FF,NODRAW;

DRAWTEXT((上卦=1 AND 下卦=2 AND 爻辞=3) OR (上卦=1 AND 下卦=3 AND 爻辞=2) OR (上卦=1 AND 下卦=5 AND 爻辞=1) OR (上卦=2 AND 下卦=1 AND 爻辞=6) OR (上卦=3 AND 下卦=1 AND 爻辞=5) OR (上卦=5 AND 下卦=1 AND 爻辞=4),0.99*L,'↑乾卦'),COLORYELLOW;

DRAWTEXT((上卦=4 AND 下卦=1 AND 爻辞=4) OR (上卦=6 AND 下卦=1 AND 爻辞=5) OR (上卦=7 AND 下卦=1 AND 爻辞=6) OR (上卦=8 AND 下卦=2 AND 爻辞=3) OR (上卦=8 AND 下卦=3 AND 爻辞=2) OR (上卦=8 AND 下卦=5 AND 爻辞=1),0.99*L,'↑泰卦'),COLORMAGENTA;

DRAWTEXT((上卦=1 AND 下卦=5 AND 爻辞=5) OR (上卦=3 AND 下卦=1 AND 爻辞=1) OR (上卦=3 AND 下卦=6 AND 爻辞=3) OR (上卦=3 AND 下卦=7 AND 爻辞=2) OR (上卦=4 AND 下卦=5 AND 爻辞=6) OR (上卦=7 AND 下卦=5 AND 爻辞=4),0.99*L,'↑鼎卦'),COLORRED;

DRAWTEXT((上卦=4 AND 下卦=5 AND 爻辞=4) OR (上卦=6 AND 下卦=5 AND 爻辞=5) OR (上卦=7 AND 下卦=5 AND 爻辞=6) OR (上卦=8 AND 下卦=7 AND 爻辞=2) OR (上卦=8 AND 下卦=6 AND 爻辞=3) OR (上卦=8 AND 下卦=1 AND 爻辞=1),0.99*L,'↑升卦'),COLORRED;

DRAWTEXT((上卦=2 AND 下卦=8 AND 爻辞=5) OR (上卦=3 AND 下卦=8 AND 爻辞=6) OR (上卦=4 AND 下卦=7 AND 爻辞=3) OR (上卦=4 AND 下卦=6 AND 爻辞=2) OR (上卦=4 AND 下卦=4 AND 爻辞=1) OR (上卦=8 AND 下卦=8 AND 爻辞=4),0.99*L,'↑豫卦'),COLORMAGENTA;

DRAWTEXT((上卦=1 AND 下卦=3 AND 爻辞=1) OR (上卦=1 AND 下卦=5 AND 爻辞=2) OR (上卦=1 AND 下卦=8 AND 爻辞=3) OR (上卦=5 AND 下卦=7 AND 爻辞=4) OR (上卦=3 AND 下卦=7 AND 爻辞=5) OR (上卦=2 AND 下卦=7 AND 爻辞=6),0.99*L,'↓遁'),COLORWHITE;

DRAWTEXT((上卦=8 AND 下卦=7 AND 爻辞=1) OR (上卦=8 AND 下卦=1 AND 爻辞=2) OR (上卦=8 AND 下卦=4 AND 爻辞=3) OR (上卦=4 AND 下卦=3 AND 爻辞=4) OR (上卦=6 AND 下卦=3 AND 爻辞=5) OR (上卦=7 AND 下卦=3 AND 爻辞=6),0.99*L,'↓明夷'),COLORCYAN;

DRAWTEXT((上卦=2 AND 下卦=5 AND 爻辞=1) OR (上卦=2 AND 下卦=3 AND 爻辞=2) OR (上卦=2 AND 下卦=2 AND 爻辞=3) OR (上卦=6 AND 下卦=1 AND 爻辞=4) OR (上卦=4 AND 下卦=1 AND 爻辞=5) OR (上卦=1 AND 下卦=1 AND 爻辞=6),0.99*L,'↓夬'),COLORWHITE;

DRAWTEXT((上卦=7 AND 下卦=1 AND 爻辞=1) OR (上卦=7 AND 下卦=7 AND 爻辞=2) OR (上卦=7 AND 下卦=6 AND 爻辞=3) OR (上卦=3 AND 下卦=5 AND 爻辞=4) OR (上卦=5 AND 下卦=5 AND 爻辞=5) OR (上卦=8 AND 下卦=5 AND 爻辞=6),0.99*L,'↓蛊'),COLORCYAN;

DRAWTEXT((上卦=5 AND 下卦=4 AND 爻辞=1) OR (上卦=5 AND 下卦=6 AND 爻辞=2) OR (上卦=5 AND 下卦=7 AND 爻辞=3) OR (上卦=1 AND 下卦=8 AND 爻辞=4) OR (上卦=7 AND 下卦=8 AND 爻辞=5) OR (上卦=6 AND 下卦=8 AND 爻辞=6),0.99*L,'↓观'),COLORWHITE;