新浪博客

手把手教你做龙虎看盘（附源码）

2009-12-13 12:36阅读：

http://blog.sina.cn/dpool/blog/u/1233587231

说明：以下内容均为虎拓指标作者杨软老师所原创，因为喜欢他的作品，特转贴到我的博客来永久留存，在此谢谢杨软老师


此帖给初学者学习，大智慧工程师勿看。
一、在技术分析面版右击，切分子窗口，选右侧，新建一个新的模块。
手把手教你做龙虎看盘（附源码）

二、弹出窗口选Top指标，再将模块切分成上下两个模块（任选）。
手把手教你做龙虎看盘（附源码）

三、单击Top模块右上角的“设”，在弹出菜单选“新建指标”。
手把手教你做龙虎看盘（附源码）


四、弹出公式编辑窗口，给公式起个名称，点选“饼图”。　
手把手教你做龙虎看盘（附源码）
五、把附件的公式粘入，确定完成，调整到适合的大小。 LHKP.txt (2.37 KB)
手把手教你做龙虎看盘（附源码）

手把手教你做龙虎看盘（附源码）

对比一下，数据与L2有点出入，但与TOP版却分毫不差（看来L2用户又给大智慧工程师忽悠啦）。
如果大家对图形的颜色不喜欢，可自己调整。（附大智慧图颜色，零时顺时针方向开始!）
color#5454ff
color#bf3f3f
color#2a2a7f
color#15153f
----------------
color#153f3f
color#2a7f7f
color#3fbfbf
color#ffff54


{LHKP原码：}
DDMR:=(bigorder(1,2)-bigorder(2,2))*v/capital*100; DDMRs:=sum(Ddmr,0); {以上公式不要删除，公式由博易-杨软设计} vb:=v/order(1); vs:=v/order(2); Chb:=bigorder(1,3)*order(1)*vb; Dhb:=(bigorder(1,2)-bigorder(1,3))*order(1)*vb; Zhb:=(bigorder(1,1)-bigorder(1,2))*order(1)*vb; Xhb:=(1-bigorder(1,1))*order(1)*vb; Hj:=chb+dhb+zhb+xhb; Chs:=bigorder(2,3)*order(2)*vs; Dhs:=(bigorder(2,2)-bigorder(2,3))*order(2)*vs; Zhs:=(bigorder(2,1)-bigorder(2,2))*order(2)*vs; Xhs:=(1-bigorder(2,1))*order(2)*vs; hjb:=chb+dhb-(chs+dhs); 特买单:chb,colorbe65e1; 大买单:dhb,COLOR1E90FF; 中买单:zhb,COLORFF7F50; 小买单:xhb,COLOR008000; u:=特买单+大买单+中买单+小买单; 特卖单:chs,color521aa6; 大卖单:dhs,COLOR1870e5; 中卖单:zhs,COLORb86b79; 小卖单:xhs,COLOR006000; us:=特卖单+大卖单+中卖单+小卖单; DRAWTEXTABS(0,255,'委'),color00ffff; DRAWTEXTABS(0,275,'买'),color00ffff; DRAWTEXTABS(0,295,'单'),color00ffff; DRAWTEXTABS(0,230,' 共'+v/vb+'单，'+vb+'手/单'),color0022ee; DRAWTEXTABS(0,238,'─────────────────────'),color00ffff; DRAWTEXTABS(20,250,'特单：'+STRRIGHT(' '+NUMTOSTRN(特买单,0),7)+' 占'+STRRIGHT(' '+NUMTOSTRN(特买单/u*100,2),6)+'%'),colorbe65e1; DRAWTEXTABS(20,265,'大单：'+STRRIGHT(' '+NUMTOSTRN(大买单,0),7)+' 占'+STRRIGHT(' '+NUMTOSTRN(大买单/u*100,2),6)+'%'),COLOR52a5FF; DRAWTEXTABS(20,280,'中单：'+STRRIGHT(' '+NUMTOSTRN(中买单,0),7)+' 占'+STRRIGHT(' '+NUMTOSTRN(中买单/u*100,2),6)+'%'),COLORFF7F50; DRAWTEXTABS(20,295,'小单：'+STRRIGHT(' '+NUMTOSTRN(小买单,0),7)+' 占'+STRRIGHT(' '+NUMTOSTRN(小买单/u*100,2),6)+'%'),COLOR008000; DRAWTEXTABS(0,340,'委'),color00ffff; DRAWTEXTABS(0,360,'卖'),color00ffff; DRAWTEXTABS(0,380,'单'),color00ffff; DRAWTEXTABS(0,315,' 共'+v/vs+'单，'+vs+'手/单'),color00ee22; DRAWTEXTABS(0,323,'─────────────────────'),color00ffff; DRAWTEXTABS(20,335,'特单：'+STRRIGHT(' '+NUMTOSTRN(特卖单,0),7)+' 占'+STRRIGHT(' '+NUMTOSTRN(特卖单/us*100,2),6)+'%'),color521aa6; DRAWTEXTABS(20,350,'大单：'+STRRIGHT(' '+NUMTOSTRN(大卖单,0),7)+' 占'+STRRIGHT(' '+NUMTOSTRN(大卖单/us*100,2),6)+'%'),COLOR1E90FF; DRAWTEXTABS(20,365,'中单：'+STRRIGHT(' '+NUMTOSTRN(中卖单,0),7)+' 占'+STRRIGHT(' '+NUMTOSTRN(中卖单/us*100,2),6)+'%'),COLORb86b79; DRAWTEXTABS(20,380,'小单：'+STRRIGHT(' '+NUMTOSTRN(小卖单,0),7)+' 占'+STRRIGHT(' '+NUMTOSTRN(小卖单/us*100,2),6)+'%'),COLOR008000;


