成功率极高的通达信【周月三振】副图指标 源码分享 附图

日K:="KDJ.K#DAY"(9,3,3);
日D:="KDJ.D#DAY"(9,3,3);
日DIF:="MACD.DIF#DAY"(12,26,9);
日DEA:="MACD.DEA#DAY"(12,26,9);
日RSI:="RSI.RSI1#DAY"(9);
周K:="KDJ.K#WEEK"(9,3,3);
周D:="KDJ.D#WEEK"(9,3,3);
周DIF:="MACD.DIF#WEEK"(12,26,9);
周DEA:="MACD.DEA#WEEK"(12,26,9);
周RSI:="RSI.RSI1#WEEK"(9);
月K:="KDJ.K#MONTH"(9,3,3);
月D:="KDJ.D#MONTH"(9,3,3);
月DIF:="MACD.DIF#MONTH"(12,26,9);
月DEA:="MACD.DEA#MONTH"(12,26,9);
月RSI:="RSI.RSI1#MONTH"(9);
X1:=日K>日D;
X2:=日DIF>日DEA;
X3:=日RSI>50;
X4:=周K>周D;
X5:=周DIF>周DEA;
X6:=周RSI>50;
X7:=月K>月D;
X8:=月DIF>月DEA;
X9:=月RSI>50;
黑马初显:=X1 AND X2 AND X3 AND X4 AND X5 AND X6 AND X7 AND X8 AND X9;
黑马:=REF(黑马初显,1)<1 AND 黑马初显;
周RSI1:="RSI.RSI1#WEEK"(9);
AAAA:=周RSI1>50;
首周R:=(CROSS(AAAA>REF(AAAA,1),0.5))*2;
周K1:="KDJ.K#WEEK"(9,3,3);
周D1:="KDJ.D#WEEK"(9,3,3);
AABB:=周K1>周D1;
首周K:=(CROSS(AABB>REF(AABB,1),0.5))*1.8;
周DIF1:="MACD.DIF#WEEK"(12,26,9);
周DEA1:="MACD.DEA#WEEK"(12,26,9);
AAAAA:=周DIF1>周DEA1;
首周M:=(CROSS(AAAAA>REF(AAAAA,1),0.5))*1.6;
月RSI1:="RSI.RSI1#MONTH"(9);
A2B:=月RSI1>50;
首月R:=(CROSS(A2B>REF(A2B,1),0.5))*1.4;
月K1:="KDJ.K#MONTH"(9,3,3);
月D1:="KDJ.D#MONTH"(9,3,3);
AAA:=月K1>月D1;
首月K:=(CROSS(AAA>REF(AAA,1),0.5))*1.2;
月DIF1:="MACD.DIF#MONTH"(12,26,9);
月DEA1:="MACD.DEA#MONTH"(12,26,9);
AA2:=月DIF1>月DEA1;
首月M:=CROSS(AA2>REF(AA2,1),0.5);
周TJ:=首周R AND 首周K AND 首周M;
月TJ:=首月R AND 首月K AND 首月M;
TJ:=COUNT(周TJ OR 月TJ,6)>=1;
周月三振:(COUNT(TJ,5)>=1 AND 黑马)*1.5;
DRAWTEXT(周月三振>0,1.35,' --周月三振'),COLORWHITE;

周TJ2:=首周R OR 首周K OR 首周M;
月TJ2:=首月R OR 首月K OR 首月M;
周月TJ:=COUNT(周TJ2,6)>=1 AND 月TJ2;
月周TJ:=COUNT(月TJ2,6)>=1 AND 周TJ2;
周月差显:(周月TJ OR 月周TJ) AND 黑马,STICK,LINETHICK3;
DRAWTEXT(周月差显>0,0.6,' --周月差显'),COLORYELLOW;

原理解析：
日K赋值:"KDJ.K#DAY"(9,3,3)
日D赋值:"KDJ.D#DAY"(9,3,3)
日DIF:="MACD.DIF#DAY"(12,26,9)
日DEA:="MACD.DEA#DAY"(12,26,9)
日RSI赋值:"RSI.RSI1#DAY"(9)
周K赋值:"KDJ.K#WEEK"(9,3,3)
周D赋值:"KDJ.D#WEEK"(9,3,3)
周DIF:="MACD.DIF#WEEK"(12,26,9)
周DEA:="MACD.DEA#WEEK"(12,26,9)
周RSI赋值:"RSI.RSI1#WEEK"(9)
月K赋值:"KDJ.K#MONTH"(9,3,3)
月D赋值:"KDJ.D#MONTH"(9,3,3)
月DIF:="MACD.DIF#MONTH"(12,26,9)
月DEA:="MACD.DEA#MONTH"(12,26,9)
月RSI赋值:"RSI.RSI1#MONTH"(9)
X1赋值:日K>日D
X2赋值:日DIF>日DEA
X3赋值:日RSI>50
X4赋值:周K>周D
X5赋值:周DIF>周DEA
X6赋值:周RSI>50
X7赋值:月K>月D
X8赋值:月DIF>月DEA
X9赋值:月RSI>50
黑马初显赋值:X1 AND X2 AND X3 AND X4 AND X5 AND X6 AND X7 AND X8 AND X9
黑马赋值:1日前的黑马初显<1 AND 黑马初显
周RSI1:="RSI.RSI1#WEEK"(9)
AAAA赋值:周RSI1>50
首周R赋值:(CROSS(AAAA>1日前的AAAA,0.5))*2
周K1:="KDJ.K#WEEK"(9,3,3)
周D1:="KDJ.D#WEEK"(9,3,3)
AABB赋值:周K1>周D1
首周K赋值:(CROSS(AABB>1日前的AABB,0.5))*1.8
周DIF1:="MACD.DIF#WEEK"(12,26,9)
周DEA1:="MACD.DEA#WEEK"(12,26,9)
AAAAA赋值:周DIF1>周DEA1
首周M赋值:(CROSS(AAAAA>1日前的AAAAA,0.5))*1.6
月RSI1:="RSI.RSI1#MONTH"(9)
A2B赋值:月RSI1>50
首月R赋值:(CROSS(A2B>1日前的A2B,0.5))*1.4
月K1:="KDJ.K#MONTH"(9,3,3)
月D1:="KDJ.D#MONTH"(9,3,3)
AAA赋值:月K1>月D1
首月K赋值:(CROSS(AAA>1日前的AAA,0.5))*1.2
月DIF1:="MACD.DIF#MONTH"(12,26,9)
月DEA1:="MACD.DEA#MONTH"(12,26,9)
AA2赋值:月DIF1>月DEA1
首月M赋值:CROSS(AA2>1日前的AA2,0.5)
周TJ赋值:首周R AND 首周K AND 首周M
月TJ赋值:首月R AND 首月K AND 首月M
TJ赋值:统计6日满足周TJ OR 月TJ的天数>=1
输出周月三振:(统计5日满足TJ的天数>=1 AND 黑马)*1.5
当满足条件周月三振>0时,在1.35和' --周月三振'位置书写文字
周TJ2:=首周R OR 首周K OR 首周M
月TJ2:=首月R OR 首月K OR 首月M
周月TJ赋值:统计6日满足周TJ2的天数>=1 AND 月TJ2
月周TJ赋值:统计6日满足月TJ2的天数>=1 AND 周TJ2
输出周月差显:(周月TJ OR 月周TJ) AND 黑马,STICK, 线宽为3
当满足条件周月差显>0时,在0.6和' --周月差显'位置书写文字