DD11:0.9,COLORFF33FF;
DD22:1.2,COLORGREEN;
{黄金柱}
M:=30;
N:=15;
AJ:=HHV(H,M)=H;
AJT:=BARSLAST(AJ);
AJ1:=LLV(L,N)=L;
AJ1T:=BARSLAST(AJ1);
TJ:=HHV(H,M)=H;
TJT:BARSLAST(TJ)NODRAW;
TJ1T:=BARSLAST(AJ1);
{STICKLINE((TJT=0,H,TJ1T=0) AND AJ1 AND FILTERX(AJ1,TJT+1) ,REF(L,TJ1T)
,REF(H,TJT),0,0)COLORBLUE,LINETHICK3;}
OUT:=STICKLINE((TJT=0,H,TJ1T=0) AND AJ1 AND FILTERX(AJ1,TJT+1) ,REF(L,TJ1T)
,REF(H,TJT),0,0)COLORBLUE,LINETHICK3;
STICKLINE(OUT>0,0,0.89,4,0),COLORYELLOW,LINETHICK2;{黄色柱}
DRAWTEXT(OUT,0.95,'底'),COLORYELLOW;
{KDJ日金}
日K:=KDJ.K#DAY(9,3,3);
日D:=KDJ.D#DAY(9,3,3);
DRAWICON(日K>日D,0.1,32);
DRAWICON(日K>日D,0.1,2);
DRAWTEXT(ISLASTBAR=1,0.1,'日K');
{MACD日金}
日DIF:=MACD.DIF#DAY(12,26,9);
日DEA:=MACD.DEA#DAY(12,26,9);
DRAWICON(日DIF>日DEA,0.2.1,32);
DRAWICON(日DIF>日DEA,0.2,2);
DRAWTEXT(ISLASTBAR=1,0.2,'日M');
{RSI日}
日RSI:=RSI.RSI1#DAY(9);
DRAWICON(日RSI>50,0.3,32);
DRAWICON(日RSI>50,0.3,2);
DRAWTEXT(ISLASTBAR=1,0.3,'日R');
{KDJ周金}
周K:=KDJ.K#WEEK(9,3,3);
周D:=KDJ.D#WEEK(9,3,3);
DRAWICON(周K>周D,0.4,13);
DRAWICON(周K>周D,0.4,2);
DRAWTEXT(ISLASTBAR=1,0.4,'周K');
{MACD周金}
周DIF:=MACD.DIF#WEEK(12,26,9);
周DEA:=MACD.DEA#WEEK(12,26,9);
DRAWICON(周DIF>周DEA,0.5,13);
DRAWICON(周DIF>周DEA,0.5,2);
DRAWTEXT(ISLASTBAR=1,0.5,'周M');
{RSI周}
周RSI:=RSI.RSI1#WEEK(9);
DRAWICON(周RSI>50,0.6,13);
DRAWICON(周RSI>50,0.6,2);
DRAWTEXT(ISLASTBAR=1,0.6,'周R');
{KDJ月金}
月K:=KDJ.K#MONTH(9,3,3);
月D:=KDJ.D#MONTH(9,3,3);
DRAWICON(月K>月D,0.7,33);
DRAWICON(月K>月D,0.7,2);
DRAWTEXT(ISLASTBAR=1,0.7,'月K');
{MACD月金}
月DIF:=MACD.DIF#MONTH(12,26,9);
月DEA:=MACD.DEA#MONTH(12,26,9);
DRAWICON(月DIF>月DEA,0.8,33);
DRAWICON(月DIF>月DEA,0.8,2);
DRAWTEXT(ISLASTBAR=1,0.8,'月M');
{RSI月}
月RSI:=RSI.RSI1#MONTH(9);
DRAWICON(月RSI>50,0.9,33);
DRAWICON(月RSI>50,0.9,2);
DRAWTEXT(ISLASTBAR=1,0.9,'月R');
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.05,0.91,0.12,0),COLORRED;
STICKLINE(黑马初显 AND C/REF(C,1)>1.095,0.05,0.91,0.66,0),COLORYELLOW;
STICKLINE(黑马初显 AND C/REF(C,1)>1.095,0.05,0.91,0.06,0),COLORRED;
月RSI1:=RSI.RSI1#MONTH(9),COLORWHITE;
A:=月RSI1>50;
首月R:CROSS(A>REF(A,1),0.5),COLORWHITE,LINETHICK3;
STICKLINE(首月R,1.2,1.12,5,0),COLORWHITE,LINETHICK3;
DRAWTEXT(首月R,1.11,'  --月共振'),COLORWHITE;
月DIF1:=MACD.DIF#MONTH(12,26,9)COLORYELLOW;
月DEA1:=MACD.DEA#MONTH(12,26,9)COLORYELLOW;
AA:=月DIF1>月DEA1;
首月M:CROSS(AA>REF(AA,1),0.5)COLORYELLOW;
STICKLINE(首月M,1.15,1.1,5,0),COLORYELLOW;
月K1:=KDJ.K#MONTH(9,3,3),COLORMAGENTA;
月D1:=KDJ.D#MONTH(9,3,3),COLORMAGENTA;
AAA:=月K1>月D1;
首月K:CROSS(AAA>REF(AAA,1),0.5),COLORMAGENTA,LINETHICK3;
STICKLINE(首月K,1.1,1.05,5,0),COLORMAGENTA,LINETHICK3;
周RSI1:=RSI.RSI1#WEEK(9),COLORGREEN;
AAAA:=周RSI1>50;
首周R:CROSS(AAAA>REF(AAAA,1),0.5),COLORRED,LINETHICK4;
STICKLINE(首周R,1.05,1,5,0),COLORRED,LINETHICK4;
DRAWTEXT(首周R,1.03,' --周共振'),COLORRED;
周DIF1:=MACD.DIF#WEEK(12,26,9),COLORCYAN;
周DEA1:=MACD.DEA#WEEK(12,26,9),COLORCYAN;
AAAAA:=周DIF1>周DEA1;
首周M:CROSS(AAAAA>REF(AAAAA,1),0.5),COLORCYAN;
STICKLINE(首周M,1,0.95,5,0),COLORCYAN;
周K1:=KDJ.K#WEEK(9,3,3),COLORBLUE;
周D1:=KDJ.D#WEEK(9,3,3),COLORBLUE;
AAAAAA:=周K1>周D1;
首周K:CROSS(AAAAAA>REF(AAAAAA,1),0.5),COLORBLUE;
STICKLINE(首周K,1.05,1,0,0),COLORBLUE,LINETHICK1;
STICKLINE(首周K,0.95,0.91,5,0),COLORBLUE;
DRAWTEXT(首周K,0.935,' --黄金坑'),COLORYELLOW;
DRAWTEXT(黑马初显,0.935,'-飚'),COLORYELLOW;
