软件名称：[B]发一KDJ指标[/B]
软件类型：国产软件
运行环境：Win9X/Win2000/WinXP/Win2003/
软件语言：简体中文
授权方式：免费版
软件大小：3.00 KB
官方主页：Home Page
更新时间：2012-02-07 04:33:01
软件简介:

DRAWGBK(CLOSE=CLOSE,COLORRGB(30,30,60),COLORRGB(30,30,60),1);
LC := REF(CLOSE,1);
RSI:sma(MAX(CLOSE-LC,0),7,1)/sMA(ABS(CLOSE-LC),7,1)*100,linethick,COLORaa77bb,PRECISION2;
FILLRGN(rsi>30,rsi,30),COLORaa99cc;
FILLRGN(rsi<=30,rsi,30),Color008080;
VAR1:=IF(OPEN<=REF(OPEN,1),0,MAX(HIGH-OPEN,OPEN-REF(OPEN,1)));
VAR2:=IF(OPEN>=REF(OPEN,1),0,MAX(OPEN-LOW,OPEN-REF(OPEN,1)));
VAR3:=SUM(VAR1,5);
VAR4:=SUM(VAR2,5);
VAR5:=IF(VAR3>VAR4,(VAR3-VAR4)/VAR3,IF(VAR3=VAR4,0,(VAR3-VAR4)/VAR4));
VAR6:=MA(VAR5,5);
VAR8:=IF(OPEN<=REF(OPEN,1),0,MAX(HIGH-OPEN,OPEN-REF(OPEN,1)));
VAR9:=IF(OPEN>=REF(OPEN,1),0,MAX(OPEN-LOW,OPEN-REF(OPEN,1)));
VARA:=SUM(VAR8,3);
VARB:=SUM(VAR9,3);
VARC:=IF(VARA>VARB,(VARA-VARB)/VARA,IF(VARA=VARB,0,(VARA-VARB)/VARB));
VARD:=MA(VARC,3);
火:=BARSLAST(EMA(CLOSE,5)<REF(EMA(CLOSE,5),1))*6,  COLORRED;
VARE:=HHV(CLOSE,2);
VARF:=BARSLAST(VARE<REF(VARE,2));
VAR10:=IF(VARF>=1,LLV(VARE,VARF),LOW);
VAR11:=VAR10+VAR10*VARF*0.5/100;
VAR12:=IF(VAR11<REF(VAR11,1),MA(LOW,3),VAR11);
VAR13:=VAR10+VAR10*(VARF-1)*1.618/100;
山:= COUNT(EMA(CLOSE,5)>REF(EMA(CLOSE,5),1),5)*6;
VAR14:=IF(OPEN<=REF(OPEN,1),0,MAX(HIGH-OPEN,OPEN-REF(OPEN,1)));
VAR15:=IF(OPEN>=REF(OPEN,1),0,MAX(OPEN-LOW,OPEN-REF(OPEN,1)));
VAR16:=SUM(VAR8,3);
VAR17:=SUM(VAR9,3);
VAR18:=IF(VARA>VARB,(VARA-VARB)/VARA,IF(VARA=VARB,0,(VARA-VARB)/VARB));
VAR19:=MA(VARC,3);
VAR1A:=IF(OPEN<=REF(OPEN,1),0,MAX(HIGH-OPEN,OPEN-REF(OPEN,1)));
VAR1B:=IF(OPEN>=REF(OPEN,1),0,MAX(OPEN-LOW,OPEN-REF(OPEN,1)));
VAR1C:=SUM(VAR8,3);
VAR1D:=SUM(VAR9,3);
VAR1E:=IF(VARA>VARB,(VARA-VARB)/VARA,IF(VARA=VARB,0,(VARA-VARB)/VARB));
VAR1F:=MA(VARC,3);
VAR20:=IF(OPEN<=REF(OPEN,1),0,MAX(HIGH-OPEN,OPEN-REF(OPEN,1)));
VAR21:=IF(OPEN>=REF(OPEN,1),0,MAX(OPEN-LOW,OPEN-REF(OPEN,1)));
VAR22:=SUM(VAR8,3);
VAR23:=SUM(VAR9,3);
VAR24:=IF(VARA>VARB,(VARA-VARB)/VARA,IF(VARA=VARB,0,(VARA-VARB)/VARB));
VAR25:=MA(VARC,3);
STICKLINE(山=0 AND 火=0,0-10,10-10,6,0),  COLORBLUE;//观望:
STICKLINE(山>0 and c>ref(c,1),0-10,山-10,6,1),  COLORRED;//下跌→抛出:
STICKLINE(山>0 and c<=ref(c,1),0-10,山-10,6,1),  COLORF0F000;
STICKLINE(火>0,火-10,0-10,3,0),COLORMAGENTA; //买入或持股:
STICKLINE(山<火,火-10,山-10,3,0),COLORaa;//植被:
STICKLINE(REF(山,1)=0 AND 山>0,0-10,10-10,5,0),  COLORYELLOW;
RSV:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100;
K:sma(RSV,3,1),LINETHICK,PRECISION2,COLORWHITE;
D:sma(K,3,1),LINETHICK,PRECISION2,COLOR1477ff;
J:3*K-2*D,COLORRED,LINETHICK,PRECISION2;
FILLRGN(K>=D,K,D),COLORBROWN;
FILLRGN(K<D,K,D),COLORCYAN;
RSVD:=(INDEXC-LLV(INDEXL,13))/(HHV(INDEXH,13)-LLV(INDEXL,13))*100;
KD:=SMA(RSVD,5,1);
DD:=SMA(KD,3,1);
STICKLINE(KD>=DD,KD,DD,5,0),COLOR1477ff;
STICKLINE(KD<DD,KD,DD,5,0),COLORBLUE;
PARTLINE(j>ref(j,1),J),COLORRED,LINETHICK2;
PARTLINE(j<=ref(j,1),J),COLORGREEN,LINETHICK2;
超跌:IF(J<0,0,-10),COLORRED,linethick1;
BDDD:=LLV(J,2)=LLV(J,8);
抄底:IF(CROSS(J,REF(J+0.01,1)) AND BDDD AND J<20,0,-10),COLORYELLOW,linethick1;
加码:IF(CROSS(J,REF(J+0.01,1)) AND BDDD AND BETWEEN(J,20,60),1,0),COLOR00FFFF,POINTDOT,LINETHICK0;
BDGD:=HHV(J,2)=HHV(J,8) AND J>80;
小心:IF(CROSS(REF(J-0.01,1),J) AND REF(BDGD,1),100,110),COLORGREEN,linethick1;
DRAWTEXT(加码,J,'△'),COLORYELLOW;
DRAWTEXT(REF(火,3)>0 AND REF(火,2)>0 AND REF(火,1)>0 AND 火=0 AND REF(火,1)>山,d,'调\n整'),COLORYELLOW,ALIGN;

[url=http://www.70822.com/soft/sort013/sort02/down-43942.html]发一KDJ指标[/url]