【通達信】很好的換手率公式，有此選股公式必大發(fā)？

游龍mg 2016-08-21

展開全文

很好的換手率公式，求紅三角出現(xiàn)綠色柱子的選股公式，那是主力建倉的第一天，股票很容易大漲的。改為通達信可用。
DRAWGBK(1, COLORRGB(100,100,100),COLORRGB(50,50,50),0);
{換手100%}
svol:=INTPART(SUM(V,0)/CAPITAL);
tj0:=svol>REF(svol,1) or BARSSINCE(CLOSE)=0;
S1:=BARSLAST(tj0)+1,PRECISION,COLORWHITE;//時間1
tj2:=S1<ref(S1,1);//取點
S2:=if(tj2,ref(S1,1)+1,S1),PRECISION,COLORMAGENTA;//時間2
S3:=sum(tj2,0),COLORMAGENTA;
階段總額（萬元）:=SUM(AMOUNT/10000,S2)*100,PRECISION,LINETHICK,Color008BFA;//換手100%成交額
階段總量（手）:=SUM(V,S2)*100,PRECISION,LINETHICK,COLORCYAN;//換手100%成交量
階段成本（元）:=(階段總額（萬元）/(階段總量（手）/100)),LINETHICK,PRECISION2,COLORRED;
DRAWTEXT(BARPOS=SYSPARAM(2),h,'■階段平均成本:'+NUMTOSTR(階段成本（元）[SYSPARAM(1)],2)+'(元)'),align4,COLORCYAN;
//
{取點}
Zk1:=STKINDI('' ,'kdj.k',0,7);
Zd2:=STKINDI('' ,'kdj.d',0,7);
ZF1:=STKINDI('' ,'macd.diff',0,7);
ZA2:=STKINDI('' ,'macd.dea',0,7);

{------------------☆功能開關(guān)--------------------}
{建倉統(tǒng)計}
換手率:v/FINANCE(7),LINETHICK,PRECISION2,COLORCYAN;{換手率}
JCD:=FILTER(CROSS(Zk1,Zd2)&&Zd2<30,13);{周KD金叉位置}
取點:=barslast(JCD);
吸籌區(qū):=if(取點>0 and 取點<61,取點,0);
ZS1:=吸籌區(qū);
ZS2:=吸籌區(qū)+1;
ZS3:=換手率/5;{莊家籌碼估算}
ZSA:=IF(ZS1>0,sum((ZS3),吸籌區(qū)+1),0);{統(tǒng)計莊家籌碼}
{控制畫線高度}
n1:=sysparam(3);
nn:=n1-sysparam(2)+1;
hh:=hhv(換手率,nn);
ll:=llv(換手率,nn);
最高:=hh[n1];
最低:=ll[n1];
中:=最低+(最高-最低)*0.5;

{-----------------【圖解模板】---------------------}
{換手率}
換手冷清:STICKLINE(換手率<3,0,換手率,4,1),COLORWHITE;//冷清
換手活躍:STICKLINE(換手率>=3 and 換手率<7,0,換手率,4,1),COLORYELLOW;//活躍
換手熱烈:STICKLINE(換手率>=7,0,換手率,4,1),COLORRED;//熱烈
{換手MA}
PARTLINE(C,MA(換手率,13)),Color0089FF;
PARTLINE(C,MA(換手率,55)),COLOR009900;

PARTLINE(RANGE(BARPOS,SYSPARAM(2),SYSPARAM(1)+1)&&ZS1>0,中),COLORCYAN;//建倉橫線
VERTLINE(JCD),LINEDOT,COLORGREEN;//建倉點豎線
DRAWTEXT(BARSCOUNT(C)=SYSPARAM(1)&&SYSPARAM(1)>ZS1,中*2,' 主力建倉天數(shù):'+NUMTOSTR(ZS1[SYSPARAM(1)],0)+'(天) '),PXDN30,align2,COLORGREEN;
DRAWTEXT(BARSCOUNT(C)=SYSPARAM(1)&&SYSPARAM(1)>ZS1,中*2,' \n 估算主力籌碼:'+NUMTOSTR(ZSA[SYSPARAM(1)],2)+'% '),PXDN30,align2,COLORMAGENTA;
DRAWICON(FILTER(CROSS(ZF1,ZA2),5),0,4),align5;
DRAWICON(FILTER(CROSS(Zk1,Zd2),5),0,8),align5;
DRAWICON(FILTER(CROSS(Zd2,Zk1),5),0,9),align5;

{選股公式}
ZK1:=STKINDI('' ,'KDJ.K',0,7);
ZD2:=STKINDI('' ,'KDJ.D',0,7);
ZF1:=STKINDI('' ,'MACD.DIFF',0,7);
ZA2:=STKINDI('' ,'MACD.DEA',0,7);
A1:CROSS(ZF1,ZA2);
A2:CROSS(ZK1,ZD2);股票論壇 www.55188.com