通达信黄金背离主图未加密选股指标公式源码

通达信黄金背离主图未加密选股指标公式源码

源码正文：

日:=150;昨前:=3{XG51};
高1:=REF(HHV(H,日),昨前){XG51};
低1:=REF(LLV(L,日),昨前){XG51};
H1:=高1-(高1-低1)*0.191{XG51};
H2:=高1-(高1-低1)*0.382{XG51};
H3:=高1-(高1-低1)*0.5{XG51};
H4:=高1-(高1-低1)*0.618{XG51};
H5:=高1-(高1-低1)*0.809{XG51};
顶:REFDATE(高1,DATE),COLORCYAN,crOSSDOT,LINETHICK2{XG51};
零点191:REFDATE(H1,DATE),COLORGREEN{XG51};
零点382:REFDATE(H2,DATE),COLORBLUE{XG51};
零点5:REFDATE(H3,DATE),COLORWHITE{XG51};
零点618:REFDATE(H4,DATE),COLORBLUE{XG51};
零点809:REFDATE(H5,DATE),COLORGREEN{XG51};
低:REFDATE(低1,DATE),COLORWHITE,CROSSDOT,LINETHICK2{XG51};
difF:=ema(CLOSE,12) - Ema(CLOSE,26){XG51};
DEA:=EMA(DIFF,8){XG51};
A1:=BArslAst(REF(CROSS(DIFF,DEA),1));
B1:=REF(C,A1+1)>C AND REF(DIFF,A1+1)<DIFF AND CROSS(DIFF,DEA);
DRAWTEXT(IF(B1>0,1,0),L-0.1,'macd底背'),COLORBLUE{XG51};
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100{XG51};
K:=SMA(RSV,3,1){XG51};
D:=SMA(K,3,1){XG51};
A2:=BARSLAST(REF(CROSS(K,D),1));
B2:=REF(C,A2+1)>C AND REF(K,A2+1)<K AND CROSS(K,D);
DRAWTEXT(IF(B2>0,1,0),L-0.25,'kdj底背'),COLORBLUE{XG51};
LC:=REF(CLOSE,1){XG51};
rsi1:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(Abs(CLOSE-LC),6,1)*100{XG51};
RSI2:=SMA(MAX(CLOSE-LC,0),12,1)/SMA(ABS(CLOSE-LC),12,1)*100{XG51};
A3:=BARSLAST(REF(CROSS(RSI1,RSI2),1));
B3:=REF(C,A3+1)>C AND REF(RSI1,A3+1)<RSI1 AND CROSS(RSI1,RSI2);
DRAWTEXT(IF(B3>0,1,0),L-0.4,'RSI底背'),COLORFF00FF{XG51};
C1:=BARSLAST(REF(CROSS(DEA,DIFF),1));
D1:=REF(C,C1+1)<C AND REF(DIFF,C1+1)>DIFF AND CROSS(DEA,DIFF);
DRAWTEXT(IF(D1>0,1,0),H+0.1,'MacD顶背'),COLORBLUE{XG51};
C2:=BARSLAST(REF(CROSS(D,K),1));
D2:=REF(C,C2+1)<C AND REF(K,C2+1)>K AND CROSS(D,K);
DRAWTEXT(IF(D2>0,1,0),H+0.25,'kdJ顶背'),COLORRED;
C3:=BARSLAST(REF(CROSS(RSI2,RSI1),1));
D3:=REF(C,C3+1)<C AND REF(RSI1,C3+1)>RSI1 AND CROSS(RSI2,RSI1);
DRAWTEXT(IF(D3>0,1,0),H+0.4,'RSI顶背'),COLORFF00FF{XG51};
JJ:=(H+L+3*C)/5{XG51};
VAR21:=EMA(JJ,5);VAR22:=EMA(JJ,13);VAR23:=EMA(JJ,21);VAR24:=EMA(JJ,34);H1A:=(VAR21+VAR22+VAR23+VAR24)/4{XG51};
RSI:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100{XG51};
LL:=LLV(C,100){XG51};
TJ:=IF((C-REF(C,1))/REF(C,1)>0.025,1,0){XG51};
STICKLINE(C>REF(O,BARSLAST(TJ =1)),REF(O,BARSLAST(TJ =1)),REF(O,BARSLAST(TJ =1)),10,0),COLORCYAN{XG51};
VAR4:=(LOW+HIGH+CLOSE)/3{X+G-5^1+C+N+{};

通达信穿越筹码峰未加密选股指标公式源码

源码正文：

KK:=ema(WINNER(C)*70,3);
FF:=Ema((WINNER(C*1.1)-WINNER(C*0.9))*70,3);
JJ:=FF-KK{XG51};
CC:=COst(95){XG51};
DD:=COST(5){XG51};
EE:=(CC-DD)/(CC+DD)*200{XG51};
crOSS(KK,JJ)&&EE<=16{X_G~5~1_C_N_{};