【飞　狐】大盘分析指标《指南针牛马熊》（数据类、副图、源码）

A:通达信

{牛马熊A  引用}

NX:=IF(EMA(C,3)>MAX(EMA(C,13),EMA(C,55)),1,IF(EMA(C,3)<MIN(EMA(C,13),EMA(C,55)),-1,0));

牛:IF(NX=1 AND V>1,1,0);

马:IF(NX=0 AND V>1,1,0);

熊:IF(NX=-1 AND V>1,1,0);

{指南针牛马熊   牛马熊A-引用}

N:=EXTDATA_USER(1,1);

M:=EXTDATA_USER(2,1);

X:=EXTDATA_USER(3,1);

AA:=N+M+X;

牛:N/AA*100,COLORRED,LINETHICK2;

马:M/AA*100,COLORYELLOW,LINETHICK2;

熊:X/AA*100,COLORMAGENTA,LINETHICK2;

TD:=BACKSET(ISLASTBAR,1);

DRAWTEXT(TD AND 牛,牛,  '      【牛】'),COLORRED;

DRAWTEXT(TD AND 马,马,  '      【马】'),COLORYELLOW;

DRAWTEXT(TD AND 熊,熊,  '      【熊】'),COLORMAGENTA;

STICKLINE(TD,牛,0,3,0),COLORRED;

STICKLINE(TD,马,0,2,0),COLORYELLOW;

STICKLINE(TD,熊,0,1,0),COLORMAGENTA; 

  

  B:飞狐

该公式是通过横向统计来计算A股板块的“牛”、“马”、“熊”的家数（“牛”、“马”、“熊”是作者按自己的思路设定的），再按各自所占总户数的比例来计算出的三条指标曲线，只能用于大盘指数的分析。当“牛”线或“熊”线的数值达到90以上时，大盘原趋势有可能就要开始进行转折，有一定的参考价值，另外也可以综合参考一下“牛”、“马”二线上穿或下穿“熊”线的分析。

先看效果图

指标公式源码，公式共二个，第一个是计算横向统计数据的公式。

引用:

{公式名称:牛马熊}
nx:=if(ema(c,3)>max(ema(c,13),ema(c,55)),1,if(ema(c,3)<min(ema(c,13),ema(c,55)),-1,0));
牛:if(nx=1 and v>1,1,0);
马:if(nx=0 and v>1,1,0);
熊:if(nx=-1 and v>1,1,0);    

第二个公式是副图公式

引用:

{公式名称：指南针牛马熊}
DRAWGBK((CLOSE > 0),COLORRGB(0,0,0),COLORRGB(0,0,0),1);
N:=ESTDATA('牛数');
M:=ESTDATA('马数');
X:=ESTDATA('熊数');
AA:=N+M+X;
牛:n/aa*100,COLORRED,linethick2,PRECISION2;
马:m/aa*100,coloryellow,linethick2,PRECISION2;
熊:x/aa*100,color00ff00,linethick2,PRECISION2;
p:=SYSPARAM(1);
W:=SYSPARAM(2);   
Q:=SYSPARAM(3);
ZZ:=(Q-W)+1;  
hh:=hhv(牛,ZZ);  
ll:=llv(牛,ZZ);  
zhh:=hh[Q];  
zll:=ll[Q];
DRAWICON(牛>=90,90,5);
DRAWICON(熊>=90,90,4);
STICKLINE(BARPOS=W,0,100,420,0),Color390000;
STICKLINE(BARPOS=W+4,0,牛[p],30,0),COLORRED;
STICKLINE(BARPOS=W+10,0,马[p],30,0),coloryellow;
STICKLINE(BARPOS=W+16,0,熊[p],30,0),color00ff00;
DRAWTEXT(BARPOS=W+4,0,'牛'),ALIGN0,ColorD96C00;
DRAWTEXT(BARPOS=W+10,0,'马'),ALIGN0,ColorD96C00;
DRAWTEXT(BARPOS=W+16,0,'熊'),ALIGN0,ColorD96C00;
DRAWTEXT(BARPOS=W+4,牛[p]+10,NUMTOSTR(N[p],0)),ALIGN0,COLORRED;
DRAWTEXT(BARPOS=W+10,马[p]+10,NUMTOSTR(M[p],0)),ALIGN0,coloryellow;
DRAWTEXT(BARPOS=W+16,熊[p]+10,NUMTOSTR(X[p],0)),ALIGN0,color00ff00;