- 金币:
-
- 奖励:
-
- 热心:
-
- 注册时间:
- 2007-9-30
|
|
原帖由 hld1437 于 2007-12-5 20:51 发表 
谢谢灰满兄!
还有个不情只请,呵呵,灰满兄,能不能再把盘口主力公式复制下过来!
--------------------------------------
我用的盘口主力公式跟老师的主力持筹公式一样,只是把大买卖量数据改成了盘口主力
盘口主力日增减:SELFDATA('盘口主力') ,linethick0;
主力真实仓位:sum(盘口主力日增减,0),colorwhite,LINETHICK3,layer0;
三天前仓:=ref(主力真实仓位,3);
五天前仓:=ref(主力真实仓位,5);
十天前仓:=ref(主力真实仓位,10);
廿天前仓:=ref(主力真实仓位,20);
三天增减:主力真实仓位-三天前仓,LINETHICK0,color003399;
五天增减:主力真实仓位-五天前仓,LINETHICK0,color0055ff;
十天增减:主力真实仓位-十天前仓,LINETHICK0,color00aaff;
廿天增减:主力真实仓位-廿天前仓,LINETHICK0,colorblue;
机构当日增仓率:盘口主力日增减/FINANCE2(37);
机构三日增仓率:三天增减/FINANCE2(37);
机构五日增仓率:五天增减/FINANCE2(37);
机构十日增仓率:十天增减/FINANCE2(37);
机构廿日增仓率:廿天增减/FINANCE2(37),colorblue;
机构总持仓率:主力真实仓位/FINANCE2(37);
仓量斜率三:ma(主力真实仓位-ref(主力真实仓位,1),3)/CAPITAL*100,linethick0;
仓量斜率五:ma(主力真实仓位-ref(主力真实仓位,1),5)/CAPITAL*100,linethick0;
仓量斜率十:ma(主力真实仓位-ref(主力真实仓位,1),10)/CAPITAL*100,linethick0;
仓量斜率廿:ma(主力真实仓位-ref(主力真实仓位,1),20)/CAPITAL*100,linethick0;
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;
主力增减:盘口主力日增减/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; |
|
|