通达信红黄色线上穿0轴为真实上涨副图源码

通达信红黄色线上穿0轴为真实上涨副图源码

源码>>>>>N:=20;M:=8;P:=4;
 GDG:CLOSE-REF(MA(CLOSE,N),N/2+1),COLORGREEN,LINETHICK1;
 KK:=MA(GDG,P),COLOR776600,LINETHICK1;
 RG:MA(GDG,M),COLORYELLOW,LINETHICK3;
 TJ1:EMA(RG,4),COLORCYAN,,LINETHICK3;
 TJ2:EMA(TJ1,2),COLOR779900,,LINETHICK4;
 IF(GDG>REF(RG,1),GDG,DRAWNULL),COLORYELLOW,LINETHICK1;
 {IF(KK>REF(KK,1),KK,DRAWNULL),COLOR1474FF,LINETHICK1;}
 IF(RG>REF(TJ1,1),RG,DRAWNULL),COLORRED,LINETHICK3;
 IF(TJ1>REF(TJ1,1),TJ1,DRAWNULL),COLORMAGENTA,LINETHICK3;
 IF(TJ2>REF(TJ2,1),TJ2,DRAWNULL),COLOR330099,LINETHICK4;
 
DRAWBAND(RG,RGB(255,195,0),TJ2,RGB(16,60,57));
 DRAWBAND(GDG,RGB(255,29,0),RG,RGB(0,128,128));
 
0,COLORGRAY;
 0.6,COLORRED,POINTDOT;
 -0.6,COLORLIBLUE,POINTDOT;
 {F:=CROSS(GDG,KK);
 DRAWICON(F,KK-0.01,11);}
 G:=CROSS(GDG,0);
 DRAWICON(G,0+0.01,16);
 {D:=CROSS(GDG,TJ2);
 DRAWICON(D,TJ2-0.01,5);
 E:=CROSS(TJ2,GDG);
 DRAWICON(E,TJ2+0.01,6);};