通达信黑马启动主图+大单异动副图指标 在黑马启动前发出预警 源码
通达信黑马启动主图+大单异动副图指标 在黑马启动前发出预警 源码
所属板块:=STRCAT('【所属板块】：',STRCAT(STRCAT(' [行业]-',HYBLOCK),STRCAT(' [概念]-',GNBLOCK)));
风格板块:=STRCAT('【风格板块】：',STRCAT(STRCAT(' [地域]-',DYBLOCK),STRCAT(' [风格]-',FGBLOCK)));
总股本:=STRCAT(STRCAT(' 总股本:',CON2STR(TOTALCAPITAL/1000000,2)),'亿');
流通盘:=STRCAT(STRCAT(' 流通盘:',CON2STR(CAPITAL/1000000,2)),'亿');
全流通:=STRCAT(STRCAT(' 流通比:',CON2STR(CAPITAL/TOTALCAPITAL*100,2)),'％');
市值:=STRCAT(STRCAT(' 流通市值:',CON2STR((CAPITAL/1000000)*C,2)),'亿');
股本市值:=STRCAT('【股本市值】：',STRCAT(STRCAT(STRCAT(总股本,流通盘),全流通),市值));
市盈率:=STRCAT(' 市盈率:',CON2STR(C/FINANCE(33),2));
净资收益率:=STRCAT(' 净资收益率:',CON2STR(FINANCE(33)/FINANCE(34)*100,2));
主营利润率:=STRCAT(' 主营利润率:',CON2STR(FINANCE(23)/FINANCE(20)*100,2));
当前业绩:=STRCAT('【当前业绩】：',STRCAT(STRCAT(市盈率,净资收益率),主营利润率));
DRAWTEXT_FIX(ISLASTBAR,0.005,0.02,0,所属板块),COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR ,0.005,0.07,0,风格板块),COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR,0.005,0.12,0,股本市值),COLORMAGENTA;
DRAWTEXT_FIX(ISLASTBAR,0.005,0.17,0,当前业绩),COLORMAGENTA;
M1:=5;
M2:=10;
M3:=20;
M4:=30;
M5:=60;
N:=80;
N1:=14;
M:=3;
DRAWKLINE(H,O,L,C);
GSKZB:=V/REF(V,1)>=2.0;
K1B:=SUMBARS(GSKZB,1) ;
K2B:=SUMBARS(GSKZB,2);
K3B:=SUMBARS(GSKZB,3);
K4B:=SUMBARS(GSKZB,4);
K5B:=SUMBARS(GSKZB,5);
K6B:=SUMBARS(GSKZB,6);
K7B:=SUMBARS(GSKZB,7);
K8B:=SUMBARS(GSKZB,8);
K9B:=SUMBARS(GSKZB,9);
K10B:=SUMBARS(GSKZB,10);
AABB:STICKLINE(K1B,REFV(L,K1B-1)*1.002,REFV(L,K1B-1),2,0),COLORYELLOW;
T60B:=V=HHV(V,60);
T100B:=V=HHV(V,100);
T2B:=V/REF(VOL,1)>=3;
T3B:=REF(C,1)/REF( O,1)< 3;
MA5:=MA(CLOSE,M1),LINETHICK1,COLORYELLOW;
MA10:=MA(CLOSE,M2),LINETHICK1,COLORWHITE;
MA20:=MA(CLOSE,M3),LINETHICK1,COLORYELLOW;
操盘线:MA(CLOSE,M4),POINTDOT,COLORRED;
MA60:=MA(CLOSE,M5),POINTDOT,LINETHICK1,COLORGREEN;
TR1:=SMA(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(LOW-REF(CLOSE,1))),N1,1);
HD:=HIGH-REF(HIGH,1);
LD:=REF(LOW,1)-LOW;
DMP:=SMA(IF(HD>0 AND HD>LD,HD,0),N1,1);
DMM:=SMA(IF(LD>0 AND LD>HD,LD,0),N1,1);
PDI:=DMP*100/TR1,COLORRED;
MDI:=DMM*100/TR1,COLORGREEN;
ADX:=SMA(ABS(MDI-PDI)/(MDI+PDI)*100,N1,1),COLORYELLOW;
阶段线1:=16;
阶段线2:=30;
DMI1:=PDI>MDI AND ADX>=30;
DMI2:=PDI< MDI AND ADX>=30;
DMI3:=PDI>MDI AND 16< ADX< 30;
DMI4:=PDI< MDI AND 16< ADX< 30;
DMI5:=ADX<=16 AND (PDI>MDI OR PDI< MDI);
DMI6:=ADX>60;
ZT:=C/REF(C,1)>1.097;
XH:=FILTER(ZT,13);
BH:=BARSLAST(ZT);
CZ:=REF(H,BH)-REF(L,BH);
STICKLINE(ZT,O,C,3,0),COLORRED;
DRAWTEXT(ZT,L*0.98,' '),COLORF00FF0;
CTAZT:=BARSLAST(C/REF(C,1)>1.097);
TZX:=IF((C-REF(C,1))*100/REF(C,1)>=(10-0.01*100/REF(O,1)),1,0);
STICKLINE(TZX,O,C,3,0),COLORRED;
ZDF:=(C-REF(C,1))/REF(C,1)*100;
STICKLINE(ZDF< -9.9,O,C,3,0),COLORGREEN;
CTA111:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));
买:=IF(CLOSE>OPEN,CTA111*(HIGH-LOW),IF(CLOSE< OPEN,CTA111*((HIGH-OPEN)+(CLOSE-LOW)),VOL/2)),COLORRED;
卖:=IF(CLOSE>OPEN,0-CTA111*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE< OPEN,0-CTA111*(HIGH-LOW),0-VOL/2)),COLOR00FF00 ;
MM差:=(买+卖);
买卖比:=ABS(买/卖);
水平面:=MA(CLOSE,89),COLORFF00FF;
BBI:=(MA(CLOSE,M1)+MA(CLOSE,M2)+MA(CLOSE,M3)+MA(CLOSE,M4))/4;
MA1:=MA(CLOSE,24),COLOR00E300,LINETHICK1;
V2:=IF(CURRBARSCOUNT=1,VOL*240/FROMOPEN/REF(VOL,1)-1,VOL/REF(VOL,1)-1);
MA13:=MA(CLOSE,13);
X1:=(C+L+H)/3;
BB13:=ATAN(EMA(X1,13)-REF(EMA(X1,13),1))*3.1416*10;
EMA8:=EMA(C,8);
A1:=MIN(O,C);
B1:=ABS(O-C);
T1:=FILTER(BB13>1 AND EMA(X1,13)>REF(EMA(X1,8),1),10);
LC:=REF(CLOSE,1);
RSI:=((SMA(MAX((CLOSE - LC),0),3,1) / SMA(ABS((CLOSE - LC)),3,1)) * 100);
FF:=EMA(CLOSE,3);
MA15:=EMA(CLOSE,21);
T2:=COUNT(CROSS(BBI,3),3)=1 AND CROSS(C,BBI);
T12:=V2>=1;
T0:=BARSLAST(T12);
L1:=REF(L,T0);
H1:=REF(H,T0);
L11:=MIN(REF(L,1),L);
L10:=MIN(L11,REF(L,2));
L21:=MAX(REF(L,1),L);
L20:=MAX(L21,REF(L,2));
T111:=(REF(V2>=1,3) OR REF(V2>=1,2) OR REF(V2>=1,1)) AND((L10>L1 AND L20>H1) OR (L11>L1 AND L21>H1));
T11:=T111 AND REF(T111,1)=0;
V1:=ABS((2*CLOSE+HIGH+LOW)/4-MA(CLOSE,20))/MA(CLOSE,20);
V2X:=(1-7/100)*(DMA(CLOSE,V1));
V3:=(1+7/100)*(DMA(CLOSE,V1));
V5:=MA((LOW+HIGH+CLOSE)/3,5);
A1XX:=CROSS(MA(C,1),MA(C,3));
XG:=A1XX;
CTA1:=EMA(EMA(CLOSE,13),13);
控局:=(CTA1-REF(CTA1,1))/REF(CTA1,1)*1000;
A10:=CROSS(控局,0);
无庄控局:=IF(控局< 0,控局,0),COLORGRAY,NODRAW;
短线:=(CLOSE-MA(CLOSE,13))/MA(CLOSE,13)*20,LINETHICK0,COLORWHITE;
中线:=(CLOSE-MA(CLOSE,4))/MA(CLOSE,4)*20,LINETHICK0,COLORYELLOW;
红柱:=SMA(短线,3,1),LINETHICK0,COLORFF00FF;
绿柱:=SMA(中线,3,1),COLORSTICK,COLOR00FF00;
开始控局:=IF(A10,5,0),LINETHICK1,COLORWHITE;
有庄控局:=IF(控局>REF(控局,1) AND 控局>0,控局,0),COLORRED,NODRAW;
CTA2:=100*WINNER(CLOSE*0.95);
高度控局:=IF(CTA2>50 AND COST(85)< CLOSE AND 控局>0,控局,0),COLORFF00FF,NODRAW;
主力出货:=IF(控局< REF(控局,1) AND 控局>0,控局,0),COLOR00FF00,NODRAW;
VV1:=(C*2+H+L)/4*10;
VV2:=EMA(VV1,13)-EMA(VV1,34);
VV3:=EMA(VV2,5);
V4:=2*(VV2-VV3)*5.5;
主力撤:=IF(V4<=0,V4,0),COLORGREEN;
主力进:=IF(V4>=0,V4,0);
VV5:=(HHV(INDEXH,8)-INDEXC)/(HHV(INDEXH,8)-LLV(INDEXL,8))*8;
V6:=EMA(3*VV5-2*SMA(VV5,18,1),5);
V7:=(INDEXC-LLV(INDEXL,8))/(HHV(INDEXH,8)-LLV(INDEXL,8))*10;
V8:=(INDEXC*2+INDEXH+INDEXL)/4;
V9:=EMA(V8,13)-EMA(V8,34);
VA:=EMA(V9,3);
VB:=(V9-VA)/2;
大盘资金进场:=IF(VB>=0,VB,0),COLORYELLOW;
大盘资金撤走:=IF(VB<=0,VB,0),COLORRED;
V11:=3*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1)-2*SMA(SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1),3,1);
趋势线:=EMA(V11,3);
V12:=(趋势线-REF(趋势线,1))/REF(趋势线,1)*100;
准备现金:=STICKLINE(趋势线<=13,0,20,5,0),COLORCC9900;
AA:=(趋势线<=13) AND FILTER((趋势线<=13),15);
买入GP:=STICKLINE(趋势线<=13 AND V12>13,0,50,5,0),COLOR0099FF;
MTM:=C-REF(C,1);
DX:=100*EMA(EMA(MTM,6),6)/EMA(EMA(ABS(MTM),6),6);
YXF:=IF(LLV(DX,2)=LLV(DX,7) AND COUNT(DX< 0,2) AND CROSS(DX,MA(DX,2)),1,0);
加仓:=IF(FILTER(YXF=1,5),1,0),STICK,COLORFFFFFF,LINETHICK3;
A51:=3*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1)-2*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1);
FY:=EMA(A51,5);
A54:=((C-LLV(L,21))/(HHV(H,21)-LLV(L,21)))*100;
QS:=(MA(3*SMA(A54,6,1)-2*SMA(SMA(A54,5,1),5,1),2));
控局B:=FILTER(IF(A10,1,0),5);
JJ:=DYNAINFO(11);
P:=55;
S:=8;
财:=(EMA(CLOSE,S)-EMA(CLOSE,P))*10,COLORRED,LINETHICK2;
神:=EMA(财,M1),COLORGREEN,LINETHICK1;
BTJ1:=(C-JJ)/JJ< -0.005;
BTJ11:=(C-JJ)/JJ< -0.03;
BTJ12:=LAST(JJ>=REF(JJ,1),5,1) AND (C-JJ)/JJ< 0.005;
STJ1:=(C-JJ)/JJ>0.005;
STJ01:=控局< REF(控局,1) AND 控局>0.5;
STJ02:=控局>0;
BTJ2:=控局>REF(控局,1) AND 控局< -0.2;
BTJ22:=控局>REF(控局,1) AND 控局< 0 ;
BTJ3:=CROSS(财,神) AND 财< -0.3;
BTJ32:=CROSS(财,神) AND 财< -0.1;
STJ31:=CROSS(神,财);
STJ32:=CROSS(神,财) AND 财>1.618;
CTA1A:=EMA(EMA(CLOSE,9),9);
专用:=(CTA1A-REF(CTA1A,1))/REF(CTA1A,1)*1000;
CTA2A:=100*WINNER(CLOSE*0.95);
高手专用:=CTA2A>50 AND COST(85)< CLOSE AND 专用>0;
CV:=CLOSE;
BBIBOLL:=(MA(CV,3)+MA(CV,6)+MA(CV,12)+MA(CV,24))/4;
UPR:=BBIBOLL+6*STD(BBIBOLL,11);
DWN:=BBIBOLL-6*STD(BBIBOLL,11);
QJJ:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));
XVL:=(IF(CLOSE>OPEN,QJJ*(HIGH-LOW),IF(CLOSE< OPEN,QJJ*(HIGH-OPEN+CLOSE-LOW),VOL/2))+IF(CLOSE>OPEN,0-QJJ*(HIGH-CLOSE+OPEN-LOW),IF(CLOSE< OPEN,0-QJJ*(HIGH-LOW),0-VOL/2)));
HSL:=(XVL/20)/1.15;
强势股:=((HSL*0.55+(REF(HSL,1)*0.33))+(REF(HSL,2)*0.22))>1500;
绝杀前十:=高手专用 AND 高度控局,COLORFF00FF;
CTAC:=SMA(MAX(C-REF(C,1),0),6,1)/SMA(ABS(C-REF(C,1)),6,1)*100;
DRAWICON(CROSS(82,CTAC),H*1.02,2);
CTA34:=(INDEXC-REF(INDEXC, 1))/REF(INDEXC, 1);
CTA35:=(CLOSE-REF(CLOSE, 1))/REF(CLOSE, 1);
CTA36:=IF(CTA34>0.010, 0.900, 1) AND IF(CTA34>(-0.025), 1, 1.200);
CTA37:=CTA36*(CTA35-CTA34)*100;
CTA38:=SUM(CTA37, 10);
CTA310:=CTA38>20;
CTA326:=IF(CLOSE AND MA(VOL, 5)/240 AND CLOSE>REF(CLOSE, 1)*1.0 AND CLOSE,1,0);
CTA327:=IF(CLOSE/REF(CLOSE, 1)>1.050 AND VOL/CAPITAL*100< 10 AND CLOSE< 17 AND HIGH/CLOSE< 1.010 AND CTA326>0, 1, 0);
DRAWICON(CTA327=1,L*0.95,1);
HZ:=EMA(CLOSE,13);
短波:=EMA(HZ,1);
中波:=EMA(HZ,26);
均线148天:=EMA(C,148);
成本:=SUM(AMOUNT,0)/SUM(VOL,0)/100;
HZ2:=EMA(HZ,8);
拉升一号:=CROSS(短波,HZ2);
DRAWICON(拉升一号,L*0.99,11);
DRAWTEXT (拉升一号,L*0.97,'↖黑马启动'),COLORYELLOW;
MID:=(3*CLOSE+LOW+OPEN+HIGH)/6;
红线股起:(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,COLORRED,LINETHICK2;
绿线股出:MA(红线股起,6),COLORGREEN,LINETHICK2;
TZX紫色:STICKLINE((C-REF(C,1))/REF(C,1)>0.095,C,O,3.05,0),COLORMAGENTA;
