源码 DD11:0.95,COLORFF33FF; DD22:2,COLORGREEN; {KDJ日金} 日K:='KDJ.K#DAY'(9,3,3); 日D:='KDJ.D#DAY'(9,3,3); DRAWICON(日K>日D,1,1); DRAWICON(日K<> DRAWTEXT(ISLASTBAR=1,1,'日K'),COLORFFFFFF; {MACD日金} 日DIF:='MACD.DIF#DAY'(12,26,9); 日DEA:='MACD.DEA#DAY'(12,26,9); DRAWICON(日DIF>日DEA,1.1,1); DRAWICON(日DIF<> DRAWTEXT(ISLASTBAR=1,1.1,'日M'),COLORFFFFFF; {RSI日} 日RSI:='RSI.RSI1#DAY'(9); DRAWICON(日RSI>50,1.2,1); DRAWICON(日RSI<> DRAWTEXT(ISLASTBAR=1,1.2,'日R'),COLORFFFFFF; {KDJ周金} 周K:='KDJ.K#WEEK'(9,3,3); 周D:='KDJ.D#WEEK'(9,3,3); DRAWICON(周K>周D,1.3,1); DRAWICON(周K<> DRAWTEXT(ISLASTBAR=1,1.3,'周K'),COLORFFFFFF; {MACD周金} 周DIF:='MACD.DIF#WEEK'(12,26,9); 周DEA:='MACD.DEA#WEEK'(12,26,9); DRAWICON(周DIF>周DEA,1.4,1); DRAWICON(周DIF<> DRAWTEXT(ISLASTBAR=1,1.4,'周M'),COLORFFFFFF; {RSI周} 周RSI:='RSI.RSI1#WEEK'(9); DRAWICON(周RSI>50,1.5,1); DRAWICON(周RSI<> DRAWTEXT(ISLASTBAR=1,1.5,'周R'),COLORFFFFFF; {KDJ月金} 月K:='KDJ.K#MONTH'(9,3,3); 月D:='KDJ.D#MONTH'(9,3,3); DRAWICON(月K>月D,1.6,1); DRAWICON(月K<> DRAWTEXT(ISLASTBAR=1,1.6,'月K'),COLORFFFFFF; {MACD月金} 月DIF:='MACD.DIF#MONTH'(12,26,9); 月DEA:='MACD.DEA#MONTH'(12,26,9); DRAWICON(月DIF>月DEA,1.7,1); DRAWICON(月DIF<> DRAWTEXT(ISLASTBAR=1,1.7,'月M'),COLORFFFFFF; {RSI月} 月RSI:='RSI.RSI1#MONTH'(9); DRAWICON(月RSI>50,1.8,1); DRAWICON(月RSI<> DRAWTEXT(ISLASTBAR=1,1.8,'月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.95,1.85,1,0),COLORBLUE; STICKLINE(黑码初显 AND C/REF(C,1)>1.095,0.95,1.85,2,0),COLORYELLOW; STICKLINE(黑码初显 AND C/REF(C,1)>1.095,0.95,1.85,1,0),COLORRED; DRAWTEXT(黑码初显,1.90,'黑'),COLORWHITE; |
|