通达信多重均线主图未加密选股指标公式源码

源码正文：

M3:=3;M5:=5;M10:=10;M22:=22;M55:=55;M89:=89{XG51};
ma3:MA(CLOSE,M3){XG51};
MA5:MA(CLOSE,M5){XG51};
MA10:MA(CLOSE,M10){XG51};
MA22:MA(CLOSE,M22){XG51};
MA55:MA(CLOSE,M55){XG51};
MA89:MA(CLOSE,M89){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};
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};
买１:=VAR10{XG51};
买２:=(VAR11+VAR13+VAR15+VAR17){XG51};
卖１:=(VAR12+VAR14+VAR16+VAR18){XG51};
B:IF(买１>0 OR 买２>0,LOW*0.99,DRAWNULL),crOSSDOT,LINETHICK3,COLORBLUE{XG51};
DRAWTEXT(买１>0 OR 买２>0,LOW*0.99,'低吸'),COLORWHITE{XG51};
S:IF(卖１>0,HIGH*1.01,DRAWNULL),CROSSDOT,LINETHICK3,COLORCYAN{XG51};
DRAWTEXT(卖１>0,HIGH*1.02,'高抛'),COLORCYAN{XG51};
VAR100:=(100 - ((90 * (HHV(HIGH,20) - CLOSE)) / (HHV(HIGH,20) - LLV(LOW,20)))){XG51};
VAR200:=(100 - ((90 * (HHV(HIGH,20) - CLOSE)) / (HHV(HIGH,20) - LLV(LOW,20)))){XG51};
VAR300:=(100 - MA(((100 * (HHV(HIGH,5) - CLOSE)) / (HHV(HIGH,5) - LLV(LOW,5))),34)){XG51};
F:IF(CROSS(VAR200,MA(VAR300,5)),LOW * 0.98,DRAWNULL),CROSSDOT,LINETHICK3,COLOREE00EE{XG51};
年:MA(CLOSE,250),LINETHICK2,COLORRED{X.G!5_1.C.N.{};

源码正文：

日:=500;昨前:=60{XG51};
高:=REF(HHV(H,日),昨前){XG51};
低:=REF(LLV(L,日),昨前){XG51};
H1:=高-(高-低)*1{XG51};
H2:=高-(高-低)*0.91{XG51};
H3:=高-(高-低)*0.85{XG51};
H4:=高-(高-低)*0.809{XG51};
H5:=高-(高-低)*0.777{XG51};
H6:=高-(高-低)*0.707{XG51};
H7:=高-(高-低)*0.666{XG51};
H8:=高-(高-低)*0.618{XG51};
H9:=高-(高-低)*0.563{XG51};
H10:=高-(高-低)*0.5{XG51};
H11:=高-(高-低)*0.424{XG51};
H12:=高-(高-低)*0.382{XG51};
H13:=高-(高-低)*0.309{XG51};
H14:=高-(高-低)*0.25{XG51};
H15:=高-(高-低)*0.191{XG51};
H16:=高-(高-低)*0.1375{XG51};
H17:=高-(高-低)*0.0807{XG51};
一:REFDATE(H2,DATE),COLORLICYAN{XG51};
二:REFDATE(H3,DATE),COLORBLUE{XG51};
三:REFDATE(H4,DATE),COLORLIGREEN{XG51};
四:REFDATE(H5,DATE),COLORLICYAN{XG51};
五:REFDATE(H6,DATE),COLORBLUE{XG51};
六:REFDATE(H7,DATE),COLORLIGREEN{XG51};
七:REFDATE(H8,DATE),COLORLICYAN{XG51};
八:REFDATE(H9,DATE),COLORBLUE{XG51};
九:REFDATE(H10,DATE),COLORLIGREEN{XG51};
十:REFDATE(H11,DATE),COLORLICYAN{XG51};
十一:REFDATE(H12,DATE),COLORBLUE{XG51};
十二:REFDATE(H13,DATE),COLORLIGREEN{XG51};
十三:REFDATE(H14,DATE),COLORLICYAN{XG51};
十四:REFDATE(H15,DATE),COLORBLUE{XG51};
十五:REFDATE(H16,DATE),COLORLIGREEN{XG51};
十六:REFDATE(H17,DATE),COLORLIGREEN{XG51};
底:REFDATE(H1,DATE),COLORBLUE{XG51};
顶:REFDATE(高,DATE),COLORBLUE{XG51};
DRAWKLINE(HIGH,OPEN,LOW,CLOSE){XG51};
ma1:MA(CLOSE,15){XG51};
MA2:MA(CLOSE,60){XG51};
IF(MA(CLOSE,15)<=MA(CLOSE,60) AND MA(CLOSE,15)<=REF(MA(CLOSE,15),1),MA(CLOSE,15),DRAWNULL),COLORLIGREEN{XG51};
IF(MA(CLOSE,15)<=MA(CLOSE,60) AND MA(CLOSE,15)>REF(MA(CLOSE,15),1),MA(CLOSE,15),DRAWNULL),COLORLIMAGENTA{XG51};
IF(MA(CLOSE,15)>MA(CLOSE,60) AND MA(CLOSE,15)>REF(MA(CLOSE,15),1),MA(CLOSE,15),DRAWNULL),COLORWHITE{XG51};
IF(MA(CLOSE,15)>MA(CLOSE,60) AND MA(CLOSE,15)<=REF(MA(CLOSE,15),1),MA(CLOSE,15),DRAWNULL),COLORBLUE{XG51};
IF(MA(CLOSE,15)>MA(CLOSE,60) AND MA(CLOSE,60)<=REF(MA(CLOSE,60),1),MA(CLOSE,60),DRAWNULL),COLORLIMAGENTA{XG51};
IF(MA(CLOSE,15)>MA(CLOSE,60) AND MA(CLOSE,60)>REF(MA(CLOSE,60),1),MA(CLOSE,60),DRAWNULL),COLORWHITE{XG51};
IF(MA(CLOSE,15)<=MA(CLOSE,60) AND MA(CLOSE,60)<=REF(MA(CLOSE,60),1),MA(CLOSE,60),DRAWNULL),COLORLIGREEN{XG51};
IF(MA(CLOSE,15)<=MA(CLOSE,60) AND MA(CLOSE,60)>REF(MA(CLOSE,60),1),MA(CLOSE,60),DRAWNULL),COLORBLUE{XG51};
IF(MA(CLOSE,15)>MA(CLOSE,60) AND MA(CLOSE,15)<=REF(MA(CLOSE,15),1),MA(CLOSE,60),DRAWNULL),COLORBLUE{XG51};
IF(MA(CLOSE,15)<=MA(CLOSE,60) AND MA(CLOSE,15)<=REF(MA(CLOSE,15),1) AND MA(CLOSE,60)>REF(MA(CLOSE,60),1),MA(CLOSE,60),DRAWNULL),COLORRED{XG51};
IF(MA(CLOSE,15)<=MA(CLOSE,60) AND MA(CLOSE,15)>REF(MA(CLOSE,15),1) AND MA(CLOSE,60)<REF(MA(CLOSE,60),1),MA(CLOSE,60),DRAWNULL),COLORLIMAGENTA{XG51};
DRAWKLINE(HIGH,OPEN,LOW,CLOSE){XG51};
DRAWTEXT(CURRBARSCOUNT=1 ,MA1*1.0,'1'){XG51};
DRAWTEXT(CURRBARSCOUNT=5 ,MA1*1.0,'5'){XG51};
DRAWTEXT(CURRBARSCOUNT=10,MA1*1.0,'10'){XG51};
DRAWTEXT(CURRBARSCOUNT=15,MA1*1.0,'15'){XG51};
DRAWTEXT(CURRBARSCOUNT=20,MA1*1.0,'20'){XG51};
DRAWTEXT(CURRBARSCOUNT=30,MA1*1.0,'30'){XG51};
DRAWTEXT(CURRBARSCOUNT=35,MA1*1.0,'35'){XG51};
DRAWTEXT(CURRBARSCOUNT=44,MA1*1.0,'40'){XG51};
DRAWTEXT(CURRBARSCOUNT=50,MA1*1.0,'50'){XG51};
DRAWTEXT(CURRBARSCOUNT=60,MA1*1.0,'60'){XG51};
DRAWICON(crOSS(MA(CLOSE,15),MA(CLOSE,60)),MA(CLOSE,60),17){XG51};
DRAWICON(CROSS(MA(CLOSE,60),MA(CLOSE,15)),MA(CLOSE,15),19){X!G~5~1!C!N!{};