大智慧KDJ顶低集结号未加密选股指标公式源码

大智慧KDJ顶低集结号未加密选股指标公式源码

源码正文：

DRAWGBKlast(c>0,strip(RGB(0,0,60),RGB(0,0,0),0)){XG51};
80,DOTLINE;20,DOTLINE{XG51};
J9:ema("kdj.J"(9,3,3),5) ,COLOR0000FF,LINETHICK2{XG51};
J18:Ema("kdJ.J"(18,3,3),5) ,COLOR00FFFF,DOTLINE{XG51};
J27:EMA("KDJ.J"(27,3,3),5) ,COLOR00FF00,DOTLINE{XG51};
J36:EMA("KDJ.J"(36,3,3),5) ,COLOR0077FF,DOTLINE{XG51};
J45:EMA("KDJ.J"(45,3,3),5) ,COLOR00FFCC,LINETHICK2{XG51};
A级顶:=J9>80 AND J18>80 AND J27>80 AND J36>80 AND J45>80{XG51};
B级顶:=(J9>80 OR J18>80) AND (J27>80 OR J36>80 OR J45>80){XG51};
A级低:=J9<5 AND J18<5 AND J27<5 AND J36<5 AND J45<5{XG51};
B级低:=J9<10 AND J18<20 AND (J27<10 OR J36<10 OR J45<10){XG51};
IF(A级顶,90,100),COLOR0077FF,LINETHICK3,LAYER2{XG51};
IF(B级顶 ,80,100),COLOR00FF00,LINETHICK2,LAYER0{XG51};
IF(A级低,10,0),COLOR00FF00,LINETHICK2,LAYER0;
IF(B级低,20,0),COLORFF9900,LINETHICK2,LAYER2{XG51};
FILLRGN(IF(A级顶,90,100),90),ColorFF2200,LAYER5;{XG51};
FILLRGN(IF(B级顶,80,100),80),ColorFF9900,LAYER6;{XG51};
FILLRGN(100,80),Color000000,LAYER7;{XG51};
FILLRGN(10,20,10<20,RGB(0,40,60)),LAYER7{XG51};
FILLRGN(0,10,0<10,RGB(0,60,0)),LAYER7{XG51};
选股A:A级低,LINETHICK0{XG51};
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{XG51};
STICKLINE(DIBU=1,30,20,1,0),COLORff00ff,LAYER5{XG51};
STICKLINE(DIBU=1,20,10,2,0),COLORBLUE,LAYER5{XG51};
STICKLINE(DIBU=1,10,0,8,0),COLORff8000,LINETHICK2,LAYER5{XG51};
选股B:DIBU,LINETHICK0{XG51};
DRSV:=(INDEXC-LLV(INDEXL,27))/(HHV(INDEXH,27)-LLV(INDEXL,27))*100{XG51};
DK:=SMA(DRSV,3,1){XG51};
DD:=SMA(DK,3,1){XG51};
DJ:EMA((3*DK-2*DD),5),COLOR00FFFF{XG51};
PARTLINE(DJ,(DJ>REF(DJ,1))-1,rgb(0,255,0),1,rgb(255,0,0) ),POINTDOT,LINETHICK6,LAYER1{XG51};
dif:EMA(CLOSE,12)-EMA(CLOSE,26),LINETHICK0{XG51};
DEA:=EMA(DIF,9){XG51};
VAR1:=HHV(DEA,53){XG51};
VAR2:=LLV(DEA,55){XG51};
VAR3:=DEA-(DIF-DEA){XG51};
UP:=IF(DIF>VAR1 AND DEA=VAR1,MAX(LLV(VAR1,10),VAR3),VAR1){XG51};
DN:=IF(DIF<VAR2 AND DEA=VAR2,MIN(HHV(VAR2,10),VAR3),VAR2){XG51};
PARTLINE(105,DIF>UP,RGB(255,0,0)),LINETHICK5,LAYER4{XG51};
PARTLINE(104,DIF>UP,RGB(255,120,0)),LINETHICK5,LAYER5{XG51};
PARTLINE(103,DIF>UP,RGB(255,200,0)),LINETHICK5,LAYER6{XG51};
PARTLINE(-3,DIF<DN,RGB(0,130,100)),LINETHICK5,LAYER4{XG51};
PARTLINE(-4,DIF<DN,RGB(0,220,0)),LINETHICK6,LAYER5{XG51};
周K:"KDJ.K#WEEK"(9,2,5),COLOR0000FF,LINETHICK0,LAYER3{XG51};
周D:"KDJ.D#WEEK"(9,2,5),COLOR00FF00,LINETHICK0{XG51};
DRAWTEXT(crOSS(周K,周D),30,'J周金叉'),ALIGN1,color00FFFF,LINETHICK1{XG51};
DRAWTEXT(CROSS(周D,周K),70,'J周死叉'),ALIGN1,COLOR0077FF,LINETHICK1{XG51};
KDB:=BArslAST(REF(CROSS(周K,周D),1)){XG51};
KDDB:=REF(WMA(C,5),KDB+1)>WMA(C,5) AND REF(周K,KDB+1)<周K AND CROSS(周K,周D){XG51};
K底背:=IF(FILTER(KDDB>0,5),1,0){XG51};
DRAWTEXT(K底背=1,15,'J周底背'),COLOR00FFFF,LINETHICK1{XG51};
KDD:=BARSLAST(REF(CROSS(周D,周K),1)){XG51};
K顶背:=REF(WMA(C,5),KDD+1)<WMA(C,5) AND REF(周K,KDD+1)>周K AND CROSS(周D,周K){XG51};
DRAWTEXT(FILTER(K顶背>0,5),80,'J周顶背'),COLOR0077FF,LINETHICK1{XG51};

