通达信周口人自用量副图指标

源码

M1:=5;M2:=10;M3:=20;N:=20;
VOL,VOLSTICK;
动量:=EMA(VOL,20)*1.5;
A01:=IF((VOL>动量),VOL,0);
盘整:BARSLAST((A01 > 0)),LINETHICK0;
MA1:MA(VOL,M1),COLORFF00FF;
MA2:MA(VOL,M2),COLOR00CED1;
MA3:=MA(VOL,M3);
AA:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));
主动买盘:=IF(CLOSE>OPEN,AA*(HIGH-LOW),IF(CLOSE<OPEN,AA*((HIGH-OPEN)+(CLOSE-LOW)),VOL/2));
主动卖盘:=IF(CLOSE>OPEN,0-AA*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE<OPEN,0-AA*(HIGH-LOW),0-VOL/2));
STICKLINE(主动买盘>0,0,VOL,1.5,0),COLOR008800;
STICKLINE(主动买盘>0,0,主动买盘,1.5,0),COLORRED;
SAT:IF((AMOUNT/C)/(HHV(AMOUNT,N)/HHV(C,N))*100>100,100,(AMOUNT/C)/(HHV(AMOUNT,N)/HHV(C,N))*100),COLOR98FB98;
WH:=WINNER(HIGH)*100;
WP:=WINNER(CLOSE)*100;
WL:=WINNER(LOW)*100;
加码:=WP-WL;
减码:=WP-WH;
穿透力:加码+减码,COLOR7070FF;
HSL:=VOL/CAPITAL*100;
低量:STICKLINE(HSL>=1 AND HSL<2,VOL/2,4,0.1,0),COLORWHITE;
温量:STICKLINE(HSL>=2 AND HSL<3,VOL/2,4,0.1,0),COLOR5F9EA0;
活量:STICKLINE(HSL>=3 AND HSL<5,VOL/2,4,0.1,0),COLORYELLOW;
带量:STICKLINE(HSL>=5 AND HSL<8,VOL/2,4,0.1,0),COLORFF2020;
STICKLINE(HSL>=8 AND HSL<15,VOL/2,4,0.1,0),COLORGREEN;
STICKLINE(HSL>=15 AND HSL<=25,VOL/2,4,0.1,0),COLORFFFF00;
U:=CROSS(MA1,MA2);
DRAWTEXT(U,VOL+100+5000,'★'),COLORYELLOW;