【通达信免费源码】反转成交量指标 副图 买卖点 操盘控盘 成交量

VAR1:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));

成交:=VOL,POINTDOT;

主动买盘:=IF(CLOSE>OPEN,VAR1(HIGH-LOW),IF(CLOSE<OPEN,VAR1((HIGH-OPEN)+(CLOSE-LOW)),VOL/2)),COLORRED,POINTDOT;

主动卖盘:=IF(CLOSE>OPEN,0-VAR1((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE<OPEN,0-VAR1(HIGH-LOW),0-VOL/2)),COLOR00FF00,POINTDOT;

净买万:(主动买盘+主动卖盘)/100,COLORRED;

十日换手:SUM(VOL/CAPITAL*100,10);

流通（亿）:=CAPITAL/1000000,POINTDOT;

{虚拟量:=IF(CURRBARSCOUNT=1 AND PERIOD=5,VOL*240/FROMOPEN,DRAWNULL),NODRAW;

STICKLINE(CURRBARSCOUNT=1 AND PERIOD=5,虚拟量,0,-1,-1),COLOR00C0C0;}

VOLUME:VOL,VOLSTICK;

VOL1:MA(VOLUME,M1), COLORWHITE;

VOL2:MA(VOLUME,M2),COLORYELLOW;

VOL3:MA(VOLUME,M3),COLORFF00FF;

成交额（KW）:AMOUNT/10000000,POINTDOT;

增减力度:(MA(CLOSE,34.000) - CLOSE) / MA(CLOSE, 34.000) * 10.000,COLOR6666FF;

STICKLINE(FILTER(CROSS(0.019100,增减力度),21), VOL*0.8,0,1,0),COLORYELLOW;

DRAWTEXT(FILTER(CROSS(0.019100,增减力度),21), VOL*0.8,'跟踪'),COLORWHITE;

VAR1D:=MA(C,30);

VAR2:=MA(CLOSE, 6);

VAR3:=MA(CLOSE, 10);

VAR4:=MA(CLOSE, 20);

VAR5:=MA(CLOSE, 30);

VAR6:=(VAR2+VAR3+VAR4+VAR5)/4;

VAR7:=(VAR6-REF(VAR6, 15))/REF(VAR6, 15)*100;

VAR9:=EMA(VAR7, 8);

移动:=10*(C-VAR1D)/STD(C,30),COLORWHITE,LINETHICK0;

估算:=EMA(移动,10),COLORGREEN;

{STICKLINE(CROSS(移动,估算),0,VOL,1,0),COLORWHITE;}{浅紫反转点};

均反:STICKLINE(VAR7>1*REF(VAR7, 1) AND CROSS(移动,估算), 0,VOL,1.2,0),COLORWHITE;

DRAWTEXT(均反, VOL,'反'),COLORWHITE;

{压力线,未来}

QM:=INTPART(3*8/5);

QR:=REF(VOL,QM)=HHV(VOL,2*QM+1);

QT:=FILTER(QR,QM);

QY:=BACKSET(QT,QM+1);

QU:=FILTER(QY,QM);

QI:=BACKSET(ISLASTBAR,BARSLAST(QU)+1);{未来函数}

QP:=QI>REF(QI,1);

最大成交量:=HHV(V,50);{计算50日内最大成交量的数字}

距离天数:=BARSLAST(V=最大成交量);{计算最大成交量出现那天距离今天的天数}

QS:DRAWLINE(QU,V,QP,V,1),LINETHICK2,COLORMAGENTA;