地元客天元客a 发表于 2016-2-21 17:57

可度量100内各方力量的指标

周期    55   n1   10            n2 20         n3         30



虚拟量:IF(CURRBARSCOUNT=1 AND PERIOD=5,VOL*240/FROMOPEN,DRAWNULL*0.800),NODRAW;
STICKLINE(CURRBARSCOUNT=1 AND PERIOD=5,虚拟量,0,-1,-1),COLOR00C0C0;


VOLUME:VOL,VOLSTICK;
VAR1:=VOL/((H-L)*2-ABS(C-O));
主买:=IF(C>O,VAR1*(H-L),IF(C<O,VAR1*((H-O)+(C-L)),VOL/2)),COLORRED,NODRAW;
主卖:=IF(C>O,0-VAR1*((H-C)+(O-L)),IF(C<O,0-VAR1*(H-L),0+V/2)),COLOR00FF00,NODRAW;
【差】:(主买+主卖),NODRAW,COLOR0000FF;
K:=IF(【差】>0,【差】,-【差】);
STICKLINE(【差】>0,0,K,2.5,0),COLOR000088;
STICKLINE(【差】>0,0,K,1.8,0),COLOR0000AA;
STICKLINE(【差】>0,0,K,1.2,0),COLOR0000CC;
STICKLINE(【差】>0,0,K,0.4,0),COLOR0000EE;
STICKLINE(【差】<0,0,K,2.5,0),COLOR008800;
STICKLINE(【差】<0,0,K,1.8,0),COLOR00AA00;
STICKLINE(【差】<0,0,K,1.2,0),COLOR00CC00;
STICKLINE(【差】<0,0,K,0.4,0),COLOR00EE00;
AA1:=VOL<REF(LLV(VOL,20),1);
AA2:=VOL<REF(LLV(VOL,60),1);
AA3:=VOL<REF(LLV(VOL,100),1);
STICKLINE(AA1,0,V,1,1),COLORBLUE;
STICKLINE(AA2,0,V,0.6,1),COLORMAGENTA;
STICKLINE(AA3,0,V,0.3,1)COLORWHITE;
DDX:=主买+主卖;
DX:=MA(DDX,5)*5;
DDX1:SMA(DX,3,1),COLORRED,LINETHICK1;
DDX2:SMA(DDX1,3,1),COLORYELLOW,LINETHICK1;
DDX3:EMA(DDX2,5),COLORF0F000,LINETHICK1;
X1:=(3*C+L+H+O)/6;
F:=(EMA(CLOSE,5)-EMA(CLOSE,21))*4;
VAR10:=C=HHV(C,4) AND REF(C,1)=LLV(C,4);
VAR20:=C=LLV(C,4) AND (REF(C,1)<REF(C,2) OR REF(C,1)<REF(C,3)) OR REF(C,1)=LLV(C,4) AND C<REF(C,2) OR REF(C,2)=LLV(C,4) AND REF(C,1)=HHV(C,4) AND C<REF(C,1) OR REF(C,3)=LLV(C,4) AND C<REF(C,1) AND C<REF(C,2);
VAR30:=REF(C,1)=LLV(C,4) AND C>=REF(C,2) OR REF(C,2)=LLV(C,4) AND REF(C,1)<=REF(C,3) AND REF(C,2)<REF(C,4) AND C>=REF(C,1);
VAR40:=(20*X1+19*REF(X1,1)+18*REF(X1,2)+17*REF(X1,3)+16*REF(X1,4)+15*REF(X1,5)+
14*REF(X1,6)+13*REF(X1,7)+12*REF(X1,8)+11*REF(X1,9)+10*REF(X1,10)+9*REF(X1,11)+8*REF(X1,12)
+7*REF(X1,13)+6*REF(X1,14)+5*REF(X1,15)+4*REF(X1,16)+3*REF(X1,17)+2*REF(X1,18)+REF(X1,20))/210;
MTM:=C-REF(C,1);
DX1:=100*EMA(EMA(MTM,6),6)/EMA(EMA(ABS(MTM),6),6);
CB:=EMA(VAR40,13);
卖1:=HHV(DX1,2)=HHV(DX1,7) AND COUNT(DX1>50,2) AND CROSS(MA(DX1,2),DX1);
DRAWTEXT(FILTER(卖1=1,1),VOLUME*-0.1,'卖'),COLOR00C800;
买1:=LLV(DX1,2)=LLV(DX1,7) AND COUNT(DX1<0,2) AND CROSS(DX1,MA(DX1,2));
DRAWTEXT(FILTER(DDX1>=DDX2 AND 买1=1,5),VOLUME*-0.1,'买'),COLORYELLOW;
M1:=0;
M2:=HHV(VOL,周期);


