无悔波段主图源码

指标功能：[B]国产软件[/B]
指标类型：简体中文
所需积分：0
推荐星级：

授权方式：共享版
公式大小：0 Bytes
更新时间：2012-06-24 09:24:00
公式简介:

DRAWGBKlast(c>0,strip(RGB(0,0,0),RGB(0,0,780),0));
{1.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;

{2.波段}
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;

{3.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;
{低部买}
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;

通达信版源码:

{1.波段}
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,LINETHICK2;
AJ: 3*R41-2*JD,COLOR0077FF,LINETHICK2;
DRAWBAND(AJ,RGB(100,50,0),JD,RGB(0,100,50));

{2.K线}
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,3,0) ,COLOR0000BB;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,2,0) ,COLOR0000DD;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,1,0) ,COLOR0000FF;
STICKLINE((CLOSE >= OPEN),HIGH,LOW,0,0),COLOR0000FF;

STICKLINE((OPEN >= CLOSE),CLOSE,OPEN,3,0),COLOR00DD00;
STICKLINE((OPEN >= CLOSE),CLOSE,OPEN,2,0),COLOR00EE00;
STICKLINE((OPEN >= CLOSE),CLOSE,OPEN,1,0),COLOR00FF00;
STICKLINE((OPEN > CLOSE),HIGH,LOW,0,0),COLOR00FF00;

[url=http://www.goodgupiao.com/gupiaogongshi/21189.html][B]无悔波段主图源码[/B][/url]

无悔波段 主图源码

无悔波段主图源码