|
|
|
原帖由 chacterchen 于 2007-9-9 11:43 发表 
我还没有学习到这里 你把相关网页或者公式传上来吧 我这里有五一到现在的prp 数据 有空的话 可以算一算的!
老大原话:
六个指数主力持仓的走势lymanqun
十三级MACD会员
状态 在线
9800楼使用道具 发表于 2007-3-16 20:23
资料 个人空间 短消息 加为好友
先让大家用上数据和公式,共可看六个指数主力持仓的走势——全部A股(市场全貌——包括上海A股,深圳A股,中小板所有股票),沪深300,上证50,深成40,深证100,中证100(沪深100只权重股),下面是公式,只给了一个公式,其他依法炮制(即把'全部A股大买量'改成“沪深300大买量',“全部A股大卖量'改成” 沪深300大卖量”,然后将公式起名为“沪深300”即可,其他不用改,就可用了,引入我发上来的自定义数据,将其一一引入,即可在副图下,股票日线数据下看到了这六个指数主力持仓的走势图,其它依此类推),图和数据如下
适用于分析家6。0;分析家5。0,飞狐,大智慧和大智慧L2
全部A股
大买:=SELFDATA('全部A股大买量');
大卖:=SELFDATA('全部A股大卖量');
当天增减大买-大卖),LINETHICK0,COLOR0000ff;
主力仓量:sum(大买-大卖,0),COLORGRAY;
三天前仓:=ref(主力仓量,3);
五天前仓:=ref(主力仓量,5);
十天前仓:=ref(主力仓量,10);
廿天前仓:=ref(主力仓量,20);
三天增减:主力仓量-三天前仓,LINETHICK0,color003399;
五天增减:主力仓量-五天前仓,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,linethick2;
ma30:MA(主力仓量,30),colorgreen;
ma50:MA(主力仓量,50),CIRCLEDOT,COLORMAGENTA;
drawtext(ma(主力仓量,50)>ref(ma(主力仓量,50),1),ma(主力仓量,50),'o'),COLORBLACK;
赶快下,明天MACD就上不了了,有此市场全貌图和各个指数主力持仓,你对大盘运行完全在你掌握之中!!!,何时进何时出一目了然
[ 本帖最后由 lymanqun 于 2007-3-16 20:29 编辑 ]
以上的全A公式在L2用有语法问题.
下面的可以.
好吧,一统江湖版来了。
主力仓量显示我用了白色,加粗了,象依然大哥的白底会看来出来,调一下就行了。
比较讨厌的是多了六个0.00的显示,把其他重要的数值推到后面去了,没找到原因
{主力持仓大全}
DRAWTEXTABS(200,0,'主力持仓大全-lymanqun原创');
ss:=STKLABEL;
if STRCMP(ss,'000002')=0 then{全部A股}
begin
drawtextrel(10,10,STKNAME);
大买:=SELFDATA('全部A股大买量');
大卖:=SELFDATA('全部A股大卖量');
end
else if STRCMP(ss,'000300')=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
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 {个股}
begin
drawtextrel(10,10,STKNAME);
大买:=SELFDATA('大买量');{单位:手(百股)}
大卖:=SELFDATA('大卖量');
end
流通股:FINANCE(7);{(CAPITAL/100)}{单位:万股}
当天增减大买-大卖),LINETHICK0,COLOR0000ff;
主力仓量:sum(大买-大卖,0),COLORwhite,linethick4;
{主力持仓百分率:sum(主力仓量,0)/(流通股*10000/100)*100%,linethick0;}
三天前仓:=ref(主力仓量,3);
五天前仓:=ref(主力仓量,5);
十天前仓:=ref(主力仓量,10);
廿天前仓:=ref(主力仓量,20);
三天增减:主力仓量-三天前仓,LINETHICK0,color003399;
五天增减:主力仓量-五天前仓,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;
主力增减:当天增减/FINANCE(7);
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;
当天增减比率:当天增减/CAPITAL*100;
三天增减比率:三天增减/CAPITAL*100;
五天增减比率:五天增减/CAPITAL*100;
十天增减比率:十天增减/CAPITAL*100;
廿天增减比率:廿天增减/CAPITAL*100;
仓量斜率3:ma(主力仓量-ref(主力仓量,1),3)/FINANCE(7),linethick0;
仓量斜率5:ma(主力仓量-ref(主力仓量,1),5)/FINANCE(7),linethick0;
仓量斜率10:ma(主力仓量-ref(主力仓量,1),10)/FINANCE(7),linethick0;
仓量斜率20:ma(主力仓量-ref(主力仓量,1),20)/FINANCE(7),linethick0;
我的数据整理完了,先试着说一说吧(以大智慧L2为样板)
以“全部A股大买量”为例,先点“自定义数据”》》点“新建”》》在”名称“一栏里填”全部A股大买量“》》在”属性“一栏里,选择”股票无关序列值“》》在”与指标横向统计关联“的左面小方框中打上勾》》点”指标“》》选择”主力持筹“指标》》指向”大单买量“(分析周期选择”分笔成交“)》》在”计算时用除权后数据“左面小方框打上勾,在”统计方法“的右面矩形方框中选择”“总和”》》在”股票统计范围“中将”全部A股“点黑(黑圆点)点”确定“——设置完毕,可刷新计算了(用我发给你们的数据,以后数据自己每天再算吧,要想自己把数据全部算出来没4~5个钟头完不成的,每天算数据时,只保留一天的分笔,其他天的剪切到别处,否则算数据时会把所有天的分笔一起算——慢得像蜗牛),其它数据如法炮制,如图:
主力持筹
Var1:=AMOUNT/VOL/100;
Var2:=REF(ASKPRICE(1),1);
Var3:=REF(BIDPRICE(1),1);
Var4:=(Var2-Var3)*0.35;
Var5:=IF(Var1>=Var2-Var4,VOL,IF(Var1<Var2-Var4 AND Var1>Var3+Var4,BUYVOL,0));
Var6:=IF(Var1<=Var3+Var4,VOL,IF(Var1<Var2-Var4 AND Var1>Var3+Var4,SELLVOL,0));
J: SUM(Var5,0);
大单买量:SUM(IF(AMOUNT>=50000,Var5,0),0);
T: SUM(Var6,0);
大单卖量:SUM(IF(AMOUNT>=50000,Var6,0),0);
Var2;
P: Var1;
Var3;
VOL, VOLSTICK;
U: EMA(J-T,3);
Var7:=BARSLAST(CLOSE>REF(CLOSE,1));
Var8:=BARSLAST(CLOSE<REF(CLOSE,1));
Var9:=SUM(IF(REF(CLOSE,Var7)<=CLOSE,VOL,0),0);
VarA:=SUM(IF(REF(CLOSE,Var8)>=CLOSE,VOL,0),0);
U1: EMA(Var9-VarA,3);
[ 本帖最后由 lymanqun 于 2007-3-16 21:46 编辑 ]
好吧,一统江湖版来了。
主力仓量显示我用了白色,加粗了,象依然大哥的白底会看来出来,调一下就行了。
比较讨厌的是多了六个0.00的显示,把其他重要的数值推到后面去了,没找到原因
{主力持仓大全}
DRAWTEXTABS(200,0,'主力持仓大全-lymanqun原创');
ss:=STKLABEL;
if STRCMP(ss,'000002')=0 then{全部A股}
begin
drawtextrel(10,10,STKNAME);
大买:=SELFDATA('全部A股大买量');
大卖:=SELFDATA('全部A股大卖量');
end
else if STRCMP(ss,'000300')=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
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 {个股}
begin
drawtextrel(10,10,STKNAME);
大买:=SELFDATA('大买量');{单位:手(百股)}
大卖:=SELFDATA('大卖量');
end
流通股:FINANCE(7);{(CAPITAL/100)}{单位:万股}
当天增减大买-大卖),LINETHICK0,COLOR0000ff;
主力仓量:sum(大买-大卖,0),COLORwhite,linethick4;
{主力持仓百分率:sum(主力仓量,0)/(流通股*10000/100)*100%,linethick0;}
三天前仓:=ref(主力仓量,3);
五天前仓:=ref(主力仓量,5);
十天前仓:=ref(主力仓量,10);
廿天前仓:=ref(主力仓量,20);
三天增减:主力仓量-三天前仓,LINETHICK0,color003399;
五天增减:主力仓量-五天前仓,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;
主力增减:当天增减/FINANCE(7);
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;
当天增减比率:当天增减/CAPITAL*100;
三天增减比率:三天增减/CAPITAL*100;
五天增减比率:五天增减/CAPITAL*100;
十天增减比率:十天增减/CAPITAL*100;
廿天增减比率:廿天增减/CAPITAL*100;
仓量斜率3:ma(主力仓量-ref(主力仓量,1),3)/FINANCE2(37),linethick0;
仓量斜率5:ma(主力仓量-ref(主力仓量,1),5)/FINANCE2(37),linethick0;
仓量斜率10:ma(主力仓量-ref(主力仓量,1),10)/FINANCE2(37),linethick0;
仓量斜率20:ma(主力仓量-ref(主力仓量,1),20)/FINANCE2(37),linethick0;
[ 本帖最后由 chinavrml 于 2007-3-18 20:01 编辑 ]
以上公式需要"全部A股的大买卖量.",所以希望老大或老同志共享出至今的"全部A股的大买卖量."数据.先谢谢了! |
|
|