通达信愚公操盘主图选股指标公式源码

通达信愚公操盘主图选股指标公式源码

源码正文：

M4:ma(CLOSE,4),COLORRED{XG51};
M10:MA(CLOSE,10),COLORBLUE{XG51};
M20:MA(CLOSE,20),COLORWHITE{XG51};
M30:MA(CLOSE,30),COLORFFCD00{XG51};
M62:MA(CLOSE,62),COLORCYAN{XG51};
DRAWTEXT(crOSS(M10,M20)AND M20>REF(M20,1),M20,'小金角'),COLORWHITE{XG51};
DRAWTEXT(CROSS(M20,M62)AND M62>REF(M62,1),M62,'大金角'),COLORWHITE{XG51};
VAR3:=LLV(HIGH,240){XG51};
VAR4:=100*(CLOSE-VAR3)/VAR3{XG51};
VAR5:=(CLOSE-LLV(LOW,528))/(HHV(HIGH,528)-LLV(LOW,528))*100{XG51};
VAR6:=(CLOSE-LLV(CLOSE,530))/(HHV(CLOSE,530)-LLV(CLOSE,530))*100{XG51};
VAR7:=0{XG51};
VAR8:=SMA(MAX(CLOSE-REF(CLOSE,1),0),34,1)/SMA(Abs(CLOSE-REF(CLOSE,1)),7,1)*100{XG51};
VAR9:=SMA(MAX(CLOSE-REF(CLOSE,1),0),13,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),13,1)*100{XG51};
VARA:=BARSCOUNT(CLOSE){XG51};
VARB:=VAR8<20 AND VAR9<23 AND VARA>35{XG51};
VARC:=VARB AND COUNT(VARB,1)=1{XG51};
VARD:=ema(CLOSE,21)-EMA(CLOSE,8){XG51};
VARE:=EMA(VARD,5){XG51};
VARF:=TROUGHBARS(3,6,1)<4 AND CROSS(VARD,VARE){XG51};
VAR10:=IF(TROUGHBARS(3,16,1)=0 AND HIGH>LOW+0.04,4,0){XG51};
VAR11:=zig(3,6)>REF(ZIG(3,6),1) AND REF(ZIG(3,6),1)<=REF(ZIG(3,6),2) AND REF(ZIG(3,6),2)<=REF(ZIG(3,6),3){XG51};
VAR12:=ZIG(3,6)<REF(ZIG(3,6),1) AND REF(ZIG(3,6),1)>=REF(ZIG(3,6),2) AND REF(ZIG(3,6),2)>=REF(ZIG(3,6),3){XG51};
VAR13:=ZIG(3,22)>REF(ZIG(3,22),1) AND REF(ZIG(3,22),1)<=REF(ZIG(3,22),2) AND REF(ZIG(3,22),2)<=REF(ZIG(3,22),3){XG51};
VAR14:=ZIG(3,22)<REF(ZIG(3,22),1) AND REF(ZIG(3,22),1)>=REF(ZIG(3,22),2) AND REF(ZIG(3,22),2)>=REF(ZIG(3,22),3){XG51};
VAR15:=ZIG(3,51)>REF(ZIG(3,51),1) AND REF(ZIG(3,51),1)<=REF(ZIG(3,51),2) AND REF(ZIG(3,51),2)<=REF(ZIG(3,51),3){XG51};
VAR16:=ZIG(3,51)<REF(ZIG(3,51),1) AND REF(ZIG(3,51),1)>=REF(ZIG(3,51),2) AND REF(ZIG(3,51),2)>=REF(ZIG(3,51),3){XG51};
VAR17:=ZIG(3,72)>REF(ZIG(3,72),1) AND REF(ZIG(3,72),1)<=REF(ZIG(3,72),2) AND REF(ZIG(3,72),2)<=REF(ZIG(3,72),3){XG51};
VAR18:=ZIG(3,72)<REF(ZIG(3,72),1) AND REF(ZIG(3,72),1)>=REF(ZIG(3,72),2) AND REF(ZIG(3,72),2)>=REF(ZIG(3,72),3){XG51};
VAR19:=EMA(CLOSE,2)-EMA(CLOSE,150){XG51};
VAR1A:=EMA(VAR19,100){XG51};
VAR1B:=2*(VAR19-VAR1A){XG51};
VAR1C:=POW(VAR1B,3)*0.1+POW(VAR1B,1){XG51};
VAR1D:=SQRT(SQRT(LOW*HIGH*OPEN*CLOSE)){XG51};
VAR1E:=EMA(VAR1D*0.97,3){XG51};
VAR1F:=(HIGH+LOW+CLOSE)/3{XG51};
VAR20:=(VAR1F-MA(VAR1F,14))/(0.015*AVEDEV(VAR1F,14)){XG51};
VAR21:=CROSS(VAR1E,LOW){XG51};
买1:=VAR10{XG51};
买2:=(VAR11+VAR13+VAR15+VAR17){XG51};
卖1:=(VAR12+VAR14+VAR16+VAR18){XG51};
VAR22:=买1 AND VARF AND VARC AND VAR21 AND VAR4<0 AND VAR5=0 AND VAR6=0 AND VAR20<(-110){XG51};
VAR1:=MA(CLOSE,5){XG51};
VAR2:=MA(CLOSE,10){XG51};
VAR3A:=MA(CLOSE,30){XG51};
VAR4A:=MA(CLOSE,60){XG51};
VAR5A:=EMA(COst(85),7){XG51};
VAR6A:=EMA(COST(15),7){XG51};
VAR7A:=SUM(CLOSE*vol*100,4)/SUM(VOL*100,4){XG51};
VAR8A:=INTPART(VAR7*100)/100{XG51};
VAR9A:=SUM(CLOSE*VOL*100,7)/SUM(VOL*100,7){XG51};
VARA1:=INTPART(VAR9*100)/100{XG51};
VARB1:=SUM(CLOSE*VOL*100,28)/SUM(VOL*100,28){XG51};
VARC1:=INTPART(VARB*100)/100{XG51};
VARD1:=EMA(CLOSE,5)-EMA(CLOSE,10){XG51};
VARE1:=EMA(VARD,9){XG51};
VARF1:=(-100)*(HHV(CLOSE,5)-CLOSE)/(HHV(CLOSE,5)-LLV(LOW,5))+100{XG51};
VAR10A:=(-100)*(HHV(CLOSE,10)-CLOSE)/(HHV(CLOSE,10)-LLV(LOW,10))+100{XG51};
VAR11A:=(-100)*(HHV(CLOSE,20)-CLOSE)/(HHV(CLOSE,20)-LLV(LOW,20))+100{XG51};
VAR12A:=(-100)*(HHV(CLOSE,30)-CLOSE)/(HHV(CLOSE,30)-LLV(LOW,30))+100{XG51};
VAR13A:=REF(VARE,1){XG51};
VAR14A:=VARE{XG51};
VAR15A:=VAR14-VAR13{XG51};
VAR16A:=REF(VARD,1){XG51};
VAR17A:=VARD{XG51};
VAR18A:=VAR17-VAR16{XG51};
VAR19A:=OPEN{XG51};
VAR1AA:=CLOSE{XG51};
买3:=IF(VAR19<=VAR1 AND VAR19<=VAR2 AND VAR19<=VAR3 AND VAR1A>=VAR1 AND VAR1A>=VARC AND VAR15>0 AND VAR18>0,0.5,0){XG51};
DRAWICON(买3>0,LOW-0.01,4){XG51};
买线:=EMA(CLOSE,2);
卖线:=EMA(SLOPE(CLOSE,21)*20+CLOSE,42){XG51};
B1买:IF(买1>0 OR 买2>0,LOW-0.02,DRAWNULL),CROSSDOT,LINETHICK3,COLORWHITE{XG51};
B2买:IF(CROSS(买线,卖线),L-0.02,DRAWNULL),CROSSDOT,LINETHICK3,COLORLIMAGENTA;
S1卖:IF(卖1>0,HIGH+0.02,DRAWNULL),CROSSDOT,LINETHICK3,COLORBLUE{XG51};
S2卖:IF(CROSS(卖线,买线),H+0.02,DRAWNULL),CROSSDOT,LINETHICK3,COLOR00AB00{X_G_5~1_C_N_{};