通达信〖策略捉妖〗主图指标公式源码

STICKLINE(C/REF(C,1)>=1+0.11 AND H>L ,C,O,2+0.8,0),COLORMAGENTA;
STICKLINE(REF(C,1)/C>=1+0.11 AND H>L ,C,O,2+0.8,0),COLORLIBLUE;
STICKLINE(H/REF(C,1)>=1+0.11 AND H>C ,H,C,0,0),COLORMAGENTA;
STICKLINE(REF(C,1)/L>=1+0.11 AND H>L ,C,L,0,0),COLORLIBLUE;
DRAWTEXT_FIX(ISLASTBAR,0,0,0,HYBLOCK),COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR,0+0.05,0,0,DYBLOCK),COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR,0,0+0.035,0,GNBLOCK),COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR,0,0+0.07,0,FGBLOCK),COLORMAGENTA;
VAR1:=CLOSE/REF(CLOSE,1)>1.0993 AND CLOSE=HIGH;
VAR2:=CLOSE/REF(CLOSE,1)< 0.913 AND CLOSE=LOW;
VAR3:=CLOSE>REF(CLOSE,1)*1.091 AND CLOSE=HIGH;
VAR4:=REF(VAR3,5) AND REF(VAR3,4) AND CLOSE>OPEN;
VAR7:=CLOSE>REF(CLOSE,1) AND CLOSE>REF(OPEN,5) AND (C-LLV(C,120))/LLV(C,120)*100< 300;
VAR8:=VAR4 AND VAR7 AND REF(VAR3,6)=0;
MA3:MA(CLOSE,3),COLORRED,LINETHICK1;
MA7:MA(CLOSE,7),COLORYELLOW,LINETHICK1;
MA10:MA(CLOSE,10),COLORGREEN,LINETHICK1;
STICKLINE(VAR1,OPEN,CLOSE,2,0),COLORRED;
STICKLINE(VAR2,OPEN,CLOSE,2,0),COLORGREEN;
DRAWICON(VAR8,LOW-0.2,1);
DRAWICON(VAR8,LOW-0.5,9);
DRAWTEXT(VAR8,L*0.985,'捉妖'),COLORYELLOW;
STICKLINE(VAR8,O,C,2.8,0),COLORYELLOW;
STICKLINE(VAR8,C,H,0,0),COLORYELLOW;
STICKLINE(VAR8,O,L,0,0),COLORYELLOW;
B:=MA(CLOSE,34)+MA(CLOSE,34)-REF(MA(CLOSE,34),1);
分水岭:IF(MA(CLOSE,34)< B,B,MA(CLOSE,34)),COLORFF00FF,LINETHICK2;
妖线:分水岭-(EMA(C,13)-分水岭),COLOR00FFFF,LINETHICK2;
捉妖指标:MA(C,5),COLORWHITE,LINETHICK2;
IF(捉妖指标>REF(捉妖指标,1),捉妖指标,DRAWNULL),COLORRED,LINETHICK2;
IF(捉妖指标=REF(捉妖指标,1),捉妖指标,DRAWNULL),COLORRED;
IF(捉妖指标< REF(捉妖指标,1),捉妖指标,DRAWNULL),COLORFF9900,LINETHICK2;
S:=(捉妖指标>妖线);
DD:=分水岭< REF(分水岭,1);
IF(DD,分水岭,DRAWNULL),COLOR00FF00,LINETHICK2;
IF(S,分水岭,DRAWNULL),COLOR00FF00,POINTDOT,LINETHICK4;
DRAWICON(crOSS(分水岭,妖线),分水岭-0.1,1);
A1:=BARSLAST(REF(CROSS("macd.DIF","MACD.DEA"),1));
B1:=REF(C,A1+1)>C AND REF("MACD.DIF",A1+1)<"MACD.DIF" AND CROSS("MACD.DIF","MACD.DEA");
DRAWTEXT(B1>0,L-0.02,'★M'),COLOR00FFFF;
{kdj底背离}
A2:=BARSLAST(REF(CROSS("kdJ.K","KDJ.D"),1));
B2:=REF(C,A2+1)>C AND REF("KDJ.K",A2+1)<"KDJ.K" AND CROSS("KDJ.K","KDJ.D");
DRAWTEXT(B2,L-0.10,'◎K'),COLORFF00FF;
{rsi底背离}
A3:=BARSLAST(REF(CROSS("RSI.RSI1","RSI.RSI2"),1));
B3:=REF(C,A3+1)>C AND REF("RSI.RSI1",A3+1)<"RSI.RSI1" AND CROSS("RSI.RSI1","RSI.RSI2");
DRAWTEXT(B3>0,L-0.18,'◆R'),COLOR0000FF;
{MACD顶背离}
C1:=BARSLAST(REF(CROSS("MACD.DEA","MACD.DIF"),1));
D1:=REF(C,C1+1)<C AND REF("MACD.DIF",C1+1)>"MACD.DIF" AND CROSS("MACD.DEA","MACD.DIF");
DRAWTEXT(D1>0,H+0.16,'★M'),COLOR00FF00;
{KDJ顶背离}
C2:=BARSLAST(REF(CROSS("KDJ.D","KDJ.K"),1));
D2:=REF(C,C2+1)<C AND REF("KDJ.K",C2+1)>"KDJ.K" AND CROSS("KDJ.D","KDJ.K");
DRAWTEXT(D2>0,H+0.08,'◎K'),COLORFFFFCC;
{RSI顶背离}
C3:=BARSLAST(REF(CROSS("RSI.RSI2","RSI.RSI1"),1));
D3:=REF(C,C3+1)<C AND REF("RSI.RSI1",C3+1)>"RSI.RSI1" AND CROSS("RSI.RSI2","RSI.RSI1");
DRAWTEXT(D3>0,H+0.04,'◆R'),COLORFF9900;
M1:=15;
M2:=1;
LC:=REF(C,1);
RSI:=SMA(MAX(C-LC,0),M1,1)/SMA(Abs(C-LC),M1,1)*100;
龙抬头:=CROSS(RSI,20) AND RSI<50;
DRAWICON(龙抬头, LOW*0.97, 1);
DRAWTEXT(龙抬头, LOW*0.96, '龙抬头'),COLORRED;