通达信富翁主图未加密选股指标公式源码

源码正文：

A:=DRAWLINE(LOW<=LLV(LOW,120),LOW,HHV(H,6)<=HHV(H,10),LLV(LOW,6),1), COLORYELLOW ,LINETHICK2{XG51};
TY:=C{XG51};
成本:=(ma(CLOSE,60)+MA(CLOSE,70)+MA(CLOSE,90)+MA(CLOSE,108))/4,COLORWHITE,LINETHICK2{XG51};
MA0:MA(C,0)COLORBLUE ,LINETHICK2{XG51};
K:=(C+H+L)/3{XG51};
D:=MA(K,4){XG51};
阻力:=HHV(D,55),COLORBLUE,LINETHICK2{XG51};
顶部:=HHV(H*0.98,55)COLORFFFFFF,LINETHICK2{XG51};
DRAWICON(REF(C,1)<D AND C>D AND D<REF(D,1),L*0.98,1),COLORBLUE,LINETHICK2 {XG51};
TYP:= (HIGH + LOW +2* C)/4{XG51};
均线:=ema(TYP,3),LINETHICK2,COLORRED{XG51};
均线上轨:=HHV(均线,14),LINETHICK2,COLORBLUE{XG51};
均线下轨:=LLV(均线,14),LINETHICK2,COLORCYAN{XG51};
角度:=ATAN((均线/REF(均线,1)-1)*100)*180/3.1416{XG51};
stICKLINE(CLOSE>=OPEN,HIGH,LOW,0,1 ),COLOR5B5BFF{XG51};
STICKLINE(CLOSE>=OPEN,OPEN,CLOSE,2.7,0 ),COLOR0000CC{XG51};
STICKLINE(CLOSE>=OPEN,OPEN,CLOSE,2,0 ),COLOR0E0EFF{XG51};
STICKLINE(CLOSE>=OPEN,OPEN,CLOSE,1.2,0 ),COLOR4848FF{XG51};
STICKLINE(CLOSE>=OPEN,OPEN,CLOSE,0.6,0 ),COLOR7878FF{XG51};
STICKLINE(CLOSE>=OPEN,OPEN,CLOSE,0.1,0 ),COLORA1A1FF{XG51};
STICKLINE(CLOSE>=OPEN,OPEN,CLOSE,0,0 ),COLORCacAFF{XG51};
STICKLINE(CLOSE< OPEN,HIGH,LOW,0,1 ),COLORGREEN{XG51};
STICKLINE(CLOSE< OPEN,OPEN,CLOSE,2.7,0 ),COLOR990000{XG51};
STICKLINE(CLOSE< OPEN,OPEN,CLOSE,2,0 ),COLORCC0000{XG51};
STICKLINE(CLOSE< OPEN,OPEN,CLOSE,1.2,0 ),COLORFF4400{XG51};
STICKLINE(CLOSE< OPEN,OPEN,CLOSE,0.6,0 ),COLORFF8800{XG51};
STICKLINE(CLOSE< OPEN,OPEN,CLOSE,0.1,0 ),COLORFFCC00{XG51};
STICKLINE(CLOSE< OPEN,OPEN,CLOSE,0,0 ),COLORGREEN{XG51};
X:=(20*A+19*REF(A,1)+18*REF(A,2)+17*REF(A,3)+16*REF(A,4)+15*REF(A,5)+
14*REF(A,6)+13*REF(A,7)+12*REF(A,8)+11*REF(A,9)+10*REF(A,10)+9*REF(A,11)+8*REF(A,12)
+7*REF(A,13)+6*REF(A,14)+5*REF(A,15)+4*REF(A,16)+3*REF(A,17)+2*REF(A,18)+
REF(A,20))/210{XG51};
mtm:=C-REF(C,1){XG51};
DX:=100*EMA(EMA(MTM,6),6)/EMA(EMA(Abs(MTM),6),6){XG51};
CB:=EMA(X,13){XG51};
买:=IF(LLV(DX,2)=LLV(DX,7) AND COUNT(DX<0,2) AND crOSS(DX,MA(DX,2)),1,0){XG51};
DRAWICON(FILTER(买=1,5),L*0.97,1){X?G^5~1?C?N?{};

源码正文：

阿门1:=((C-LLV(L,21))/(HHV(H,21)-LLV(L,21)))*100{XG51};
阿门2:=SMA(阿门1,13,8){XG51};
耶稣传道:CEILING(Sma(阿门2,13,8)),LINETHICK0,COLOR0000FF{XG51};
耶稣说道:MA(3*SMA((C-LLV(L,27))/(HHV(H,27)-LLV(L,27))*100,5,1)-2*SMA(SMA((C-LLV(L,27))/(HHV(H,27)-LLV(L,27))*100,5,1),3,1),5),LINETHICK0,COLORbbffcc{XG51};
阿门3:=BArslAst(ref(cross(耶稣传道,耶稣说道),1)){XG51};
阿门4:=ref(c,阿门3+1)>c and ref(耶稣传道,阿门3+1)<耶稣传道 and cross(耶稣传道,耶稣说道){XG51};
DRAWTEXT(FILTER(阿门4>0,5),耶稣传道,'★'),colorwhite{XG51};
DRAWTEXT(FILTER(阿门4>0,5),耶稣传道*1.5,'底背离'),coloryellow{XG51};
阿门5:=(((((3 * SMA((((CLOSE - LLV(LOW,27)) / (HHV(HIGH,27) - LLV(LOW,27))) * 100),5,1)) - (2 * SMA(SMA((((CLOSE - LLV(LOW,27)) / (HHV(HIGH,27) - LLV(LOW,27))) * 100),5,1),3,1))) - 50) * 1.032) + 50){XG51};
入教堂:IF(CROSS(阿门5,21),50,18.5),LINETHICK1,colorwhite{XG51};
出教堂:IF(CROSS(87,阿门5),50,81.5),LINETHICK1,colorFf8080{XG51};
阿门6:=(HIGH+LOW+CLOSE+open)/4{XG51};
阿门7:=(阿门6-MA(阿门6,14))/(0.015*AVEDEV(阿门6,14)){XG51};
阿门8:=(阿门6-MA(阿门6,70))/(0.015*AVEDEV(阿门6,70)){XG51};
阿门9:=IF(阿门7>=150 AND 阿门7<200 AND 阿门8>=150 AND 阿门8<200,10,0){XG51};
阿门10:=IF(阿门7<=-150 AND 阿门7>-200 AND 阿门8<=-150 AND 阿门8>-200,-10,阿门9){XG51};
祈祷:(IF(阿门8>=200 AND 阿门7>=150,15,IF(阿门8<=-200 AND 阿门7<=-150,-15,阿门10))+50),colorcc9900 ,linethick2 ,crossdot{XG51};
门徒1 :=(C-ema(C,5))/EMA(C,5)*100{XG51};
门徒2 :=(C-EMA(C,10))/EMA(C,10)*100{XG51};
门徒3 :=(C-EMA(C,21))/EMA(C,21)*100{XG51};
信众1 :=-(C-EMA(C,5))/EMA(C,5)*100{XG51};
信众2 :=-(C-EMA(C,10))/EMA(C,10)*100{XG51};
信众3 :=-(C-EMA(C,21))/EMA(C,21)*100{XG51};
得救:IF(EMA((信众1+2*信众2+3*信众3)/6,4)<-3.3,100,81),color00ff00{XG51};
起信:IF(EMA((门徒1+2*门徒2+3*门徒3)/6,4)<-3.3,0,18),coloryellow{XG51};
阿门11:=LLV(L,34){XG51};
阿门12:=EMA(((3*C+H+L+O)/6-阿门11)/(HHV(H,34)-阿门11)*100,8){XG51};
阿门13:=EMA(阿门12,5){XG51};
阿门14:=TROUGHBARS( 3,13,1){XG51};
阿门15:=PEAKBARS(3 ,13,1){XG51};
阿门16:=BARSLAST(阿门15>阿门14){XG51};
阿门17:=PEAK(3 ,13,1){XG51};
阿门18:=(C-阿门17)/阿门17*100<-13 AND REF(C,2)>=REF(C,1) AND C>REF(C,1){XG51};
阿门19:=IF(阿门18 AND REF(C,1)=LLV(C,阿门16) OR 阿门14=1,35,45){XG51};
耶稣显现:IF(阿门12<10 AND (阿门13-阿门12)*10<15 AND (阿门19=35 OR REF(阿门19,1)=35),10,阿门19),colorff00ff{X+G_5.1+C+N+{};