通达信黑马出现主图指标 能抓涨停板板的源码

X_1:=MA(CLOSE,5);
X_2:=MA(CLOSE,2);
X_3:=MACD.MACD>(-1) AND CLOSE<30 AND REF(EVERY(CLOSE/REF(CLOSE,1)<0.999,3),1) AND CLOSE>REF(CLOSE,1) AND MACD.DIF>(-0.13) AND (CLOSE-REF(CLOSE,1))/REF(CLOSE,1)*100>0.5;
变色:STICKLINE(X_3,OPEN,CLOSE,3,0),COLORYELLOW;
STICKLINE(X_3,REF(LOW,0),REF(LOW,0),30,0),COLORYELLOW,LINETHICK3;
DRAWICON(FILTER(X_3,3),LOW*1,38);
DRAWICON(FILTER(X_3,3),LOW*0.99,1);
DRAWICON(FILTER(X_3,3),LOW*0.98,23);

DF:=(C-REF(C,1))/REF(C,1)*100<-5 OR O/C>1.05;
AA1:=BARSLAST(DF);
砸盘线:DRAWLINE(DF,O,REF(DF,1),REF(O,1),1),DOTLINE,COLORFFFF00 ;
突破箱体:=CROSS(C,REF(C,AA1));

ZT1:=C>=ZTPRICE(REF(CLOSE#DAY,1),0.1);
DT:=C<=DTPRICE(REF(CLOSE#DAY,1),0.1);
BA:STICKLINE(ZT1,(H+L)/2,CLOSE,0,0),COLORYELLOW;
BC:STICKLINE(DT,(H+L)/2,CLOSE,0,0),COLORBLUE;
DA:=YEAR AND MONTH AND DAY;

BUY1:=ZIG(3,10);
SELL1:=MA(BUY1,2);
DRAWICON(CROSS(BUY1,SELL1),L-0.1,7);
DRAWICON(CROSS(SELL1,BUY1),H+0.1,8);
STICKLINE(CROSS(BUY1,SELL1),CLOSE,OPEN,3.0,1),COLORYELLOW;

多空线:(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4, COLORBLUE,LINETHICK2;

JJ:=(3*C+H+L+O)/6;
VAR21:=(8*JJ+7*REF(JJ,1)+6*REF(JJ,2)+5*REF(JJ,3)+4*REF(JJ,4)+3*REF(JJ,5)+2*REF(JJ,6)+REF(JJ,8))/36;
TJ21:=VOL=HHV(V,10) AND V>2*REF(V,1) AND C>VAR21 AND C>REF(C,1);
LJL:=FILTER(TJ21,5);
PP:STICKLINE(C,REF(C,BARSLAST(LJL)),REF(C,BARSLAST(LJL)),6,0);
{VAR8:=CROSS(ZIG(3,8),REF(ZIG(3,8),1));}
DRAWTEXT(CROSS(ZIG(3,8),REF(ZIG(3,8),1)),LOW*0.978,'↖黑马出现'),LINETHICK2,COLORYELLOW;

所属板块:=STRCAT('所属板块: ',STRCAT(STRCAT(STRCAT('[行业]-',HYBLOCK),STRCAT(' [地域]-',DYBLOCK)),STRCAT(' [概念]-',GNBLOCK)));
总股本:=STRCAT(STRCAT('总股本: ',CON2STR(TOTALCAPITAL/1000000,2)),'亿');
流通盘:=STRCAT(STRCAT(' 流通盘: ',CON2STR(CAPITAL/1000000,2)),'亿');
全流通:=STRCAT(' 全流通: ',CON2STR((CAPITAL/1000000)/(TOTALCAPITAL/1000000),2));
市值:=STRCAT(STRCAT(' 流通市值: ',CON2STR((CAPITAL/1000000)*C,2)),'亿');
股本市值:=STRCAT('股本市值: ',STRCAT(STRCAT(STRCAT(总股本,流通盘),全流通),市值));
{业绩}
净资收益率:=STRCAT(' 净资收益率: ',CON2STR(FINANCE(29)/FINANCE(19)*100,2));
毛利率:=STRCAT(' 毛利率: ',CON2STR((FINANCE(20)-FINANCE(21))/FINANCE(20)*100,2));
主营利润率:=STRCAT(' 主营利润率 ',CON2STR(FINANCE(23)/FINANCE(20)*100,2));
当前业绩:=STRCAT('当前业绩: ',STRCAT(STRCAT(净资收益率,毛利率),主营利润率));
{主图显示}GSZX:SMA(MAX(CLOSE-C,0),7,1)/SMA(ABS(CLOSE-C),7,1)*100,NODRAW;
DRAWTEXT_FIX(ISLASTBAR,0.005,0.06,0,所属板块),COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR,0.005,0.12,0,股本市值),COLORGREEN;
DRAWTEXT_FIX(ISLASTBAR,0.005,0.18,0,当前业绩),COLORGREEN;