当前位置: 网站首页 > 股票软件公式 > 通达信公式 > 文章 当前位置: 通达信公式 > 文章

通达信源码:十战七胜+活法波段+封龙2号池

点击: 次    来源:顶尖财经    作者:股市狙击 - 小 + 大

主图指标:名字叫十战七胜

使用方法:出现黄色K线提示,不能马上买进,要参考附图指标,不然成功率就会降低,
这个指标叫做十战七胜,我们追求的是十战十胜。所以要过滤一些错误的提示,有选择
的参与,不能一看见提示就买入。【最下面会有验证篇】

 
MAA5:=MA(C,5);
MAA5_T:= ( (C+ C + REF(C,1) + REF(C,2) + REF(C,3) ) / 5 );
MAA10:=MA(C,10);
MAA20:=MA(C,20);
MAA30:=MA(C,30);
KS:=IF(MAA10>MAA30,MAA10,MAA30),COLORBLUE;
A3:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100;
A4:=SMA(A3,3,1);
A5:=SMA(A4,3,1);
A6:=3*A4-2*A5;
A7:=C-REF(C,1);
A8:=100*EMA(EMA(A7,6),6)/EMA(EMA(ABS(A7),6),6);
A9:=( (C-REF(C,1)) / REF(C,1) ) > 0.02;  {涨幅要大于2%}
买:=LLV(A8,2)=LLV(A8,7) AND COUNT(A8<0,2) AND CROSS(A8,MA(A8,2)) AND A9;
DRAWTEXT(FILTER(买=1,5),LOW*0.96,'买'), COLORMAGENTA;
STICKLINE(买,OPEN,CLOSE,2,0),COLORMAGENTA;
{显示1 到 10的数字}
ZT:=BARSLAST(C/REF(C,1)-1>=0.1-0.01/REF(C,1) AND C=H);
AQ:=EVERY(C>=REF(L,ZT),ZT);
BQ:=IF(REF(AQ,ZT+1) AND REF(ZT,ZT+1)<13,REF(ZT,ZT+1)+ZT+1,ZT);
 
DRAWTEXT(ZT<=10 AND AQ,              REF(L,ZT)*0.96, VAR2STR(ZT,0)),COLOR008000;
DRAWTEXT(ZT>=6 AND ZT<=8 AND AQ,     REF(L,ZT)*0.96, VAR2STR(ZT,0)),COLORRED;
DRAWTEXT(BQ>0 AND BQ<=10 AND BQ!=AQ, REF(L,BQ)*0.96, VAR2STR(BQ,0)),COLOR008000;
DRAWTEXT(BQ>=6 AND BQ<=8 AND BQ!=AQ, REF(L,BQ)*0.96, VAR2STR(BQ,0)),COLORRED;
 
{如果涨幅大于5%,显示黄色}
涨幅5 := ( (C /REF(C,1)) > 1.05 ) AND ( (C /REF(C,1)) < 1.09 ) ;
STICKLINE(涨幅5, CLOSE, OPEN, 1, 0),  COLOR8000FF;
 
 
{如果涨停显示黄芯,如果跌停显示绿芯}
涨停 := (C /REF(C,1)) > 1.095;
STICKLINE(涨停, HIGH, OPEN, 0.9, 0), COLORYELLOW;
 
{如果涨幅大于5%,显示黄色}
跌幅5 := ( (C / REF(C,1)) < 0.95 ) ;
STICKLINE(跌幅5, OPEN, CLOSE, 1, 0), COLOR400000;
 
跌停 := C/REF(C,1) < 0.9 ;
STICKLINE(跌停, HIGH, LOW, 1, 0), COLORGREEN;
 
M5:MA(CLOSE,5),  LINETHICK2, COLORRED; {COLORWHITE;}
MAA5_T, NODRAW;
M10:MA(CLOSE,10),  COLORGREEN,  LINETHICK2;  {COLORLIRED}
M20:MA(CLOSE,20), COLORFF00FF; {, LINETHICK2;}
M30:MA(CLOSE,30), COLORGREEN, NODRAW; {,  LINETHICK2;}
 
