超赢指标全套源码

天地我心 · 发表于 2009-9-29 12:24

马上注册，享用更多功能，让你轻松玩转本论坛。

您需要登录才可以下载或查看，没有账号？立即注册

×

主力持仓

HS:=vol/capital;
DD:=BIGORDER(1,2)-BIGORDER(2,2);
DT:=HS*DD*100;
主力持仓: 50+Sum(DT,0),linethick2;
当日增减度: DT, linethick0;
STICKLINE(DT>0,主力持仓,主力持仓+DT,5,0),COLORRed;
STICKLine(DT<0,主力持仓+DT,主力持仓,5,0),COLORGreen;
当日成交 := (DT * capital) * DYNAINFO(11)/10000;
买入手数 := (capital*DT)/100;
净买比:买入手数/vol*100,linethick0;

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;

特大持仓

HS:=vol/capital;
DD:=BIGORDER(1,3)-BIGORDER(2,3);
DT:=HS*DD*100;
机构持仓: Sum(DT,0),linethick2;
当日增减度: DT, linethick0;
STICKLINE(DT>0,机构持仓,机构持仓+DT,5,0),COLORRed;
STICKLine(DT<0,机构持仓+DT,机构持仓,5,0),COLORGreen;
当日成交 := (DT * capital) * DYNAINFO(11)/10000;
买入手数 := (capital*DT)/100;
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;

大户持仓

HS:=vol/capital;
DD:=(BIGORDER(1,2)-BIGORDER(2,2))-(BIGORDER(1,3)-BIGORDER(2,3));
DT:=HS*DD*100;
大户持仓: 50+Sum(DT,0),linethick2;
当日增减度T, linethick0;
STICKLINE(DT>0,大户持仓,大户持仓+DT,5,0),COLORRed;
STICKLine(DT<0,大户持仓+DT,大户持仓,5,0),COLORGreen;
当日成交 := (DT * capital) * DYNAINFO(11)/10000;
买入手数 := (capital*DT)/100;
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;

中户持仓

HS:=vol/capital;
DD:=(BIGORDER(1,1)-BIGORDER(2,1))-(BIGORDER(1,2)-BIGORDER(2,2));
DT:=HS*DD*100;
中户持仓: 50+Sum(DT,0),linethick2;
当日增减度: DT, linethick0;
STICKLINE(DT>0,中户持仓,中户持仓+DT,5,0),COLORRed;
STICKLine(DT<0,中户持仓+DT,中户持仓,5,0),COLORGreen;
当日成交 := (DT * capital) * DYNAINFO(11)/10000;
买入手数 := (capital*DT)/100;
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;

散户持仓

HS:=vol/capital;
DD:=-(BIGORDER(1,1)-BIGORDER(2,1));
DT:=HS*DD*100;
散户持仓: Sum(DT,0),linethick2;
当日增减度: DT, linethick0;
STICKLINE(DT>0,散户持仓,散户持仓+DT,5,0),COLORRed;
STICKLine(DT<0,散户持仓+DT,散户持仓,5,0),COLORGreen;

当日成交 := (DT * capital) * DYNAINFO(11)/10000;
买入手数 := (capital*DT)/100;
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;

资金流向

一日资金流入:amount*BIGORDER(1,2)/10000,colorred,linethick0;
一日资金流出:amount*BIGORDER(2,2)/10000,colorgreen,linethick0;
净额:一日资金流入-一日资金流出,linethick0;
十日飘红:count(净额>0,10),colorred;
连续飘红:last(净额>0);

stickline(净额>0,0,净额,3,0),colorred,linethick2;
stickline(净额<0,净额,0,3,0),colorgreen,linethick2;
0,dotline,colorwhite;

持仓统计：利用此指标可在动态显示牌排序

HS:=vol/capital;
DD:=BIGORDER(1,2)-BIGORDER(2,2);
DT:=HS*DD*100;
主力持仓: 50+Sum(DT,0);
当日增减度: DT, linethick0;
当日成交 := (DT * capital) * DYNAINFO(11)/10000;
买入手数 := (capital*DT)/100;
净买比:买入手数/vol*100,linethick0;

一日增仓:Sum(DT,1);
二日增仓:Sum(DT,2);
三日增仓:Sum(DT,3);
五日增仓:Sum(DT,5);
十日增仓:Sum(DT,10);
二十日增仓:Sum(DT,20);

一日净买比:Sum(净买比,1);
二日净买比:Sum(净买比,2);
三日净买比:Sum(净买比,3);
五日净买比:Sum(净买比,5);
十日净买比:Sum(净买比,10);
二十日净买比:Sum(净买比,20);

长豆豆了呀 · 发表于 2009-9-29 13:00

真的假的哦

天地我心 · 发表于 2009-9-29 13:02

当然是真的如果假的你可以举报十倍退赔

虎1234 · 发表于 2009-9-29 14:00

一缕阳光 · 发表于 2009-10-1 02:50

祝论坛的全体朋友国庆、中秋双节愉快!

一缕阳光 · 发表于 2009-10-1 02:50

祝论坛的全体朋友国庆、中秋双节愉快!

一缕阳光 · 发表于 2009-10-1 02:51

关注中关注中

小潘2009 · 发表于 2009-10-2 00:24

密切关注中。

天地我心 · 发表于 2009-10-3 00:05

小树 · 发表于 2009-10-12 20:10

真的假的哦

小树 · 发表于 2009-10-12 20:21

LZ,我买了。
怎么用?
请指教!
学习学习再学习!

443050899 · 发表于 2009-10-13 16:45

请问用在哪个软件上的。。。

中华股民 · 发表于 2009-12-13 21:10

下来看看,不知是什么软件上的

hnlb · 发表于 2009-12-13 23:57

LZ,我买了。
怎么用?
请指教!
学习学习再学习!

hnlb · 发表于 2009-12-13 23:58

通达信的函数不能用请指点

		自动登录	找回密码
密码			立即注册