通达信发现牛股主图指标公式

安装后如下图，友情提示（指标只是辅助，不作建议） 所有程序均为免费分享。

不会安装点击 安装指南 步骤操作

M3:MA(CLOSE,3);M13:MA(CLOSE,13);M34:MA(CLOSE,34),COLORRED,LINETHICK2;
X:=BARSLAST(REF(CROSS(C,MA(C,120)),1)) AND CROSS(MA(C,20),MA(C,120));
IF(M34<REF(M34,1),M34,DRAWNULL),COLORGREEN,LINETHICK2;
STICKLINE(M3>=M13 AND M34>=REF(M34,1) ,H ,L ,0.1 ,0 ),COLOR0000DD;
STICKLINE(M3>=M13 AND M34>=REF(M34,1) AND C>=O ,O ,C ,3 ,1 ),COLOR0000DD;
STICKLINE(M3>=M13 AND M34>=REF(M34,1) AND C<O ,O ,C ,3 ,0 ),COLOR0000DD;
STICKLINE(M3<M13 AND M34>=REF(M34,1) ,H ,L ,0.1 ,0 ),COLORFFBB00;
STICKLINE(M3<M13 AND M34>=REF(M34,1) AND C>=O ,O ,C ,3 ,1 ),COLORFFBB00;
STICKLINE(M3<M13 AND M34>=REF(M34,1) AND C<O ,O ,C ,3 ,0 ),COLORFFBB00;
STICKLINE(M3<M13 AND M34<REF(M34,1) ,H ,L ,0.1 ,0 ),COLORFF0000;
STICKLINE(M3<M13 AND M34<REF(M34,1) AND C>=O ,O ,C ,3 ,1 ),COLORFF0000;
STICKLINE(M3<M13 AND M34<REF(M34,1) AND C<O ,O ,C ,3 ,0 ),COLORFF0000;
STICKLINE(M3>=M13 AND M34<REF(M34,1) ,H ,L ,0.1 ,0 ),COLORFF00FF;
STICKLINE(M3>=M13 AND M34<REF(M34,1) AND C>=O ,O ,C ,3 ,1 ),COLORFF00FF;
DRAWTEXT(X,MA(C,120)-0.13,'发现牛股'),LINETHICK3,COLORWHITE;
MVAR35:=100-3*SMA((CLOSE-LLV(LOW,66))/(HHV(HIGH,66)-LLV(LOW,66))*100,20,1)+2*SMA(SMA((CLOSE-LLV(LOW,66))/(HHV(HIGH,66)-LLV(LOW,66))*100,20,1),15,1);
MVAR36:=100-3*SMA((OPEN-LLV(LOW,66))/(HHV(HIGH,66)-LLV(LOW,66))*100,20,1)+2*SMA(SMA((OPEN-LLV(LOW,66))/(HHV(HIGH,66)-LLV(LOW,66))*100,20,1),15,1);
MVAR37:=MVAR35<REF(MVAR36,1) AND VOL>REF(VOL,1) AND CLOSE>REF(CLOSE,1);
大资金:=(MVAR37 AND COUNT(MVAR37,30)=1),COLORRED;
DRAWTEXT((大资金=1),L,'大资金'),COLORYELLOW;
{基本面}
总股本:=STRCAT(STRCAT('总股本: ',CON2STR(TOTALCAPITAL/1000000,2)),'亿');
流通盘:=STRCAT(STRCAT(' 流通盘: ',CON2STR(CAPITAL/1000000,2)),'亿');
市值:=STRCAT(STRCAT(' 流通市值: ',CON2STR((CAPITAL/1000000)*C,2)),'亿');
每股公积金:=STRCAT(' 每股公积金:',CON2STR(FINANCE(18),2));
每股未分利润:=STRCAT(' 每股未分利润:',CON2STR(FINANCE(32),2));
每股净资产:=STRCAT(' 每股净资产:',CON2STR(FINANCE(34),2));
显示内容:=STRCAT(STRCAT(STRCAT(STRCAT(STRCAT(总股本,流通盘),市值),每股公积金),每股未分利润),每股净资产);
DRAWTEXT_FIX(ISLASTBAR,0,0.028.0,0,显示内容),COLOR00C0C0;
AAA:=(3*C+H+L+O)/6;
VAR1AA:=(8*AAA+7*REF(AAA,1)+6*REF(AAA,2)+5*REF(AAA,3)
+4*REF(AAA,4)+3*REF(AAA,5)+2*REF(AAA,6)+REF(AAA,8))/36;
波段线:VAR1AA,COLORRED,LINETHICK1;
{程序化指标官方网址 WWW.HONGHAIE.COM}
SHORT:=12;LONG:=26;MID:=9;
DIF:=EMA(CLOSE,SHORT)-EMA(CLOSE,LONG);
DEA:=EMA(DIF,MID);
空头:STICKLINE((REF(MACD,1)>MACD ) AND (C<波段线 OR (C>波段线 AND 波段线<REF(波段线,1))),C,O,3,0),COLOR808000;
STICKLINE((REF(MACD,1)> MACD AND C<波段线),H,L,0,0),COLOR808000;
头:STICKLINE(C<波段线,C,O,3,0),COLOR808000;
STICKLINE(( C<波段线),H,L,0,0),COLOR808000;
STICKLINE(空头,C,O,2.8,0),COLOR555500;
STICKLINE(空头,C,O,2,0),COLOR888800;
STICKLINE(空头,C,O,1.5,0),COLORAAAA00;
STICKLINE(空头,C,O,1,0),COLORCCCC00;
STICKLINE(空头,C,O,0.5,0),COLOREEEE00;
STICKLINE(头,C,O,2.8,0),COLOR555500;
STICKLINE(头,C,O,2,0),COLOR888800;
STICKLINE(头,C,O,1.5,0),COLORAAAA00;
STICKLINE(头,C,O,1,0),COLORCCCC00;
STICKLINE(头,C,O,0.5,0),COLOREEEE00;
AAK:=CLOSE/REF(C,1)>=1.097 AND C=H  AND C>EMA(C,68);
STICKLINE(AAK,C,O,1.5,0),COLORYELLOW;
STICKLINE(AAK,O,C,0.2,0),COLOR0000FF;
超短:=100*(C-LLV(L,3))/(HHV(C,3)-LLV(L,3));
短期:=100*(C-LLV(L,5))/(HHV(C,5)-LLV(L,5));
中期:=100*(C-LLV(L,10))/(HHV(C,10)-LLV(L,10));
中长:=100*(C-LLV(L,20))/(HHV(C,20)-LLV(L,20));
长期:=100*(C-LLV(L,30))/(HHV(C,30)-LLV(L,30));
T2X:=MA(C,20)>REF(MA(C,20),1);
T3X:= V>MA(V,5) AND V>MA(V,63);
T4:=MACD.DIF>REF(MACD.DIF,1) AND MACD.DIF>MACD.DEA;
T5:= KDJ.K>REF(KDJ.K,1) AND KDJ.K>50;
T6:=短期>=99 AND 中期>=99 AND 中长>=99 AND 长期>=99;
T7:=H>=REF(C,1)*1.099 AND C>REF(C,1);
TTS:=T2X AND T3X AND T4 AND T5 AND T6,NODRAW;
涨停1:=C>=REF(C,1)*1.0990 AND C=H AND C>EMA(C,24);
STICKLINE(涨停1 AND TTS,O,C,2,0),COLOR0000FF;
STICKLINE(涨停1 AND TTS,O,O+(C-O)*2/3,2,0),COLORYELLOW;
STICKLINE(涨停1 AND TTS,O,O+(C-O)*1/2.5,2,0),COLORFF80FF;
IF(波段线<REF(波段线,1),波段线,DRAWNULL),COLORGREEN,LINETHICK1;
攻击线:MA(C,3),COLORGRAY,LINETHICK1,DOTLINE;
IF(攻击线>REF(攻击线,1),攻击线,DRAWNULL),COLORWHITE,LINETHICK1,DOTLINE;
IF(攻击线<REF(攻击线,1),攻击线,DRAWNULL),COLORGRAY,LINETHICK1,DOTLINE;
低点转折:=DRAWICON(CROSS(ZIG(3,6),REF(ZIG(3,6),1)),L*0.98,9) ;
DRAWTEXT((低点转折=1),L*0.99,'↖红粉可进 '),COLOR1665F8;
高点转折:=DRAWICON(CROSS(REF(ZIG(3,4),1),ZIG(3,4)),H*1.015,15);
DRAWTEXT((高点转折=1),H*1.01,'↙走人'),COLOR77EE3E;