软件名称:[B]超赢1号选股公式[/B]
软件类型:国产软件
运行环境:Win2000/WinXP/Win2003/WinVista
软件语言:简体中文
授权方式:共享软件
软件大小:6.00 KB
官方主页:Home Page
更新时间:2010-04-27 09:36:54
软件简介:
从网上搜集,组合而成的超赢1号选股公式,刚才发错地方,请多多包涵!多多指教!!
超赢1号池选股公式源码(转帖)
il:ref(ma(max(abs(ln(c)-ln(o)),abs(ln(c)-ln(ref(c,1))))/amount*100000000,10),1);
特大单源码:
特买:"分笔0.特买#tick",LINETHICK7,COLORred;
特卖:"分笔0.特卖#tick",LINETHICK7,COLORgreen;
特买:=特买;
特卖:=特卖;
特大净:特买-特卖,LINETHICK0,colorFFFF00;
HS:=vol/capital;
DD:=Sum(特大净,1);
DT:=(特买+特卖);
当日总交易: DT, linethick0,coloryellow;
STICKLINE(DT>0,特大净,特大净+DD,5,0),COLORRed;
STICKLine(DT<0,特大净+DD,特大净,5,0),COLORGreen;
当日成交 := (DD * capital) * DYNAINFO(11)/10000;
买入手数 := (capital*DT)/100;
净买比:买入手数/vol,linethick0,COLORWHITE;
if (当日成交>=0) then
begin
Str1:= '净买入:'+ NUMTOSTRN(当日成交,0)+'万元,';
Str2 := '净买入:'+ NUMTOSTRN(买入手数,0)+'手,';
Str3 := '当日增减度:' + NUMTOSTRN(DT,3);
end;
if 当日成交<0 then
begin
Str1:= '净卖出:'+ NUMTOSTRN(当日成交,0)+'万元,';
Str2 := '净卖出:'+ NUMTOSTRN(买入手数,0)+'手,';
Str3 := '当日增减度:' + NUMTOSTRN(DT,3);
end;
DRAWFLAGTEXT(DT>=0,特大净,Str1+str2+str3),COLORRED;
DRAWFLAGTEXT(DT<0,特大净,Str1+str2+str3),COLORGREEN;
DRAWTEXTREL(1,30,STKLABEL),ColorEEBB88;DRAWTEXTREL(85,30,STKNAME),ColorEEBB88;
[url=http://www.70822.com/soft/sort013/sort03/down-19312.html]超赢1号选股公式[/url]