通达信愚公方圆主图选股指标公式源码

通达信愚公方圆主图选股指标公式源码

源码正文：

ma1:MA(CLOSE,6){XG51};
MA2:MA(CLOSE,13){XG51};
MA3:MA(CLOSE,21){XG51};
MA4:MA(CLOSE,62){XG51};
MA5:MA(CLOSE,120){XG51};
X:=ema(((SLOPE(CLOSE,21) * 20) + CLOSE),68){XG51};
Y:=EMA(CLOSE,10){XG51};
LL:=REF(CLOSE,2){XG51};
MM:=((SMA(MAX((CLOSE - LL),0),6,1) / SMA(Abs((CLOSE - LL)),6,1)) * 100){XG51};
DB:=IF(((MM < REF(MM,1)) AND (MM > 79)),MM,0){XG51};
DRAWTEXT(crOSS(Y,X),(LOW * 0.985),'▲'),LINETHICK2,COLORWHITE{XG51};
DRAWTEXT(CROSS(X,Y),(HIGH * 1.02),'◆'),LINETHICK2,COLOR00FF00{XG51};
DRAWTEXT(DB,(HIGH * 1.02),'●'),LINETHICK2,COLOR00FF00{XG51};
VAR1:=LLV(LOW,21){XG51};
VAR2:=HHV(HIGH,21){XG51};
AK1:=EMA((((CLOSE - VAR1) / (VAR2 - VAR1)) * 100),5){XG51};
AK:=EMA((((CLOSE - VAR1) / (VAR2 - VAR1)) * 50),13){XG51};
DD:=EMA(((0.667 * REF(AK1,1)) + (0.333 * AK1)),2){XG51};
VAR3:=LLV(LOW,55){XG51};
VAR4:=HHV(HIGH,34){XG51};
VAR5:=EMA((((CLOSE - VAR3) / (VAR4 - VAR3)) * 100),3){XG51};
VAR6:=((AK + VAR5) / 2){XG51};
VAR7:=EMA(((0.667 * REF(VAR5,1)) + (0.333 * AK1)),2){XG51};
VAR8:=EMA(VAR6,5){XG51};
BB:=EMA(((0.667 * REF(VAR8,1)) + (0.333 * VAR8)),2){XG51};
AB:=CROSS(AK1,AK){XG51};
BB1:=(CROSS(AK1,BB) AND (BB < 30)){XG51};
CD:=(BB1 * 0.6){XG51};
DRAWTEXT((CD = 0.6),(LOW * 0.99),'□'),LINETHICK2,COLOR33CC99{XG51};
DRAWTEXT((AB = 1),(LOW * 0.99),'□'),LINETHICK2,COLORRED{XG51};
C1:=(CLOSE+LOW+HIGH)/3{XG51};
C2:=EMA(C1,6){XG51};
C3:=EMA(C2,5){XG51};
C4:=CROSS(C2,C3){XG51};
DRAWTEXT(C4,LOW/1.01,'★'),,COLORWHITE{XG51};
C5:=CROSS(C3,C2){XG51};
DRAWTEXT(C5,HIGH*1.03,'★'),,COLORYELLOW{X^G=5~1^C^N^{};