软件名称：[B]博弈VOL[/B]
软件类型：国产软件
运行环境：Win9X/Win2000/WinXP/Win2003/Win7/
软件语言：简体中文
授权方式：免费版
软件大小：16.0 KB
官方主页：Home Page
更新时间：2015-02-22 13:29:56
软件简介:
博弈VOL
MID:=(3*CLOSE+LOW+OPEN+HIGH)/6;
中轴:=(20*MID+19*REF(MID,1)+18*REF(MID,2)+17*REF(MID,3)+16*REF(MID,4)+15*REF(MID,5)+14*REF(MID,6)+13*REF(MID,7)+12*REF(MID,8)+11*REF(MID,9)+10*REF(MID,10)+9*REF(MID,11)+8*REF(MID,12)+7*REF(MID,13)+6*REF(MID,14)+5*REF(MID,15)+4*REF(MID,16)+3*REF(MID,17)+2*REF(MID,18)+REF(MID,20))/210;
上轨:=中轴+4*STD(中轴,21);
强轨:=中轴+2*STD(中轴,21);
弱轨:=中轴-2*STD(中轴,21);
下轨:=中轴-4*STD(中轴,21);
宽度:上轨/下轨,linethick0;
成交额:AMOUNT/100000000,LINETHICK0,colorred,PRECIS2;
T日:=if(CURRENTTIME>93000 and CURRENTTIME<150000,
if(CURRENTTIME<113000,(TIMETOT0(CURRENTTIME)-34200),
if(CURRENTTIME>130000,(TIMETOT0(CURRENTTIME)-39600),7200)),14400);
T60:=if(MOD(T日,3600)=0,3600,MOD(T日,3600));
T30:=if(MOD(T日,1800)=0,1800,MOD(T日,1800));
T15:=if(MOD(T日,900)=0,900,MOD(T日,900));
T5:=if(MOD(T日,300)=0,300,MOD(T日,300));
T1:=if(MOD(T日,60)=0,60,MOD(T日,60));
TT:=if(DATATYPE=8,vol*14400/ T日,
if(DATATYPE=7,vol*3600/T60,
if(DATATYPE=6,vol*1800/T30,
if(DATATYPE=5,vol*900/T15,
if(DATATYPE=4,vol*300/T5,
if(DATATYPE=4,vol*60/T1,0))))));
预测成交量:=IF(BARSTATUS=2,TT,0);
STICKLINE(BARSTATUS=2,预测成交量,VOL,6,01),COLOR00FFFF,DOTLINE,LAYER7;
量＿价:=1;CTKG:=1;
W:=量＿价;
EPSL:=0.0001;
ZZ:=(C+H+L)/3;
TJA:=ZZ>=MAX(C,O) AND CTKG=1;{倒锤头};
TJB:=ZZ<=MIN(C,O) AND CTKG=1;{正锤头};
ZF:=IF(TJA,1,IF(TJB,-1,0));{正负数};
TJ0:=TJA OR TJB;
TJ1:=H=L AND C>REF(C,1);{一字涨停};
TJ2:=H=L AND C<REF(C,1);{一字跌停};
TJ3:=H=L AND C=REF(C,1);{连续一字涨、跌停};
量_价:=IF(W=1,VOL,AMOUNT);{平盘量,白色}
{以下4句组合属核心公式，版权属于JIPGEMLING.见凌见}
EE:=IF(TJ1,EPSL,IF(TJ2,-EPSL,0));
ZL:=2*(H-L)+ABS(C-O)+3*IF(TJ3,EPSL,ABS(EE));
JGL_DX:=(IF(TJ0,2/3*(2*C-H-L)+ZF*ABS(C-O),(C-O))+EE)/ZL;
买卖差:=JGL_DX*量_价;
DXx:JGL_DX*100,COLORGREEN,linethick0;
D连红:last(DXx>0),precis0,linethick0,COLORB468FF;
买盘:=量_价*(1+JGL_DX)/2;
卖盘:=量_价*(1-JGL_DX)/2;
VAR1:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));
主动买盘:=IF(CLOSE>OPEN,VAR1*(HIGH-LOW),IF(CLOSE<OPEN,VAR1*((HIGH-OPEN)+(CLOSE-LOW)),VOL/2));
主动卖盘:=IF(CLOSE>OPEN,0-VAR1*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE<OPEN,0-VAR1*(HIGH-LOW),0-VOL/2));
{因为可能会出现卖出量为0的BUG，所以放在最后参考}
VAR2:=HIGH-LOW;
VAR3:=ABS(OPEN-CLOSE);
VAR4:=HIGH-(IF(CLOSE>OPEN,CLOSE,OPEN));
VAR5:=(IF(CLOSE>OPEN,OPEN,CLOSE))-LOW;
VAR6:=VAR3/VAR2*VOL;
VAR7:=VAR4/VAR2*VOL;
VAR8:=VAR5/VAR2*VOL;
VAR9:=IF(VOL/CAPITAL>0.001,1,EXP(ABS(LOG(VOL/CAPITAL*100))));
VARA:=(CLOSE-MA(CLOSE,5))/MA(CLOSE,5)*100;
VARB:=MA(CLOSE,5)>MA(CLOSE,10) AND MA(CLOSE,10)>MA(CLOSE,30) AND MA(CLOSE,30)>MA(CLOSE,60);
VARC:=MA(CLOSE,5)<MA(CLOSE,10) AND MA(CLOSE,10)<MA(CLOSE,30);
DRAWTEXT(VAR9>2 AND VOL<MA(VOL,5)/2,VOL,'地量'),COLORRED;
DRAWTEXT(VAR7>VAR6 AND VARA>2 AND VAR7>VAR8 AND CLOSE>MA(CLOSE,5) AND CLOSE>MA(CLOSE,30) AND HIGH>MA(CLOSE,60) AND VOL>MA(VOL,5) AND VAR7>=MA(VOL,5),VOL,'逢高出货'),COLORRED;
DRAWTEXT(VAR8>VAR6 AND VAR8>VAR7 AND VARA<-2 AND CLOSE<MA(CLOSE,30) AND VAR8<MA(VOL,5)/2 AND MA(VOL,5)<MA(VOL,10),VOL,'逢低跟进'),COLORGREEN;
DRAWTEXT(VAR6>MA(VOL,5)*2 AND VAR6>=VAR7 AND VAR6>=VAR8 AND CLOSE>OPEN OR VOL>MA(VOL,5)*3 AND VARB,VOL,'强势参与'),COLORCC99CC;
DRAWTEXT(VAR6>=VAR7 AND VAR6>=VAR8 AND CLOSE<OPEN AND VAR6/VOL>0.7 AND VARC AND VAR6>MA(VOL,5),VOL,'空头释放'),COLORFF00FF;
净量:=主动买盘+主动卖盘;
STICKLINE(C<O ,0,VOL,7.0,0),COLORFF1100;
STICKLINE(C<O ,0,VOL,6.0,0),COLORFF3300;
STICKLINE(C<O ,0,VOL,5.2,0),COLORFF5500;
STICKLINE(C<O ,0,VOL,4.0,0),COLORFF7700;
STICKLINE(C<O ,0,VOL,2.8,0),COLORFF9900;
STICKLINE(C<O ,0,VOL,1.6,0),COLORFFBB00;
STICKLINE(C=O AND C<REF(C,1),0,VOL,7.0,0),COLOR006000;
STICKLINE(C=O AND C<REF(C,1),0,VOL,6.0,0),COLOR007500;
STICKLINE(C=O AND C<REF(C,1),0,VOL,5.2,0),COLOR009100;
STICKLINE(C=O AND C<REF(C,1),0,VOL,4.0,0),COLOR00A600;
STICKLINE(C=O AND C<REF(C,1),0,VOL,2.8,0),COLOR00BB00;
STICKLINE(C=O AND C<REF(C,1),0,VOL,1.6,0),COLOR00CC00;
STICKLINE(C=O AND C>REF(C,1),0,VOL,7.0,0),COLOR555555;
STICKLINE(C=O AND C>REF(C,1),0,VOL,6.0,0),COLOR777777;
STICKLINE(C=O AND C>REF(C,1),0,VOL,5.2,0),COLOR999999;
STICKLINE(C=O AND C>REF(C,1),0,VOL,4.0,0),COLORBBBBBB;
STICKLINE(C=O AND C>REF(C,1),0,VOL,2.8,0),COLORDDDDDD;
STICKLINE(C=O AND C>REF(C,1),0,VOL,1.6,0),COLORFFFFFF;
STICKLINE(C>O,0,VOL,7.0,0),COLORFF11FF;
STICKLINE(C>O,0,VOL,6.0,0),COLORFF33FF;
STICKLINE(C>O,0,VOL,5.2,0),COLORFF55FF;
STICKLINE(C>O,0,VOL,4.0,0),COLORFF77FF;
STICKLINE(C>O,0,VOL,2.8,0),COLORFF99FF;
STICKLINE(C>O,0,VOL,1.6,0),COLORFFBBFF;
资金异动:=VOL/MA(VOL,55)*100;
STICKLINE(主动买盘>0,0,主动买盘,7.0,0),COLOR000055;
STICKLINE(主动买盘>0,0,主动买盘,6.0,0),COLOR000077;
STICKLINE(主动买盘>0,0,主动买盘,5.2,0),COLOR000099;
STICKLINE(主动买盘>0,0,主动买盘,4.0,0),COLOR0000BB;
STICKLINE(主动买盘>0,0,主动买盘,2.8,0),COLOR0000DD;
STICKLINE(主动买盘>0,0,主动买盘,1.6,0),COLOR0000FF;
STICKLINE(主动卖盘<0,0,主动卖盘,7.0,0),COLOR006000;
STICKLINE(主动卖盘<0,0,主动卖盘,6.0,0),COLOR007500;
STICKLINE(主动卖盘<0,0,主动卖盘,5.2,0),COLOR009100;
STICKLINE(主动卖盘<0,0,主动卖盘,4.0,0),COLOR00A600;
STICKLINE(主动卖盘<0,0,主动卖盘,2.8,0),COLOR00BB00;
STICKLINE(主动卖盘<0,0,主动卖盘,1.6,0),COLOR00CC00;
STICKLINE(资金异动>100 ,0,VOL,2.5,0),COLORYELLOW;
DDX:=买盘-卖盘;
MADDX:=MA(DDX,5)*15;
DDX1:SMA(MADDX,3,1),COLORRED,LINETHICK1;
DDX2:SMA(DDX1,3,1),COLORGREEN,LINETHICK1;
DDX3:SMA(DDX2,3,1),COLORYELLOW,LINETHICK1;
DRAWICON(CROSS(DDX2,DDX1) AND DDX3>V,DDX2,2);
HHV(V,21),COLORRED;
[url=http://www.70822.com/soft/sort013/sort03/down-79219.html]博弈VOL[/url]