十战七胜主图追求十战十胜通达信公式 主图 源码附图
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%,显示黄s}
涨幅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%,显示黄s}
跌幅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);
未来函数检测结果如下:
该公式包含未来函数:CAPITAL
该公式包含未来函数:DYNAINFO
该公式包含未来函数:FINANCE
解密、定制、编写股票指标请联系QQ或微信同号:88652583
相关股票指标公式
原理解析:
MAA5赋值:C的5日简单移动平均
MAA5_T:= ( (C+ C + 1日前的C + 2日前的C + 3日前的C ) / 5 )
MAA10赋值:C的10日简单移动平均
MAA20赋值:C的20日简单移动平均
MAA30赋值:C的30日简单移动平均
如果MAA10>MAA30返回MAA10否则返回MAA30
A3赋值:(C-9日内L最低值)/(9日内H最高值-9日内L最低值)*100
A3的3日[1日权重]移动平均
A4的3日[1日权重]移动平均
A6赋值:3*A4-2*A5
A7赋值:C-1日前的C
A8赋值:100*A7的6日指数移动平均,6)/EMA(EMA(A7的绝对值,6),6)
A9赋值:( (C-1日前的C) / 1日前的C ) > 0.02
{涨幅要大于2%}
买赋值:2日内A8最低值=7日内A8最低值 AND 统计2日满足A8<0的天数 AND CROSS(A8,A8的2日简单移动平均) AND A9
DRAWTEXT(买=1的5过滤,最低价*0.96,'买'), 画洋红色
当满足条件买时,在开盘价和收盘价之间画柱状线
{显示1 到 10的数字}
ZT赋值:上次C/1日前的C-1>=0.1-0.01/1日前的C AND C=H距今天数
AQ赋值:EVERY(C>=ZT日前的L,ZT)
BQ赋值:IF(ZT+1日前的AQ AND ZT+1日前的ZT<13,ZT+1日前的ZT+ZT+1,ZT)
DRAWTEXT(ZT<=10 AND AQ, ZT日前的L*0.96, VAR2STR(ZT,0)),COLOR008000
DRAWTEXT(ZT>=6 AND ZT<=8 AND AQ, ZT日前的L*0.96, VAR2STR(ZT,0)),画红色
DRAWTEXT(BQ>0 AND BQ<=10 AND BQ!=AQ, BQ日前的L*0.96, VAR2STR(BQ,0)),COLOR008000
DRAWTEXT(BQ>=6 AND BQ<=8 AND BQ!=AQ, BQ日前的L*0.96, VAR2STR(BQ,0)),画红色
{如果涨幅大于5%,显示黄S}
涨幅5 := ( (C /1日前的C) > 1.05 ) AND ( (C /1日前的C) < 1.09 )
当满足条件涨幅5时,在 收盘价和 开盘价之间画柱状线
{如果涨停显示黄芯,如果跌停显示绿芯}
涨停 := (C /1日前的C) > 1.095
当满足条件涨停时,在 最高价和 开盘价之间画柱状线
{如果涨幅大于5%,显示黄S}
跌幅5 := ( (C / 1日前的C) < 0.95 )
当满足条件跌幅5时,在 开盘价和 收盘价之间画柱状线
跌停 := C/1日前的C < 0.9
当满足条件跌停时,在 最高价和 最低价之间画柱状线
输出M5:收盘价的5日简单移动平均, 线宽为2, 画红色
{画白色
}
MAA5_T, NODRAW
输出M10:收盘价的10日简单移动平均, 画绿色, 线宽为2
输出{COLORLIRED}
M20:收盘价的20日简单移动平均, COLORFF00FF
{, 线宽为2
输出}
M30:收盘价的30日简单移动平均, 画绿色, NODRAW
{, 线宽为2
}
{显示当日价咯线}
DRAWLINE( 到最后交易的周期=90, CONST(C), 到最后交易的周期=1, C, 3), 画蓝色,LINETHICK1
DRAWICON(M10上穿 C, H, 15)
{显示20日线
M20DAYS赋值:收盘价的20日简单移动平均
DRAWLINE( 到最后交易的周期=TOTALBARSCOUNT,CONST(C), 到最后交易的周期=1,M20DAYS,3),COLORFF00FF, DOTLINE,LINETHICK1
输出}
{M60:收盘价的60日简单移动平均
输出POINTDOT}
{M89:收盘价的89日简单移动平均, 线宽为2,COLORFF9966
}
{//一二零日赋值:C的120日简单移动平均,LINETHICK1,COLOR000099
输出//一四四日:C的144日简单移动平均,LINETHICK1,COLORFF3300
输出//BLUE
}
上轨:(1+6/100)*收盘价的25日简单移动平均, 画蓝色, 线宽为2
输出{M90:收盘价的90日简单移动平均
输出}
{M120:收盘价的120日简单移动平均
输出}
{M250:收盘价的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)
当满足条件1时,在横轴 0.0纵轴 0.0.1位置书写文字
{底部显示}
SBL赋值: STRCAT(' ', STRCAT(STRCAT(STRCAT(HYBLOCK,DYBLOCK),GNBLOCK),ZDBLOCK) )
当满足条件1时,在横轴0纵轴70位置书写文字
当满足条件ISLASTBAR时,在横轴0纵轴70位置书写文字
总股本:=STRCAT(STRCAT('总股本: ',CON2STR(TOTAL当前流通股本/1000000,2)),'亿')
{流通盘:=STRCAT(STRCAT(' 流通盘: ',CON2STR(当前流通股本/1000000,2)),'亿')
}
全流通:=STRCAT(' 流通比: ',CON2STR((当前流通股本/1000000)/(TOTAL当前流通股本/1000000),2))
流通值赋值:(当前流通股本/1000000)*C
市值:=STRCAT(STRCAT(' 流通: ',CON2STR(流通值,2)),'亿')
股本市值:=STRCAT('市值: ',STRCAT(STRCAT(STRCAT(总股本,全流通),市值),''))
当满足条件ISLASTBAR时,在横轴0.005纵轴0.115位置书写文字
当满足条件流通值>100时,在横轴0纵轴0.12位置书写文字
当满足条件流通值>=200时,在横轴0纵轴0.12位置书写文字
当满足条件流通值<=100时,在横轴0纵轴0.12位置书写文字
{小于100亿显示红色}
Q2赋值:2日前的O>2日前的C
{2日前的开盘价>2日前的收盘价}
Q1赋值:1日前的O>1日前的C AND 1日前的C<2日前的C
{1日前的开盘价>1日前的收盘价 AND 1日前的收盘价<2日前的收盘价}
YBY赋值:C>O AND C>1日前的H
{目前是阳线 AND 当前价>1日前的最高价}
YZ赋值:YBY AND Q1 AND Q2 AND 1日前的C<2日前的C
{连跌2天,今天收阳了}
DRAWICON(YZ AND C<55 AND 开盘价>0,L*0.95,1)
输出XG:DRAWTEXT(YZ AND C<55 AND 开盘价>0,L*0.90,'逆转')
输出{强势股要突破上轨线}
{上轨:(1+6/100)*收盘价的25日简单移动平均, 画蓝色, 线宽为2
}
{大宗交易, 大宗交易的价咯超过收盘价,叫溢价,低于收盘价叫折价}
大宗交易 := SIGNALS_USER(298, 0), NODRAW
减持金額 := VARCAT(VAR2STR(大宗交易/10000.0 , 2),'亿')
{单位是:亿}
{FLOAT FBILIU = (收盘价 - 成交价) / 收盘价
}
比率 := FRACPART(大宗交易), NODRAW
{得到小数部分,带正负符号的}
成交价 := C - C*比率, NODRAW
当满足条件比率>0时,在 H和 减持金額位置书写文字
当满足条件比率>0时,在 成交价和 '减----'位置书写文字
当满足条件比率>=0时,在 H*1.015和 '减'位置书写文字
当满足条件比率>=0时,在 成交价和 减持金額位置书写文字
当满足条件比率<0时,在 成交价和 减持金額位置书写文字
当满足条件比率<0时,在 成交价和 减持金額位置书写文字
{除权后显示蝴蝶}
{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
当满足条件除权条件时,在 H和 28之间画图标
当满足条件除权条件时,在 L*0.96和 '高转送'位置书写文字
DRAWNUMBER(除权条件, L*0.95, 送股数), 画红色
{跳空高开 并且 涨停}
TJ1 := (O > 1日前的C) AND (C>=1日前的C*1.095)
TJ2 := 成交量 > 40000
{去除停牌和低成交量连板的股票
当满足条件TJ1 AND TJ2时,在 H*1.0618和 25之间画图标
当满足条件TJ1 AND TJ2时,在 H*1.0718和 25之间画图标