通达信自用主力成交量指标公式

通达信自用主力成交量指标公式

{主力成交量}

成交量:VOL,LINETHICK0;

VAR2:=(HIGH - LOW);

VAR3:=ABS((OPEN - CLOSE));

VAR4:=(HIGH - IF((CLOSE > OPEN),CLOSE,OPEN)); VAR5:=(IF((CLOSE > OPEN),OPEN,CLOSE) - LOW); VAR6:=((VAR3 / VAR2) * VOL);

VAR7:=((VAR4 / VAR2) * VOL);

VAR8:=((VAR5 / VAR2) * VOL);

VAR9:=IF(((VOL / CAPITAL) >

0.001),1,EXP(ABS(LOG(((VOL / CAPITAL) * 100)))));

VARA:=(((CLOSE - MA(CLOSE,5)) / MA(CLOSE,5)) * 100);

VARB:=(((MA(CLOSE,5) > MA(CLOSE,10)) AND

(MA(CLOSE,10) > MA(CLOSE,30))) AND

(MA(CLOSE,30) > MA(CLOSE,60)));

VARC:=((MA(CLOSE,5)

MA(CLOSE,30)),0,VOL,3,1),COLOR0000FF;

空头成交:STICKLINE((CLOSE = VAR8)) AND (CLOSE VAR7)),0,VAR8,3,0),,COLORFF6633;

相对地量:STICKLINE(((VAR9 > 2) AND (VOL

(MA(VOL,5) * 2.5)),0,VOL,2.2,0),,COLORFFFFFF;

高出:DRAWTEXT(((((((((VAR7 > VAR6) AND (VARA > 2)) AND (VAR7 > VAR8)) AND (CLOSE > MA(CLOSE,5))) AND (CLOSE > MA(CLOSE,30))) AND (HIGH >

MA(CLOSE,60))) AND (VOL > MA(VOL,5))) AND

(VAR7 >= MA(VOL,5))),VOL,'高出'),COLOR00FF00;

低进:DRAWTEXT(((((((VAR8 > VAR6) AND (VAR8 > VAR7)) AND (VARA = VAR8)) AND (CLOSE > OPEN)) OR ((VOL > (MA(VOL,5) * 3)) AND VARB)),VOL,'参与'),,COLOR00FF00;

空头释放:DRAWTEXT(((((((VAR6 >= VAR7) AND

(VAR6 >= VAR8)) AND (CLOSE 0.7)) AND VARC) AND (VAR6 > MA(VOL,5))),(VAR6 * 2),'空头释放

'),,COLOR00FF00;

MA5:MA(VOL,5);

MA10:MA(VOL,60);