- 金币:
-
- 奖励:
-
- 热心:
-
- 注册时间:
- 2002-3-15
|
|
昨天贴的主力持筹修改版,我又改了下,主要是颜色对应方面。
另外,送给大家一个主图简单解盘,也是配合明天老师的这个公式的(适用于飞狐),把代码拷贝到主图公式中即可。
主力持筹副图:
大买:=SELFDATA('大买量');
大卖:=SELFDATA('大卖量');
当天增减:(大买-大卖),LINETHICK0,COLOR0000ff;
主力仓量:sum(大买-大卖,0),stick,COLORGRAY;
三天前仓:=ref(主力仓量,3);
五天前仓:=ref(主力仓量,5);
十天前仓:=ref(主力仓量,10);
廿天前仓:=ref(主力仓量,20);
三天增减:主力仓量-三天前仓,LINETHICK0,color003399;
五天增减:主力仓量-五天前仓,LINETHICK0,color0055ff;
十天增减:主力仓量-十天前仓,LINETHICK0,color00aaff;
廿天增减:主力仓量-廿天前仓,LINETHICK0,color00ffff;
廿天图1:FILLRGN(廿天增减<0,廿天增减,0),colorffff00;
廿天图2:FILLRGN(廿天增减>0,廿天增减,0),color00ffff;
廿天图3:廿天增减,COLORWHITE;
十天图1:FILLRGN(十天增减<0,十天增减,0),colorffaa00;
十天图2:FILLRGN(十天增减>0,十天增减,0),color00aaff;
十天图3:十天增减,COLORWHITE;
五天图1:FILLRGN(五天增减<0,五天增减,0),colorff5500;
五天图2:FILLRGN(五天增减>0,五天增减,0),color0055ff;
五天图3:五天增减,COLORWHITE;
三天图1:FILLRGN(三天增减<0,三天增减,0),colorff0000;
三天图2:FILLRGN(三天增减>0,三天增减,0),color003399;
三天图3:三天增减,COLORWHITE;
当日图1:STICKLINE(当天增减>0,当天增减,0,6,0),COLOR0000ff;
当日图2:STICKLINE(当天增减<0,当天增减,0,6,0),color00ff00;
ma5:MA(主力仓量,5),colorred;
ma10:MA(主力仓量,10),COLORGRAY;
ma30:MA(主力仓量,30),colorgreen;
ma50:MA(主力仓量,50),CIRCLEDOT,COLORMAGENTA;
drawtext(ma(主力仓量,50)>ref(ma(主力仓量,50),1),ma(主力仓量,50),'o'),COLORBLUE;
主图代码
{五日换手和}
换手率:=VOL/FINANCE(7),VOLSTICK;
换手率和:=SUM(换手率,5);
{解盘}
drawtext(barpos=sysparam(2),h,
' '+blkname{板块}
+'\n 流通 '+NUMTOSTR(FINANCE(7),0)+'万 '{资料}
+'每股收益 '+NUMTOSTR(FINANCE(33),2)+'元 '{资料}
+'净资收益率 '+NUMTOSTR(FINANCE(37),2)+'% '{资料}
+'主营增长 '+NUMTOSTR(FINANCE(53),2)+'% '{资料}
+'利润增长 '+NUMTOSTR(FINANCE(54),0)+'%'{资料}
+'\n 当天增减 '+NUMTOSTR("SUR-主力持筹.当天增减",0)+' '{主力动态}
+'主力仓量 '+NUMTOSTR("SUR-主力持筹.主力仓量",0)+' '
+'获利盘 '+NUMTOSTR(winner(c)*100,0)+'% '
+'五天换手 '+NUMTOSTR(换手率和,0)+'% '{五日换手}
+'\n 三天增减 '+NUMTOSTR("SUR-主力持筹.三天增减",0)+' '{主力动态}
+'\n 五天增减 '+NUMTOSTR("SUR-主力持筹.五天增减",0)+' '{主力动态}
+'\n 十天增减 '+NUMTOSTR("SUR-主力持筹.十天增减",0)+' '{主力动态}
+'\n 廿天增减 '+NUMTOSTR("SUR-主力持筹.廿天增减",0)+' '{主力动态}
),ALIGN4,COLORCYAN;
[ 本帖最后由 Surreal 于 2006-12-17 13:50 编辑 ] |
本帖子中包含更多资源
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
|
|