通达信力度波动指标公式源码副图[万物公式]

NOTEXT顶部标线:120,COLORBROWN;

NOTEXT底部标线:-80,COLORBROWN;

{力度平衡信号}

力度平衡点:40,COLORBROWN,LINETHICK2;

LDA1:=FORCAST(FORCAST(SMA(MAX(CLOSE-REF(CLOSE,1),0),9,1)/SMA(Abs(CLOSE-REF(CLOSE,1)),9,1)*100,3),18);

LDA2:=LDA1>REF(LDA1,1) AND LDA1>40;

LDA3:=LDA1<=REF(LDA1,1) AND LDA1>40;

LDA4:=LDA1>REF(LDA1,1) AND LDA1<=40;

LDA5:=LDA1<=REF(LDA1,1) AND LDA1<=40;

STICKLINE(LDA2,40,LDA1,3,0),COLORFF00FF;

STICKLINE(LDA3,40,LDA1,3,0),COLORBROWN;

STICKLINE(LDA4,40,LDA1,3,0),COLORRED;

STICKLINE(LDA5,40,LDA1,3,0),COLORWHITE;

趋势平衡线:MA(SMA(MAX(CLOSE-REF(CLOSE,1),0),9,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),9,1)*100,26),COLORBLUE,LINETHICK2;

{力度强弱信号}

力度强弱:=(((CLOSE - MA(CLOSE,30)) / MA(CLOSE,30)) * 100);

STICKLINE(力度强弱>=20,8,10,3,0),COLORFF00FF;

STICKLINE(力度强弱>=0 AND 力度强弱<20 AND 力度强弱>6,8,10,3,0),COLORYELLOW;

{力度波动信号}

BD1:=(3*CLOSE+LOW+OPEN+HIGH)/6;

BD2:=(20*BD1+19*REF(BD1,1)+18*REF(BD1,2)+17*REF(BD1,3)+16*REF(BD1,4)+15*REF(BD1,5)+

14*REF(BD1,6)+13*REF(BD1,7)+12*REF(BD1,8)+11*REF(BD1,9)+10*REF(BD1,10)+9*REF(BD1,11)+

8*REF(BD1,12)+7*REF(BD1,13)+6*REF(BD1,14)+5*REF(BD1,15)+4*REF(BD1,16)+3*REF(BD1,17)+

2*REF(BD1,18)+REF(BD1,20))/210;

BD3:=MA(BD2,6);

BD4:=V*100/CAPITAL;

BD5:=MA(BD4,5);

BD6:=MA(BD4,55);

BD7:=(BD5-BD6);

BD8:=(C-BD2);

BD9:=BD7+BD8;

BD10:=EMA(V,5);

BD11:=EMA(V,50);

