软件名称:[B]kd短线(通达信公式 副图 源码 测试图)[/B]
软件类型:国产软件
运行环境:Win9X/Win2000/WinXP/Win2003/Win7/
软件语言:简体中文
授权方式:免费版
软件大小:5.00 KB
官方主页:Home Page
更新时间:2020-02-01 12:28:34
软件简介:
这公式是我自己编写修改的,组合了4个指标,很不错的
RSV:=(CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100;
K:SMA(RSV,M1,1);
D:SMA(K,M2,1);
J:=3*K-2*D;
金:BARSLAST(CROSS(K,D))NODRAW;死:BARSLAST(CROSS(D,K))NODRAW;
DRAWICON(CROSS(K,D),D,1); {K上穿D做记号};
DRAWICON(CROSS(D,K),K,2); {D下穿K做记号};
IF(J<0.5,J,DRAWNULL),COLOR0000FF,LINETHICK2;
IF(K>90,K,DRAWNULL),COLOR0000FF,LINETHICK2;
IF(D>85,D,DRAWNULL),COLORFFFF11,LINETHICK2;
DRAWICON(COUNT(J<0,8)>=3 AND CROSS(J,1) AND K>=REF(K,1),J,1);
DRAWICON(K>80 AND D>80 AND CROSS(D,K),D,2);
{日线指标}
VAR1A:=REF((LOW+OPEN+CLOSE+HIGH)/4,1);
VAR2A:=SMA(ABS(LOW-VAR1A),13,1)/SMA(MAX(LOW-VAR1A,0),10,1);
VAR3A:=EMA(VAR2A,34);
VAR4A:=LLV(LOW,5);
VAR5A:=EMA(IF(LOW<=VAR4A,VAR3A,0),24);
洗盘:IF(VAR5A>REF(VAR5A,1),VAR5A,0),COLORGREEN,NODRAW;
STICKLINE(VAR5A>REF(VAR5A,1),0,VAR5A,2,0 ),COLORGREEN;
主力拉升:IF(VAR5A<REF(VAR5A,1),VAR5A,0),COLORRED,NODRAW;
STICKLINE(VAR5A<REF(VAR5A,1),0,VAR5A,2,0),COLORRED;
XP:=REF(洗盘,1);
LS:=主力拉升;
XPLS:=(XP AND LS);
AAA:=BARSLAST (VAR5A>REF(VAR5A,1))=1 ;
STICKLINE (AAA=1,0,50,2,0),COLORYELLOW;
{DRAWTEXT(XPLS,主力拉升,'洗盘'),COLORYELLOW;};
A80:80,DOTLINE,COLORMAGENTA,LINETHICK1;
A50:50,DOTLINE,COLORFFFF00,LINETHICK1;
VAR1:=C-REF(C,1);
VAR2:=100*EMA(EMA(VAR1,6),6)/EMA(EMA(ABS(VAR1),6),6);
MA5:=EMA(C,5);
MA13:=EMA(C,13);
UP:=DRAWLINE(L=LLV(L,BARSLAST(CROSS(MA13,MA5))+1),LLV(L,BARSLAST(CROSS
(MA13,MA5))+1),H=HHV(H,BARSLAST(CROSS(MA5,MA13))+1),HHV(H,BARSLAST(CROSS
(MA5,MA13))+1),0),COLOR0000FF;
DOWN:=DRAWLINE(H=HHV(H,BARSLAST(CROSS(MA5,MA13))+1),HHV(H,BARSLAST(CROSS
(MA5,MA13))+1),L=LLV(L,BARSLAST(CROSS(MA13,MA5))+1),LLV(L,BARSLAST(CROSS
(MA13,MA5))+1),0),COLOR00FF00;
BT:(LLV(VAR2,2)=LLV(VAR2,7) AND COUNT(VAR2<0,2) AND CROSS(VAR2,MA(VAR2,2))) AND
REF(DOWN,1)<REF(DOWN,2) AND UP>REF(DOWN,1);
STICKLINE(UP,0,3,2,0),COLOR0000FF;
STICKLINE(DOWN,0,3,2,0),COLOR00FF00;
STICKLINE(BT,0,30,2,0),COLOR000088;
STICKLINE(BT,0,30,1,0),COLOR0000CC;
STICKLINE(BT,0,30,0.22,0),COLOR0000FF;
DRAWTEXT(BT,30,'短牛'),COLOR0000FF;
TJ1:=REF(DOWN,1)<REF(DOWN,2) AND UP>REF(DOWN,1) AND C<HHV(H,21)*0.82;
STICKLINE(TJ1,0,20,3,0),COLOR880088;
STICKLINE(TJ1,0,20,1.5,0),COLORAA00AA;
STICKLINE(TJ1,0,20,0.8,0),COLORCC00CC;
STICKLINE(TJ1,0,20,0.2,0),COLORFF00FF;
DRAWTEXT(TJ1,20,'中牛'),COLORFF00FF;
HR:=HHV(HIGH,55);
HRY:=LLV(LOW,55);
HRY11:=HR*HRY;
HRY33:=SQRT(HRY11);
TJ2:=REF(DOWN,1)<REF(DOWN,2) AND UP>REF(DOWN,1) AND C<HRY33;
STICKLINE(TJ2,0,10,3,0),COLOR008888;
STICKLINE(TJ2,0,10,2,0),COLOR00AAAA;
STICKLINE(TJ2,0,10,1,0),COLOR00CCCC;
STICKLINE(TJ2,0,10,0.2,0),COLOR00FFFF;
DRAWTEXT(TJ2,10,'大牛'),COLOR00FFFF;
ST:=REF(UP,1)>REF(UP,2) AND DOWN<REF(UP,1);
STICKLINE(ST,100,90,2,0),COLOR008800;
STICKLINE(ST,100,90,2,0),COLOR00AA00;
STICKLINE(ST,100,90,1,0),COLOR00CC00;
STICKLINE(ST,100,90,0.2,0),COLOR00FF00;
DRAWTEXT(ST,90,'卖'),COLORFFFFFF;
DRAWICON(BT AND TJ1 AND TJ2,15,65);
上升:IF(K>REF(K,1),K,DRAWNULL),LINETHICK1,COLORRED;
[url=http://www.70822.com/soft/sort013/sort05/down-144837.html]kd短线(通达信公式 副图 源码 测试图)[/url]