软件名称：[B]私人专用的黑马指标（修正源码和附件）[/B]
软件类型：国产软件
运行环境：Win9X/Win2000/WinXP/Win2003/Win7/
软件语言：简体中文
授权方式：免费版
软件大小：9.00 KB
官方主页：Home Page
更新时间：2013-12-02 09:50:11
软件简介:
废话不多说，直接上图，上附件。大家交流验证。希望对股友有帮助。注明：黑马不含未来，通过本人几个月验证没有发现过漂移。
公式里面个人添加趋势判断指标是有用到未来，那个不影响黑马信号的。
使用方法：1:附图指标红柱为安全趋势。绿柱为风险趋势。
2:通过红柱+黑马信号，再结合成交量。
3:红柱跟黑马出现后，一定要放量，才能安全介入。
具体操作个人可以摸索。
有网友提供，说主图测试不通过，我重新修改了源码，如下，可以用下面的源码新建公式。下载附件已经更新了。
主图源码：》》 下载
STICKLINE(CLOSE>REF(CLOSE,1)*1.095 AND CLOSE=HIGH,CLOSE,OPEN,2,0),COLOR8000FF;{涨停}
STICKLINE(CLOSE<REF(CLOSE,1)*0.9015 AND CLOSE=LOW,CLOSE,OPEN,2,0),COLOR009900;{跌停}
买卖:EMA(CLOSE, 7),COLORWHITE;
参考:EMA(CLOSE, 15),COLORYELLOW,LINETHICK1;
支持:EMA(CLOSE, 25),COLORLIBLUE,LINETHICK1;
中短:EMA(CLOSE, 34),COLORBLUE,NODRAW;
中长:EMA(CLOSE, 56),COLORGREEN,LINETHICK2;
半年:EMA(CLOSE, 235),COLORWHITE,LINETHICK1;
全年:EMA(CLOSE, 453),COLORBLUE;
MA60:MA(C,60), COLORBROWN,LINETHICK1,POINTDOT;
{DRAWICON(黑马信号.黑码,L*0.99,5);}
TYP:=(HIGH+LOW+CLOSE)/3;
CCI:=(TYP-MA(TYP,21))/(0.015*AVEDEV(TYP,31));
WR1:=100*(HHV(HIGH,42)-CLOSE)/(HHV(HIGH,42)-LLV(LOW,42)),COLORWHITE;
PQ:IF(CCI>58,MA60,DRAWNULL), COLORMAGENTA,DOTLINE;
{分析家公式网WWW.70822.com}
Q_1:=C-REF(C,1);
Q_2:=100*EMA(EMA(Q_1,6),6)/EMA(EMA(ABS(Q_1),6),6);
Q_3:=CROSS(EMA(C,19),EMA(C,7));
Q_4:=CROSS(EMA(C,7),EMA(C,19));
Z1:=L=LLV(L,BARSLAST(Q_3)+1);
Z2:=LLV(L,BARSLAST(Q_3)+1);
Z3:=H=HHV(H,BARSLAST(Q_4)+1);
Z4:=HHV(H,BARSLAST(Q_4)+1);
Q_A:=DRAWLINE(Z1,Z2,Z3,Z4,0),NODRAW;
Y1:=H=HHV(H,BARSLAST(Q_4)+1);
Y2:=HHV(H,BARSLAST(Q_4)+1);
Y3:=L=LLV(L,BARSLAST(Q_3)+1);
Y4:=LLV(L,BARSLAST(Q_3)+1);
Q_B:=DRAWLINE(Y1,Y2,Y3,Y4,0),NODRAW;
X1:=LLV(Q_2,2)=LLV(Q_2,7) ;
X2:=COUNT(Q_2<0,2);
X3:=CROSS(Q_2,MA(Q_2,2));
X4:=REF(Q_B,1)<REF(Q_B,2);
X5:=Q_A>REF(Q_B,1);
买进:=(X1 AND X2 AND X3) AND X4 AND X5,COLORRED;
启动:=IF(Q_B<REF(Q_B,1) AND Q_B=Q_A,1,0),LINETHICK3,COLORRED;
PP:IF(启动>0,中长,DRAWNULL),COLORRED,LINETHICK2;
{====================================================}
EXP1:EMA(CLOSE,5),LINETHICK2,NODRAW;
EXP2:EMA(CLOSE,29),LINETHICK2,NODRAW;
TT1:=CROSS(EXP1,EXP2);
DRAWTEXT(TT1,HIGH*1.02,'B'),COLORMAGENTA;
TT2:=CROSS(EXP2,EXP1);
DRAWTEXT(TT2,LOW-0.15,'S'),COLORGREEN;
{海滨小城编辑
操盘线 }
AT:=AMOUNT/V/100;
VARA:=EMA((((AT-EMA(AT,13))/EMA(AT,13))*(0-100)),5);
操盘线:=EMA(((VARA/10)+EMA(AT,10)),3),NODRAW;
行情线:=EMA(AT,3),NODRAW;
重心:=(C+0.618*REF(C,1)+0.382*REF(C,2)+0.236*REF(C,3)+0.146*REF(C,4))/2.382;
趋势线:EMA(((SLOPE(C,22)*20)+C),55),COLORYELLOW,LINETHICK2,NODRAW;
红升:IF(重心>=趋势线,趋势线,DRAWNULL),COLORRED,LINETHICK2,NODRAW;
蓝降:IF(重心<趋势线,趋势线,DRAWNULL),COLORBLUE,LINETHICK2,NODRAW;
STICKLINE(行情线<操盘线,H,L,0,1),COLORGREEN,NODRAW;
STICKLINE(行情线<操盘线,C,O,2,1),COLORGREEN,NODRAW;
STICKLINE(行情线>=操盘线,H,L,0,1),COLORRED,NODRAW;
STICKLINE(行情线>=操盘线,C,O,2,1),COLORRED,NODRAW;
{压力支撑线}
压力:MA(REF(HHV(C,30),1),2),COLORWHITE,NODRAW;
支撑:MA(REF(LLV(C,30),1),2),COLORGRAY,NODRAW;
{顶底信号}
DRAWTEXT(CROSS(行情线,操盘线),L*0.98,'买入'),COLORRED;
JH:=SMA(MAX(C-REF(C,1),0),5,1)/SMA(ABS(C-REF(C,1)),5,1)*100;
DRAWTEXT(CROSS(84,JH),H*1.02,' 卖出'),COLORGREEN;
{======================}
DXJP:=(CLOSE-LLV(LOW,34))/(HHV(HIGH,21)-LLV(LOW,34))*100;
FSZX:=(EMA(DXJP,3)-50)*2,COLORGRAY;
BGTYU:=IF(DATE<=1150530,1,0);
GHYJKU:=BETWEEN((DCLOSE*BGTYU)/(SUM(AMOUNT,BARSCOUNT((DCLOSE*BGTYU)))/SUM(VOL*100,BARSCOUNT((DCLOSE*BGTYU)))),1.05,0.95);
VBNH:=IF(GHYJKU=0,MA((DCLOSE*BGTYU),BARSCOUNT((DCLOSE*BGTYU))),(SUM(AMOUNT,BARSCOUNT((DCLOSE*BGTYU)))/SUM(VOL*100,BARSCOUNT((DCLOSE*BGTYU)))));
DRAWICON(FSZX<=-95,C,38);
DRAWTEXT(CROSS(EXPMA((DCLOSE/VBNH),20),1.04),C,'板'),COLORCYAN,NODRAW;
DRAWTEXT(CROSS(EXPMA((DCLOSE/VBNH),20),1.02),C,'追'),COLORYELLOW,NODRAW;
DRAWICON(CROSS(EXPMA((DCLOSE/VBNH),120),1.004),C,17);
H1:=MAX(DYNAINFO(3),DYNAINFO(5));
L1:=MIN(DYNAINFO(3),DYNAINFO(6));
P1:=H1-L1;
阻力:=L1+P1*7/8,COLORGREEN;
支力:=L1+P1*0.5/8,COLORMAGENTA;
DRAWICON(LONGCROSS(支力,C,2),C,1);
DRAWICON(LONGCROSS(C,阻力,2),C,2);
VARJ1:=EMA(EMA(CLOSE,13),13);
控盘2:=(VARJ1-REF(VARJ1,1))/REF(VARJ1,1)*1000;
STJ01:=控盘2<REF(控盘2,1) AND 控盘2>0.5;
STJ02:=控盘2>0;
BTJ2:=控盘2>REF(控盘2,1) AND 控盘2<-0.2;
BTJ22:=控盘2>REF(控盘2,1) AND 控盘2<0 ;
JJ:=DYNAINFO(11);
P:=55;S:=8;M1:=3;
能量:=(EMA(CLOSE,S)-EMA(C,P))*10;
空头:=EMA(能量,M1),COLOR00FF00;
BTJ1:=(CLOSE-JJ)/JJ<-0.005;
BTJ11:=(CLOSE-JJ)/JJ<-0.03;
BTJ12:=COUNT(JJ>=REF(JJ,1),5)>=4 AND (CLOSE-JJ)/JJ<0.005;
STJ1:=(C-JJ)/JJ>0.005;
BTJ3:=CROSS(能量,空头) AND 能量<-0.3;
BTJ32:=CROSS(能量,空头) AND 能量<-0.1;
STJ31:=CROSS(空头,能量);
STJ32:=CROSS(空头,能量) AND 能量>1.618;
A:=8;
BTJ81:=FILTER(BTJ1 AND BTJ2 AND BTJ3,A);
BTJ811:=FILTER(BTJ11 AND BTJ2 AND BTJ3,A);
BTJ82:=FILTER(BTJ12 AND BTJ22 AND BTJ32,A);
时长:=IF(HOUR>=9 AND HOUR<14 ,1,0);{9点至 14点}
捡钱:=BTJ811 AND TIME>15 AND 时长;
DRAWICON(捡钱,C,27);
AYGB1:=(DVOL/C)/2,NODRAW;
AYGB2:=SUM(IF(AYGB1>100 AND CLOSE>REF(CLOSE,1),AYGB1,0),0);
AYGB3:=SUM(IF(AYGB1>100 AND CLOSE<REF(CLOSE,1),AYGB1,0),0);
AYGB4:=SUM(IF(AYGB1<100 AND CLOSE>REF(CLOSE,1),AYGB1,0),0);
AYGB5:=SUM(IF(AYGB1<100 AND CLOSE<REF(CLOSE,1),AYGB1,0),0);
AYGB6:=AYGB2+AYGB3+AYGB4+AYGB5;
机买:=(AYGB2/AYGB6)*100-100,LINETHICK4,COLORRED,NODRAW;
机卖:=(AYGB3/AYGB6)*100-100,LINETHICK4,COLORGREEN,NODRAW;
主力差:=机买-机卖;
LQH:=主力差>0 AND REF(主力差,1)<=0;
DRAWICON(LQH,C,25);
JJXX:=IF(BETWEEN(C/(SUM(AMOUNT,0)/SUM(VOL*100,0)),1.05,0.95)=0,MA(C,0),(SUM(AMOUNT,0)/SUM(VOL*100,0))),COLORYELLOW;
JJXXH:=(JJXX*1.007 ),COLORFF6600;
FFLL:=SUM(VOL,6)>REF(MA(VOL,30),1)*10;
HHPP:=((HHV(CLOSE,BARSCOUNT(CLOSE))-LLV(CLOSE,BARSCOUNT(CLOSE)))/CLOSE)<1;
HHZZ:=HHPP AND FFLL AND (C>JJXXH);
TTPP2:=FILTER(HHZZ,100);
{
DRAWICON(TTPP2,C,26);
};
{强势主图BS};
VAR0:=CLOSE > REF(CLOSE,1) AND CLOSE > REF(CLOSE,2);
VAR1:=REF(VAR0,1) AND CLOSE <= REF(CLOSE,1) AND CLOSE >= REF(CLOSE,2);
VAR2:=REF(VAR1,1) AND CLOSE >= REF(CLOSE,1) AND CLOSE <= REF(CLOSE,2);
VAR3:=REF(VAR2,1) AND CLOSE <= REF(CLOSE,1) AND CLOSE >= REF(CLOSE,2);
VAR4:=REF(VAR3,1) AND CLOSE >= REF(CLOSE,1) AND CLOSE <= REF(CLOSE,2);
VAR5:=REF(VAR4,1) AND CLOSE <= REF(CLOSE,1) AND CLOSE >= REF(CLOSE,2);
VAR6:=REF(VAR5,1) AND CLOSE >= REF(CLOSE,1) AND CLOSE <= REF(CLOSE,2);
VAR7:=REF(VAR6,1) AND CLOSE <= REF(CLOSE,1) AND CLOSE >= REF(CLOSE,2);
VAR8:=REF(VAR7,1) AND CLOSE >= REF(CLOSE,1) AND CLOSE <= REF(CLOSE,2);
VAR9:=REF(VAR8,1) AND CLOSE <= REF(CLOSE,1) AND CLOSE >= REF(CLOSE,2);
VAR10:=REF(VAR9,1) AND CLOSE >= REF(CLOSE,1) AND CLOSE
[url=http://www.70822.com/soft/sort013/sort05/down-67842.html]私人专用的黑马指标（修正源码和附件）[/url]