KDJ月周指标改成 大智慧 可用

编写要求：

解答：

网友求助：

谢谢！
源码：
月K:="KDJ.K#MONTH"COLOR0080FF;
月D:="KDJ.D#MONTH",COLOR0080FF,LINETHICK2;
月J:= "KDJ.J#WEEK", COLOR0080FF,LINETHICK2;
周K:="KDJ.K#WEEK"COLORRED;
周D:="KDJ.D#WEEK",COLORRED,LINETHICK2;
周J:= "KDJ.J#WEEK", COLORRED,LINETHICK2;
周金叉:IF(CROSS(周K,周D),40,0),COLORRED;
月叉:IF(REF(月K,1)<REF(月K,2) AND 月K>REF(月K,1) OR CROSS(月K,月D),60,0),COLOR0080FF;
DRAWICON(周金叉>25 AND 周金叉<45 AND 月叉,8,11);
DRAWICON(CROSS(80,周J) OR CROSS(周D, 周J) AND 月J<REF(月J,1),13,2);