百分比0%:MIN(M1,M2),COLORYELLOW;
十二分之一:ABS(M2-M1)*0.0833+MIN(M1,M2),COLOR000099,DOTLINE;
九分之一:ABS(M2-M1)*0.1111+MIN(M1,M2), COLOR660099;
六分之一:ABS(M2-M1)*0.1667+MIN(M1,M2),COLOR990099,DOTLINE;
九分之二:ABS(M2-M1)*0.2222+MIN(M1,M2),COLORCC0099;
四分之一:ABS(M2-M1)*0.25+MIN(M1,M2),COLORFF0099,DOTLINE;
九分之三:ABS(M2-M1)*0.3333+MIN(M1,M2),COLORYELLOW;
十二分之五:ABS(M2-M1)*0.4167+MIN(M1,M2),COLORFF33CC,DOTLINE;
九分之四:ABS(M2-M1)*0.4444+MIN(M1,M2),COLOR9933CC;
百分比50%:ABS(M2-M1)*0.5+MIN(M1,M2),COLORYELLOW;
九分之五:ABS(M2-M1)*0.5556+MIN(M1,M2),COLOR6336CC;
十二分之七:ABS(M2-M1)*0.5833+MIN(M1,M2),COLOR0033CC,DOTLINE;
九分之六:ABS(M2-M1)*0.6667+MIN(M1,M2),COLORYELLOW;
十二分之九:ABS(M2-M1)*0.75+MIN(M1,M2),COLOR000066,DOTLINE;
九分之七:ABS(M2-M1)*0.7778+MIN(M1,M2),COLOR330066;
六分之五:ABS(M2-M1)*0.8333+MIN(M1,M2),COLOR990066,DOTLINE;
九分之八:ABS(M2-M1)*0.8889+MIN(M1,M2),COLORCC0066;
十二分之十一:ABS(M2-M1)*0.9167+MIN(M1,M2),COLORFF0066,DOTLINE;
百分比100%:MAX(M1,M2),COLORYELLOW;

换手:=VOL/CAPITAL*100;
振幅:=ABS(HIGH-LOW)/REF(CLOSE,1)*100;
换手振幅比1:(VOL/CAPITAL*100)/(ABS(HIGH-LOW)/REF(CLOSE,1)*100)*FINANCE(7)/4000,COLORRED,LINETHICK2 ;
LC:=REF(CLOSE,1);
RSI1:SMA(MAX(CLOSE-LC,0),N1,1)/SMA(ABS(CLOSE-LC),N1,1)*100;
RSI2:SMA(MAX(CLOSE-LC,0),N2,1)/SMA(ABS(CLOSE-LC),N2,1)*100;
RSI3:SMA(MAX(CLOSE-LC,0),N3,1)/SMA(ABS(CLOSE-LC),N3,1)*100;

翡翡翠 发表于 2016-2-21 18:49


周期    55   n1   10            n2 20         n3         30



虚拟量:IF(CURRBARSCOUNT=1 AND PERIOD=5,VOL*240/FROMOPEN,DRAWNULL*0.800),NODRAW;
STICKLINE(CURRBARSCOUNT=1 AND PERIOD=5,虚拟量,0,-1,-1),COLOR00C0C0;


