- 金币:
-
- 奖励:
-
- 热心:
-
- 注册时间:
- 2002-9-8
|
|
楼主 |
发表于 2007-7-24 08:05
|
显示全部楼层
直接利用成交分类转换为主力持仓量统计的公式
(不妥之处请提出指正)
成交分类
成交额五万以下:SELFDATA('主力成交额5万以下');
成交额十万以下:SELFDATA('主力成交额10万以下');
成交额十万以上:SELFDATA('主力成交额10万以上');
qq:=1000000+(yy*10000)+(mm*100)+dd;
w:=barslast(date<=qq);
qq:=1000000+(yy*10000)+(mm*100)+dd1;
w1:=barslast(date<=qq);
当日收盘价:ref(c,w);
昨日收盘价:ref(c,w1);
收盘价比较:当日收盘价-昨日收盘价;
成交总量一:(成交额五万以下)/1000/当日收盘价;
成交总量二:(成交额十万以下)/1000/当日收盘价;
成交总量三:(成交额十万以上)/1000/当日收盘价;
五万以下买量一:SUM(IF(收盘价比较<=0,成交总量一,0),0)*-1;
五万以下买量二:SUM(IF(收盘价比较>0,成交总量一,0),0);
十万以下买量一:SUM(IF(收盘价比较<=0,成交总量二,0),0)*-1;
十万以下买量二:SUM(IF(收盘价比较>0,成交总量二,0),0);
十万以上买量一:SUM(IF(收盘价比较<=0,成交总量三,0),0)*-1;
十万以上买量二:SUM(IF(收盘价比较>0,成交总量三,0),0);
小单买量:(五万以下买量一+五万以下买量二)*0.63;
大单买量:(十万以下买量一+十万以下买量二+十万以上买量一+十万以上买量二)*0.63;
分布细解
当天大单买量:=SELFDATA('大单买量');
当天小单买量:=SELFDATA('小单买量');
主力仓量:sum(当天大单买量,0),linethick2,COLORblack;
两天前仓:=ref(主力仓量,2);
三天前仓:=ref(主力仓量,3);
五天前仓:=ref(主力仓量,5);
十天前仓:=ref(主力仓量,10);
廿天前仓:=ref(主力仓量,20);
两天增减:主力仓量-两天前仓,LINETHICK0,colorblue;
三天增减:主力仓量-三天前仓,LINETHICK0,color003399;
五天增减:主力仓量-五天前仓,LINETHICK0,color0055ff;
十天增减:主力仓量-十天前仓,LINETHICK0,color00aaff;
廿天增减:主力仓量-廿天前仓,LINETHICK0,colorblack;
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,linethick3;
ma30:MA(主力仓量,30),colorgreen;
ma50:MA(主力仓量,50),CIRCLEDOT,COLORMAGENTA;
主力增减:当天大单买量/FINANCE(7);
drawtext(ma(主力仓量,50)>ref(ma(主力仓量,50),1),ma(主力仓量,50),'o'),COLORblack;
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;
廿天增减比率:廿天增减/CAPITAL*100;
仓量斜率三:ma(主力仓量-ref(主力仓量,1),3)/FINANCE(7),linethick0;
仓量斜率五:ma(主力仓量-ref(主力仓量,1),5)/FINANCE(7),linethick0;
仓量斜率十:ma(主力仓量-ref(主力仓量,1),10)/FINANCE(7),linethick0;
仓量斜率廿:ma(主力仓量-ref(主力仓量,1),20)/FINANCE(7),linethick0; |
|
|
[复制链接]
发表于 2007-7-23 21:27
