日D:="KDJ.D#DAY"(9,3,3);
STICKLINE(日K>日D,0,0.5,4,0),COLORMAGENTA,LINETHICK2;
STICKLINE(日K< 日D,0,0.5,4,0),COLORGREEN,LINETHICK2;
DRAWTEXT(ISLASTBAR=1,0.1,' 日K'),COLORFFFFFF;
日DIF:="MACD.DIF#DAY"(12,26,9);
日DEA:="MACD.DEA#DAY"(12,26,9);
STICKLINE(日DIF>日DEA,1,1.5,4,0),COLORMAGENTA,LINETHICK2;
STICKLINE(日DIF< 日DEA,1,1.5,4,0),COLORGREEN,LINETHICK2;
DRAWTEXT(ISLASTBAR=1,1.1,' 日M'),COLORFFFFFF;
日RSI:="RSI.RSI1#DAY"(9);
STICKLINE(日RSI>50,2,2.5,4,0),COLORMAGENTA,LINETHICK2;
STICKLINE(日RSI< 50,2,2.5,4,0),COLORGREEN,LINETHICK2;
DRAWTEXT(ISLASTBAR=1,2.1,' 日R'),COLORFFFFFF;
周K:="KDJ.K#WEEK"(9,3,3);
周D:="KDJ.D#WEEK"(9,3,3);
STICKLINE(周K>周D,3,3.5,4,0),COLORMAGENTA,LINETHICK2;
STICKLINE(周K< 周D,3,3.5,4,0),COLORGREEN,LINETHICK2;
DRAWTEXT(ISLASTBAR=1,3.1,' 周K'),COLORFFFFFF;
周DIF:="MACD.DIF#WEEK"(12,26,9);
周DEA:="MACD.DEA#WEEK"(12,26,9);
STICKLINE(周DIF>周DEA,4,4.5,4,0),COLORMAGENTA,LINETHICK2;
STICKLINE(周DIF< 周DEA,4,4.5,4,0),COLORGREEN,LINETHICK2;
DRAWTEXT(ISLASTBAR=1,4.1,' 周M'),COLORFFFFFF;
周RSI:="RSI.RSI1#WEEK"(9);
STICKLINE(周RSI>50,5,5.5,4,0),COLORMAGENTA,LINETHICK2;
STICKLINE(周RSI< 50,5,5.5,4,0),COLORGREEN,LINETHICK2;
DRAWTEXT(ISLASTBAR=1,5.1,' 周R'),COLORFFFFFF;
月K:="KDJ.K#MONTH"(9,3,3);
月D:="KDJ.D#MONTH"(9,3,3);
STICKLINE(月K>月D,6,6.5,4,0),COLORMAGENTA,LINETHICK2;
STICKLINE(月K< 月D,6,6.5,4,0),COLORGREEN,LINETHICK2;
DRAWTEXT(ISLASTBAR=1,6.1,' 月K'),COLORFFFFFF;
月DIF:="MACD.DIF#MONTH"(12,26,9);
月DEA:="MACD.DEA#MONTH"(12,26,9);
STICKLINE(月DIF>月DEA,7,7.5,4,0),COLORMAGENTA,LINETHICK2;
STICKLINE(月DIF< 月DEA,7,7.5,4,0),COLORGREEN,LINETHICK2;
DRAWTEXT(ISLASTBAR=1,7.1,' 月M'),COLORFFFFFF;
月RSI:="RSI.RSI1#MONTH"(9);
STICKLINE(月RSI>50,8,8.5,4,0),COLORMAGENTA,LINETHICK2;
STICKLINE(月RSI< 50,8,8.5,4,0),COLORGREEN,LINETHICK2;
DRAWTEXT(ISLASTBAR=1,8.1,' 月R'),COLORFFFFFF;
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;
STICKLINE(黑马初显,0,1.85,1,0),COLORBLUE;
STICKLINE(黑马初显 AND C/REF(C,1)>1.095,0,1.85,2,0),COLORYELLOW;
STICKLINE(黑马初显 AND C/REF(C,1)>1.095,0,1.85,1,0),COLORRED;
DRAWTEXT(黑马初显,1.90,'黑'),COLORWHITE;
