通达信主买主卖成交量副图源码 B选股

JE:=VOL;
JJ:=(HIGH+LOW+CLOSE)/3;
QJ0:=VOL/IF(HIGH=LOW,4,HIGH-LOW);
预量:IF(CURRBARSCOUNT=1 AND PERIOD=5,VOL*240/FROMOPEN,DRAWNULL),NODRAW;
AA1:=SUMBARS(VOL,CAPITAL);
地量:IF(CAPITAL=0,AMOUNT=LLV(AMOUNT,34),VOL<MA(VOL,AA1)/3),LINETHICK0,
COLORYELLOW,NODRAW;
主买:(QJ0*(JJ-MIN(CLOSE,OPEN))),NODRAW,COLORRED;
主卖:(QJ0*(MIN(OPEN,CLOSE)-LOW)),NODRAW,COLORGREEN;
散买:(QJ0*(HIGH-MAX(OPEN,CLOSE))),NODRAW,COLORMAGENTA;
散卖:(QJ0*(MAX(CLOSE,OPEN)-JJ)),NODRAW,COLORBLUE;
净入:IF((主买-主卖)>0,主买-主卖,0)COLORRED,NODRAW;
净出:IF((主买-主卖)<0,主买-主卖,0)COLORGREEN,NODRAW;
散入:IF((散买-散卖)>0,散买-散卖,0)COLORMAGENTA,NODRAW;
散出:IF((散买-散卖)<0,散买-散卖,0)COLORBLUE,NODRAW;
净买比%:100*净入/VOL,COLORYELLOW,NODRAW;
STICKLINE(CURRBARSCOUNT=1 AND PERIOD=5,预量,0,4,-1),COLORFFFFFF;
STICKLINE(H=L AND C<REF(C,1),0,JE,3,0),COLOR00AA00;
STICKLINE(H=L AND C<REF(C,1),0,JE,1.5,0),COLOR00CC00;
STICKLINE(H=L AND C<REF(C,1),0,JE,1,0),COLOR00EE00;
STICKLINE(H=L AND C>REF(C,1),0,JE,3,0),COLOR0000AA;
STICKLINE(H=L AND C>REF(C,1),0,JE,1.5,0),COLOR0000CC;
STICKLINE(H=L AND C>REF(C,1),0,JE,1,0),COLOR0000FF;
STICKLINE(散卖>0,0,主买+主卖+散买+散卖,3,0),COLORAA0000;
STICKLINE(散卖>0,0,主买+主卖+散买+散卖,1.5,0),COLORCC0000;
散户卖:STICKLINE(散卖>0,0,主买+主卖+散买+散卖,1,0),COLOREE0000;
STICKLINE(散买>0,0,主买+主卖+散买,3,0),COLORAA00AA;
STICKLINE(散买>0,0,主买+主卖+散买,1.5,0),COLORCC00CC;
散户买:STICKLINE(散买>0,0,主买+主卖+散买,1,0),COLOREE00EE;
STICKLINE(主卖>0,0,主买+主卖,3,0),COLOR00AA00;
STICKLINE(主卖>0,0,主买+主卖,1.5,0),COLOR00CC00;
主力卖:STICKLINE(主卖>0,0,主买+主卖,1,0),COLOR00EE00;
STICKLINE(主买>0,0,主买,3,0),COLOR0000AA;
STICKLINE(主买>0,0,主买,1.5,0),COLOR0000CC;
主力买:STICKLINE(主买>0,0,主买,1,0),COLOR0000FF;
AA:=IF(C>(H+L)/2,JE,0);
BB:=IF(C<(H+L)/2,JE,0);
F1:=SUM(AA,5);
F2:=SUM(BB,5);
F3:=EMA(F1-F2,3);
T1:=主买>主卖 AND CROSS(F3,REF(F3,1)) AND F3<0;
T2:=主卖>主买 AND CROSS(REF(F3,1),F3) AND F3>0;
DRAWTEXT(T1,JE,'+B'),COLOR00FFFF;
DRAWTEXT(T2,JE,'-S'),COLORFFFFFF;



B选股:
JE:=VOL;
JJ:=(HIGH+LOW+CLOSE)/3;
QJ0:=VOL/IF(HIGH=LOW,4,HIGH-LOW);
主买:=(QJ0*(JJ-MIN(CLOSE,OPEN)));
主卖:=(QJ0*(MIN(OPEN,CLOSE)-LOW));
AA:=IF(C>(H+L)/2,JE,0);
BB:=IF(C<(H+L)/2,JE,0);
F1:=SUM(AA,5);
F2:=SUM(BB,5);
F3:=EMA(F1-F2,3);
XG:主买>主卖 AND CROSS(F3,REF(F3,1)) AND F3<0;