通达信彩蛋KDJ未加密选股指标公式源码

通达信彩蛋KDJ未加密选股指标公式源码

源码正文：

HJ_1:=IF(DATE<1451130,1,0){XG51};
dif:IF(HJ_1=1,macd.DIF,0),LINETHICK2{XG51};
DEA:IF(HJ_1=1,maCD.DEA,0){XG51};
DRAWTEXT_FIX(HJ_1=0,0,0.01,0,27),COLORLIMAGENTA{XG51};
MacD:(DIF-DEA)*2,COLORstICK{XG51};
DRAWICON(REF(DIF,1)>REF(DIF,2) AND DIF<REF(DIF,1) AND DIF>0 AND DIF>DEA,DIF*1.1,2),COLORCYAN{XG51};
DRAWICON(crOSS(DEA,DIF) AND DIF>0,DIF,37),COLORCYAN{XG51};
DRAWICON(REF(DIF,1)<REF(DIF,2) AND DIF>REF(DIF,1) AND DIF<0 AND DIF<DEA,DIF*1.1,1),COLORWHITE{XG51};
DRAWICON(CROSS(DIF,DEA) AND DIF<0,DIF,36),COLORWHITE{XG51};
HJ_2:=BArslAST(REF(MACD,1)<0 AND MACD>0){XG51};
HJ_3:=LLVBARS(MACD,HJ_2+20){XG51};
HJ_4:=IF(HJ_3>HJ_2,REF(MACD,HJ_3),0){XG51};
HJ_5:=MACD<0 AND MACD>HJ_4 AND LOW=LLV(LOW,HJ_2+20) AND HJ_4<0{XG51};
HJ_6:=REF(HJ_5,1)=1 AND MACD>REF(MACD,1) AND REF(DIF,HJ_3)<0 AND MACD<0{XG51};
低背:DRAWLINE(HJ_4=HJ_3,MACD,HJ_6,MACD,0),COLORWHITE,LINETHICK2{XG51};
DRAWICON(HJ_6,MACD*1.2,26){XG51};
HJ_7:=HHVBARS(MACD,HJ_2+20){XG51};
HJ_8:=IF(HJ_7>HJ_2,REF(MACD,HJ_7),0){XG51};
HJ_9:=MACD>0 AND MACD<HJ_8 AND HIGH=HHV(HIGH,HJ_2+20) AND HJ_8>0{XG51};
HJ_10:=REF(HJ_9,1)=1 AND MACD>REF(MACD,1) AND REF(DIF,HJ_7)>0{XG51};
顶背:DRAWLINE(HJ_8=HJ_7,MACD,HJ_10,MACD,0),COLORCYAN,LINETHICK2{XG51};
DRAWICON(HJ_10,MACD*1.2,15){XG51};
HJ_11:=CLOSE/MA(CLOSE,40)*100<78{XG51};
HJ_12:=CLOSE/MA(CLOSE,60)*100<74{XG51};
HJ_13:=HIGH>LOW*1.051{XG51};
HJ_14:=HJ_13 AND COUNT(HJ_13,5)>1{XG51};
HJ_15:=IF(HJ_14 AND (HJ_11 OR HJ_12),2,0){XG51};
HJ_16:=CLOSE/REF(CLOSE,25)<=1.1{XG51};
HJ_17:=SMA(MAX(CLOSE-REF(CLOSE,2),0),7,1)/SMA(Abs(CLOSE-REF(CLOSE,2)),7,1)*100<15{XG51};
HJ_18:=(CLOSE-LLV(LOW,8))/(HHV(HIGH,8)-LLV(LOW,8))*100{XG51};
HJ_19:=SMA(HJ_18,2,1){XG51};
HJ_20:=SMA(HJ_19,2,1){XG51};
HJ_21:=IF(HJ_19>REF(HJ_19,1) AND REF(HJ_19,1)<REF(HJ_19,2) AND HJ_19<23,1.5,0){XG51};
抄底:HJ_16 AND HJ_15 AND HJ_17 AND HJ_21 AND HJ_1=1,COLORRED{XG51};
HJ_22:=100-100*(HHV(HIGH,5*8)-CLOSE)/(HHV(HIGH,5*8)-LLV(LOW,5*8)){XG51};
HJ_23:=MA(CLOSE,5){XG51};
HJ_24:=IF(CLOSE>SAR(10,2,20),1,0){XG51};
HJ_25:=IF(CLOSE<SAR(10,2,20),(-1),0){XG51};
HJ_26:=ATAN((HJ_23/REF(HJ_23,1)-1)*100)*180/3.1416{XG51};
HJ_27:=IF(HJ_26>30,1,0){XG51};
HJ_28:=IF(HJ_26<(-30),(-1),0){XG51};
HJ_29:=HJ_24+HJ_27+HJ_25+HJ_28{XG51};
IF(HJ_29<(-1) OR HJ_22<25.01,DIF,DRAWNULL),COLORCYAN,LINETHICK2{XG51};
IF(HJ_22>74.989998 OR HJ_29>0,DIF,DRAWNULL),COLORWHITE,LINETHICK2{XG51};
DIF1:=ema(CLOSE,12) - EMA(CLOSE,26){XG51};
DEA1:=EMA(DIF1,9){XG51};
MACD1:=2*(DIF1-DEA1),STICK{XG51};
MACD2:=EMA(MACD1,3){XG51};
STICKLINE(MACD1>MACD2 AND MACD1>0,0,MACD1,1,0),COLORWHITE{XG51};
STICKLINE(MACD1>MACD2 AND MACD1<0,0,MACD1,1,0),COLORF00FF0{XG51};
STICKLINE(MACD1<MACD2,0,MACD1,1,0),COLORGREEN{XG51};
STICKLINE(MACD1>=0 OR MACD1<=0,0,0,50,1),COLORRED{XG51};
DIFF:DIF1,COLOR33FF33{XG51};
DEA3:DEA1,COLORBLUE{XG51};
MACD3:MACD1,NODRAW,COLORLIMAGENTA{XG51};
强:IF(DIF1>=DEA1,DIF1,DRAWNULL),COLORWHITE,LINETHICK2{XG51};
低位金叉:= CROSS(DIFF,DEA) AND DIFF<(-0.1){XG51};
STICKLINE(低位金叉,0,-0.3,1,0),COLOR00FFFF{XG51};
DRAWTEXT(低位金叉,-0.3,' 低位金叉'),COLOR00FFFF{XG51};
JCCOUNT:= COUNT(CROSS(DIFF,DEA),BARSLAST(DEA>=0)){XG51};
二次金叉:= CROSS(DIFF,DEA) AND DEA<0 AND COUNT(JCCOUNT=2,21)=1{XG51};
STICKLINE(二次金叉,0,-0.15,1,0),COLORFF00FF{XG51};
DRAWICON(二次金叉,DEA*1.04,1),COLOR0000FF{XG51};
DRAWTEXT(二次金叉,-0.15,' 二次金叉'),COLORFF00FF{XG51};
A1:= BARSLAST(REF(CROSS(DIFF,DEA),1)){XG51};
底背离:= REF(CLOSE,A1+1)>CLOSE AND DIFF>REF(DIFF,A1+1) AND CROSS(DIFF,DEA){XG51};
STICKLINE(底背离,0,0.15,1,0),COLOR00FF00{XG51};
DRAWLINE(A1=0,DEA,底背离,DEA,0),LINETHICK3,COLORRED{XG51};
DRAWTEXT(底背离,0.15,' 底背离'),COLOR00FF00{XG51};
A2:= BARSLAST(REF(CROSS(DEA,DIFF),1)){XG51};
顶背离:= REF(CLOSE,A2+1)<CLOSE AND REF(DIFF,A2+1)>DIFF AND CROSS(DEA,DIFF){XG51};
DRAWLINE(A2=0,DEA,顶背离,DEA,0),LINETHICK3,COLORYELLOW{XG51};
AA:=C>REF(C,4){XG51};
NT:=BARSLASTCOUNT(AA){XG51};
TJ11:=NT=9{XG51};
TJ13:=ISLASTBAR AND BETWEEN(NT,5,8){XG51};
AY:=(BACKSET(TJ11>0,9) OR BACKSET(TJ13>0,NT))*NT{XG51};
DRAWTEXT(AY>0,MACD*1.02,VAR2STR(AY,0)),COLORLICYAN{XG51};
DRAWTEXT(NT=9,MACD*1.02,'9'),COLORCYAN{XG51};
B1:=C{XG51};
NT0:=BARSLASTCOUNT(B1){XG51};
TJ21:=NT0=9 {XG51};
TJ23:=ISLASTBAR AND BETWEEN(NT0,5,8){XG51};
AY1:=(BACKSET(TJ21>0,9) OR BACKSET(TJ23>0,NT0))*NT0{XG51};
DRAWTEXT(AY1>0,MACD*0.98,VAR2STR(AY1,0)),COLORCYAN{XG51};
DRAWTEXT(NT0=9,MACD*0.98,'9'),COLORWHITE{XG51};
DRAWICON(CROSS(DEA1,DIF1),DEA1,2){XG51};
N:=9; P1:=3; P2:=3{XG51};
RSV:=(CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*2{XG51};
K:SMA(RSV,P1,1){XG51};
D:SMA(K,P2,1){XG51};
J:3*K-2*D{XG51};
IF(J>REF(J,1),J,DRAWNULL),COLORWHITE,LINETHICK3;
DRAWICON(CROSS(J,1),J,1){XG51};
DRAWICON(K>80 AND D>80 AND CROSS(D,K),D,2){XG51};
IF(J<0,J,DRAWNULL),COLORCYAN,LINETHICK2{XG51};
IF(J>1.8,J,DRAWNULL),COLORRED,LINETHICK3{XG51};
IF(K>1.8,K,DRAWNULL),COLOR0000FF,LINETHICK2{XG51};
IF(D>1.9,D,DRAWNULL),COLORFFFF11,LINETHICK2{XG51};
VAR1:=(2*CLOSE+HIGH+LOW)/3{XG51};
VAR2:=EMA(EMA(EMA(VAR1,3),3),3){XG51};
J1: (VAR2-REF(VAR2,1))/REF(VAR2,1)*100, COLORSTICK{XG51};
D1: MA(J1,2){XG51};
K1: MA(J1,1),COLORWHITE{XG51};
DRAWTEXT(FILTER(CROSS(D1,K1)AND J1>0.2,5),D1+0.05,'S'),COLORWHITE{XG51};
DRAWTEXT(CROSS(K1,D1)AND J1<=-0.2,K1-0.05,'B'),COLORWHITE{X~G_5-1~C~N~{};

通达信角线攻击主图未加密选股指标公式源码

源码正文：

E5:=ema(C,5);E13:=Ema(C,13){XG51};
DRAWBAND(E5,RGB(200,0,0),E13,RGB(0,200,0)){XG51};
DRAWKLINE(H,O,L,C){XG51};
平衡:EMA(C,20)COLORBLUE{XG51};
上轨:平衡 + 2*stD(C,20),COLORLIMAGENTA{XG51};
下轨:平衡 - 2*STD(C,20),COLORCYAN{XG51};
上:=EMA(C,3){XG51};
中:=EMA(C,5){XG51};
下:=EMA(中,5){XG51};
QQ:= C<中{XG51};
MM:=上>REF(上,1) AND REF(上,1)<REF(上,2) {XG51};
VAR1W:=(100 - ((90 * (HHV(HIGH,21) - CLOSE)) / (HHV(HIGH,21) - LLV(LOW,21)))){XG51};
VAR2W:=(100 - ((90 * (HHV(HIGH,21) - CLOSE)) / (HHV(HIGH,21) - LLV(LOW,21)))){XG51};
VAR3W:=(100 - MA(((100 * (HHV(HIGH,6) - CLOSE)) / (HHV(HIGH,6) - LLV(LOW,6))),34)){XG51};
VAR3P:=IF(CLOSE/REF(CLOSE,1)>1.050 AND HIGH/CLOSE<1.010 AND IF(CLOSE>REF(CLOSE,1),88,0)>0, 91, 0){XG51};
DRAWTEXT(VAR3P>90,LOW*0.92,'追涨'),COLORFF00FF{XG51};
SS:=MA((LOW+HIGH+CLOSE)/3,5)>REF(MA((LOW+HIGH+CLOSE)/3,5),1) AND REF(MA((LOW+HIGH+CLOSE)/3,5),1)<REF(MA((LOW+HIGH+CLOSE)/3,5),2){XG51};
SC:=L<HHV(MA((LOW+HIGH+CLOSE)/3,5),13) AND H>HHV(MA((LOW+HIGH+CLOSE)/3,5),13) AND C>REF(C,1) AND C>O{XG51};
MR:=SC AND COUNT(SS,2){XG51};
买:=MR AND NOT(REF(MR,1));
DRAWTEXT(买,L*0.95, '必涨'),COLORWHITE;
V1:=Abs((2*CLOSE+HIGH+LOW)/4-MA(CLOSE,20))/MA(CLOSE,20);
V2:=(1-7/100)*(dma(CLOSE,V1)){XG51};
V3:=(1+7/100)*(DMA(CLOSE,V1)){XG51};
V5:=MA((LOW+HIGH+CLOSE)/3,5){XG51};
MA1:=MEMA(CLOSE,5){XG51};
MA2:=ATAN((MA1/REF(MA1,1)-1)*100)*180/3.1416{XG51};
MA3:=IF(MA2>0,MA2,MA2){XG51};
MA5:MA(C,5),COLORRED{XG51};
MA25:=MA(C,25),COLORCYAN,LINETHICK2{XG51};
VAR1:=CLOSE=HHV(C,4) AND (REF(C,1)>=REF(C,2) OR REF(C,1)>=REF(C,3))
OR REF(C,1)=HHV(C,4) AND CLOSE>=REF(C,2) OR REF(C,2)=HHV(C,4) AND
REF(C,3)=LLV(C,4) AND C>=REF(C,1) OR REF(C,3)=HHV(C,4) AND
C>=REF(C,1) AND C>=REF(C,2){XG51};
VAR2:=CLOSE=HHV(C,4) AND REF(C,1)=LLV(C,4){XG51};
VAR3:=CLOSE=LLV(C,4) AND (REF(C,1)<REF(C,2) OR REF(C,1)<REF(C,3)) OR
REF(C,1)=LLV(C,4) AND C<REF(C,2) OR REF(C,2)=LLV(C,4) AND
REF(C,1)=HHV(C,4) AND C<REF(C,1) OR REF(C,3)=LLV(C,4) AND
C<REF(C,1) AND C<REF(C,2){XG51};
VAR4:=REF(C,1)=LLV(C,4) AND C>=REF(C,2) OR REF(C,2)=LLV(C,4) AND
REF(C,1)<=REF(C,3) AND REF(C,2)<REF(C,4) AND C>=REF(C,1){XG51};
AA10:=MA(CLOSE,8),COLOR0000FF{XG51};
BB10:=((ATAN((AA10 - REF(AA10,1))) * 3.1416) * 10){XG51};
均线３０:=MA(CLOSE,30){XG51};
均线８９:=MA(CLOSE,89){XG51};
均线:=MA(CLOSE,16){XG51};
DRAWTEXT((((((OPEN <= 均线) AND ((均线３０ - REF(均线３０,1)) > 0))
AND (CLOSE > 均线８９)) AND (BB10 > 1)) AND ((CLOSE / OPEN) > 1.04)),
LOW,'天马过桥'),COLORCC99FF{XG51};
DRAWTEXT_FIX(1,0.00,0,0,'所属行业：')COLOR0080FF{XG51};
DRAWTEXT_FIX(1,0.06,0,0,HYBLOCK)COLOR0080FF{XG51};
DRAWTEXT_FIX(1,0.12,0,0,'所属地区：')COLOR00FFFF{XG51};
DRAWTEXT_FIX(1,0.18,0,0,DYBLOCK)COLOR00FFFF{XG51};
角线:=(ATAN((MA(C,5)/REF(MA(C,5),1)-1)*100)*180/3.14115926){XG51};
角线MA:=MA(角线,5){XG51};
ANA:=PLOYLINE(crOSS(角线,角线MA),角线MA),COLORWHITE{XG51};
ANB:=PLOYLINE(CROSS(角线MA,角线),角线MA),COLORFF00FF {XG51};
角买点:=CROSS(角线,角线MA) AND ((ANB>REF(ANB,1) AND ANB>ANA AND 角线MA<=0) OR ((角线MA<=-45 OR CROSS(角线MA,-45)) AND (ANB<-60 OR LLV("kdj.J",3)<=-49) AND ANB>0)),COLORCYAN{XG51};
角起涨:=COUNT(CROSS(角线,角线MA),ANA<REF(ANA,5) AND ANB>REF(ANB,5)){XG51};
角卖点:=(CROSS(角线MA,角线) AND (ANB>REF(ANB,1) OR ANA<REF(ANA,1)) AND ANB>ANA AND 角线MA>0)*1{XG51};
角始跌:=COUNT(CROSS(角线MA,角线),ANA<REF(ANA,5) AND ANB>REF(ANB,5)){XG51};
DRAWTEXT(角买点,L,'角买'),COLOR00FFFF{X-G_5_1-C-N-{};