通达信KDJ能量柱指标公式

DRAWGBK(OPEN>0RGB(1851350)RGB(85550)0'02'0);
NOTEXT顶:95DOTLINECOLORLIGRAY;
NOTEXT底:0DOTLINECOLORLIGRAY;
NOTEXT分界线:50DOTLINECOLORLIGRAY;
A1:=(CLOSE+HIGH+LOW+OPEN)/4;
MA1:=EMA(A15);
RSV1:=(CLOSE-LLV(LOW9))/(HHV(HIGH9)-LLV(LOW9))*100;
K1:=SMA(RSV131);
D1:=SMA(K131);
J1:=3*K1-2*D1;
RSV2:=(CLOSE-LLV(LOW15))/(HHV(HIGH15)-LLV(LOW15))*100;
K2:=SMA(RSV231);
D2:=SMA(K231);
J2:=3*K2-2*D2;
RSV3:=(CLOSE-LLV(LOW31))/(HHV(HIGH31)-LLV(LOW31))*100;
K3:=SMA(RSV331);
D3:=SMA(K331);
J3:=3*K3-2*D3;
RSV4:=(CLOSE-LLV(LOW55))/(HHV(HIGH55)-LLV(LOW55))*100;
K4:=SMA(RSV431);
D4:=SMA(K431);
J4:=3*K4-2*D4;
K:EMA((K1+K2+K3+K4)/43)COLORWHITENODRAW;
D:EMA((D1+D2+D3+D4)/43)COLORYELLOWNODRAW;
J:EMA(J13)COLORMAGENTANODRAW;
过滤:= K>REF(K1) AND K3>=REF(K31);
STICKLINE(过滤0K30)COLOR993333;
STICKLINE(过滤0K2.7.50)COLOR995533;
STICKLINE(过滤0K2.40)COLOR996633;
STICKLINE(过滤0K2.10)COLOR998833;
STICKLINE(过滤0K1.80)COLOR999966;
STICKLINE(过滤0K1.50)COLOR999933;
STICKLINE(过滤0K1.20)COLOR999966;
STICKLINE(过滤0K0.90)COLOR999988;
STICKLINE(过滤0K0.60)COLORLIGRAY;
STICKLINE(过滤0K0.30)COLORCCCCCC;
RSV6:=(INDEXC-LLV(INDEXL7))/(HHV(INDEXH7)-LLV(INDEXL7))*100;
KI:=SMA(RSV631);
DI:=SMA(KI31);
JI:=3*KI-2*DI;
WIN:=WINNER(CLOSE*0.9)*100;
VAR1:=EMA(EMA(CLOSE9)9);
控盘:=(VAR1-REF(VAR11))/REF(VAR11)*1000;
开始控盘:=过滤 AND (控盘>0 OR WIN>1) AND K>REF(K1) AND K3>REF(K31);
STICKLINE(开始控盘0K30)COLOR0000FF;
STICKLINE(开始控盘0K2.70)COLOR001BFF;
STICKLINE(开始控盘0K2.40)COLOR0025FF;
STICKLINE(开始控盘0K2.10)COLOR0039FF;
STICKLINE(开始控盘0K1.80)COLOR0052FF;
STICKLINE(开始控盘0K1.50)COLOR006AFF;
STICKLINE(开始控盘0K1.20)COLOR0089FF;
STICKLINE(开始控盘0K0.90)COLOR009CFF;
STICKLINE(开始控盘0K0.60)COLOR00C0FF;
STICKLINE(开始控盘0K0.30)COLOR00CAFF;
趋势:=MA1>=REF(MA11) AND K2>REF(K21) AND K3>REF(K31) AND K4>REF(K41) AND K>REF(K1) AND WIN>1;
STICKLINE(开始控盘 AND 趋势0K0.60)COLOR99A9FF;
STICKLINE(开始控盘 AND 趋势0K0.30)COLOR9999FF;
指数趋势:EMA(JI3)COLORFF9966LINETHICK1NODRAW;
筹码:WINCOLOR009CFFNODRAW;
NOTEXTK:KCOLORWHITELINETHICK1;
NOTEXTD:DCOLORYELLOWLINETHICK1;
NOTEXTJ:JCOLORMAGENTALINETHICK1;
X1:=BARSLAST(REF(CROSS(KD)1));
底背离:=REF(CLOSEX1+1)>CLOSE AND K>REF(KA1+1) AND CROSS(KD);
DRAWICON(底背离671);
DRAWTEXT(底背离60' 底背离')COLORRED;
X2:=BARSLAST(REF(CROSS(DK)1));
顶背离:=REF(CLOSEX2+1)<CLOSE AND REF(KX2+1)>K AND CROSS(DK);
DRAWICON(顶背离922);
DRAWTEXT(顶背离85' 顶背离')COLORGREEN;
底部:=CROSS(K3D3) AND K3<25;
STICKLINE(底部01020)COLOR0000FF;
DRAWTEXT(底部25'底部')COLORYELLOW;
JCCOUNT:=COUNT(CROSS(K3D3)BARSLAST(K3>25));
再次探底:=CROSS(K3D3) AND K3<25 AND COUNT(JCCOUNT=215)=1;
DRAWTEXT(再次探底45'再次探底')COLORYELLOW;