通达信自动画浪主图未加密选股指标公式源码

通达信自动画浪主图未加密选股指标公式源码

源码正文：

GET:zig(3,5),COLORAAAAAA{XG51};
PL5:=ZIG(3,5){XG51};
EN1:=ZIG(3,5)>REF(ZIG(3,5),1) AND REF(ZIG(3,5),1)<=REF(ZIG(3,5),2) AND REF(ZIG(3,5),2)<=REF(ZIG(3,5),3){XG51};
EX1:=ZIG(3,5)<REF(ZIG(3,5),1) AND REF(ZIG(3,5),1)>=REF(ZIG(3,5),2) AND REF(ZIG(3,5),2)>=REF(ZIG(3,5),3){XG51};
PL10:=ZIG(3,13){XG51};
EN2:=ZIG(3,10)>REF(ZIG(3,10),1) AND REF(ZIG(3,10),1)<=REF(ZIG(3,10),2) AND REF(ZIG(3,10),2)<=REF(ZIG(3,10),3){XG51};
EX2:=ZIG(3,10)<REF(ZIG(3,10),1) AND REF(ZIG(3,10),1)>=REF(ZIG(3,10),2) AND REF(ZIG(3,10),2)>=REF(ZIG(3,10),3){XG51};
PL20:=ZIG(3,26){XG51};
EN3:=ZIG(3,20)>REF(ZIG(3,20),1) AND REF(ZIG(3,20),1)<=REF(ZIG(3,20),2) AND REF(ZIG(3,20),2)<=REF(ZIG(3,20),3){XG51};
EX3:=ZIG(3,20)<REF(ZIG(3,20),1) AND REF(ZIG(3,20),1)>=REF(ZIG(3,20),2) AND REF(ZIG(3,20),2)>=REF(ZIG(3,20),3){XG51};
PL40:=ZIG(3,55){XG51};
走强一:=BArslAst(PL5<REF(PL5,1)){XG51};
走弱一:=BARSLAST(PL5>REF(PL5,1)){XG51};
走强二 :=BARSLAST(PL10<REF(PL10,1)){XG51};
走弱二:=BARSLAST(PL10>REF(PL10,1)){XG51};
走强三:=BARSLAST(PL20<REF(PL20,1)){XG51};
走弱三:=BARSLAST(PL20>REF(PL20,1)){XG51};
ZTJZ5:=IF(PL10>REF(PL10,1),COUNT(EN1,走强二 ),0){XG51};
ZTJD5:=IF(PL10>REF(PL10,1),COUNT(EX1,走强二 ),0){XG51};
DTJZ5:=IF(PL10<REF(PL10,1),COUNT(EN1,走弱二),0){XG51};
DTJD5:=IF(PL10<REF(PL10,1),COUNT(EX1,走弱二),0){XG51};
ZTJZ10:=IF(PL20>REF(PL20,1),COUNT(EN2,走强三),0){XG51};
ZTJD10:=IF(PL20>REF(PL20,1),COUNT(EX2,走强三),0){XG51};
DTJZ10:=IF(PL20<REF(PL20,1),COUNT(EN2,走弱三),0){XG51};
DTJD10:=IF(PL20<REF(PL20,1),COUNT(EX2,走弱三),0){XG51};
DRAWTEXT(EN1 AND DTJZ5=1,LOW*0.97,'(Ⅰ)'),COLORFFFF00{XG51};
DRAWTEXT(EX1 AND DTJD5=2,HIGH*1.03,'(Ⅱ)'),COLORFFFF00{XG51};
DRAWTEXT(EN2 AND ZTJZ5=1,LOW*0.97,'(Ⅲ)'),COLORFFFF00{XG51};
DRAWTEXT(EX1 AND PL10>REF(PL10,1) AND ZTJD5=1,HIGH*1.02,'⑴'),COLOR0000FF{XG51};
DRAWTEXT(EN1 AND PL10>REF(PL10,1) AND ZTJZ5=2,LOW*0.98,'⑵'),COLOR0000FF{XG51};
DRAWTEXT(EX1 AND PL10>REF(PL10,1) AND ZTJZ5=2,HIGH*1.02,'⑶'),COLOR0000FF{XG51};
DRAWTEXT(EN1 AND PL10>REF(PL10,1) AND ZTJZ5=3,LOW*0.98,'⑷'),COLOR0000FF{XG51};
DRAWTEXT(EX2 AND PL20>REF(PL20,1) AND ZTJD10=1,HIGH*1.02,'⑸'),COLOR0000FF{XG51};
DRAWTEXT(EN2 AND DTJZ10=1,LOW*0.94,'【A】'),COLOR00FF00{XG51};
DRAWTEXT(EX2 AND DTJD10=2,HIGH*1.05,'【B】'),COLOR00FF00{XG51};
DRAWTEXT(EN3 AND ZTJZ10=1,LOW*0.94,'【C】'),COLOR00FF00{XG51};
DRAWTEXT(EX2 AND PL20>REF(PL20,1) AND ZTJD10=1,HIGH*1.04,'①'),COLOR00FFFF{XG51};
DRAWTEXT(EN2 AND PL20>REF(PL20,1) AND ZTJZ10=2,LOW*0.96,'②'),COLOR00FFFF{XG51};
DRAWTEXT(EX2 AND PL20>REF(PL20,1) AND ZTJD10=2 OR (ZTJD10=0 OR ZTJD10=2) AND EX2,HIGH*1.04,'③'),COLOR00FFFF{XG51};
DRAWTEXT(EN2 AND PL20>REF(PL20,1) AND ZTJZ10=3,LOW*0.96,'④'),COLOR00FFFF{X-G_5-1-C-N-{};

通达信真macd日周未加密选股指标公式源码

源码正文：

maCD周:=MacD.MACD#WEEK,NODRAW{XG51};
stICKLINE(MACD周>=0,0,MACD周,4.2,0),COLOR0080FF{XG51};
STICKLINE(MACD周>=0 AND MACD周<REF(MACD周,WEEkdAY),0,MACD周,4.2,0),COLORLIGREEN{XG51};
STICKLINE(MACD周<0,0,MACD周,4.2,0),COLORLIGREEN{XG51};
STICKLINE(MACD周<0 AND MACD周>REF(MACD周,WEEKDAY),0,MACD周,4.2,0),COLOR0080FF{XG51};
MACD2:=2*("MACD.dif" - "MACD.DEA"){XG51};
STICKLINE(MACD2>=0,0,MACD2,1.4,0),COLOR000096{XG51};
STICKLINE(MACD2>=0,0,MACD2,1.2,0),COLOR0000A5{XG51};
STICKLINE(MACD2>=0,0,MACD2,1.0,0),COLOR0000B4{XG51};
STICKLINE(MACD2>=0,0,MACD2,0.8,0),COLOR0000C3{XG51};
STICKLINE(MACD2>=0,0,MACD2,0.6,0),COLOR0000D2{XG51};
STICKLINE(MACD2>=0,0,MACD2,0.4,0),COLOR0000E1{XG51};
STICKLINE(MACD2>=0,0,MACD2,0.2,0),COLOR0000F0{XG51};
STICKLINE(MACD2>=0,0,MACD2,0.05,0),COLOR0000FF{XG51};
STICKLINE(MACD2>=0 AND MACD2<REF(MACD2,1),0,MACD2,1.4,0),COLOR009600{XG51};
STICKLINE(MACD2>=0 AND MACD2<REF(MACD2,1),0,MACD2,1.2,0),COLOR00A500{XG51};
STICKLINE(MACD2>=0 AND MACD2<REF(MACD2,1),0,MACD2,1.0,0),COLOR00B400{XG51};
STICKLINE(MACD2>=0 AND MACD2<REF(MACD2,1),0,MACD2,0.8,0),COLOR00C300{XG51};
STICKLINE(MACD2>=0 AND MACD2<REF(MACD2,1),0,MACD2,0.6,0),COLOR00D200{XG51};
STICKLINE(MACD2>=0 AND MACD2<REF(MACD2,1),0,MACD2,0.4,0),COLOR00E100{XG51};
STICKLINE(MACD2>=0 AND MACD2<REF(MACD2,1),0,MACD2,0.2,0),COLOR00F000{XG51};
STICKLINE(MACD2>=0 AND MACD2<REF(MACD2,1),0,MACD2,0.05,0),COLOR00FF00{XG51};
STICKLINE(MACD2<0,0,MACD2,1.4,0),COLOR009600{XG51};
STICKLINE(MACD2<0,0,MACD2,1.2,0),COLOR00A500{XG51};
STICKLINE(MACD2<0,0,MACD2,1.0,0),COLOR00B400{XG51};
STICKLINE(MACD2<0,0,MACD2,0.8,0),COLOR00C300{XG51};
STICKLINE(MACD2<0,0,MACD2,0.6,0),COLOR00D200{XG51};
STICKLINE(MACD2<0,0,MACD2,0.4,0),COLOR00E100{XG51};
STICKLINE(MACD2<0,0,MACD2,0.2,0),COLOR00F000{XG51};
STICKLINE(MACD2<0,0,MACD2,0.05,0),COLOR00FF00{XG51};
STICKLINE(MACD2<0 AND MACD2>REF(MACD2,1),0,MACD2,1.4,0),COLOR000096{XG51};
STICKLINE(MACD2<0 AND MACD2>REF(MACD2,1),0,MACD2,1.2,0),COLOR0000A5{XG51};
STICKLINE(MACD2<0 AND MACD2>REF(MACD2,1),0,MACD2,1.0,0),COLOR0000B4{XG51};
STICKLINE(MACD2<0 AND MACD2>REF(MACD2,1),0,MACD2,0.8,0),COLOR0000C3{XG51};
STICKLINE(MACD2<0 AND MACD2>REF(MACD2,1),0,MACD2,0.6,0),COLOR0000D2{XG51};
STICKLINE(MACD2<0 AND MACD2>REF(MACD2,1),0,MACD2,0.4,0),COLOR0000E1{XG51};
STICKLINE(MACD2<0 AND MACD2>REF(MACD2,1),0,MACD2,0.2,0),COLOR0000F0{XG51};
STICKLINE(MACD2<0 AND MACD2>REF(MACD2,1),0,MACD2,0.05,0),COLOR0000FF{XG51};
周DIF:MACD.DIF#WEEK,COLORBROWN,NODRAW{XG51};
周DEA:MACD.DEA#WEEK,COLORBROWN,NODRAW{XG51};
周金叉:=周DIF>周DEA{XG51};
周死叉:=周DIF<周DEA{XG51};
STICKLINE(周金叉,周DIF,周DEA,0,0),COLOR008080{XG51};
STICKLINE(周死叉,周DIF,周DEA,0,0),COLORYELLOW{XG51};
ZA1:=BArslAST(REF(crOSS(周DIF,周DEA),1)){XG51};
周底背离:=REF(CLOSE,ZA1+1)>CLOSE AND 周DIF>REF(周DIF,ZA1+1) AND CROSS(周DIF,周DEA){XG51};
ZA2:=BARSLAST(REF(CROSS(周DEA,周DIF),1)){XG51};
周顶背离:=REF(CLOSE,ZA2+1)<CLOSE AND REF(周DIF,ZA2+1)>周DIF AND CROSS(周DEA,周DIF){XG51};
DRAWTEXT(周底背离,周DIF*1.02,'周底背'),COLORRED{XG51};
DRAWTEXT(周顶背离,周DIF*1.02,'周顶背'),COLORCYAN{XG51};
DIF:ema(CLOSE,12)-EMA(CLOSE,26)COLORMAGENTA,LINETHICK2{XG51};
DEA:EMA(DIF,9)COLORFF0080{XG51};
MACD:2*(DIF-DEA)COLORRED,NODRAW{XG51};
A1:=BARSLAST(REF(CROSS(DIF,DEA),1)){XG51};
底背离:=REF(CLOSE,A1+1)>CLOSE AND DIF>REF(DIF,A1+1) AND CROSS(DIF,DEA){XG51};
DRAWTEXT(底背离,DIF*1,'日底背'),COLORRED{XG51};
A2:=BARSLAST(REF(CROSS(DEA,DIF),1)){XG51};
顶背离:=REF(CLOSE,A2+1)<CLOSE AND REF(DIF,A2+1)>DIF AND CROSS(DEA,DIF){XG51};
DRAWTEXT(顶背离,DIF*1,'日顶背'),COLORCYAN{XG51};
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9)){XG51};
K:=SMA(RSV,9,3),NODRAW{XG51};
D:=SMA(K,9,3),NODRAW{XG51};
J:=3*K-2*D,NODRAW{XG51};
A:=CROSS(DIF,DEA) AND CROSS(K,D) AND CROSS(J,D){XG51};
DRAWTEXT(A,DIF*1.5,'MACD_kdj金叉共振'),COLORRED{X.G_5+1.C.N.{};