通达信主力成交量选股指标公式源码

通达信主力成交量选股指标公式源码

源码正文：

成交量:vol,LINETHICK0{XG51};
VAR2:=(HIGH - LOW){XG51};
VAR3:=Abs((OPEN - CLOSE)){XG51};
VAR4:=(HIGH - IF((CLOSE > OPEN),CLOSE,OPEN)){XG51};
VAR5:=(IF((CLOSE > OPEN),OPEN,CLOSE) - LOW){XG51};
VAR6:=((VAR3 / VAR2) * VOL){XG51};
VAR7:=((VAR4 / VAR2) * VOL){XG51};
VAR8:=((VAR5 / VAR2) * VOL){XG51};
VAR9:=IF(((VOL / CAPITAL) > 0.001),1,EXP(ABS(LOG(((VOL / CAPITAL) * 100))))){XG51};
VARA:=(((CLOSE - ma(CLOSE,5)) / MA(CLOSE,5)) * 100){XG51};
VARB:=(((MA(CLOSE,5) > MA(CLOSE,10)) AND (MA(CLOSE,10) > MA(CLOSE,30))) AND (MA(CLOSE,30) > MA(CLOSE,60))){XG51};
VARC:=((MA(CLOSE,5) < MA(CLOSE,10)) AND (MA(CLOSE,10) < MA(CLOSE,30))){XG51};
多头成交:stICKLINE((CLOSE > MA(CLOSE,30)),0,VOL,3,1),COLOR0000FF{XG51};
空头成交:STICKLINE((CLOSE < MA(CLOSE,30)),0,VOL,3,1),,COLOR00FF00{XG51};
上攻量:STICKLINE((((VAR6 >= VAR7) AND (VAR6 >= VAR8)) AND (CLOSE > OPEN)),0,VAR6,3,0),,COLOR0000FF{XG51};
下攻量:STICKLINE((((VAR6 >= VAR7) AND (VAR6 >= VAR8)) AND (CLOSE < OPEN)),0,VAR6,3,0),,COLOR00FF00{XG51};
上探量:STICKLINE(((VAR7 > VAR6) AND (VAR7 > VAR8)),0,VAR7,3,0),,COLORCCCC66{XG51};
下探量:STICKLINE(((VAR8 > VAR6) AND (VAR8 > VAR7)),0,VAR8,3,0),,COLORFF6633{XG51};
相对地量:STICKLINE(((VAR9 > 2) AND (VOL < (MA(VOL,5) / 2))),0,VOL,2.2,0),,COLOR00FFFF{XG51};
地量:DRAWTEXT(((VAR9 > 2) AND (VOL < (MA(VOL,5) / 2))),VOL,'地量'),,COLOR00FFFF{XG51};
放量:STICKLINE((VOL > (MA(VOL,5) * 2.5)),0,VOL,2.2,0),,COLORFFFFFF{XG51};
高出: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{XG51};
低进:DRAWTEXT(((((((VAR8 > VAR6) AND (VAR8 > VAR7)) AND (VARA < (0 - 2))) AND (CLOSE < MA(CLOSE,30))) AND (VAR8 < (MA(VOL,5) / 2))) AND (MA(VOL,5) < MA(VOL,10))),VOL,'低进'),,COLOR00FFFF{XG51};
强势参与:DRAWTEXT((((((VAR6 > (MA(VOL,5) * 2)) AND (VAR6 >= VAR7)) AND (VAR6 >= VAR8)) AND (CLOSE > OPEN)) OR ((VOL > (MA(VOL,5) * 3)) AND VARB)),VOL,'参与'),,COLOR00FF00{XG51};
空头释放:DRAWTEXT(((((((VAR6 >= VAR7) AND (VAR6 >= VAR8)) AND (CLOSE < OPEN)) AND ((VAR6 / VOL) > 0.7)) AND VARC) AND (VAR6 > MA(VOL,5))),(VAR6 * 2),'空头释放'),,COLOR00FF00{XG51};
MA5:MA(VOL,5){XG51};
MA10:MA(VOL,10){X=G-5!1=C=N={};