通达信引力看盘主图选股指标公式源码

通达信引力看盘主图选股指标公式源码

源码正文：

J1:=FORCAst(ema(CLOSE,3),20){XG51};
J2:=FORCAST(Ema(CLOSE,15),20){XG51};
X3:=FILTER(crOSS(J1,J2),3){XG51};
X4:=FILTER(CROSS(J2,J1),3){XG51};
DRAWLINE(REF(X3,1),REF(J1,1),X4,J1,0),LINETHICK3,COLORFF00FF{XG51};
DRAWLINE(REF(X3,1),REF(J1,1),X3,J1,0),LINETHICK3,COLOR6600FF{XG51};
DRAWLINE(REF(X4,1),REF(J1,1),X3,J1,0),LINETHICK3,COLORBLUE{XG51};
DRAWLINE(REF(X4,1),REF(J1,1),X4,J1,0),LINETHICK3,COLOR008000{XG51};
YL:=J2,COLOR00AAFF{XG51};
YA:FORCAST(CLOSE,20),COLORFFFFFF{XG51};
VARL:=((vol)*(OPEN + CLOSE + HIGH + LOW))/(4){XG51};
YB:=FORCAST((MA(VARL,1))/(EMA(VOL,1)),20){XG51};
Y:=FORCAST(MA(CLOSE,12),20){XG51};
YD:=Y - J1 - Y,COLOR00FF00{XG51};
ZC:(TROUGH(1,15,1))*(1.05),COLOR008000{XG51};
VAR1:=HHV(CLOSE,240){XG51};
VAR2:=LLV(CLOSE,240){XG51};
VAR3:=(VAR1 - VAR2)/(100){XG51};
VAR4:=(CLOSE < VAR2 + (VAR3)*(10)) AND (LLV(CLOSE,10) = VAR2) AND (HHV(CLOSE,120) < VAR1){XG51};
VAR5:=(CLOSE > (VAR2)*(1.1)) AND (FINANCE(33) > 0){XG51};
VAR6:=VAR5 AND (COUNT(VAR5,2) = 1) AND (CLOSE < (MA(CLOSE,240))*(0.68)){XG51};
●中趋底:=IF((VAR4 AND VAR6)*(100) AND (CLOSE > ZC),HIGH,0),POINTDOT,COLORFF00FF{XG51};
DRAWTEXT(●中趋底,ZC,'中趋底'),COLORFF00FF{XG51};
●启动:=IF(FILTER(CROSS(YA,YL),13) AND (YA > YD) AND (YA > YB) AND (CLOSE > YA + 0.03),1,0),POINTDOT,COLORBLUE{XG51};
DRAWTEXT(●启动,YL,'启动'),COLORBLUE{XG51};
HV1:=MA(VOL,5){XG51};
HV2:=((VOL)/(REF(HV1,1)) > 2){XG51};
HV3:=((CLOSE)/(REF(CLOSE,1)) > 1.05){XG51};
T1:=MA(CLOSE,42){XG51};
T2:=HHV(HIGH,42){XG51};
T3:=LLV(LOW,42){XG51};
TZ:=(T2 - T1)/(T1){XG51};
TY:=(T1 - T3)/(T1){XG51};
TYZ:=(REF(TZ,1) < 0.2) AND (REF(TY,1) < 0.15){XG51};
YZ1:=HHV(HIGH,42){XG51};
YZ:=(HIGH = YZ1){XG51};
HSL:=((VOL)/(MA(VOL,5)) < 2.5){XG51};
&isin;量价突破前高:=IF(HV2 AND HV3 AND YZ AND TYZ AND HSL AND (BARSCOUNT(CLOSE) > 80),OPEN,0),STICK,COLORFFFFFF{XG51};
突破长期盘整:=(REF(((HHV(HIGH,89) - LLV(LOW,89))/(LLV(LOW,89)))/(LLV(LOW,89)),1) <= (5)/(100)) AND (CLOSE >= REF(HHV(HIGH,89),1)) AND (BARSCOUNT(CLOSE) > 85) AND ((VOL)/(REF(HV1,1)) > 2) AND ((CLOSE)/(REF(CLOSE,1)) > 1.03){XG51};
DRAWTEXT(&isin;量价突破前高,CLOSE,'&isin;'),COLORFFFFFF{XG51};
DRAWTEXT(突破长期盘整,LOW,'突破长盘'),COLORCCCCCC{XG51};
HGA:=HHV(HIGH,40){XG51};
LDA:=LLV(LOW,10){XG51};
LDAB:=LLV(LOW,40){XG51};
HGB:=HHV(HIGH,20){XG51};
LDB:=LLV(LOW,30){XG51};
HGAA:=BArslAST((HIGH = HGA)){XG51};
LDBB:=BARSLAST((LOW = LDAB)){XG51};
LDAA:=BARSLAST((LOW = LDA)){XG51};
GG:=HGAA - LDAA{XG51};
DD:=LDBB - LDAA{XG51};
DRAWLINE((HIGH = HGA),HIGH,(HIGH = HGB) AND (GG > 20),HIGH,1),LINETHICK1{XG51};
DRAWLINE((LOW = LDAB),LOW,(LOW = LDB) AND (DD > 20),OPEN,1),LINETHICK1,COLORDDAADD{XG51};
AA:=(VOL)/((HIGH - LOW)*(2) - Abs(CLOSE - OPEN)){XG51};
主动性买:=IF((CLOSE > OPEN),(AA)*(HIGH - LOW),IF((CLOSE < OPEN),(AA)*(HIGH - OPEN + CLOSE - LOW),(VOL)/(2))){XG51};
主动性卖:=IF((CLOSE > OPEN),(AA)*(HIGH - CLOSE + OPEN - LOW),IF((CLOSE < OPEN),(AA)*(HIGH - LOW),(VOL)/(2))){XG51};
A1:=IF(主动性买,(VOL)*(3),0){XG51};
A2:=IF(主动性卖,(VOL)*((-3)),0){XG51};
DT:=(DYNAINFO(3))*(0.92){XG51};
K1:=(SUM(A1,0))/(SUM(VOL,0)){XG51};
K2:=(SUM(A2,0))/(SUM(VOL,0)){XG51};
{X=G_5-1=C=N={};