obv:=SUM(IF(CLOSE>REF(CLOSE,1),vol,IF(CLOSE

BD12:=EMA(OBV,5);

BD13:=EMA(OBV,50);

BD14:=(BD10-BD11)*0.00001;

BD15:=(BD12-BD13)*0.000001;

BD16:=BD14+BD15;

MID:=(3*CLOSE+LOW+OPEN+HIGH)/6;

DKX:=(20*MID+19*REF(MID,1)+18*REF(MID,2)+17*REF(MID,3)+

16*REF(MID,4)+15*REF(MID,5)+14*REF(MID,6)+

13*REF(MID,7)+12*REF(MID,8)+11*REF(MID,9)+

10*REF(MID,10)+9*REF(MID,11)+8*REF(MID,12)+

7*REF(MID,13)+6*REF(MID,14)+5*REF(MID,15)+

4*REF(MID,16)+3*REF(MID,17)+2*REF(MID,18)+REF(MID,20))/210;

BD17:=MA(DKX,6);

BD18:=(DKX-BD17)*1.2;

BD19:=(C*2+H+L)/4*10;

BD20:=EMA(BD19,6)-EMA(BD19,55);

BD21:=EMA(BD20,6);

BD22:=(BD20-BD21)*0.06;

BD23:=BD18+BD22;

BD24:=MA(C,5)>REF(MA(C,5),1);

BD25:=EMA(C,12)>REF(EMA(C,12),1);

BD26:=MA(C,20)>REF(MA(C,20),1);

BD27:=MA(C,30)>REF(MA(C,30),1);

BD28:=MA(C,60)>REF(MA(C,60),1);

BD29:=MA(C,120)>REF(MA(C,120),1);

BD30:=MA(C,250)>REF(MA(C,250),1);

BD31:=BD25 + BD26 + BD27 + BD28;

BD32:=C>BD2 AND BD9>0 AND BD16>0 AND BD23>0;

BD33:=C<=BD2 OR BD9<=0 OR BD16<=0 OR BD23<=0;

力度波动A:=BD31=4 AND BD32;

力度波动B:=BD31=3 AND BD32;

力度波动C:=BD31<3 OR BD33;

STICKLINE(力度波动A,-2,0,3,0),COLORFF00FF;

STICKLINE(力度波动B,-2,0,3,0),COLORYELLOW;

BD34:=C>MA(C,3) AND BD24 AND BD25 AND BD26 AND BD27 AND BD28;

一帆风顺:BD34 AND (COUNT(BD34,5)=2) AND REF(NOT(BD34),1),COLORGREEN,NODRAW;

DRAWTEXT(一帆风顺,38,↖★),COLORGREEN;

STICKLINE(一帆风顺,40,LDA1,2.06,0),COLORGREEN;

BD35:=C>MA(C,5) AND BD24 AND BD25 AND BD26 AND BD27 AND BD28 AND BD29;

BD36:=COUNT(BD35,5)=2 OR COUNT(BD35,5)=3 OR COUNT(BD35,5)=4 OR COUNT(BD35,9)=2;

二龙戏珠:BD35 AND BD36 AND REF(BD35=0,1) AND BD32,COLORYELLOW,NODRAW;

DRAWTEXT(二龙戏珠,35,↖★★),COLORYELLOW;

STICKLINE(二龙戏珠,40,LDA1,1.36,0),COLORYELLOW;

三阳开泰:BD32 AND (REF(BD32=0,1) OR REF(BD32=1,1)) AND BD35 AND REF(BD35=0,1),COLORRED,NODRAW;

DRAWTEXT(三阳开泰,32,↖★★★),COLORRED;

STICKLINE(三阳开泰,40,LDA1,0.56,0),COLORRED;

{力度临界信号}

破界线1:=EMA(C,21)*4;

封印1:=EMA(HY_INDEXC,144)/MA(C,144);

临界线:=EMA(HY_INDEXC/封印1,21)*4;

STICKLINE(破界线1>临界线,-12,-10,3,0),COLORYELLOW;

破除临界点:=crOSS(破界线1,临界线) AND 破界线1>REF(破界线1,1);

DRAWTEXT(破除临界点,-15,↖越过临界);

{力度结界信号}

破界线2:=EMA(C,21)*4;

封印2:=EMA(INDEXC,144)/MA(C,144);

结界线:=EMA(INDEXC/封印2,21)*4;

STICKLINE(破界线2>结界线,-22,-20,3,0),,COLORYELLOW;

破除结界点:=CROSS(破界线2,结界线) AND 破界线2>REF(破界线2,1);

DRAWTEXT(破除结界点,-25,↖冲破结界);

{信号名称标注}

DRAWTEXT(ISLASTBAR,40, 平衡)COLORGREEN;

DRAWTEXT(ISLASTBAR,10, 强弱)COLOR0000FF;

DRAWTEXT(ISLASTBAR,0, 波动)COLORFF00FF;

DRAWTEXT(ISLASTBAR,-10, 临界)COLOR4080FF;

DRAWTEXT(ISLASTBAR,-20, 结界)COLOR00FFFF;