通达信成交量组合指标公式源码副图

PJ:=(H+L+C)/3;
V1:=IF(H=L,1,H-MAX(O,C));
V2:=IF(H=L,1,MAX(C,O)-PJ);
V3:=IF(H=L,1,MIN(O,C)-L);
V4:=IF(H=L,1,PJ-MIN(C,O));
V5:=vol/IF(H=L,4,H-L);
V6:=(V1*V5)+(V2*V5);
V7:=(V3*V5)+(V4*V5);
WP1:=DYNAINFO(23);
NP1:=DYNAINFO(22);
WP2:=IF(ISLASTBAR,V7*240/FROMOPEN,V7);
NP2:=IF(ISLASTBAR,V6*240/FROMOPEN,V6);
主买:IF(ISLASTBAR AND PERIOD=5,WP1,WP2),COLORRED,NODRAW;
主卖:IF(ISLASTBAR AND PERIOD=5,NP1,NP2),COLORGREEN,NODRAW;
净量:=Abs(主买-主卖);
DRAwrECTREL(0,00,CONST(主买*300/(主买+主卖)),70,RGB(230,65,0));
DRAWRECTREL(0,70,CONST(主卖*300/(主买+主卖)),130,RGB(0,104,0));
主买1:=BUYVOL,COLORLIRED,NODRAW;
主卖1:=-SELLVOL,COLORLIBLUE,NODRAW;
净买:BUYVOL-SELLVOL,COLORMAGENTA,NODRAW;
{www.gszb.comFWH58地量买点}
VOLUME:=VOL,VOLSTICK;
IF(crOSS(0.9,1/VOL*1000>0.01 AND "kdj.J"<0),VOLUME*1.1,0),COLORYELLOW,LINETHICK1;{www.gszb.com黄三角}
X_1:=IF(PERIOD=1,5,IF(PERIOD=2,15,IF(PERIOD=3,30,IF(PERIOD=4,60,IF(PERIOD=5,240,1)))));
X_2:=MOD(FROMOPEN,X_1);
X_3:=IF(X_2<0.5,X_1,X_2);
X_4:=IF(CURRBARSCOUNT=1,VOL*X_1/X_3,DRAWNULL);
STICKLINE(CURRBARSCOUNT=1 AND (SETCODE=0 OR SETCODE=1),X_4,0,(-1),(-1)),COLOR00C0C0;
量:VOL,VOLSTICK;
X_5:=IF(CAPITAL=0,AMOUNT/100000000,VOL/CAPITAL*100);
X_6:=EMA(X_5,5);
X_7:=MA(X_5,13);
X_8:=X_5<REF(LLV(X_5,25),1) AND X_6<X_7;
X_9:=BARSLAST(X_8);
五倍量:=IF(CROSS(COUNT(CROSS(VOL>REF(VOL*5,X_9),0.5),X_9)=1,0.5),VOL,0),NODRAW,COLOR00CCFF;
量比:VOL/REF(MA(VOL,5),1),NODRAW,COLORAAAAAA;
换手:VOL/CAPITAL*100,COLORWHITE;
X_10:=VOL=HHV(VOL,30);
X_11:=BARSLAST(FILTER(CROSS(0.9,X_10),2))+1;
X_12:=REF(VOL,X_11);
STICKLINE(X_11<=30,X_12,X_12,1,0),COLOR00CCFF;
X_13:=VOL=LLV(VOL,20);
X_14:=BARSLAST(FILTER(CROSS(0.9,X_13),2))+1;
X_15:=REF(VOL,X_14);
STICKLINE(X_14<=30,X_15,X_15,4,0),COLORFFAA00;
上涨数:"999999$ADVANCE"+"399001$ADVANCE",COLORRED,NODRAW;
下跌数:"999999$DECLINE"+"399001$DECLINE",COLORLIGREEN,NODRAW;
{www.gszb.com四色分析}
VAR92:=(HIGH - LOW);
VAR93:=ABS((OPEN - CLOSE));
VAR94:=(HIGH - IF((CLOSE > OPEN),CLOSE,OPEN));
VAR95:=(IF((CLOSE > OPEN),OPEN,CLOSE) - LOW);
VAR96:=((VAR93 / VAR92) * VOL);
VAR97:=((VAR94 / VAR92) * VOL);
VAR98:=((VAR95 / VAR92) * VOL);
QQ:=VAR96 >= VAR97 AND VAR96 >= VAR98 AND CLOSE < OPEN;
MMM:=CLOSE < EMA(CLOSE,5) AND QQ;
JJJ:=CLOSE >= EMA(CLOSE,5) AND QQ;
JJ:=VAR96 >= VAR97 AND VAR96 >= VAR98 AND CLOSE > OPEN;
XX:=VAR98 > VAR96 AND VAR98 > VAR97;
MM:=VAR97 > VAR96 AND VAR97 > VAR98;
CDP:=REF(H+L+C,1)/3;
PT:=REF(H,1)-REF(L,1);
AH:=CDP+PT;
NH:=CDP*2-REF(L,1);
实量:V,VOLSTICK;
STICKLINE(JJ=1,0,实量*0.5,1,0),COLORYELLOW;
STICKLINE(MM=1,0,实量*0.5,1,0),COLORMAGENTA;
STICKLINE(XX=1,0,实量*0.5,1,0),COLORWHITE;
STICKLINE(JJJ=1,0,实量*0.5,1,0),COLORGREEN;
STICKLINE(MMM=1,0,实量*0.5,1,0),COLORBLUE;
{www.gszb.com倍量缩量}
短庄:=V>REF(V,1)*2 && V<REF(V,1)*3,COLORMAGENTA;
STICKLINE(短庄,实量*0.75,实量,1,0),COLORYELLOW;
三倍:=V>=REF(V,1)*3,COLORMAGENTA;
STICKLINE(三倍,实量*0.75,实量,1,0),COLORFF00F5;
缩量:V*2<REF(V,1),COLORMAGENTA;
STICKLINE(缩量,实量*0.75,实量,1,0),COLOR00FF00;
N1:=7;
LC:=REF(CLOSE,1);
X:=SMA(MAX(CLOSE-LC,0),N1,1)/SMA(ABS(CLOSE-LC),N1,1)*100,COLORYELLOW,LINETHICK1;
魔鬼:=DRAWLINE(X>=HHV(X,N1),X,X<=LLV(X,N1),X,1),COLOR00FF00;
魔王:=DRAWLINE(X>=HHV(X,N1),X,X<=LLV(X,N1),1,X),COLOR00FF00;
TJ0:=X=魔王;
TJ1:=X=魔鬼;
TJ2:=X<REF(X,1);
TJ3:=X>REF(1,X);
JRS1:=DRAWICON(TJ1 AND TJ2,X,1);
JRS2:=DRAWICON(TJ0 AND TJ3,X,2);
DRAWICON(FILTER(JRS1>0,1),V*1.02,1);
DRAWICON(FILTER(JRS2>0,1),V*1.02,2);
同时出白买入:=CROSS(ZIG(3,10) ,REF(ZIG(3 ,10),1)) ;
VAR3:=PEAKBARS(3,15,1)<10;
VAR5:=IF(VAR3=1,2,0);
顶:= IF(VAR5=2,2,0);
顶A:=IF(顶>REF(顶,1),50,0),COLORGREEN;
H_L:=0.1*CONST(HHV(VOL,240));
V01:=VOL*0.95;{www.gszb.com图标位置}

 

源码未复制完...下载附件完整源码.