- 金币:
-
- 奖励:
-
- 热心:
-
- 注册时间:
- 2004-8-9
|
|
楼主 |
发表于 2008-8-7 14:30
|
显示全部楼层
发了很多次，加强一下
QUOTE:
原帖由 pmxz 于 2008-6-27 09:01 发表
依然老师，请教个问题，您的新公式里有昨日机构增仓、三日增率等等数据，我的没有，我用的也是大智慧新一代L2收费版的，不知道是什么原因，是不是需要建自定义数据才能显示？如果要建，能告诉我需要建那些自定义 ...
用此公式——（数据是每天发的"机构增仓-盘口主力-大买量大卖量－大买额大卖额-大单买量大单卖量－BS－欧奈尔排名"中的机构增仓数据）
机构数据
jgr:=BIGORDER(1,3);{机构委买，>100万元，委买特大单比例}
jgc:=BIGORDER(2,3);{机构委卖，>100万元，委卖特大单比例}
wdr:=order(1);
wdc:=order(2);
委买:=wdr/(wdr+wdc)*v;
委卖:=wdc/(wdr+wdc)*v;
机构委买量:=jgr*委买;
机构委卖量:=jgc*委卖;
机构净入:SELFDATA('机构增仓') ,linethick0;{自定义数据名字是什么，这里就写什么}
主力仓量:sum(机构净入,0),colorgreen,LINETHICK3;
三天前仓:=ref(主力仓量,3);
五天前仓:=ref(主力仓量,5);
十天前仓:=ref(主力仓量,10);
廿天前仓:=ref(主力仓量,20);
三天增减:主力仓量-三天前仓,LINETHICK0,coloryellow;
五天增减:主力仓量-五天前仓,LINETHICK0,color0055ff;
十天增减:主力仓量-十天前仓,LINETHICK0,color00aaff;
廿天增减:主力仓量-廿天前仓,LINETHICK0,color00ffff;
机构当日增仓率:机构净入/FINANCE2(37);
机构三日增仓率:三天增减/FINANCE2(37);
机构五日增仓率:五天增减/FINANCE2(37);
机构十日增仓率:十天增减/FINANCE2(37);
机构廿日增仓率:廿天增减/FINANCE2(37);
机构总持仓率:主力仓量/FINANCE2(37);
仓量斜率3:ma(主力仓量-ref(主力仓量,1),3)/CAPITAL*100,linethick0;
仓量斜率5:ma(主力仓量-ref(主力仓量,1),5)/CAPITAL*100,linethick0;
仓量斜率10:ma(主力仓量-ref(主力仓量,1),10)/CAPITAL*100,linethick0;
仓量斜率20:ma(主力仓量-ref(主力仓量,1),20)/CAPITAL*100,linethick0;
STICKLINE(机构净入>0,机构净入,0,6,0),COLOR0000ff;
STICKLINE(机构净入<0,机构净入,0,6,0),color00ff00;
ma5:MA(主力仓量,5),colorred;
ma10:MA(主力仓量,10),COLORGRAY;
ma20:MA(主力仓量,20),COLORBLUE,linethick4;
ma30:MA(主力仓量,30),colorgreen;
ma50:MA(主力仓量,50),CIRCLEDOT,COLORMAGENTA;
主力增减:机构净入/FINANCE2(37);
drawtext(ma(主力仓量,50)>ref(ma(主力仓量,50),1),ma(主力仓量,50),'o'),COLORgray;
{PARTLINE(ma50,ma50<ma30 and ma50>ref(ma50,1) and ma30>ref(ma30,1),rgb(255,0,0),
ma50<ma30,rgb(255,255,0),
ma50>ma30 and ma50>ref(ma50,1) and ma30>ref(ma30,1),rgb(255,0,255),
1,rgb(0,0,255)),CIRCLEDOT;
}
PARTLINE(ma50<ma30 and ma50>ref(ma50,1) and ma30>ref(ma30,1),ma50),color0000ff,CIRCLEDOT;
PARTLINE(ma50<ma30 and (ma50<ref(ma50,1) or ma30<ref(ma30,1)),ma50),color00ffff,CIRCLEDOT;
PARTLINE(ma50>ma30 and ma50>ref(ma50,1) and ma30>ref(ma30,1),ma50),colorff00ff,CIRCLEDOT;
PARTLINE(ma50>ma30 and (ma50<ref(ma50,1) or ma30<ref(ma30,1)),ma50),colorff0000;
持仓大全（也称为主力持筹公式）
DRAWTEXTABS(200,0,'主力持仓大全-lymanqun原创');
ss:=STKLABEL;
if STRCMP(TYPESTR ,'指数' )=0 then
begin
if STRCMP(ss,'000001')=0 then{全部A股}
begin
drawtextrel(10,10,STKNAME);
大买:=SELFDATA('全部A股大买量');
大卖:=SELFDATA('全部A股大卖量');
end
else if STRCMP(ss,'000300')=0 or strcmp(ss,'399300')=0 then{沪深300}
begin
drawtextrel(10,10,STKNAME);
大买:=SELFDATA('沪深300大买量');
大卖:=SELFDATA('沪深300大卖量');
end
else if STRCMP(ss,'399001')=0 then{深成40}
begin
drawtextrel(10,10,STKNAME);
大买:=SELFDATA('深成40大买量');
大卖:=SELFDATA('深成40大卖量');
end
if STRCMP(ss,'399106')=0 then{深证A股}
begin
drawtextrel(10,10,STKNAME);
大买:=SELFDATA('深证综指大买量');
大卖:=SELFDATA('深证综指大卖量');
end
else if STRCMP(ss,'000016')=0 then{上证50}
begin
drawtextrel(10,10,STKNAME);
大买:=SELFDATA('上证50大买量');
大卖:=SELFDATA('上证50大卖量');
end
else if STRCMP(ss,'399004')=0 then{深证100}
begin
drawtextrel(10,10,STKNAME);
大买:=SELFDATA('深证100大买量');
大卖:=SELFDATA('深证100大卖量');
end
else if STRCMP(ss,'000903')=0 then{中证100}
begin
drawtextrel(10,10,STKNAME);
大买:=SELFDATA('中证100大买量');
大卖:=SELFDATA('中证100大卖量');
end
else if STRCMP(ss,'000904')=0 then{中证200}
begin
drawtextrel(10,10,STKNAME);
大买:=SELFDATA('中证200大买量');
大卖:=SELFDATA('中证200大卖量');
end
else if STRCMP(ss,'000905')=0 then{中证500}
begin
drawtextrel(10,10,STKNAME);
大买:=SELFDATA('中证500大买量');
大卖:=SELFDATA('中证500大卖量');
end
end
else {个股}
begin
drawtextrel(10,10,STKNAME);
大买:=SELFDATA('大买量');{单位：手(百股)}
大卖:=SELFDATA('大卖量');
end
if STRCMP(ss,'AA01')=0 then{非权重指数股}
begin
drawtextrel(10,10,STKNAME);
大买:=SELFDATA('非权重指数股大买额');
大卖:=SELFDATA('非权重指数股大卖额');
end
if STRCMP(ss,'000907')=0 then{中证700}
begin
drawtextrel(10,10,STKNAME);
大买:=SELFDATA('中证700大买额');
大卖:=SELFDATA('中证700大卖额');
end
流通股:CAPITAL/100,colorwhite;
当天增减:(大买-大卖),LINETHICK0,COLORyellow;
主力仓量:sum(当天增减,0),COLORgreen,linethick4;
三天前仓:=ref(主力仓量,3);
五天前仓:=ref(主力仓量,5);
十天前仓:=ref(主力仓量,10);
廿天前仓:=ref(主力仓量,20);
三天增减:主力仓量-三天前仓,LINETHICK0,colorwhite;
五天增减:主力仓量-五天前仓,LINETHICK0,color0055ff;
十天增减:主力仓量-十天前仓,LINETHICK0,color00aaff;
廿天增减:主力仓量-廿天前仓,LINETHICK0,color00ffff;
FILLRGN(廿天增减,0,廿天增减>0,rgb(255,255,00),廿天增减<0,rgb(00,255,255));
{廿天增减,COLORWHITE;}
FILLRGN(十天增减,0,十天增减>0,rgb(255,170,00),十天增减<0,rgb(00,170,255));
{十天图:十天增减,COLORWHITE;}
FILLRGN(五天增减,0,五天增减>0,rgb(255,85,00),五天增减<0,rgb(00,85,255));
{五天图:五天增减,COLORWHITE;}
FILLRGN(三天增减,0,三天增减>0,rgb(153,51,00),三天增减<0,rgb(00,51,153));
{三天图:三天增减,COLORWHITE;}
STICKLINE(当天增减>0,当天增减,0,6,0),COLOR0000ff;
STICKLINE(当天增减<0,当天增减,0,6,0),color00ff00;
ma5:MA(主力仓量,5),colorred;
ma10:MA(主力仓量,10),COLORGRAY;
ma20:MA(主力仓量,20),COLORBLUE,linethick4;
ma30:MA(主力仓量,30),colorgreen;
ma50:MA(主力仓量,50),CIRCLEDOT,COLORMAGENTA;
主力增减:当天增减/流通股;
drawtext(ma(主力仓量,50)>ref(ma(主力仓量,50),1),ma(主力仓量,50),'o'),COLORgray;
{PARTLINE(ma50,ma50<ma30 and ma50>ref(ma50,1) and ma30>ref(ma30,1),rgb(255,0,0),
ma50<ma30,rgb(255,255,0),
ma50>ma30 and ma50>ref(ma50,1) and ma30>ref(ma30,1),rgb(255,0,255),
1,rgb(0,0,255)),CIRCLEDOT;
}
PARTLINE(ma50<ma30 and ma50>ref(ma50,1) and ma30>ref(ma30,1),ma50),color0000ff,CIRCLEDOT;
PARTLINE(ma50<ma30 and (ma50<ref(ma50,1) or ma30<ref(ma30,1)),ma50),color00ffff,CIRCLEDOT;
PARTLINE(ma50>ma30 and ma50>ref(ma50,1) and ma30>ref(ma30,1),ma50),colorff00ff,CIRCLEDOT;
PARTLINE(ma50>ma30 and (ma50<ref(ma50,1) or ma30<ref(ma30,1)),ma50),colorff0000;
当天增减比率:当天增减/流通股;
三天增减比率:三天增减/流通股;
五天增减比率:五天增减/流通股;
十天增减比率:十天增减/流通股;
廿天增减比率:廿天增减/流通股;
仓量斜率3:ma(主力仓量-ref(主力仓量,1),3)/流通股,linethick0;
仓量斜率5:ma(主力仓量-ref(主力仓量,1),5)/流通股,linethick0;
仓量斜率10:ma(主力仓量-ref(主力仓量,1),10)/流通股,linethick0;
仓量斜率20:ma(主力仓量-ref(主力仓量,1),20)/流通股,linethick0;
控盘系数:主力仓量*80/CAPITAL;
[ 本帖最后由 trj1982 于 2008-8-7 14:45 编辑 ] |
|
|
陕ICP19026207号—2 陕ICP备20004035号
:
发表于 2008-8-9 13:25
