通达信九九归一选黑马指标(源码)

日K:="KD.K";
日D:="KD.D";
日MACD:="MACD.MACD";
日RSI:="RSI.RSI1"(9);
周K:="KD.K#WEEK";
周D:="KD.D#WEEK";
周MACD:="MACD.MACD#WEEK";
周RSI:="RSI.RSI1#WEEK"(9);
月K:="KD.K#MONTH";
月D:="KD.D#MONTH";
月MACD:="MACD.MACD#MONTH";
月RSI:="RSI.RSI1#MONTH"(9);
黑马:(日K>日D AND 日MACD>0 AND 日RSI>50 AND 周K>周D AND 周MACD>0
AND 周RSI>50 AND 月K>月D AND 月MACD>0 AND 月RSI>50)*3,LINETHICK2;
选:(黑马 AND REF(黑马<3,1))*2,LINETHICK2;
DRAWICON(日K>日D,0.1,1);
DRAWICON(日K<日D,0.1,2);
DRAWICON(日MACD>0,0.6,1);
DRAWICON(日MACD<0,0.6,2);
DRAWICON(日RSI>50,1.1,1);
DRAWICON(日RSI<50,1.1,2);
DRAWICON(周K>周D,1.6,1);
DRAWICON(周K<周D,1.6,2);
DRAWICON(周MACD>0,2.1,1);
DRAWICON(周MACD<0,2.1,2);
DRAWICON(周RSI>50,2.6,1);
DRAWICON(周RSI<50,2.6,2);
DRAWICON(月K>月D,3.1,1);
DRAWICON(月K<月D,3.1,2);
DRAWICON(月MACD>0,3.6,1);
DRAWICON(月MACD<0,3.6,2);
DRAWICON(月RSI>50,4.1,1);
DRAWICON(月RSI<50,4.1,2);