通达信【箱体捉妖】副图指标源码

{副图指标源码}

DRAWGBK(ISLASTBAR, RGB(60,60,60),RGB(0,0,0),0,'0',0);

A2:=BARSLAST(((EMA(C,5) * 7 + EMA(C,10) * 3) / 10 > MA(H,30) * (1 + 13 / 100)) <> REF((EMA(C,5) * 7 + EMA(C,10) * 3) / 10 > MA(H,30) * (1 + 13 / 100),1));

A3:=SUM(IF(C >= REF(C,1),(C - REF(C,1)) / REF(C,1) * 100,0),A2 + 1);

A4:=(H + L + O + C) / 4;

A5:=EMA(A4,13) - EMA(A4,34);

A6:=EMA(A5,5);

A7:=(A5 - A6) * 5;

A8:=IF(A7 >= 1000,1000,IF(A7 <= A4,A4,A7));

A9:=FORCAST(FORCAST(A8,32),10);

A10:=(C - EMA(C,13)) / EMA(C,13) * (0 - 100);

A11:=EMA(A10 / 10 + EMA(C,13),8);

A12:=EMA(C,3);

A13:=EMA(SLOPE(C,22) * 20 + C,45);

A14:=IF(PERIOD > 8 AND PERIOD < 11,MA(A13,1),IF(PERIOD = 8,MA(A13,4),IF(PERIOD = 7,MA(A13,8),IF(PERIOD = 6,MA(A13,16),IF(PERIOD = 5,MA(A13,32),0)))));

A15:=A14 * 0.865;

A16:=IF(A12 > A14,A12,A15);

A17:=REVERSE(A16) + 2 * A9;

总涨幅:IF((EMA(C,5) * 7 + EMA(C,10) * 3) / 10 > MA(H,30) * (1 + 13 / 100) AND REF(A17,1) < (EMA(C,5) * 7 + EMA(C,10) * 3) / 10 AND DYNAINFO(17) > 0,A3,0) ,LINETHICK2,COLORMAGENTA  ;

VAK1:=(总涨幅 > 0 AND A17 < (EMA(C,5) * 7 + EMA(C,10) * 3) / 10) * 总涨幅 ,COLORRED;

STICKLINE(VAK1,VAK1,0,2,0),COLORRED ;{红色}

VAK2:=(总涨幅 > 0 AND 总涨幅 > REF(总涨幅,1) AND A17 < (EMA(C,5) * 7 + EMA(C,10) * 3) / 10) * 总涨幅 / 2 ,COLORFF0000;

STICKLINE(VAK2,VAK2,0,3,0),COLORYELLOW ;{黄色}

VAK3:=(总涨幅 > 0 AND 总涨幅 = REF(总涨幅,1) AND A17 < (EMA(C,5) * 7 + EMA(C,10) * 3) / 10) * 总涨幅 / 3 ,COLORGREEN;

STICKLINE(VAK3,VAK3,0,3,0),COLORGREEN ;{绿色}

VAK4:=CROSS((EMA(C,5) * 7 + EMA(C,10) * 3) / 10,MA(H,30) * (1 + 13 / 100)) * 总涨幅 / 1.5 ,COLORYELLOW;

STICKLINE(VAK4,VAK4,0,3,0),COLORBLUE ;{蓝色}

起稳:IF((EMA(C,5) * 7 + EMA(C,10) * 3) / 10 > A17 AND A17 < (EMA(C,5) * 7 + EMA(C,10) * 3) / 10 AND DYNAINFO(7) > 0 AND (EMA(C,5) * 7 + EMA(C,10) * 3) / 10 < MA(H,30) * (1 + 13 / 100),A3,0) / 150 ,NODRAW,COLORWHITE;

VAK5:=(起稳 > 0) * REVERSE(起稳) ,COLORGRAY;

STICKLINE(VAK5,VAK5,0,3,0),COLORRED ;{红色吸筹}

VAK6:=(起稳 > 0 AND EMA(C,2) > MA(H,30) * (1 + 13 / 100) * 1.0382) * REVERSE(起稳) / 1.5 ,COLORFF0099;

STICKLINE(VAK6,VAK6,0,3,0),COLORWHITE ;{白色}

VAK7:=(起稳 > 0 AND EMA(C,2) > MA(H,30) * (1 + 13 / 100) * 1.0382) * 起稳 / 1.5 ,COLORFF0099;

STICKLINE(VAK7,VAK7,0,6,0),COLOR990033;

STICKLINE(VAK7,VAK7,0,2,0),COLORCC0055;

STICKLINE(VAK7,VAK7,0,1,0),COLOREE0077;

STICKLINE(VAK7,VAK7,0,0.2,0),COLORFF0099;

DRAWTEXT(起稳 > 0 AND CROSS(EMA(C,2),MA(H,30) * (1 + 13 / 100) * 1.0382) ,起稳 * 1.09,'准备→'),COLORWHITE;

DRAWTEXT(FILTER(CROSS((EMA(C,5) * 7 + EMA(C,10) * 3) / 10,MA(H,30) * (1 + 13 / 100)),5) ,总涨幅 * 1.09,'捉妖'),COLORYELLOW;

{DRAWFLAGTEXT((EMA(C,5) * 7 + EMA(C,10) * 3) / 10 > A17 AND A17 < (EMA(C,5) * 7 + EMA(C,10) * 3) / 10 AND (EMA(C,5) * 7 + EMA(C,10) * 3) / 10 < MA(H,30) * (1 + 13 / 100),起稳,' ←涨幅'+NUMTOSTRN(起稳,2)+'【此股处在起稳状态将震荡上行】'),COLORYELLOW;

DRAWFLAGTEXT((EMA(C,5) * 7 + EMA(C,10) * 3) / 10 > MA(H,30) * (1 + 13 / 100) AND A17 < (EMA(C,5) * 7 + EMA(C,10) * 3) / 10,总涨幅,' ←涨幅'+NUMTOSTRN(总涨幅,2)+'【此股已成妖股逢低积极做多请参考分钟周期多空线指标买卖】'),COLORWHITE;

DRAWFLAGTEXT((EMA(C,5) * 7 + EMA(C,10) * 3) / 10 < A17 AND (EMA(C,5) * 7 + EMA(C,10) * 3) / 10 < MA(H,30) * (1 + 13 / 100),起稳,' ←'+'【此股处在下跌趋势持币观望】'),COLORGREEN;

DRAWGBKLAST(C > 0,STRIP(RGB(0,0,0),RGB(100,100,100),1));};

VAK8:=(总涨幅 > 0 AND CROSS(A17,(EMA(C,5) * 7 + EMA(C,10) * 3) / 10)) * 总涨幅 ,COLORGREEN;

STICKLINE(VAK8,VAK8,0,3,0),COLORCYAN ;{青色};