主力线(通达信)

源码正文：

主力线，由主力进场和主力散户进出指标组合，除去散户线。有未来。上穿零柱强势股第2波

VAR1:=IF((CLOSE > OPEN),((CLOSE - OPEN) * vol),IF((CLOSE < OPEN),((CLOSE - OPEN) * VOL),0)){XG51};
VAR2:=IF((CLOSE > REF(CLOSE,1)),((CLOSE - REF(CLOSE,1)) * VOL),IF((CLOSE < REF(CLOSE,1)),((CLOSE - REF(CLOSE,1)) * VOL),0)){XG51};
VAR3:=IF((OPEN > REF(CLOSE,1)),((OPEN - REF(CLOSE,1)) * VOL),IF((OPEN < REF(CLOSE,1)),((OPEN - REF(CLOSE,1)) * VOL),0)){XG51};
VAR4:=IF((CLOSE < OPEN),((OPEN - CLOSE) * VOL),IF((CLOSE > OPEN),((OPEN - CLOSE) * VOL),0)){XG51};
VAR5:=IF((CLOSE < REF(CLOSE,1)),((REF(CLOSE,1) - CLOSE) * VOL),IF((CLOSE > REF(CLOSE,1)),((REF(CLOSE,1) - CLOSE) * VOL),0)){XG51};
VAR6:=IF((OPEN < REF(CLOSE,1)),((REF(CLOSE,1)-OPEN) * VOL),IF((OPEN > REF(CLOSE,1)),((REF(CLOSE,1) - OPEN) * VOL),0)){XG51};
VAR7:=(CLOSE > OPEN){XG51};
VAR8:=(CLOSE > REF(CLOSE,1)){XG51};
VAR9:=(OPEN > REF(CLOSE,1)){XG51};
VARA:=((VAR7 OR VAR8) OR VAR9){XG51};
主力:(SUM(((((VAR1 + VAR2) + VAR3) / 3) / CAPITAL),5) * 1000),COLORyellow{XG51};
平衡:0,POINTDOT{XG51};
VAR2L:=REF(LOW,1){XG51};
VAR3L:=SMA(Abs(LOW-VAR2L),3,1)/Sma(MAX(LOW-VAR2L,0),3,1)*110{XG51};
VAR4L:=ema(IF(CLOSE*1.3,VAR3L*10,VAR3L/10),3){XG51};
VAR5L:=LLV(LOW,13){XG51};
VAR6L:=HHV(VAR4L,13){XG51};
VAR7L:=IF(MA(CLOSE,34),1,0){XG51};
VAR8L:=EMA(IF(LOW<=VAR5L,(VAR4L+VAR6L*2)/2,0),3)/618*VAR7L{XG51};
VAR9LL:=IF(VAR8L>110,110,VAR8L){XG51};
stICKLINE(VAR9LL<REF(VAR9LL,1),0,VAR9LL,2,0),COLOrcyan{X!G?5!1!C!N!{};

源码正文：

P1:=5{XG51};
P2:=4{XG51};
SSRCJL:=ema(vol,13){XG51};
SSRCJE:=Ema(AMOUNT,13){XG51};
SSRCBJX:=((SSRCJE / SSRCJL) / 100){XG51};
SSRGL:=(((CLOSE - SSRCBJX) / SSRCBJX) * 100){XG51};
绝对底:=SSRGL<(0-18){XG51};
大底:=SSRGL<(0-14){XG51};
中底:=SSRGL<(0-10){XG51};
短底:=SSRGL<(0-6){XG51};
stICKLINE((SSRGL < (0 - 18)),60,80,1,0),COLORWHITE{XG51};
STICKLINE((SSRGL < (0 - 14)),40,60,1,0),COLORYELLOW{XG51};
STICKLINE((SSRGL < (0 - 10)),20,40,1,0),COLORBLUE{XG51};
STICKLINE((SSRGL < (0 - 6)),0,20,2,0),COLORRED{XG51};
高卖:80, POINTDOT,COLORWHITE{XG51};
低吸:20, POINTDOT,COLORCYAN{XG51};
VAR1:=LLV(LOW,P1){XG51};
VAR2:=HHV(HIGH,P1){XG51};
K: EMA((CLOSE-VAR1)/(VAR2-VAR1)*100,P2),COLORWHITE,LINETHICK2{XG51};
D: EMA(0.667*REF(K,1)+0.333*K,2),COLORCYAN,LINETHICK2{X~G~5!1~C~N~{};