VOLUME:VOL,VOLSTICK;
VAR1:=VOL/((H-L)*2-ABS(C-O));
主买:=IF(C>O,VAR1*(H-L),IF(C<O,VAR1*((H-O)+(C-L)),VOL/2)),COLORRED,NODRAW;
主卖:=IF(C>O,0-VAR1*((H-C)+(O-L)),IF(C<O,0-VAR1*(H-L),0+V/2)),COLOR00FF00,NODRAW;
【差】主买+主卖),NODRAW,COLOR0000FF;
K:=IF(【差】>0,【差】,-【差】);
STICKLINE(【差】>0,0,K,2.5,0),COLOR000088;
STICKLINE(【差】>0,0,K,1.8,0),COLOR0000AA;
STICKLINE(【差】>0,0,K,1.2,0),COLOR0000CC;
STICKLINE(【差】>0,0,K,0.4,0),COLOR0000EE;
STICKLINE(【差】<0,0,K,2.5,0),COLOR008800;
STICKLINE(【差】<0,0,K,1.8,0),COLOR00AA00;
STICKLINE(【差】<0,0,K,1.2,0),COLOR00CC00;
STICKLINE(【差】<0,0,K,0.4,0),COLOR00EE00;
AA1:=VOL<REF(LLV(VOL,20),1);
AA2:=VOL<REF(LLV(VOL,60),1);
AA3:=VOL<REF(LLV(VOL,100),1);
STICKLINE(AA1,0,V,1,1),COLORBLUE;
STICKLINE(AA2,0,V,0.6,1),COLORMAGENTA;
STICKLINE(AA3,0,V,0.3,1)COLORWHITE;
DDX:=主买+主卖;
DX:=MA(DDX,5)*5;
DDX1:SMA(DX,3,1),COLORRED,LINETHICK1;
DDX2:SMA(DDX1,3,1),COLORYELLOW,LINETHICK1;
DDX3:EMA(DDX2,5),COLORF0F000,LINETHICK1;
X1:=(3*C+L+H+O)/6;
F:=(EMA(CLOSE,5)-EMA(CLOSE,21))*4;
VAR10:=C=HHV(C,4) AND REF(C,1)=LLV(C,4);
VAR20:=C=LLV(C,4) AND (REF(C,1)<REF(C,2) OR REF(C,1)<REF(C,3)) OR REF(C,1)=LLV(C,4) AND C<REF(C,2) OR REF(C,2)=LLV(C,4) AND REF(C,1)=HHV(C,4) AND C<REF(C,1) OR REF(C,3)=LLV(C,4) AND C<REF(C,1) AND C<REF(C,2);
VAR30:=REF(C,1)=LLV(C,4) AND C>=REF(C,2) OR REF(C,2)=LLV(C,4) AND REF(C,1)<=REF(C,3) AND REF(C,2)<REF(C,4) AND C>=REF(C,1);
VAR40:=(20*X1+19*REF(X1,1)+18*REF(X1,2)+17*REF(X1,3)+16*REF(X1,4)+15*REF(X1,5)+
14*REF(X1,6)+13*REF(X1,7)+12*REF(X1,8)+11*REF(X1,9)+10*REF(X1,10)+9*REF(X1,11)+8*REF(X1,12)
+7*REF(X1,13)+6*REF(X1,14)+5*REF(X1,15)+4*REF(X1,16)+3*REF(X1,17)+2*REF(X1,18)+REF(X1,20))/210;
MTM:=C-REF(C,1);
DX1:=100*EMA(EMA(MTM,6),6)/EMA(EMA(ABS(MTM),6),6);
CB:=EMA(VAR40,13);
卖1:=HHV(DX1,2)=HHV(DX1,7) AND COUNT(DX1>50,2) AND CROSS(MA(DX1,2),DX1);
DRAWTEXT(FILTER(卖1=1,1),VOLUME*-0.1,'卖'),COLOR00C800;
买1:=LLV(DX1,2)=LLV(DX1,7) AND COUNT(DX1<0,2) AND CROSS(DX1,MA(DX1,2));
DRAWTEXT(FILTER(DDX1>=DDX2 AND 买1=1,5),VOLUME*-0.1,'买'),COLORYELLOW;
M1:=0;
M2:=HHV(VOL,周期);


