强庄起爆捉牛股妖股副图指标 源码 通达信 贴图

ZLCM:=EMA(WINNER(CLOSE)*70,3);
 SHCM:=EMA((WINNER(CLOSE*1.1)-WINNER(CLOSE*0.9))*80,3);
 ZSHTL:=SHCM/(ZLCM+SHCM)*100;
 ZZLKP:=ZLCM/(ZLCM+SHCM)*100;
 STICKLINE(ZZLKP>75,-ZZLKP/5-10,-10,2,0),COLORFFFFFF;
 MTR:=EXPMEMA(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(REF(CLOSE,1)-LOW)),14);
 HD :=HIGH-REF(HIGH,1);
 LD :=REF(LOW,1)-LOW;
 DMP:=EXPMEMA(IF(HD>0&&HD>LD,HD,0),14);
 DMM:=EXPMEMA(IF(LD>0&&LD>HD,LD,0),14);
多头线:=DMP*100/MTR,COLORRED,LINETHICK2;
空头线:=DMM*100/MTR,COLORGREEN,LINETHICK2;
趋势线:=EXPMEMA(ABS(空头线-多头线)/(空头线+多头线)*100,6),COLORYELLOW,LINETHICK2;
强弱分界:30,COLORWHITE,DOTLINE,LINETHICK1;
 VAR3AA:=IF((CLOSE>REF(CLOSE,1)),88,0);
 VAR4AA:=IF(((CLOSE)/(REF(CLOSE,1))>1.03) AND((HIGH)/(CLOSE)<1.03) AND ((多头线-空头线)>10) AND 多头线>25 AND (趋势线>REF(趋势线,1)) AND (VAR3AA>0),91,0);
 XG:=(FILTER((VAR4AA>90),21)),COLORYELLOW;
 STICKLINE(XG,-1,-20,4,0),COLOR000099;
 STICKLINE(XG,-1,-20,2,0),COLOR0000BB;
 STICKLINE(XG,-1,-20,1,0),COLOR0000DD;
 STICKLINE(XG,-1,-20,0.9,0),COLOR0000FF;
 AHC1:=CLOSE*VOL;
 AHC22:=EMA((EXPMA(AHC1,23)/EXPMA(VOL,23)+EXPMA(AHC1,54)/EXPMA(VOL,54)+EXPMA(AHC1,108)/EXPMA(VOL,108)+EXPMA(AHC1,316)/EXPMA(VOL,316))/4,34);
通道:=1.0668*AHC22;
起爆:=CROSS(C,通道) AND REF(C,1)*1.05-C<0.008 AND C>O*0.5;
 RRF:=起爆;
A1:=ABS(((3.48*CLOSE+HIGH+LOW)/4-EMA(CLOSE,23))/EMA(CLOSE,23));
 A2:=DMA(((2.15*CLOSE+LOW+HIGH)/4),A1);
