|
以下是通达信抓牛股源码贴图（无源码的请下载附件导入）
通达信公式 抓牛股
DIF:=(EMA(CLOSE,12) - EMA(CLOSE,26)),COLORRED;
DEA:=EMA(DIF,9),COLOR00FFFF;
MACD:2*(DIF-DEA), COLORSTICK;
DIK:4*DIF-3*DEA,COLOR0080FF;
DED:=EMA(DIK,5),COLOR2588FF;
IF(C>DED,DED,DRAWNULL),COLOR0000F0,LINETHICK2;
IF(DED<=REF(DED,1),DED,DRAWNULL),COLOR00E600,LINETHICK2;
VAR3:=HHV(HIGH,60);
VAR4:=LLV(LOW,30);
VAR5:=(CLOSE-MA(CLOSE,32))/MA(CLOSE,32)*100;
VAR6:=(VAR3+VAR4+VAR5)/3;
VAR7:=EMA(VAR6,5);
K:=EMA(VAR7,5)*2, COLORFF00FF;
D:=EMA(K,5), COLORWHITE;
J:=K*3-D*2, COLORYELLOW;
ENTERLONG:=CROSS(K,D);
EXITLONG:=CROSS(D,K);
B:=(IF(TROUGHBARS(3,15,1)=1 AND HIGH>LOW+0.01,20,-1))/50,COLORYELLOW ,LINETHICK1;
{B1:=(DRAWICON((ZIG(3,5)>REF(ZIG(3,5),1)) AND (REF(ZIG(3,5),1)<=REF(ZIG(3,5),2))
AND (REF(ZIG(3,5),2)<=REF(ZIG(3,5),3)),L*0.98,1))*D*2/3;}
Q:=(IF(PEAKBARS(3,15,1)=1,80,0))/200,COLORGREEN,LINETHICK1;
{Q1:=(DRAWICON((ZIG(3,5)<REF(ZIG(3,5),1)) AND (REF(ZIG(3,5),1)>=REF(ZIG(3,5),2))
AND (REF(ZIG(3,5),2)>=REF(ZIG(3,5),3)),H*1.01,2))*D*2/3;}
VAB0:=531;
VAB1:=1510000;
VAB2:=VAB0 + VAB1;
VAB3:=IF(DATE > VAB2,0,1);
LC:=REF(CLOSE,1);
SG:=EMA(HHV(HIGH,1),8);
X1:=EMA(CLOSE,8);
X30:=((X1 < REF(X1,1)) AND (CLOSE < X1));
X31:=IF(((SG < REF(SG,1)) OR X30),1,0);
操作线:=SMA(MAX(CLOSE-LC,0),2,1)/SMA(ABS(CLOSE-LC),2,1)*100,COLORRED,LINETHICK2;
震仓线:=45,COLORMAGENTA;
抄底线:=20,COLORGREEN;
PP:=操作线<震仓线 AND REF(操作线,1)>震仓线 ;
PP3:=操作线<抄底线 AND REF(操作线,1)>抄底线*VAB3;
抓牛:((((((COUNT((X31 = 1),4) = 3) AND (X31 = 0))AND O<C AND (((C-REF(C,1))/REF(C,1))>0.085))*89) >=89)OR((C-REF(C,1))/REF(C,1)>0.085 AND (REF(PP3,1) OR REF(PP,1))) AND VAB3=1)/2,STICK,COLORLIRED,LINETHICK4;
DRAWTEXT(抓牛,抓牛*-1.11,'B'),COLORLIRED;
超B:=L2_AMO(0,2)/10000.0;
大B:=L2_AMO(1,2)/10000.0;
中B:=L2_AMO(2,2)/10000.0;
小B:=L2_AMO(3,2)/10000.0;
超S:=-L2_AMO(0,3)/10000.0;
大S:=-L2_AMO(1,3)/10000.0;
中S:=-L2_AMO(2,3)/10000.0;
小S:=-L2_AMO(3,3)/10000.0;
资金净流入万:(超B+大B+中B+小B)+(超S+大S+中S+小S),NODRAW,COLORWHITE;
买进:B,STICK,LINETHICK2,COLORYELLOW;
卖出:Q,STICK,LINETHICK2,COLORGREEN;
涨家数:INDEXADV,COLOR0080FF,NODRAW;
跌家数:INDEXDEC,COLORGREEN,NODRAW;
TJ1:=(C+0.01-REF(C,1))/REF(C,1)*100;
TJ2:=(C-0.01-REF(C,1))/REF(C,1)*100;
TJ3:=(C-REF(C,1))/REF(C,1)*100;
Q1:=IF(TJ1>10.05,1,0);
Q2:=IF(TJ2<9.95 AND TJ3>=9.95,1,0);
涨停板:IF(Q1 OR Q2,0.5,0),COLORFF00FF;
TT:=240/FROMOPEN;
比:=TT;
促进指数ＭＦＬ:=(HIGH-LOW)*1000000/(VOL*比),COLORRED;
AY2:=EMA(CLOSE,12)-EMA(CLOSE,26);
AZ2:=EMA(AY2,9);
LT2:=(AY2-AZ2);
L211:=IF(LT2,LLV(L,21),DRAWNULL),COLOR217158,CIRCLEDOT;
ZGD:=HHV(H,80)*0.99;
ZGD2:=CONST(ZGD);
ZDD:=LLV(L211,80);
ZDD2:=CONST(ZDD);
YYA4:=MA(CLOSE,20);
YYA5:=(CLOSE > MA(CLOSE,5));
YYA6:=(MA(CLOSE,5) > MA(CLOSE,10));
YYA7:=(CLOSE > MA(CLOSE,10));
YYA8:=(MA(CLOSE,5) > MA(CLOSE,20));
YYA9:=(CLOSE > MA(CLOSE,20));
YYA10:=REF(YYA4,1);
YYA11:=(YYA4 > YYA10);
YYAVX:=(((((IF(YYA5,10,(0 - 10)) + IF(YYA6,10,(0 - 10))) + IF(YYA7,10,(0 - 10))) + IF(YYA8,10,(0 - 10))) + IF(YYA9,10,(0 - 10))) + IF(YYA11,10,(0 - 10)));
DSLX:=(CLOSE / INDEXC);
DSLX1:=MA(DSLX,5);
DSLX2:=MA(DSLX,10);
YYV1:=MA(VOL,5);
YYV2:=MA(VOL,10);
J1:=CONST(IF( YYAVX > 0,200,100));
J2:=CONST(IF( YYAVX > 0,00,100));
J3:=CONST(IF( YYAVX > 0,100,100));
ZGD3:=ZGD2;
ZDD3:=ZDD2;
ZGD4:=ZGD2;
733599971.png
|
