通达信悲欢离合主图未加密选股指标公式源码

通达信悲欢离合主图未加密选股指标公式源码

源码正文：

N:=60;m:=5{XG51};
bc:=(IF(C>(H+L+C)/3,(H*0.618+L*0.382)*0.382,(H*0.382+L*0.618)*0.382)+(O*0.382+C*0.618)*0.618){XG51};
市价:=AMOUNT/(vol*100){XG51};
MX:=if(INDEXC=C,BC,市价){XG51};
EM6:ema(BC,M),COLORRED{XG51};
EMN:Ema((MA(MX,N)+SMA(MX,N,N/3))/2,N),COLOR6600FF,LINETHICK2{XG51};
悲:EMN-stD(MX,N),COLORAAAA00,DOTLINE{XG51};
欢:EMN+STD(MX,N),COLOR0077FF,DOTLINE{XG51};
gL:=(c-EMN)*c{XG51};
离合:EMN-(Ema(gL,1)-EMN)/EMN,COLOR00bb00{XG51};
箱顶:ref(HHV(EMA(BC,M),(N-(N/10+3))),1),LINETHICK1,COLORFF0080{XG51};
箱底:ref(llV(EMA(BC,M),(N-(N/10+3))),1),LINETHICK1,COLORGREEN{X~G?5_1~C~N~{};

通达信升降泰然主图未加密选股指标公式源码

源码正文：

ma5:ma(c,5),ColorFFFFFF{XG51};
ma10:ma(c,10),color00cc99{XG51};
ma30:ma(c,30),ColorBCFF8B{XG51};
ma60:ma(c,60),Color00ccff{XG51};
Var1:=REF(CLOSE,1){XG51};
Var2:=SMA(MAX(CLOSE-Var1,0),4.1,1)/SMA(Abs(CLOSE-Var1),4.1,1)*100{XG51};
DRAWTEXT(crOSS(Var2,5)AND Var2<30 ,l,'买'),COLORWHITE{XG51};
DRAWTEXT(FILTER(ema(CLOSE,60)-EMA(CLOSE,12)>0 AND EMA(CLOSE,12)/LOW>1.15,5)AND Var2<30 AND C>O,LOW,'☆'), COLORff00ff{XG51};
VARA:=((AMOUNT)/(vol))/(100){XG51};
VARB:=((3)*(HIGH)+LOW+OPEN+(2)*(CLOSE))/(7){XG51};
VARC:=((SUM(AMOUNT,7))/(VARA))/(100){XG51};
VARD:=dma(VARB,(VOL)/(VARC)){XG51};
VARE:=((CLOSE-VARD)/(VARD))*(100){XG51};
VARF:=((CLOSE-LLV(LOW,34))/(HHV(HIGH,34)-LLV(LOW,34)))*(100){XG51};
VARJ:=MA(VARE,20)+stD(VARE,20){XG51};
Var3:=((CLOSE-MA(CLOSE,18))/(MA(CLOSE,18)))*(100){XG51};
Var4:=SMA(VARF,3,1){XG51};
Var5:=(REF(Var3,1)>=5) AND CROSS(VARJ,VARE) AND (Var4>79){XG51};
DRAWTEXT(FILTER((REF(Var3,1)>=5) AND CROSS(VARJ,VARE) AND (Var4>Var5),5),h*1.02,'☆'),colorgreen{XG51};
Var6:=ema(hhv(h,1),8){XG51};
Var7:=EMA(CLOSE,8){XG51};
Var8:=EMA(Var7,30){XG51};
Var9:=(h+l+3*c)/5{XG51};
Var10:=EMA(Var9,5){XG51};
Var11:=EMA(Var9,13){XG51};
Var12:=EMA(Var9,21){XG51};
Var13:=EMA(Var9,34){XG51};
Var13b:=(Var10+Var11+Var12+Var13)/4{XG51};
成本和谐:MA(Var13b,5),colorred,linethick1{XG51};
持股:stickline(成本和谐>ref(成本和谐,1) , 成本和谐*0.998,成本和谐*1.002,8,0),colorred,linethick2{XG51};
Var14:=Var7<ref(Var7,1) and c<Var7{XG51};
小心:stickline(Var6<ref(Var6,1) or Var14, Var6*0.998,Var6*1.003,4,0),colorblue,linethick3{XG51};
乌云:stickline(成本和谐<ref(成本和谐,1) , 成本和谐*0.997,成本和谐*1.003,4,0),colorgray,linethick4{XG51};
Var15:=if((c-ref(c,1))/ref(c,1)>0.025,1,0){XG51};
stickline(c>ref(o,barslast(Var15 =1)),ref(o,barslast(Var15=1)),ref(o,barslast(Var15 =1)),10,0),color00ff00{X_G.5_1_C_N_{};