通达信简洁的中短标识区域主图指标源码

本指标为了便于小散们更简洁判断中期、短期走势而编辑，主图用两种颜色区域分别表示中短期走势。同时在均线上注明日、周、月KDJ指标的金叉与死叉标识，更方便小散们判断走势。
源码：
VAR1:=(2*C+(H-L)/2+L+O)/4;
VAR2:=(MA(VAR1,55)-MA(VAR1,15)/3);
VAR3:=MA((VAR1-VAR2)/VAR2,1)*100,COLORRED,LINETHICK2;
VAR4:=EMA(VAR3,7),COLOR00FFFF,LINETHICK2;
STICKLINE(VAR3>=VAR4,REFDATE(HHV(H,230),DATE),REFDATE(LLV(L,230),DATE),4,0),COLOR000077;
STICKLINE(VAR3 DRAWKLINE(H,O,L,C);
MA5:MA(CLOSE,4),COLORRED;
MA10:MA(CLOSE,10),COLOR00FFFF;
MA20:MA(CLOSE,20),COLORFF00FF;
MA30:MA(CLOSE,30),COLORFFFFFF;
MA60:MA(CLOSE,60),COLOR00FF00;
周J:=MA("KDJ.J#WEEK"(9,3,3) ,5),COLORFFFF00,LINETHICK2;
AA1:=周J<0 AND 周J FF1:=周J<0 AND 周J>REF(周J,1);
BB1:=周J>=0 AND 周J<85 AND 周J>REF(周J,1);
DD1:=周J>=REF(周J,1) AND 周J>=85 ;
EE1:=周J0;
ZJ1:=MA("KDJ.J#WEEK"(9,3,3) ,5);
YK:=MA("KDJ.K#MONTH"(9,3,3),20),LINETHICK0;
YD:=MA("KDJ.D#MONTH"(9,3,3),20),LINETHICK0;
YJ:=MA("KDJ.J#MONTH"(9,3,3),20);
ZK:=MA("KDJ.K#WEEK"(9,3,3) ,5),LINETHICK0;
ZD:=MA("KDJ.D#WEEK"(9,3,3) ,5),LINETHI