识别主力策略
(文章来源：黑马金股)

ZRSI:"rsi.rsi2#WEEK",PRECISION2,Color0098FF; //周RSI周期
YRSI:"rsi.rsi2#MONTH",PRECISION2,Color009800; //月RSI周期
//

网有战事-◆蓝筹 副图-----飞狐指标 业绩一览表
[code]
{网有战事-◆蓝筹}
{表格横线}
PARTLINE(c,0),colorgray;PARTLINE(c,30),colorgray;
PARTLINE(c,60),colorgray;
PARTLINE(c,90),colorgray;PARTLINE(c,120),colorgray;
{表格竖线}
x:=SYSPARAM(2)=BARPOS;
k:=(SYSPARAM(3)-SYSPARAM(2))/120;
x1:=SYSPARAM(2)+ROUND(26*k)=BARPOS;
x2:=SYSPARAM(2)+ROUND(60*k)=BARPOS;
x3:=SYSPARAM(2)+ROUND(96*k)=BARPOS;
x4:=SYSPARAM(2)+ROUND(120*k)=BARPOS;
VERTLINE(x or x1 or x2 or x3 or x4),colorgray;
正收益率:=if(FINANCE(33)>0.01,FINANCE(33)*6,0);
市盈率:=if(FINANCE(33)>0,DYNAINFO(39),0);
蓝筹系数:(正收益率*市盈率)/2,PRECISION2,LINETHICK0,COLORGREEN;
{使用蓝筹系数排序时，别忘了引入F10资料啊}
DRAWTEXT(x2,113,' 动态市盈率(%) = '+NUMTOSTR(市盈率,2)),COLORYELLOW;
股净资:=FINANCE(34);
DRAWTEXT(x1,22,' 净资产(股) = '+NUMTOSTR(股净资,2)+'元' ),COLORWHITE;
股收益:=FINANCE(33);
DRAWTEXT(x,83,' 收益(股): '+NUMTOSTR(股收益,2)+'元' ),COLORYELLOW;
股公积:=FINANCE(18);
DRAWTEXT(x,52,' 公积(股): '+NUMTOSTR(股公积,2)+'元' ),COLORGREEN;
股未分:=FINANCE(32);
DRAWTEXT(x,22,' 未分(股): '+NUMTOSTR(股未分,2)+'元' ),COLORMAGENTA;
含金量:=(股净资+股未分+股公积+股收益)-C,LINETHICK,PRECISION2{,Color000000};
净资产收益率:=FINANCE(37);
DRAWTEXT(x2,83,' 净资产收益率(%) = '+NUMTOSTR(净资产收益率,2)),ColorFF6835;
A5:=含金量[SYSPARAM(1)];
RA5:=含金量[SYSPARAM(1)-1];
jt5:=if(A5>RA5,'↑','↓');
DRAWTEXT(x,113,' 含金量(股)'+NUMTOSTR(含金量,2)+'元'+jt5 ),COLORRED;
现金流量:=((FINANCE(38)+FINANCE(41)+FINANCE(44))-(FINANCE(39)+FINANCE(42)+FINANCE(45)))/FINANCE(1);
DRAWTEXT(x1,52,' 现金净流量(股):'+NUMTOSTR(现金流量,2)+'元'),Color0098FF;
主营业务增长率:=FINANCE(53);
DRAWTEXT(x1,83,' 主营业务增长率(%):'+NUMTOSTR(主营业务增长率,2)),COLORGREEN;
税后利润增长率:=FINANCE(54);
DRAWTEXT(x2,52,' 税后利润增长率(%):'+NUMTOSTR(税后利润增长率,2)),Color0098FF;
总股本:=FINANCE(1)/10000,PRECISION2,LINETHICK1;
DRAWTEXT(x3,113,' 总股本(亿):'+NUMTOSTR(总股本,3)),Color0098FF;
B股:=FINANCE(5)/10000;
DRAWTEXT(x3,52,' B股(亿):'+NUMTOSTR(B股,3)),ColorFF6835;
H股:=FINANCE(6)/10000;
DRAWTEXT(x3,22,' H股(亿):'+NUMTOSTR(H股,3)),COLORCYAN;
选择:=IF(STRLEFT(STKNAME,1)='G'or STRLEFT(STKLABEL,3)='002',1,0); 
流通股数:=IF(选择,FINANCE(1),FINANCE(7));
DRAWTEXT(x3,83,' 流通股(亿):'+NUMTOSTR(流通股数/10000,3)),COLORGREEN;
户均持股:=流通股数*10000/FINANCE(50),PRECISION0;
DRAWTEXT(x2,22,' 户均持股(股):'+NUMTOSTR(户均持股,0)),COLORMAGENTA;
xx1:=if(FINANCE(33)>0,DYNAINFO(39),0),LINETHICK;
xx2:=FINANCE(37),LINETHICK;
比值:=xx1/xx2,LINETHICK;//小于1比较多，则认为价格很便宜．
DRAWTEXT(x1,113,' 比值:'+NUMTOSTR(比值,2)+' (<1,越小越好)' ),COLORWHITE;
//

