无悔波段 主图源码

DRAWGBKlast(c>0,strip(RGB(0,0,0),RGB(0,0,780),0));
 {www.gszb.com1.K线}
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,8,0) ,COLOR000011;
 STICKLINE(CLOSE>OPEN,CLOSE,OPEN,7,0) ,COLOR000033;
 STICKLINE(CLOSE>OPEN,CLOSE,OPEN,6,0) ,COLOR000055;
 STICKLINE(CLOSE>OPEN,CLOSE,OPEN,5,0) ,COLOR000077;
 STICKLINE(CLOSE>OPEN,CLOSE,OPEN,4,0) ,COLOR000099;
 STICKLINE(CLOSE>OPEN,CLOSE,OPEN,3,0) ,COLOR0000BB;
 STICKLINE(CLOSE>OPEN,CLOSE,OPEN,2,0) ,COLOR0000DD;
 STICKLINE(CLOSE>OPEN,CLOSE,CLOSE,9.5,0) ,COLOR0000FF,LAYER0;
 STICKLINE((CLOSE >= OPEN),HIGH,LOW,0.5,0),color0000FF;

STICKLINE((OPEN >= CLOSE),CLOSE,OPEN,8,0),color006600;
 STICKLINE((OPEN >= CLOSE),CLOSE,OPEN,7,0),color008800;
 STICKLINE((OPEN >= CLOSE),CLOSE,OPEN,6,0),color00AA00;
 STICKLINE((OPEN >= CLOSE),CLOSE,OPEN,5,0),color00BB00;
 STICKLINE((OPEN >= CLOSE),CLOSE,OPEN,4,0),color00CC00;
 STICKLINE((OPEN >= CLOSE),CLOSE,OPEN,3,0),color00DD00;
 STICKLINE((OPEN >= CLOSE),CLOSE,OPEN,2,0),color00EE00;
 STICKLINE((OPEN >= CLOSE),CLOSE,CLOSE,9.5,0),color00FF00,LAYER0;
 STICKLINE((OPEN > CLOSE),HIGH,LOW,0.5,0),color00FF00;

LC:=REF(C,1);
 RSI:((SMA(MAX((C - LC),0),3,1) / SMA(ABS((C - LC)),3,1)) * 100),LINETHICK0;
 DRAWTEXT(CROSS(80,RSI) ,high*1.02,'RSI→80'),COLOR00ffFF,ALIGN1,LINETHICK1;

{www.gszb.com2.波段}
RC:=(H+L+C*2)/4;
 R2D:=EMA(RC,21);
 R2E:=STD(RC,21);
 R3F:=((RC-R2D)/R2E+EMA(C,5));
 R40:=EMA(R3F,5);
 R41:=EMA(R40,3);
 JD: EMA(R41,3),COLORff9900,DOTLINE;
 AJ: 3*R41-2*JD,COLOR00FF00,DOTLINE;
 PARTLINE(JD,(JD>REF(JD,1)),rgb(255,0,0) ),LINETHICK3,LAYER0;
 PARTLINE(AJ,(AJ>REF(AJ,1)),rgb(240,220,0) ),LINETHICK2,LAYER0;

{www.gszb.com3.J合力}
J9:EMA("KDJ.J"(9,3,3),5) ,COLOR0000FF,LINETHICK0;
 J18:EMA("KDJ.J"(18,3,3),5) ,COLOR00FFFF,DOTLINE,LINETHICK0;
 J27:EMA("KDJ.J"(27,3,3),5) ,COLOR00FF00,DOTLINE,LINETHICK0;
 J36:EMA("KDJ.J"(36,3,3),5) ,COLOR0077FF,DOTLINE,LINETHICK0;
 J45:EMA("KDJ.J"(45,3,3),5) ,COLORFF9900,LINETHICK0;
 J54:EMA("KDJ.J"(54,3,3),5) ,COLORFF9900,LINETHICK0;
 J合力:(3*J9+2*J18+J27+J36+J45+J54)/9,COLOR00FFCC,LINETHICK0;
合力顶:=J合力>85 ;
合力低:=J合力<15;
 DRAWTEXT(CROSS(0,合力顶) ,H*1.04,'【顶】'),ALIGN1,COLOR00FFFF,LINETHICK3,LAYER3;
 DRAWTEXT(CROSS(0,合力低) ,L*0.97,'【低】'),ALIGN1,COLOR0077FF,LINETHICK3,LAYER0;
 {www.gszb.com低部买}
DIBU:= "KDJ.K"(9,3,3)<15 AND "KDJ.D"(9,3,3)<15 AND "KDJ.K"(18,3,3)<15 AND "KDJ.D"(18,3,3)<15
 AND "KDJ.K"(27,3,3)<20 AND "KDJ.D"(27,3,3)<20 AND "KDJ.D"(36,3,3)<20 AND "KDJ.D"(54,3,3)<20;
 DRAWTEXT(CROSS(0,DIBU) ,L*0.95,'买'),ALIGN1,COLOR00ffff,LINETHICK2,LAYER3;