按以下五个标准给你的股票评级 还可以排序(源码)

2011-03-02 19:03:00来源:本站整理浏览:141

{E评级N}
INPUT:N(20,1,240); M:=N/2; P:=N*2;
DRAWGBKLAST(CLOSE>0,STRIP(RGB(0,0,50),RGB(0,0,0),0));0,COLORFF44FF,DOTLINE;
平均DDX:IF(MA((BIGORDER(1,2)-BIGORDER(2,2))*VOL/CAPITAL*100,N)>0.06,1,0),PRECIS0,LINETHICK0;
平均{主量/VOL}:IF(MA((BIGORDER(1,2)+BIGORDER(2,2))/2*100,N)>51,1,0),PRECIS0,LINETHICK0;
飘红天数:IF((count("ddx.ddx">0,N)/N*100)>60,1,0),PRECIS0,LINETHICK0;
平均换手:IF(MA(vol/capital*100,N)>2,1,0),PRECIS0,LINETHICK0;
与市值比:IF(SUM((BIGORDER(1,2)- BIGORDER(2,2))* AMOUNT/10000,N)/DYNAINFO(57)*10000*100>=N/20,1,0),PRECIS0,LINETHICK0;
评级N:平均DDX+平均{主量/VOL}+飘红天数+平均换手+与市值比,PRECIS0,COLOR0044FF,LINETHICK2;
评级N-REF(评级N,1),COLOR3D;

DRAWRECTABS(45,0 ,445 ,110 , rgb(0,20,0)),COLOR00FFFF,LINETHICK3,LAYER4;
DRAWRECTABS(45,0 ,145 ,45 , rgb(0,0,100)),COLOR0077FF,LINETHICK1,LAYER2;
DRAWTEXTABS(50,3,'评级;'+NUMTOSTRN(评级N,0)+'级 '),COLOR0044FF,LINETHICK5,LAYER2;
DRAWTEXTABS(50,23,'▂▃▄▅▆ '),COLOR0000FF,LINETHICK3,LAYER2;
DRAWTEXTABS(50,25,'1 2 3 4 5'),COLOR00FFFF,LINETHICK3,LAYER2;
DRAWTEXTABS(140,5,' (1)'+ NUMTOSTRN(N,0)+ '天 平均 DDX:       ' + NUMTOSTRN(MA((BIGORDER(1,2)-BIGORDER(2,2))*VOL/CAPITAL*100,N),3) + '% (评级>0.06) '),COLOR0011FF,LINETHICK2;
DRAWTEXTABS(140,25,' (2)'+ NUMTOSTRN(N,0)+ '天 平均{主量/VOL}: ' + NUMTOSTRN(MA((BIGORDER(1,2)+BIGORDER(2,2))/2*100,N),2) + '% (评级>51) '),COLOR00FF00,LINETHICK2;
DRAWTEXTABS(140,45,' (3)'+ NUMTOSTRN(N,0)+ '天 飘红天数(%):    ' + NUMTOSTRN((count("ddx.ddx">0,N)/N*100),2) + '% (评级>60) '),COLOR00FFFF,LINETHICK2;
DRAWTEXTABS(140,65,' (4)'+ NUMTOSTRN(N,0)+ '天 平均换手(%):    ' + NUMTOSTRN(MA(vol/capital*100,N),3) + '% (评级>2.0) '),COLOR00FF44,LINETHICK2;
DRAWTEXTABS(140,85,' (5)'+ NUMTOSTRN(N,0)+ '天 累计DDX与市值比:' + NUMTOSTRN(SUM((BIGORDER(1,2)- BIGORDER(2,2))* AMOUNT/10000,N)/DYNAINFO(57)*10000*100,3) + '% (评级>'+ NUMTOSTRN(N/20,2)+ ')'),COLORFF00FF,LINETHICK2;

M平均DDX:IF(MA((BIGORDER(1,2)-BIGORDER(2,2))*VOL/CAPITAL*100,M)>0.06,1,0),PRECIS0,LINETHICK0;
M平均{主量/VOL}:IF(MA((BIGORDER(1,2)+BIGORDER(2,2))/2*100,M)>51,1,0),PRECIS0,LINETHICK0;
M飘红天数:IF((count("ddx.ddx">0,M)/M*100)>60,1,0),PRECIS0,LINETHICK0;
M平均换手:IF(MA(vol/capital*100,M)>2,1,0),PRECIS0,LINETHICK0;
M与市值比:IF(SUM((BIGORDER(1,2)- BIGORDER(2,2))* AMOUNT/10000,M)/DYNAINFO(57)*10000*100>=M/20,1,0),PRECIS0,LINETHICK0;
评级M:M平均DDX+M平均{主量/VOL}+M飘红天数+M平均换手+M与市值比,PRECIS0,COLOR00FF00,DOTLINE;

P平均DDX:IF(MA((BIGORDER(1,2)-BIGORDER(2,2))*VOL/CAPITAL*100,P)>0.1,1,0),PRECIS0,LINETHICK0;
P平均{主量/VOL}:IF(MA((BIGORDER(1,2)+BIGORDER(2,2))/2*100,P)>51,1,0),PRECIS0,LINETHICK0;
P飘红天数:IF((count("ddx.ddx">0,P)/P*100)>60,1,0),PRECIS0,LINETHICK0;
P平均换手:IF(MA(vol/capital*100,P)>2,1,0),PRECIS0,LINETHICK0;
P与市值比:IF(SUM((BIGORDER(1,2)- BIGORDER(2,2))* AMOUNT/10000,P)/DYNAINFO(57)*10000*100>=P/20,1,0),PRECIS0,LINETHICK0;
评级P:P平均DDX+P平均{主量/VOL}+P飘红天数+P平均换手+P与市值比,PRECIS0,COLOR00FFFF;

股票公式栏目导航

本类热门

相关公式