通达信KJ顶底副图公式 说明 源码

操作说明：此KJ顶底指标对判断短线顶底很有帮助，无论在牛市和熊市都有很好的表现，并加入了自己通过实践验证的几种买入指标提示。

10,COLOR00FFFF,LINETHICK3,POINTDOT;
40,COLORCBCBC0,LINETHICK3,POINTDOT;
50,COLORRED,LINETHICK2;
60,COLOR00FFFF,LINETHICK3,POINTDOT;
80, COLORRED,LINETHICK3,POINTDOT;

{大底中顶大顶}
X:=MA(AMOUNT,5)/MA(V,5)/100;
VAR3:=(X-MA(AMOUNT,125)/MA(V,125)/100)/X;
VAR4:=MA((LLV(L,45)-C)/(HHV(H,45)-LLV(L,45))*100,3);
VAR5:=C/MA(C,60)-1;
大底:IF(CROSS(-5,VAR4) AND VAR3<-0.4,20,0),COLORFF7F00,LINETHICK2;
DRAWTEXT(大底>0,20,'大底'),COLORFF7F00,LINETHICK1;
中顶:IF(CROSS(VAR4,-95) AND VAR5<0.35 AND VAR5>=0.2,80,100),COLORMAGENTA,LINETHICK2;
大顶:IF(CROSS(VAR4,-95) AND VAR5>=0.35,80,100),COLORFF7F00,LINETHICK2;

{共振}
RV:=(CLOSE-LLV(LOW,33))/(HHV(HIGH,33)-LLV(LOW,33))*100;
RG:=(CLOSE-LLV(LOW,5))/(HHV(HIGH,5)-LLV(LOW,5))*100;
VAR44:=SMA(RV,3,1);
VAR55:=SMA(VAR44,3,1);
KK:=EMA(SMA(RG,3,1),2);
JJ:=SMA(KK,3,1);
共振点:=(CROSS(VAR44,VAR55) AND CROSS(KK,JJ));
STICKLINE(共振点>0,0,50,1.2,0),COLOR008888;
STICKLINE(共振点>0,0,50,0.8,0),COLOR00AAAA;
STICKLINE(共振点>0,0,50,0.4,0),COLOR00CCCC;
STICKLINE(共振点>0,0,50,0,0),COLOR00FFFF;
DRAWTEXT(共振点>0,48,'升'),COLOR00FFFF;

{MACD 底背离买}
DIF:=EMA(DCLOSE,12)-EMA(DCLOSE,26);
DEA:=EMA(DIF,9),COLORFFFF00;
A3:=BARSLAST(REF(CROSS(DIF,DEA),1));
底背离:=REF(CLOSE,A3+1)>CLOSE AND DIF> REF(DIF,A3+1) AND CROSS(DIF,DEA);
STICKLINE(底背离,0,35,1.2,0),COLOR880088;
STICKLINE(底背离,0,35,0.8,0),COLORAA00AA;
STICKLINE(底背离,0,35,0.4,0),COLORCC00CC;
STICKLINE(底背离,0,35,0,0),COLORFF00FF;
DRAWTEXT(底背离,33,'底背离'),COLOR