百分比0%:MIN(M1,M2),COLORYELLOW;
十二分之一:ABS(M2-M1)*0.0833+MIN(M1,M2),COLOR000099,DOTLINE;
九分之一:ABS(M2-M1)*0.1111+MIN(M1,M2), COLOR660099;
六分之一:ABS(M2-M1)*0.1667+MIN(M1,M2),COLOR990099,DOTLINE;
九分之二:ABS(M2-M1)*0.2222+MIN(M1,M2),COLORCC0099;
四分之一:ABS(M2-M1)*0.25+MIN(M1,M2),COLORFF0099,DOTLINE;
九分之三:ABS(M2-M1)*0.3333+MIN(M1,M2),COLORYELLOW;
十二分之五:ABS(M2-M1)*0.4167+MIN(M1,M2),COLORFF33CC,DOTLINE;
九分之四:ABS(M2-M1)*0.4444+MIN(M1,M2),COLOR9933CC;
百分比50%:ABS(M2-M1)*0.5+MIN(M1,M2),COLORYELLOW;
九分之五:ABS(M2-M1)*0.5556+MIN(M1,M2),COLOR6336CC;
十二分之七:ABS(M2-M1)*0.5833+MIN(M1,M2),COLOR0033CC,DOTLINE;
九分之六:ABS(M2-M1)*0.6667+MIN(M1,M2),COLORYELLOW;
十二分之九:ABS(M2-M1)*0.75+MIN(M1,M2),COLOR000066,DOTLINE;
九分之七:ABS(M2-M1)*0.7778+MIN(M1,M2),COLOR330066;
六分之五:ABS(M2-M1)*0.8333+MIN(M1,M2),COLOR990066,DOTLINE;
九分之八:ABS(M2-M1)*0.8889+MIN(M1,M2),COLORCC0066;
十二分之十一:ABS(M2-M1)*0.9167+MIN(M1,M2),COLORFF0066,DOTLINE;
百分比100%:MAX(M1,M2),COLORYELLOW;

换手:=VOL/CAPITAL*100;
振幅:=ABS(HIGH-LOW)/REF(CLOSE,1)*100;
换手振幅比1VOL/CAPITAL*100)/(ABS(HIGH-LOW)/REF(CLOSE,1)*100)*FINANCE(7)/4000,COLORRED,LINETHICK2 ;
LC:=REF(CLOSE,1);
RSI1:SMA(MAX(CLOSE-LC,0),N1,1)/SMA(ABS(CLOSE-LC),N1,1)*100;
RSI2:SMA(MAX(CLOSE-LC,0),N2,1)/SMA(ABS(CLOSE-LC),N2,1)*100;
RSI3:SMA(MAX(CLOSE-LC,0),N3,1)/SMA(ABS(CLOSE-LC),N3,1)*100;

2479916533 发表于 2016-2-21 19:01

通达信安装公式测试失败。参数如何设置?谢谢

南屏晚钟 发表于 2016-2-21 20:31

学习学习再学习,努力努力再努力

大大陆大 发表于 2016-2-21 18:13

:):):):):)

地元客天元客a 发表于 2016-2-21 18:25

谢谢分享,简单明了。

辉煌999 发表于 2016-2-21 18:25

可度量100内各方力量的指标

地元客天元客a 发表于 2016-2-21 18:32

谢谢分享,简单明了。

vacuumwu 发表于 2016-2-21 18:33

谢谢楼主分享

凌成 发表于 2016-2-21 18:36

谢谢楼主分享

小白cx 发表于 2016-2-21 18:39

可度量100内各方力量的指标

地元客天元客a 发表于 2016-2-21 18:41

谢谢分享,简单明了。

1608910781 发表于 2016-2-21 18:45

谢谢楼主分享

吾道问道 发表于 2016-2-21 18:51

谢谢分享,好好学习,天天向上。

木子李大哥 发表于 2016-2-21 18:59

谢谢楼主的分享

hfzhou 发表于 2016-2-21 19:05

谢谢楼主分享
页: [1] 2
查看完整版本: 可度量100内各方力量的指标