%> 界文波浪_
界文波浪 2406

界文波浪(大智慧L2版本)

INPUT:N1(21,5,50),N2(34,10,100),N3(8,2,30),N4(5,2,20);

CJ:=(2*CLOSE+HIGH+OPEN+LOW)/5;

DIFF:=EMA(CJ,N1)-EMA(CJ,N2);

DEA:=EMA(DIFF,N3);

MACD:30*(DIFF-DEA),LINETHICK0;

MARD:SMA(MACD,N4,1),LINETHICK0;

G1:=IF(DYNAINFO(8)>0.01,0.01*DYNAINFO(10)/DYNAINFO(8),DYNAINFO(3));

G2:=(DYNAINFO(5)<0.01 OR DYNAINFO(6)<0.01);

G3:=IF(G2,1,(G1<(DYNAINFO(5)+0.01) AND G1>(DYNAINFO(6)-0.01)));

CB:=SMA(IF(G3,DMA(AMOUNT/(100*VOL),100*VOL/FINANCE2(37)),EMA((HIGH+LOW+2*CLOSE)/4,117)),3,1);

J1:=SMA(EMA(CB,2),3,1);J2:=EMA(J1,2);

J3:=EMA(J2,2);J4:=EMA(J3,2);

J5:=EMA(J4,2);J6:=EMA(J5,2);

FILLRGN(macd,mard,macd>mard,rgb(255,0,0),macd<mard,rgb(0,255,0));

STICKLINE(J1>J6,LLV(MARD,117),HHV(MARD,117),8,0),COLOR6F116F,LAYER7;

STICKLINE(J1<J6,LLV(MARD,117),HHV(MARD,117),8,0),COLOR3E3E3E,LAYER7;




W1:=BARSLAST(REF(CROSS(MACD,MARD),1));

底背离:IF(REF(CLOSE,W1+1)>CLOSE AND MACD>REF(MACD,W1+1) AND CROSS(MACD,MARD) AND MACD<0,-1,0),COLORred;

DRAWTEXT(REF(CLOSE,W1+1)>CLOSE AND MACD>REF(MACD,W1+1) AND CROSS(MACD,MARD) AND MACD<0,-1,'底背离'),ALIGN2;

W2:=BARSLAST(REF(CROSS(MARD,MACD),1));

顶背离:REF(CLOSE,W2+1)<CLOSE AND REF(MACD,W2+1)>MACD AND CROSS(MARD,MACD) AND MACD>0,COLORYELLOW;

DRAWTEXT(REF(CLOSE,W2+1)<CLOSE AND REF(MACD,W2+1)>MACD AND CROSS(MARD,MACD) AND MACD>0,1,'顶背离'),ALIGN2;

W3:=(CLOSE-MA(CLOSE,6))/MA(CLOSE,6)*10;

W4:=(CLOSE-MA(CLOSE,12))/MA(CLOSE,12)*10;

W5:=(CLOSE-MA(CLOSE,24))/MA(CLOSE,24)*10;

WH:=(W3+2*W4+3*W5)/6;

随波:WH,LINETHICK2;

零线:0,COLOR999999;

地线:LLV(MARD,117);

天线:HHV(MARD,117);



 

{股票教程网-承接通达信软件和公式破解,普通加密破解,完全加密破解,导入密码破解,时间限制破解,公式编写,可按您的要求写公式指标,价格按难度不同报价,有需要可以找我们}