最近学习了秀山老师的<指标用法实盘模拟第二期>帖子,对其中的虚拟量指标比较感兴趣,先来一张老师的 {虚拟成交量}
当前量:VOL,linethick0;
stickline((c>o or c>ref(c,1)),0,vol,7,0),COLORRED;
stickline(c<o or c<=ref(c,1),0,vol,7,0),COLORCYAN;
CS005:=CURRENTTIME;
IF BARSTATUS=2 AND CS005>93000 AND DATATYPE=8 THEN BEGIN
CS010:=DYNAINFO(7);
CS020:=DYNAINFO(17);
CS030:=DYNAINFO(10);
CS040:=REF(MA(VOL,5),1);
预测成交量:IF(CS010=CLOSE AND CS030=AMOUNT,MAX(VOL,CS020*CS040),0),linethick0;
STICKLINE(CS010=CLOSE AND CS030=AMOUNT,VOL,MAX(VOL,CS020*CS040),7,1),COLORGRAY,PRECIS0;
END;
VOL5:MA(VOL,5);
VOL20:MA(VOL,20);
换手:V/CAPITAL*100;
三日换手:SUM(换手,3);
虚拟量搞定以后,又看上了秀山版主的主买主卖数据了,于是又在论坛翻了一通,发现有两种方法实现
一种呢是用扩展数据,统计分笔成交里面的主买和主卖,最后加到一起,这个秀山版主也发过帖子了
但是毕竟分笔数据比较庞大,咱也不可能保存个长时间的分笔数据,我就在想,有没有不用扩展数据做到统计主买和主卖呢?又在坛子里面一顿乱找,还真给我找到了,在股民1+1兄的一个帖子)里面有下面一段,我想这不正是我要的么
VAR1:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));
主买:=IF(CLOSE>OPEN,VAR1*(HIGH-LOW),IF(CLOSE<OPEN,VAR1*((HIGH-OPEN)+(CLOSE-LOW)),VOL/2)),COLORRED ;
主卖:=IF(CLOSE>OPEN,VAR1*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE<OPEN,VAR1*(HIGH-LOW),VOL/2)),COLOR00FF00 ;
于是乎,我把两种方法都放到虚拟量指标里面去了..发现数据差异不小啊 自己想了半天,发现还是想不明白,于是想发到论坛上,希望像各位老师请教
另外,我想学秀山老师在指标左边搞一个框框显示数据..比挤在指标栏上面看的清楚一点,结果样子是做出来了,但是发现一个问题,就是只能显示当天的数据,就是说我把数据移到前一个或者前几个交易日的K线上,下面框框里面的数据不会变的..汗..查了半天资料,也没发现什么原因,但是看千钧老师飞狐里面的千钧赢富指标感觉是可以变的...这个问题顺便一起请教吧!
附我的源码
{虚拟成交量}
当前量:VOL,linethick0;
stickline((c>o or c>ref(c,1)),0,vol,7,0),COLORRED;
stickline(c<o or c<=ref(c,1),0,vol,7,0),COLORCYAN;
CS005:=CURRENTTIME;
IF BARSTATUS=2 AND CS005>93000 AND DATATYPE=8 THEN BEGIN
CS010:=DYNAINFO(7);
CS020:=DYNAINFO(17);
CS030:=DYNAINFO(10);
CS040:=REF(MA(VOL,5),1);
预测成交量:IF(CS010=CLOSE AND CS030=AMOUNT,MAX(VOL,CS020*CS040),0),linethick0;
STICKLINE(CS010=CLOSE AND CS030=AMOUNT,VOL,MAX(VOL,CS020*CS040),7,1),COLORGRAY,PRECIS0;
END;
VOL5:MA(VOL,5);
VOL20:MA(VOL,20);
换手:=V/CAPITAL*100;
三日换手:=SUM(换手,3);
JJ:=(H+L+3*C)/5;
VAR1:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));
主买:=IF(CLOSE>OPEN,VAR1*(HIGH-LOW),IF(CLOSE<OPEN,VAR1*((HIGH-OPEN)+(CLOSE-LOW)),VOL/2));
主买额:主买*JJ/100,linethick0;
主买分笔:extdata(1),linethick0;
主卖:=IF(CLOSE>OPEN,VAR1*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE<OPEN,VAR1*(HIGH-LOW),VOL/2));
主卖额:主卖*JJ/100,linethick0;
主卖分笔:extdata(2),linethick0;
净买:(主买-主卖)*JJ/100,LINETHICK0;
净买分笔:extdata(5),linethick0;
DRAWRECTREL(0,0,150,1200,RGB(30,30,30)),COLORBLACK;
DRAWTEXTREL(10,50,'主买:'+主买分笔),COLORred;
DRAWTEXTREL(10,250,'主卖:'+主卖分笔),COLORgreen;
DRAWTEXTREL(10,450,'净买:'+净买分笔),coloryellow;
{点击看本软件截图：58股票 公式网 http://www. 58gu. com 整理} |