十大股东增仓排序 飞狐选股排序指标（可快速找出主力增仓的股票）

CODE:[Copy to clipboard]{十大股东增仓排序}
BLW:=F10FIND('占流通A股比例',500);
A:=STRTONUM(STRRIGHT(F10TEXT(BLW,20),6));//十大流通股东本期占（%）
B:=STRTONUM(STRRIGHT(F10TEXT(F10FIND('占流通A股比例',BLW+20),20),6));//上期占（%）
增仓:IF((A-B)>=0,(A-B),0),PRECISION2,COLORYELLOW,LINETHICK0;

飞狐选股排序指标（可快速找出：1.净资产收益率肯定在14%以上。
2.股价在净资产2.2倍以下，安全值要大于0，但越小越好。）

CODE:[Copy to clipboard]{◆排序3}
//能不能把净资产收益率在14%以上,股价在净资产2.2倍以下的股票,找出来排个队? 
X1:=FINANCE(37),LINETHICK;//收益率
X2:=c/FINANCE(34);//股价/净资产
安全:if(X1>=14{高增长} and X2<2.5{价低},X2,0);
{用安全进行排序；这样的排序结果：
1.净资产收益率肯定在14%以上。
2.股价在净资产2.2倍以下，安全值要大于0，但越小越好。}
涨幅排序（光标定位----飞狐指标）——感谢作者：bajatje 


方便找龙头板块，又可在龙头板块中快速的寻找龙头股，非常实用啊！！


先建一个引入指标：


CODE:[Copy to clipboard]{涨幅}
zf:(c/ref(c,1)-1)*100;//计算涨跌比率数据
rq:date;//取日期
hs:v/capital*100;//计算换手率数据


实用指标1：


CODE:[Copy to clipboard]{版块内涨幅排序}
input: M(18,1,27);

PARTLINE(1,0),COLORBLACK;
N:=datacount-SYSPARAM(1);
BK:='中小企业';//'A股板块';//'板块指数';//
BKS:=STKCOUNT(BK);//板块中的证券数量
HSL:='涨幅.zf';//涨跌比率数据
TT:='涨幅.rq';//日期定位
DD:=date;//
SS:=DATACOUNT;//
variable:DM1[BKS]='',VarX1[BKS]=0,VarH1[BKS]=0;

for i=1 to BKS do begin
D:=STRRIGHT(STKFROMBLK(BK,i),6);//板块中第i个成员的代码
E:=if(STRFIND(bk,'板块指数',0),4,6);
DM1[i]:=strright(D,E);
TMP1:=ref(STKINDI(D,HSL,0,6),N);//板块中第i个成员在最后周期前N天的指标值
TMPP1:=ref(STKINDI(D,TT,0,6),N);//板块中第i个成员在最后周期前N天的日期
tmpPP1:=ref(stkindi('1A0001',tt,0,6),N);//在最后周期前N天大盘的日期
VarX1[i]:=IF(tmpPP1[ss]=TMPP1[SS],TMP1[SS],0);
VarH1[i]:=IF(tmpPP1[ss]=TMPP1[SS],TMP1[SS],0);
end;
Nu1:=SORTPOS(VarX1,1,1,BKS);
xss:='';
xs:='';
xsss1:='';
xss1:='';
xss1d:='';
for j=1 to bks do BEGIN
ff:=if(j=2,' 涨幅'
,' ');


ffdd:=if(j=bks-1,' 跌幅 ',' ');

sf:=if(j<10,' ',if(j<100,' ',''))+NUMTOSTR(j,0)+'.';
sfd:=if(j<10,' ',if(j<100,' ',''))+NUMTOSTR(bks-j+1,0)+'.';
xsss1:=xsss1+DM1[VarX1[j]];
aa:=STRLEFT(STKNAMEEX(DM1[VarX1[j]]),8)+'('+DM1[VarX1[j]]+')'+'='
+NUMTOSTR(VarH1[VarX1[j]],3)+'% '+'\n';
XSS1:=XSS1+ff+sf+aa;

xss1d:=ffdd+sfd+aa+XSS1d;

if bks-j<M then XSS:=sfd+aa+xss;
if j<M+1 then xs:=xs+sf+aa;
end;
ee:=if(e=4,3,5);
a1:=STRFIND(xsss1,STKLABEL,0);
排序日期:tmppp1[datacount],LINETHICK,COLORWHITE;
今排名:=if(a1>0,(a1+ee)/e,0),COLORRED,LINETHICK;
涨幅a:=VarH1[VarX1[今排名]],COLORRED,LINETHICK;

DRAWTEXT(barpos=SYSPARAM(2),10,xss1),COLORRED;
DRAWTEXT(barpos=SYSPARAM(2),10,xss1d),COLORCYAN;


EXPLAIN(1,'排序日期'+NUMTOSTR(排序日期,0)+'\n 涨幅排序前M名\n'+xs),COLORRED;
EXPLAIN(1,'\n跌幅排序前M名\n'+xss),COLORBLUE;

//

(文章来源：黑马金股 http://www.fedom.net)