碧海揚帆公式指標源碼 通達信+飛狐[其他軟件公式]

相關標簽: 碧海揚帆蝦米 、 昆明揚帆職業技術學院 、 揚帆的風流仕途 、 揚帆 、 揚帆起航 、 山東揚帆工程 、 揚帆學校 、 揚帆起航圖片 、 揚帆教育 、

碧海揚帆公式指標源碼

DRAWGBK((DATE > 0),COLORRGB(0,33,0),COLORRGB(0,33,0),1);
D_C:=INDEXC; D_H:=MA(INDEXH,3); D_L:=MA(INDEXL,3);
D_F:=if(INDEXC>ref(D_H,1),1,if(INDEXC<ref(D_L,1),-1,0));
for i=5+1 to datacount do begin
if D_C[i]>D_H[i-1] then
D_F[i]:=1
else if D_C[i]<D_L[i-1] then
D_F[i]:=-1
else
D_F[i]:=D_F[i-1];
end;
K1:=IF(D_F>0,-3,IF(D_F<0,1,0));
K2:=VALUEWHEN(K1<>0,K1);
G:=IF(K2<0,-30,0);
FILLRGN(K2<0,G,0),COLORBLUE;
FILLRGN(K2<0,-G,0),Color00B0A3;
{仿天狼劍2}{程序化交易 www.tumamayizhan.com }
強:=FORCAST(IF((C-L=O-L),O,C),4);
弱:=(ref(c,1)+ref(c,2)+O)/3;
B_h1:=(O+C*3+L+H)/6;
B_h2:=REVERSE(B_h1)+2*WMA(B_h1,5);
B_h3:=3*B_h2-2*SMA(B_h2,2,1);
B_h4:=BARSLAST((強>弱)=1);
B_h5:=0-BARSLAST((強>弱)=0);
B_h6:=IF(B_h4>0,B_h4,B_h5);
B_h7:=(-1)*B_h6*10;
B_h8:=CROSS(強,弱)&&C>B_h3;
B_h9:=CROSS(弱,強)&&C<B_h3;
DRAWICON(CROSS(強,弱),B_h7,10),PXUP1;//進
STICKLINE(B_h8=0 and B_h7>0,0,B_h7,5,0),ColorFFA8FF,COLORMAGENTA;//持:
DRAWICON(B_h9,0,12),PXDN1;//減
STICKLINE(B_h9=0 and B_h7<=0,0,B_h7,5,0),Color009800;//空:
大盤強勢區:IF(G,168,0),LINETHICK,Color00D9C5;

趨勢:=4*SMA((C-LLV(L,5))/(HHV(H,5)-LLV(L,5))*10,5,1)-3*SMA(SMA((C-LLV(L,5))/(HHV(H,5)-LLV(L,5))*10,5,1),3.2,1);
N_2:=SMA(MAX(C-ref(C,4),0),2,1)/SMA(ABS(C-ref(C,4)),2,1)*100<10;//處女線
低位:=趨勢<1.5 or N_2;
PARTLINE(1,0),COLORWHITE;
PARTLINE(低位,0),SHIFT1,LINETHICK2,COLORGREEN;

平滑:=sMA(趨勢,3,1);
有戲:if((平滑-ref(平滑,1))>=0,888,0),LINETHICK,COLORRED;
無戲:if((平滑-ref(平滑,1))<=0,666,0),LINETHICK,colorFFFF00;
 

（通達信版）
D_C:=INDEXC; D_H:=MA(INDEXH,3); D_L:=MA(INDEXL,3);
D_F:=IF(INDEXC>ref(D_H,1),1,IF(INDEXC<ref(D_L,1),-1,0));
K1:=IF(D_F>0,-3,IF(D_F<0,1,0));
KK:=IF(K1!=0,K1,DRAWNULL);
K2:=IF(K1!=0,K1,KK);
G:=IF(K2<0,-30,0);
STICKLINE(K2<0,G,0,5,0),COLOR666600;
STICKLINE(K2<0,-G,0,5,0),COLORRED;
{仿天狼劍2}
強:=FORCAST(IF((C-L=O-L),O,C),4);
弱:=(ref(C,1)+ref(C,2)+O)/3;
B_H1:=(O+C*3+L+H)/6;
WMA:=(5*B_H1+4*ref(B_H1,1)+3*ref(B_H1,2)+2*ref(B_H1,3)+1*ref(B_H1,4))/(5+4+3+2+1);
B_H2:=REVERSE(B_H1)+2*WMA;
B_H3:=3*B_H2-2*SMA(B_H2,2,1);
B_H4:=BARSLAST((強>弱)=1);
B_H5:=0-BARSLAST((強>弱)=0);
B_H6:=IF(B_H4>0,B_H4,B_H5);
B_H7:=(-1)*B_H6*10;
B_H8:=CROSS(強,弱)&&C>B_H3;
B_H9:=CROSS(弱,強)&&C<B_H3;
DRAWICON(CROSS(強,弱),B_H7,1);{進}
STICKLINE(B_H8=0 AND B_H7>0,0,B_H7,5,0),COLORFFA8FF,COLORMAGENTA;{持} {本文來至CXH99.COM}
DRAWICON(B_H9,0,2);{減}
STICKLINE(B_H9=0 AND B_H7<=0,0,B_H7,5,0),COLOR009800;{空}
大盤強勢區:IF(G,68,0),LINETHICK,COLOR00D9C5;

趨勢:=4*SMA((C-LLV(L,5))/(HHV(H,5)-LLV(L,5))*10,5,1)-3*SMA(SMA((C-LLV(L,5))/(HHV(H,5)-LLV(L,5))*10,5,1),3.2,1);
N_2:=SMA(MAX(C-ref(C,4),0),2,1)/SMA(ABS(C-ref(C,4)),2,1)*100<10;{處女線}
低位:=趨勢<1.5 OR N_2;
IF(低位,0,DRAWNULL),LINETHICK5,COLORGREEN;

平滑:=SMA(趨勢,3,1);
有戲:IF((平滑-ref(平滑,1))>=0,88,0),LINETHICK,COLORRED;
無戲:IF((平滑-ref(平滑,1))<=0,66,0),LINETHICK,COLORFFFF00;