{显示当日价格线}
DRAWLINE(CURRBARSCOUNT=90, CONST(C), CURRBARSCOUNT=1, C, 3),COLORBLUE,LINETHICK1;
 
DRAWICON(CROSS(M10, C), H, 15);
 
{显示20日线
M20DAYS:=MA(CLOSE,20);
DRAWLINE(CURRBARSCOUNT=TOTALBARSCOUNT,CONST(C),CURRBARSCOUNT=1,M20DAYS,3),COLORFF00FF, DOTLINE,LINETHICK1;
}
 
 
{M60:MA(CLOSE,60); POINTDOT}
{M89:MA(CLOSE,89),LINETHICK2,COLORFF9966;}
{//一二零日:=MA(C,120),LINETHICK1,COLOR000099;
//一四四日:MA(C,144),LINETHICK1,COLORFF3300; //BLUE
}
 
 
上轨:(1+6/100)*MA(CLOSE,25), COLORBLUE,LINETHICK2;
 
 
{M90:MA(CLOSE,90);}
{M120:MA(CLOSE,120);}
{M250:MA(CLOSE,250);};
 
{//顶部显示}
SBL1 := STRCAT('1地区:', DYBLOCK);
SBL2 := ' ';{STRCAT('   2行业:', HYBLOCK);}
SBL3 := STRCAT('   3主题投资:', EXTERNSTR(0,1));
SBL4 := STRCAT(' ', ZDBLOCK);
SBL41 := STRCAT(STRCAT('  4.概念: ',  GNBLOCK), STRCAT('   55.自定义:', ZDBLOCK) );
SBL43 := STRCAT(' 5.风格:', FGBLOCK);
 
 
{SBL4 := STRCAT(STRCAT(SBL1, SBL2), SBL3);}
SBL5 := STRCAT(STRCAT(STRCAT(STRCAT(SBL1, SBL2), SBL4), SBL41), SBL43);
DRAWTEXT_FIX(1, 0.0, 0.0.1, 0, SBL5),COLORFF6000;
 
{底部显示}
SBL:= STRCAT('                                ', STRCAT(STRCAT(STRCAT(HYBLOCK,DYBLOCK),GNBLOCK),ZDBLOCK) );
{DRAWTEXT_FIX(1,0,70,0,SBL),COLORFF6000;}
DRAWTEXT_FIX(ISLASTBAR,0,70,0,SBL3),COLORFF6000;
 
总股本:=STRCAT(STRCAT('总股本: ',CON2STR(TOTALCAPITAL/1000000,2)),'亿');
{流通盘:=STRCAT(STRCAT('  流通盘: ',CON2STR(CAPITAL/1000000,2)),'亿');}
全流通:=STRCAT('  流通比: ',CON2STR((CAPITAL/1000000)/(TOTALCAPITAL/1000000),2));
流通值:=(CAPITAL/1000000)*C;
市值:=STRCAT(STRCAT('  流通: ',CON2STR(流通值,2)),'亿');
股本市值:=STRCAT('市值: ',STRCAT(STRCAT(STRCAT(总股本,全流通),市值),''));
{DRAWTEXT_FIX(ISLASTBAR,0.005,0.115,0,股本市值),COLORBLUE;}
DRAWTEXT_FIX(流通值>100,0,0.12,0,股本市值),COLORGREEN;     {大于100亿显示绿色}
DRAWTEXT_FIX(流通值>=200,0,0.12,0,股本市值),COLORBLUE;      {小于100亿显示蓝色}
DRAWTEXT_FIX(流通值<=100,0,0.12,0,股本市值),COLORRED;      {小于100亿显示红色}
 
 
Q2:=REF(O,2)>REF(C,2);{2日前的开盘价>2日前的收盘价}
Q1:=REF(O,1)>REF(C,1) AND REF(C,1)<REF(C,2); {1日前的开盘价>1日前的收盘价 AND 1日前的收盘价<2日前的收盘价}
YBY:=C>O AND C>REF(H,1); {目前是阳线 AND 当前价>1日前的最高价}
YZ:=YBY AND Q1 AND Q2 AND REF(C,1)<REF(C,2); {连跌2天,今天收阳了}
DRAWICON(YZ AND C<55 AND DYNAINFO(4)>0,L*0.95,1);
XG:DRAWTEXT(YZ AND C<55 AND DYNAINFO(4)>0,L*0.90,'逆转');
 
{强势股要突破上轨线}
{上轨:(1+6/100)*MA(CLOSE,25), COLORBLUE,LINETHICK2;};
 
 
 
{大宗交易, 大宗交易的价格超过收盘价,叫溢价,低于收盘价叫折价}
大宗交易 := SIGNALS_USER(298, 0), NODRAW; 
减持金额 :=  VARCAT(VAR2STR(大宗交易/10000.0 , 2),'亿'); {单位是:亿}
 
{FLOAT FBILIU =  (收盘价 - 成交价) / 收盘价;}
比率     := FRACPART(大宗交易), NODRAW; {得到小数部分,带正负符号的}
 
成交价   := C - C*比率,  NODRAW; 
 
{成交价格小于收盘价,0.1,折价甩卖,显示绿色}
{DRAWTEXT(比率>0, H, 减持金额),  COLOR008000; 
DRAWTEXT(比率>0, 成交价, '减----'),  COLOR008000; }
DRAWTEXT(比率>=0, H*1.015, '减'),  COLOR008000; 
DRAWTEXT(比率>=0, 成交价, 减持金额),  COLOR008000; 
 
 
{//成交价格高于收盘价0.5,溢价,显示红色}
DRAWTEXT(比率<0, 成交价, 减持金额),  COLORRED; 
 
 
{//成交价格高于收盘价0.5,溢价,显示红色}
DRAWTEXT(比率<0, 成交价, 减持金额),  COLORRED; 
 
{除权后显示蝴蝶}
{FINANCE(1)=总股本 FINANCE(7)=流通股本}
除权条件 := ( FINANCE(1)>REF(FINANCE(1),1) ) AND (FINANCE(7)>REF(FINANCE(7), 1)  AND 流通值<=1000);
送股数   := (FINANCE(1)/REF(FINANCE(1), 1)-1)*10;
DRAWICON(除权条件, H, 28);
DRAWTEXT(除权条件, L*0.96, '高转送'),  COLORRED;
DRAWNUMBER(除权条件, L*0.95, 送股数), COLORRED;
 
 
{跳空高开 并且 涨停}
TJ1 := (O > REF(C, 1)) AND  (C>=REF(C,1)*1.095);
TJ2 := VOL > 40000; {去除停牌和低成交量连板的股票;}
DRAWICON(TJ1 AND TJ2, H*1.0618, 25);
DRAWICON(TJ1 AND TJ2, H*1.0718, 25);



活法波段:

    当下跌中开始出现粉色柱子或者短期线变色,可以试探买入;短期线上穿长期线,开始加仓待涨;出现绿色柱子或者短期线变色,开始减仓;短期下穿长期线,清仓出局。

    绿色线为生命线,股价在生命线上,生命旺盛,在生命线下,股价虚弱。
    买时最好生命线开始减缓下跌角度转为平缓时,才算安全,股价上穿生命线,可以持股待涨,股价跌破生命线,要干脆的清仓出局减少损失。
    在下跌中,短期线不变色,任何买入都是危险的。(顶尖财经 股票学院: www.58188.com)
    在上涨中的回调,只要在生命线上方获得支撑,继续上涨,就是加仓的良机。



DIF:=EMA(CLOSE,12)-EMA(CLOSE,26);
DEA:=EMA(DIF,9);
MACD:=(DIF-DEA)*2;
DRAWBAND(MA(CLOSE,60),RGB(200,80,80),MA(CLOSE,120),RGB(0,0,115));
DRAWBAND(MA(CLOSE,N1),RGB(100,100,80),MA(CLOSE,N2),RGB(0,200,215));
MA1:MA(CLOSE,N1),LINETHICK3;
MA2:MA(CLOSE,N2),LINETHICK3;
MA55:MA(CLOSE,55),LINETHICK2,COLORGREEN;
MA24:MA(C,24),LINETHICK2,COLORBLUE;
MA360:MA(C,360),LINETHICK2,COLORYELLOW;
DRAWKLINE(HIGH,OPEN,LOW,CLOSE);
STICKLINE(DIF>REF(DIF,1),MA1,MA2,0.1,1),COLORMAGENTA;
STICKLINE(DIF<REF(DIF,1) OR MACD<REF(MACD,1),MA1,MA2,0.1,1),COLORGREEN;
PMA:MA(C,N1),COLORWHITE,LINETHICK3;
IF(PMA>REF(PMA,1),PMA,DRAWNULL),COLORRED,LINETHICK3;
IF(PMA<REF(PMA,1),PMA,DRAWNULL),COLORGREEN,LINETHICK3;
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K:=SMA(RSV,9,1);
D:=SMA(K,9,1);
J:=3*K-2*D;
STICKLINE(CROSS(DIF,DEA) AND CROSS(K,D) AND CROSS(MA1,MA2),C,C,1,1);
DRAWICON(MA2>REF(MA2,1),MA2,1);
DRAWICON(MA2<REF(MA2,1),MA2,2);




封龙2号池:

{公式名称: 封龙黄金眼

 
参数数量: 4
参数1: N1, 最小: 1, 最大: 500, 缺省: 5
参数2: N2, 最小: 1, 最大: 500, 缺省: 10
参数3: N3, 最小: 1, 最大: 500, 缺省: 30
参数4: M, 最小: 1, 最大: 500, 缺省: 20
}
 
VAR1:=MA(CLOSE,N1);
VAR2:=MA(CLOSE,N2);
VAR3:=MA(CLOSE,N3);
VAR4:=VAR1<VAR2;
VAR5:=VAR1<VAR3;
VAR6:=VAR2<VAR3;
VAR7:=BARSLAST(VAR4);
VAR8:=BARSLAST(VAR5);
VAR9:=BARSLAST(VAR6);
VAR10:=VAR7>VAR8 AND VAR8>VAR9 AND VAR9=1 AND VAR7<=M;
VAR11:=CROSS(VAR3,VAR1);
VAR12:=CROSS(VAR3,VAR1) OR CROSS(VAR3,VAR2);
VAR13:=IF(BARSLAST(VAR10)=(-1),9999,BARSLAST(VAR10));
VAR14:=IF(BARSLAST(VAR11)=(-1),9999,BARSLAST(VAR11));
VAR15:=CROSS(SUM(VAR12,VAR13),0.5) AND VAR13<9999;
VAR16:=BARSLAST(VAR15);
VAR17:=VAR13<VAR14;
VAR18:=IF(VAR16=(-1),9999,VAR16)>VAR13;
VAR19:=LOW<VAR3 AND CLOSE>VAR3 AND VAR17 AND VAR10 AND VAR18;
VAR20:=VAR10;
VAR21:=VAR19;
VAR22:=VAR15;
VAR23:=BARSLAST(VAR20);
VAR24:=BARSLAST(VAR22);
封龙黄金眼:IF(VAR23<0,9999,VAR23)<IF(VAR24<0,9999,VAR24);
DRAWBAND(10*封龙黄金眼,RGB(118,0,0),封龙黄金眼,RGB(0,0,0));
STICKLINE(VAR20,0,35,2,0),COLORWHITE;
STICKLINE(VAR21,0,28,2,0),COLORLIRED;
STICKLINE(VAR22,0,22,2,0),COLORLIGREEN;
封龙获利:WINNER(CLOSE)*100>=80,COLORFF8000,LINETHICK0;
DRAWBAND(30*封龙获利,RGB(250,0,0),21*封龙获利,RGB(0,0,0));
 


上一篇:通达信公式下载:霸气涨停大机构进场+大周期调头逢高卖

下一篇:通达信源码:强势买入狙击分界线+好厉害的MACD+VOL换手区间