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

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

源码正文：

A:=ma(CLOSE,17)+Abs(MA(CLOSE,17)-REF(MA(CLOSE,17),1)){XG51};
B:=MA(CLOSE,17)+MA(CLOSE,17)-REF(MA(CLOSE,17),1){XG51};
分水岭:IF(MA(CLOSE,17)<B,B,MA(CLOSE,17)),COLORFF00FF,LINETHICK2{XG51};
操作线:分水岭-(ema(C,3)-分水岭),COLOR00FFFF,LINETHICK2{XG51};
PM:MA(C,5),COLORRED,LINETHICK2{XG51};
IF(PM> REF(PM,1),PM,DRAWNULL),COLORWHITE,LINETHICK2{XG51};
IF(PM=REF(PM,1),PM,DRAWNULL),COLORWHITE{XG51};
IF(PM<REF(PM,1),PM,DRAWNULL),COLORFF9900,LINETHICK2{XG51};
S:=(PM> 操作线){XG51};
DD:=分水岭<REF(分水岭,1){XG51};
IF(DD,分水岭,DRAWNULL),COLOR00FF00,LINETHICK2{XG51};
IF(S,分水岭,DRAWNULL),COLOR00FF00,POINTDOT,LINETHICK4{XG51};
DRAWICON(crOSS(分水岭,操作线),分水岭-0.1,1){XG51};
A1:=BArslAst(REF(CROSS("macd.dif","MacD.DEA"),1)){XG51};
B1:=REF(C,A1+1)> C AND REF("MACD.DIF",A1+1)<"MACD.DIF" AND CROSS("MACD.DIF","MACD.DEA"){XG51};
DRAWTEXT(B1> 0,L-0.02,'MACD底背离'),COLOR00FFFF{XG51};
A2:=BARSLAST(REF(CROSS("kdj.K","kdj.D"),1)){XG51};
B2:=REF(C,A2+1)> C AND REF("KDJ.K",A2+1)<"KDJ.K" AND CROSS("KDJ.K","KDJ.D"){XG51};
DRAWTEXT(B2,L-0.10,'KDJ底背离'),COLORFF00FF{XG51};
A3:=BARSLAST(REF(CROSS("rsi.RSI1","RSI.RSI2"),1)){XG51};
B3:=REF(C,A3+1)> C AND REF("RSI.RSI1",A3+1)<"RSI.RSI1" AND CROSS("RSI.RSI1","RSI.RSI2"){XG51};
DRAWTEXT(B3> 0,L-0.18,'RSI底背离'),COLOR0000FF{XG51};
C1:=BARSLAST(REF(CROSS("MACD.DEA","MACD.DIF"),1)){XG51};
D1:=REF(C,C1+1)<C AND REF("MACD.DIF",C1+1)> "MACD.DIF" AND CROSS("MACD.DEA","MACD.DIF"){XG51};
DRAWTEXT(D1> 0,H+0.16,'MACD顶背离'),COLOR00FF00{XG51};
C2:=BARSLAST(REF(CROSS("KDJ.D","KDJ.K"),1)){XG51};
D2:=REF(C,C2+1)<C AND REF("KDJ.K",C2+1)> "KDJ.K" AND CROSS("KDJ.D","KDJ.K"){XG51};
DRAWTEXT(D2> 0,H+0.08,'KDJ顶背离'),COLORFFFFCC{XG51};
C3:=BARSLAST(REF(CROSS("RSI.RSI2","RSI.RSI1"),1)){XG51};
D3:=REF(C,C3+1)<C AND REF("RSI.RSI1",C3+1)> "RSI.RSI1" AND CROSS("RSI.RSI2","RSI.RSI1"){XG51};
DRAWTEXT(D3> 0,H+0.04,'RSI顶背离'),COLORFF9900;{X~G_5+1~C~N~{};

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

源码正文：

SHORT:=12{XG51};
LONG:=26{XG51};
MID:=9{XG51};
dif:=ema(CLOSE,SHORT)-Ema(CLOSE,LONG){XG51};
DEA:=EMA(DIF,MID){XG51};
macd:=(DIF-DEA)*2,COLORstICK{XG51};
STICKLINE(DIF>DEA,OPEN,C,3,0),COLORWHITE{XG51};
STICKLINE(DIF<DEA,OPEN,C,3,0),COLOR338833{XG51};
N:=9{XG51};
M1:=3{XG51};
M2:=3{XG51};
RSV:=(CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100{XG51};
K:=SMA(RSV,M1,1){XG51};
D:=SMA(K,M2,1){XG51};
J:=3*K-2*D{XG51};
STICKLINE(J>D,OPEN,(CLOSE+OPEN)/2,3,0),COLORWHITE{XG51};
STICKLINE(J<D,OPEN,(CLOSE+OPEN)/2,3,1),COLOR338833{XG51};
LC:=REF(CLOSE,1){XG51};
RS1:=SMA(MAX(CLOSE-LC,0),12,1)/SMA(Abs(CLOSE-LC),12,1)*100{XG51};
VM:=MA(RS1,6),COLORFF00FF,NODRAW{XG51};
STICKLINE(RS1>VM AND RS1>70,O,C,3,0),COLOR009393{XG51};
STICKLINE(RS1>VM AND RS1>70,O,C,2.2,0),COLOR00C6C6{XG51};
STICKLINE(RS1>VM AND RS1>70,O,C,0.5,0),COLORBLUE{XG51};
DRAWTEXT_FIX(1,0.70,0.95,0,'使用说明: '),COLORBLUE{XG51};
DRAWTEXT_FIX(1,0.85,0.97,0,'上绿或全绿变盘 '),COLOR338833{XG51};
DRAWTEXT_FIX(1,0.85,0.93,0,'下红上绿或可持'),COLORRED{XG51};
DRAWTEXT_FIX(1,0.78,0.93,0,'全红 上 涨'),COLORWHITE{XG51};
DRAWTEXT_FIX(1,0.78,0.97,0,'全黄 大牛'),COLORBLUE{X?G-5+1?C?N?{};