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

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

本指标为了便于小散们更简洁判断中期、短期走势而编辑，主图用两种颜色区域分别表示中短期走势。同时在均线上注明日、周、月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<VAR4,REFDATE(HHV(H,230),DATE),REFDATE(LLV(L,230),DATE),4,0),COLOR555500;
 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<REF(周J,1) ;
 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:=周J<REF(周J,1) AND 周J>0;
 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),LINETHICK0;
 RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
 K:=SMA(RSV,3,1),LINETHICK0;
 D:=SMA(K,3,1),LINETHICK0;
 J:=3*K-2*D,LINETHICK0;
 GG1:=C>0;{股海网提供：www.Guhai.com.cn}
 RJC:DRAWICON(CROSS(K,D),L*0.98,1);
 DRAWTEXT(RJC,L*0.98,'日金叉'),COLOR0000FF;
 RSC:DRAWICON(CROSS(D,K),H*1.03,2),;
 DRAWTEXT(RSC,H*1.03,'日死叉'),COLORFFFFFF;
 ZJC: DRAWICON (CROSS(ZK,ZD), L*0.98,1);
 DRAWTEXT(ZJC,L*0.98,'周金叉'),COLORFF00FF;
 ZSC: DRAWICON (CROSS(ZD,ZK), H*1.03,2),;
DRAWTEXT(ZSC,H*1.03,'周死叉'),COLOR00FFFF;
 YJC: DRAWICON (CROSS(YK,YD), L*0.98,1);
 DRAWTEXT(YJC,L*0.98,'月金叉'),COLORFF0000;
 YSC: DRAWICON (CROSS(YD,YK), H*1.03,2),;
 DRAWTEXT(YSC,H*1.03,'月死叉'),COLORFFFF00;