软件名称:[B]换手率成交量分析解盘[/B]
软件类型:国产软件
运行环境:Win9X/Win2000/WinXP/Win2003/
软件语言:简体中文
授权方式:解密版
软件大小:12.0 KB
官方主页:Home Page
更新时间:2009-07-03 19:13:35
软件简介:
{换手率成交量分析解盘}
VARIABLE:K=1;
VAR1:=SUM(VOL,0);
VAR2:=VAR1/CAPITAL;
N:=FLOOR(VAR2);
-1;
{解盘:N=75 25 100 }
Var1:=IF(MA(CLOSE,88),1,0);
Var2:=1/WINNER(CLOSE);
Var3:=100-ABS((CLOSE-MA(CLOSE,13))/MA(CLOSE,13)*100);
HSL:=vol/capital*100;
量能:=SUM(HSL,N);
涨幅1:=100*(CLOSE-REF(CLOSE,N))/REF(CLOSE,N);
流通市值:=capital*c;
AH:=HHV(流通市值,N);
AL:=LLV(流通市值,N);
t1:=if(HSL<=2,1,0);
t2:=if(HSL>2 AND HSL<3,1,0);
t3:=if(HSL>3 AND HSL<5,1,0);
t4:=if(HSL>5 AND HSL<8,1,0);
t5:=if(HSL>8 AND HSL<15,1,0);
t6:=if(HSL>15 AND HSL<25,1,0);
t7:=if(HSL>=25,1,0);
sss:=100/4;
i:=0;
IF HSL<=2 THEN BEGIN DRAWTEXT(c>0 and DISPSTATUS=2,0-(sss*i),'日换手率在1%--2%,股价属于成交低靡,属于冷门股。日换手率成交小于3%的成交额称为"成交无量"。'),Color00FFFF,ALIGN2; i:=i+1;
END
IF HSL>2 AND HSL<3 THEN BEGIN DRAWTEXT(c>0 and
DISPSTATUS=2,0-(sss*i),'日换手率在2%--3%,股价属于成交温和,属于备份股。'),Color00FFFF,ALIGN2;
i:=i+1;
END
IF HSL>3 AND HSL<5 THEN BEGIN DRAWTEXT(c>0 and DISPSTATUS=2,0-(sss*i),' 日换手率在3%--5%,股价属于成交活跃,表示有庄家在积极活动,属于热门股。把10日平均换手率大于3%或大于5%,而后又缩量至换手率小于3%高度控盘的个股作为选股条件。'),Color00FFFF,ALIGN2; i:=i+1; END
IF HSL>5 AND HSL<8 THEN BEGIN DRAWTEXT(c>0 and DISPSTATUS=2,0-(sss*i),' 日换手率在5%--8%, 大于7%,常常超过10%,属于股价成交带量,表明筹码在急剧换手。发生在低位或是通过第一阻力区,很可能是强庄积极进货。'),Color00FFFF,ALIGN2;
i:=i+1; END
IF HSL>8 AND HSL<15 THEN BEGIN DRAWTEXT(c>0 and DISPSTATUS=2,0-(sss*i),' 日换手率大于8%--15%,股价属于成交放量。'),ColorFFFFF5,ALIGN2; i:=i+1; END
IF HSL>15 AND HSL<25 THEN BEGIN DRAWTEXT(c>0 and DISPSTATUS=2,0-(sss*i),' 日换手率大于15%--25%,股价属于成交巨量,发生在高位或高位缩量横盘之后,很可能是庄家出货。'),Color00FFFF,ALIGN2;
i:=i+1; END
IF HSL>=25 THEN BEGIN DRAWTEXT(c>0 and DISPSTATUS=2,0-(sss*i),' 日换手率大于25% 股价属于成交怪异;周换手率大于25% 属于成交活跃。'),ColorFFFFFF,ALIGN2; i:=i+1; END
IF 量能>3*N AND 涨幅1>3*N THEN BEGIN DRAWTEXT(c>0 and DISPSTATUS=2,0-(sss*i),'继续大涨'),ColorFF00FF,ALIGN2; i:=i+1; END
IF 量能<0.5*N AND 涨幅1<N THEN BEGIN DRAWTEXT(c>0 and DISPSTATUS=2,0-(sss*i),'继续小涨'),ColorFFFF00,ALIGN2; i:=i+1; END
IF 量能<0.5*N AND 涨幅1>-N AND 涨幅1>0 THEN BEGIN DRAWTEXT(c>0 and DISPSTATUS=2,0-(sss*i),'继续小跌'),ColorFFFF00,ALIGN2; i:=i+1; END
IF 量能>3*N AND 涨幅1<-3*N THEN BEGIN DRAWTEXT(c>0 and DISPSTATUS=2,0-(sss*i),'继续大跌'),ColorFF00FF,ALIGN2; i:=i+1; END
IF ((量能>3*N AND 涨幅1<N) OR (量能<0.5*N AND 涨幅1>3*N)
OR (量能>3*N AND 涨幅1>-N AND 涨幅1<0) OR (量能<0.5*N AND 涨幅1<-3*N)) THEN BEGIN DRAWTEXT(c>0 and DISPSTATUS=2,23-(sss*i),'注意反转:股价高位向下反转,中位横盘杀跌,低位向上反转。'),ColorFFFFF5,ALIGN2;
i:=i+1; END
IF 涨幅1>0 and 流通市值<=AL THEN BEGIN DRAWTEXT(c>0 and DISPSTATUS=2,0-(sss*i),'流通市值减小,涨幅加大'),Color00FFFF,ALIGN2; i:=i+1; END
IF 涨幅1<=0 and 流通市值<=AL THEN BEGIN DRAWTEXT(c>0 and DISPSTATUS=2,0-(sss*i),'流通市值加大,涨幅减小'),Color00FFFF,ALIGN2; i:=i+1; END;
换手率:V/CAPITAL*100,pointdot;
换手率1:stickline(换手率<1,0,换手率,8,0),colorffffff;
换手率1至3:stickline(3>换手率 and 换手率>=1,0,换手率,8,0),color00ffff;
stickline(3>换手率 and 换手率>=1,0,1,8,0),colorffffff;
换手率3至6:stickline(6>换手率 and 换手率>=3,0,换手率,8,0),color00aaff;
stickline(6>换手率 and 换手率>=3,1,3,8,0),color00ffff;
stickline(6>换手率 and 换手率>=3,0,1,8,0),colorffffff;
换手率6至10:stickline(10>换手率 and 换手率>=6,0,换手率,8,0),color0066ff;
stickline(10>换手率 and 换手率>=6,3,6,8,0),color00aaff;
stickline(10>换手率 and 换手率>=6,1,3,8,0),color00ffff;
stickline(10>换手率 and 换手率>=6,0,1,8,0),colorffffff;
换手率大于10:stickline(换手率>=10,0,换手率,8,0),color0000ff;
stickline(换手率>=10,6,10,8,0),color0066ff;
stickline(换手率>=10,3,6,8,0),color00aaff;
stickline(换手率>=10,1,3,8,0),color00ffff;
stickline(换手率>=10,0,1,8,0),colorffffff;
hs:=vol*100/CAPITAL;
换手:=hs;
DRAWTEXT(换手>ref(换手,1)*2,2,'变盘'),ALIGN0,COLORred;
DRAWTEXT(换手>5 and REF(HHV(换手,5),1)<5,换手*1.05,'首\n超\n5%'),ALIGN0,COLORWHITE;
DRAWTEXT(换手>8 and REF(HHV(换手,5),1)<8,换手*1.05,'首\n超\n8%'),ALIGN0,COLORWHITE;
aa:=v;
bb:=CAPITAL;
换:=aa*100/bb;
STICKLINE(换>10 and 换>ref(换,1),换,换*0.7,7,0),colorgreen;
DRAWFLAGTEXT(换>ref(换,1)*2,换*0.8,'黑马'),ALIGN0,Color8000FF;{移动光标可找到显示"黑马"}
STICKLINE(换>ref(换,1)*2,换,换*0.85,7,0),Color8000FF;
[url=http://www.70822.com/soft/sort013/sort03/down-10603.html]换手率成交量分析解盘[/url]