金线王:=EMA(A2,200)*1.118;
金线王2:=EMA(A2,200)*1.118;
条件:=(C-REF(C,1))/REF(C,1)*100>8;
金K线:=CROSS(C,金线王) AND 条件;
STICKLINE(IF(RRF,-120,0),+12,0,5,0),COLOR000088;
 STICKLINE(IF(RRF,-120,0),+12,0,5,0),COLOR0000AA;
 STICKLINE(IF(RRF,-120,0),+12,0,5,0),COLOR0000CC;
 STICKLINE(IF(RRF,-120,0),+12,0,5,0),COLOR0000EE;
 STICKLINE(IF(RRF,-120,0),+12,0,5,0),COLOR0000EE;
 STICKLINE(IF(RRF,-120,0),+12,0,5,0),COLORLIMAGENTA;
 STICKLINE(IF(RRF,-120,0),+9,0,5,0),COLOR770077;
 STICKLINE(IF(RRF,-120,0),+9,0,5,0),COLOR990099;
 STICKLINE(IF(RRF,-120,0),+9,0,5,0),COLORBB00BB;
 STICKLINE(IF(RRF,-120,0),+9,0,5,0),COLORDD00DD;
 STICKLINE(IF(RRF,-120,0),+9,0,5,0),COLORFF00FF;
 STICKLINE(IF(RRF,-120,0),+9,0,5,0),COLORDD00DD;
 STICKLINE(IF(RRF,-120,0),+6,0,5,0),COLOR003300;
 STICKLINE(IF(RRF,-120,0),+6,0,5,0),COLOR005500;
 STICKLINE(IF(RRF,-120,0),+6,0,5,0),COLOR007700;
 STICKLINE(IF(RRF,-120,0),+6,0,5,0),COLOR009900;
 STICKLINE(IF(RRF,-120,0),+6,0,5,0),COLOR00CC00;
 STICKLINE(RRF,0,3,5,0),COLOR008888;
 STICKLINE(RRF,0,3,5,0),COLOR00AAAA;
 STICKLINE(RRF,0,3,5,0),COLOR00CCCC;
 STICKLINE(RRF,0,3,5,0),COLOR00FFFF;
 STICKLINE(IF(金K线,-120,0),+12,0,4,0),COLOR000088;
 STICKLINE(IF(金K线,-120,0),+12,0,4,0),COLOR0000AA;
 STICKLINE(IF(金K线,-120,0),+12,0,4,0),COLOR0000CC;
 STICKLINE(IF(金K线,-120,0),+12,0,4,0),COLOR0000EE;
 STICKLINE(IF(金K线,-120,0),+12,0,4,0),COLOR0000EE;
 STICKLINE(IF(金K线,-120,0),+12,0,4,0),COLORLIMAGENTA;
 STICKLINE(IF(金K线,-120,0),+9,0,4,0),COLOR770077;
 STICKLINE(IF(金K线,-120,0),+9,0,4,0),COLOR990099;
 STICKLINE(IF(金K线,-120,0),+9,0,4,0),COLORBB00BB;
 STICKLINE(IF(金K线,-120,0),+9,0,4,0),COLORDD00DD;
 STICKLINE(IF(金K线,-120,0),+9,0,4,0),COLORFF00FF;
 STICKLINE(IF(金K线,-120,0),+9,0,4,0),COLORDD00DD;
 STICKLINE(IF(金K线,-120,0),+6,0,4,0),COLOR003300;
 STICKLINE(IF(金K线,-120,0),+6,0,4,0),COLOR005500;
 STICKLINE(IF(金K线,-120,0),+6,0,4,0),COLOR007700;
 STICKLINE(IF(金K线,-120,0),+6,0,4,0),COLOR009900;
 STICKLINE(IF(金K线,-120,0),+6,0,4,0),COLOR00CC00;
 STICKLINE(IF(金K线,-120,0),+3,0,4,0),COLOR666666;
 STICKLINE(IF(金K线,-120,0),+3,0,4,0),COLOR777777;
 STICKLINE(IF(金K线,-120,0),+3,0,4,0),COLOR888888;
 STICKLINE(IF(金K线,-120,0),+3,0,4,0),COLOR999999;
 STICKLINE(IF(金K线,-120,0),+3,0,4,0),COLORDDDDDD;
 STICKLINE(IF(金K线,-120,0),+3,0,4,0),COLORFFFFFF;
 DRAWTEXT(RRF,10.5,'黑马一号'),COLORYELLOW;
 {DRAWTEXT(RRF,8.5,'黑'),COLORYELLOW;}
 DRAWTEXT(金K线,6,'黑马启动'),COLORYELLOW;
 DIFF:=(EMA(CLOSE,12) - EMA(CLOSE,26)),DOTLINE;
 DEAX:=EMA(DIFF,9),POINTDOT;
 MACD2:=(2 * (DIFF - DEAX))*40;
 STICKLINE((MACD2>=0),30,30+MACD2,2.8,-1),COLOR0000FF;
 STICKLINE(((MACD2>=0) AND (MACD2 < REF(MACD2,1))),30,30+MACD2,2,0),COLOR0090FF;
 STICKLINE((MACD2<0),30,30+MACD2,2,0)COLORCYAN;
 STICKLINE(((MACD2<0) AND (MACD2 > REF(MACD2,1))),30,30+MACD2,2.8,-1),COLORCYAN;
 VARU1:=ZIG(3,10)REF(ZIG(3,10),2);
 VARU2:=ZIG(3,10)>REF(ZIG(3,10),1) AND REF(ZIG(3,10),1)  STICKLINE(VARU1,76,85,2,0),COLORFF00FF,LINETHICK2;{高位红色}
STICKLINE(VARU1,76,85,2,0),COLORFF00FF,LINETHICK2;{高位红色}
STICKLINE(VARU1,76,85,1,0),COLORFF00FF,LINETHICK2;{高位红色}
STICKLINE(VARU2,76,85,2,0),COLORWHITE,LINETHICK2;{底位白色}
STICKLINE(VARU2,76,85,2,0),COLORWHITE,LINETHICK2;{底位白色};
FFD:=EMA((C - REF(C,1)) / REF(C,3),10) * 100;
 KJHU:=EMA(EMA(EMA(EMA(FFD,2),2),2),3);
 STICKLINE(KJHU >= REF(KJHU,1) AND KJHU>2,-36,-30,3,0),COLORFF00FF;
 STICKLINE(KJHU < REF(KJHU,1) AND KJHU > EMA(KJHU,4) AND KJHU>2,-36,-30,2,0),COLOR00BBFF;
 STICKLINE(KJHU < REF(KJHU,1) AND KJHU < EMA(KJHU,4) AND KJHU>2,-