A1:=BARSLAST(REF(CROSS("MACD.DIFF","MACD.DEA"),1)){XG51};
B1:=REF(C,A1+1)>C AND REF("MACD.DIFF",A1+1)<"MACD.DIFF" AND CROSS("MACD.DIFF","MACD.DEA"){XG51};
DRAWTEXT(B1>0,-2,'M底背'),COLOR00FFFF,LINETHICK1;{XG51};
C1:=BARSLAST(REF(CROSS("MACD.DEA","MACD.DIFf"),1)){XG51};
D1:=REF(C,C1+1)<C AND REF("MACD.DIFf",C1+1)>"MACD.DIFf" AND CROSS("MACD.DEA","MACD.DIFf"){XG51};
DRAWTEXT(D1>0,105,'M顶背'),COLOR00FF00,LINETHICK1;{XG51};
A2:=BARSLAST(REF(CROSS("KDJ.K","KDJ.D"),1)){XG51};
B2:=REF(C,A2+1)>C AND REF("KDJ.K",A2+1)<"KDJ.K" AND CROSS("KDJ.K","KDJ.D"){XG51};
DRAWTEXT(B2,5,'J9底背'),COLOR00FFFF,LINETHICK1;{XG51};
C2:=BARSLAST(REF(CROSS("KDJ.D","KDJ.K"),1)){XG51};
D2:=REF(C,C2+1)<C AND REF("KDJ.K",C2+1)>"KDJ.K" AND CROSS("KDJ.D","KDJ.K"){XG51};
DRAWTEXT(D2>0,80,'J9顶背'),COLOR0077FF,LINETHICK1;{XG51};
A3:=BARSLAST(REF(CROSS("RSI.RSI1","RSI.RSI2"),1)){XG51};
B3:=REF(C,A3+1)>C AND REF("RSI.RSI1",A3+1)<"RSI.RSI1" AND CROSS("RSI.RSI1","RSI.RSI2"){XG51};
DRAWTEXT(B3>0,24,'R底背'),COLOR00FFFF,LINETHICK1{XG51};
C3:=BARSLAST(REF(CROSS("RSI.RSI2","RSI.RSI1"),1)){XG51};
D3:=REF(C,C3+1)<C AND REF("RSI.RSI1",C3+1)>"RSI.RSI1" AND CROSS("RSI.RSI2","RSI.RSI1"){XG51};
DRAWTEXT(D3>0,95,'R顶背'),COLOR0077FF,LINETHICK1;{X=G!5~1=C=N={};

大智慧实用CCI未加密选股指标公式源码

源码正文：

TYP := (HIGH + LOW + CLOSE)/3{XG51};
cci14:(TYP-ma(TYP,14))/(0.015*AVEDEV(TYP,14)){XG51};
CCI24:(TYP-MA(TYP,24))/(0.015*AVEDEV(TYP,24)),LINETHICK2,COLORgreen{XG51};
CCI84:(TYP-MA(TYP,84))/(0.015*AVEDEV(TYP,84)),LINETHICK1,COLORstICK{XG51};
CCI084:(TYP-MA(TYP,84))/(0.015*AVEDEV(TYP,84)),LINETHICK3,COLORBLUE{XG51};
CCI168:(TYP-MA(TYP,168))/(0.015*AVEDEV(TYP,168)),LINETHICK4,COLORblue{XG51};
CCI840:(TYP-MA(TYP,840))/(0.015*AVEDEV(TYP,840)),LINETHICK4,COLORred{XG51};
底背离14:LLV(L,55)=L AND NOT(LLV(CCI14,55)=CCI14){XG51};
底背离84:LLV(L,55)=L AND NOT(LLV(CCI84,55)=CCI84){XG51};
顶背离14:hhv(h,55)=h AND NOT(hhv(CCI14,55)=CCI14){XG51};
顶背离84:hhv(h,55)=h AND NOT(hhv(CCI84,55)=CCI84){XG51};
DRAWTEXT(底背离14>0,150,'底' ),COLORyellow{XG51};
DRAWTEXT(底背离14>0,50,'背' ),COLORyellow{XG51};
DRAWTEXT(底背离14>0,0,'离' ),COLORyellow{XG51};
DRAWTEXT(底背离84>0,100,'底' ),COLORgreen{XG51};
DRAWTEXT(底背离84>0,50,'背' ),COLORgreen{XG51};
DRAWTEXT(底背离84>0,0,'离' ),COLORgreen{XG51};
DRAWTEXT(顶背离14>0,150,'顶' ),COLORWHITE,linethick2{XG51};
DRAWTEXT(顶背离14>0,50,'背' ),COLORWHITE{XG51};
DRAWTEXT(顶背离14>0,0,'离' ),COLORWHITE{XG51};
DRAWTEXT(顶背离84>0,200,'顶' ),COLORwhite,linethick2{XG51};
DRAWTEXT(顶背离84>0,50,'背' ),COLORYELLOW{XG51};
DRAWTEXT(顶背离84>0,0,'离' ),COLORYELLOW{XG51};
difF := ema(CLOSE,7) - EMA(CLOSE,26){XG51};
DEA := EMA(DIFF,9){XG51};
顶背离m:=hhv(h,55)=h AND NOT(hhv(DIFF,55)=DIFF){XG51};
100,POINTDOT,COLORWHITE{XG51};
200,POINTDOT{XG51};
0{XG51};
-200,POINTDOT{XG51};
d:=CCI84<CCI168;f:=count(d,12)>9 and CCI24>CCI84 and not(顶背离m) and cci14>cci24 {XG51};
xg:c<ref(c,1) and cross(CCI14,CCI24);DRAWICON(xg,0,5 ){XG51};
xg波段:f and cross(CCI84,CCI168);DRAWICON(xg波段,350,7);DRAWTEXT(xg波段,330,'抄' ),LINETHICK3,COLORBLUE; DRAWTEXT(xg波段,300,'底' ),LINETHICK3,COLORBLUE{XG51};
a:=ref(xg波段,1) and c<ref(c,1){XG51};
bbi:=(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4{XG51};
woxg:count(a,10)>0 and cross(c,bbi); DRAWTEXT(woxg,300,'!' ),LINETHICK3,COLORBLUE{XG51};
ZTJ:=cross(CCI168,CCI840) and CCI840>0{XG51};
主升浪:ZTJ AND (REF(BArslAST(ZTJ),1)>20 OR BARSSINCE(ZTJ)=0); DRAWTEXT(主升浪,480,'主升浪' ),LINETHICK3,COLORmagenta{X-G-5~1-C-N-{};