{单数差原码：}
{超赢分析} DRAWRECTABS(0,0,450,107,rgb(55,55,01)),color0033ff; DRAWRECTABS(32,1,91,106,rgb(80,11,10)),color000000; DRAWRECTABS(150,1,211,106,rgb(77,11,10)),color000000; DRAWRECTABS(90,1,151,106,rgb(66,11,10)),color000000; DRAWRECTABS(210,1,271,106,rgb(55,11,10)),color000000; DRAWRECTABS(00,25,449,00,rgb(200,100,01)),color0000ff; DRAWRECTABS(32,0 ,148 ,107 ,0 ),color0000ff; DRAWRECTABS(88,0 ,208 ,107 ,0 ),color0000ff; DRAWRECTABS(275,0 ,384 ,107 ,0 ),color0000ff; DRAWTEXTABS(3 ,10 ,'单差'),colorwhite; vb:=v/order(1); vs:=v/order(2); Chb:=bigorder(1,3)*order(1)*vb; Dhb:=(bigorder(1,2)-bigorder(1,3))*order(1)*vb; Zhb:=(bigorder(1,1)-bigorder(1,2))*order(1)*vb; Xhb:=(1-bigorder(1,1))*order(1)*vb; Hj:=chb+dhb+zhb+xhb; Chs:=bigorder(2,3)*order(2)*vs; Dhs:=(bigorder(2,2)-bigorder(2,3))*order(2)*vs; Zhs:=(bigorder(2,1)-bigorder(2,2))*order(2)*vs; Xhs:=(1-bigorder(2,1))*order(2)*vs; hjb:=chb+dhb-(chs+dhs); chbb:=ma(chb/hj,5); dhbb:=ma(dhb/hj,5); zhbb:=ma(zhb/hj,5); xhbb:=ma(xhb/hj,5); 超户五:chbb*100,LINETHICK0,color0000ff; 大户五:dhbb*100,LINETHICK0,colorcc00cc; 中户五:zhbb*100,LINETHICK0,color0000cc; 散户五:xhbb*100,LINETHICK0,color00ddaa; DRAWTEXTABS(25 ,10 ,' 特大单差'),colorwhite; DRAWTEXTABS(5 ,30 ,'今日 '+numtostrn(ref(chb-chs,0),0)+'单' ),colorwhite; DRAWTEXTABS(5 ,50 ,'昨日 '+numtostrn(ref(chb-chs,1),0)+'单' ),colorwhite; DRAWTEXTABS(5 ,70 ,'前日 '+numtostrn(ref(chb-chs,2),0) +'单'),colorwhite; DRAWTEXTABS(5 ,90 ,'3 日 '+numtostrn(ref(chb-chs,3),0) +'单'),colorwhite; DRAWTEXTABS(90 ,10 ,' 大单差'),colorwhite; DRAWTEXTABS(90 ,30 ,numtostrn(ref(dhb-dhs,0),0)+'单' ),colorwhite; DRAWTEXTABS(90 ,50 ,numtostrn(ref(dhb-dhs,1),0)+'单' ),colorwhite; DRAWTEXTABS(90 ,70 ,numtostrn(ref(dhb-dhs,2),0) +'单'),colorwhite; DRAWTEXTABS(90 ,90 ,numtostrn(ref(dhb-dhs,3),0) +'单'),colorwhite; DRAWTEXTABS(150 ,10 ,' 中单差'),colorwhite; DRAWTEXTABS(150 ,30 ,numtostrn(ref(zhb-zhs,0),0)+'单' ),colorwhite; DRAWTEXTABS(150 ,50 ,numtostrn(ref(zhb-zhs,1),0)+'单' ),colorwhite; DRAWTEXTABS(150 ,70 ,numtostrn(ref(zhb-zhs,2),0) +'单'),colorwhite; DRAWTEXTABS(150 ,90 ,numtostrn(ref(zhb-zhs,3),0) +'单'),colorwhite; DRAWTEXTABS(210 ,10 ,' 小单差'),colorwhite; DRAWTEXTABS(210 ,30 ,numtostrn(ref(xhb-xhs,0),0)+'单' ),colorwhite; DRAWTEXTABS(210 ,50 ,numtostrn(ref(xhb-xhs,1),0)+'单' ),colorwhite; DRAWTEXTABS(210 ,70 ,numtostrn(ref(xhb-xhs,2),0) +'单'),colorwhite; DRAWTEXTABS(210 ,90 ,numtostrn(ref(xhb-xhs,3),0) +'单'),colorwhite; DRAWTEXTABS(280 ,10 ,' 五日平均买单比'),colorwhite; DRAWRECTABS(280 ,30 ,280+ref(chbb,0)*100 ,40,rgb(255,0,0) ),color000000; DRAWRECTABS(280+ref(chbb,0)*100 ,30 ,280+ref(chbb+dhbb,0)*100 ,40,rgb(200,0,200) ),color000000; DRAWRECTABS(280+ref(chbb+dhbb,0)*100 ,30 ,280+ref(chbb+dhbb+zhbb,0)*100 ,40,rgb(160,0,0) ),color000000; DRAWRECTABS(280+ref(chbb+dhbb+zhbb,0)*100 ,30 ,280+ref(chbb+dhbb+zhbb+xhbb,0)*100 ,40,rgb(100,200,0) ),color000000; DRAWRECTABS(280 ,50 ,280+ref(chbb,1)*100 ,60,rgb(255,0,0) ),color000000; DRAWRECTABS(280+ref(chbb,01)*100 ,50 ,280+ref(chbb+dhbb,1)*100 ,60,rgb(200,00,200) ),color000000; DRAWRECTABS(280+ref(chbb+dhbb,01)*100 ,50 ,280+ref(chbb+dhbb+zhbb,1)*100 ,60,rgb(160,0,0) ),color000000; DRAWRECTABS(280+ref(chbb+dhbb+zhbb,01)*100 ,50 ,280+ref(chbb+dhbb+zhbb+xhbb,1)*100 ,60,rgb(100,200,0) ),color000000; DRAWRECTABS(280 ,70 ,280+ref(chbb,2)*100 ,80,rgb(255,0,0) ),color000000; DRAWRECTABS(280+ref(chbb,02)*100 ,70 ,280+ref(chbb+dhbb,2)*100 ,80,rgb(200,00,200) ),color000000; DRAWRECTABS(280+ref(chbb+dhbb,02)*100 ,70 ,280+ref(chbb+dhbb+zhbb,2)*100 ,80,rgb(160,0,0) ),color000000; DRAWRECTABS(280+ref(chbb+dhbb+zhbb,02)*100 ,70 ,280+ref(chbb+dhbb+zhbb+xhbb,2)*100 ,80,rgb(100,200,0) ),color000000; DRAWRECTABS(280 ,90 ,280+ref(chbb,3)*100 ,100,rgb(255,0,0) ),color000000; DRAWRECTABS(280+ref(chbb,03)*100 ,90 ,280+ref(chbb+dhbb,3)*100 ,100,rgb(200,00,200) ),color000000; DRAWRECTABS(280+ref(chbb+dhbb,03)*100 ,90 ,280+ref(chbb+dhbb+zhbb,3)*100 ,100,rgb(160,0,0) ),color000000; DRAWRECTABS(280+ref(chbb+dhbb+zhbb,03)*100 ,90 ,280+ref(chbb+dhbb+zhbb+xhbb,3)*100 ,100,rgb(100,200,0) ),color000000; DRAWRECTABS(280 ,30 ,380 ,40,0 ),colorwhite; DRAWRECTABS(280 ,50 ,380 ,60,0 ),colorwhite; DRAWRECTABS(280 ,70 ,380 ,80 ,0 ),colorwhite; DRAWRECTABS(280 ,90,380 ,100 ,0 ),colorwhite; DRAWTEXTABS(385 ,10 ,' 主力单差'),colorwhite; DRAWTEXTABS(385 ,30 ,numtostrn(ref(hjb,0),0)+'单' ),colorwhite; DRAWTEXTABS(385 ,50 ,numtostrn(ref(hjb,1),0)+'单' ),colorwhite; DRAWTEXTABS(385 ,70 ,numtostrn(ref(hjb,2),0) +'单'),colorwhite; DRAWTEXTABS(385 ,90 ,numtostrn(ref(hjb,3),0) +'单'),colorwhite;


我的更多文章

下载客户端阅读体验更佳

APP专享