|
以下是通达信主动买卖指标（无源码的请下载附件导入）
通达信主动买卖指标
源码
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(主买-主卖);{www.guhai.com.cn}
STICKLINE(主买>主卖,0,主买,2,1),COLOR0014AD;
STICKLINE(主买>主卖,0,净量,2,0),COLOR0014CE;
STICKLINE(主卖>主买,0,主卖,2,1),COLOR00BB00;
STICKLINE(主卖>主买,0,净量,2,0),COLOR00CC00;
DRAWRECTREL(50,0,CONST(主买*500/(主买+主卖)+50),80,RGB(230,65,0));
DRAWRECTREL(50,110,CONST(主卖*500/(主买+主卖)+50),190,RGB(0,104,0));
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.005,0,0,'主买'),COLORLIRED;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.005,0.1,0,'主卖'),COLORGREEN;
140399417.jpg
|
