通达信井中月KDJ源码副图

P1:=10; {这个参数调整为7不错}

P2:=4;

80, POINTDOT, COLORGREEN, LINETHICK4;

20, POINTDOT, COLORRED, LINETHICK4;

0, POINTDOT, COLORYELLOW, LINETHICK4;

VAR1:=LLV(LOW,P1);

VAR2:=HHV(HIGH,P1);

RSV:=(CLOSE-VAR1)/(VAR2-VAR1)*100;

K: EMA(RSV,P2),COLORWHITE;

D: EMA(0.667*REF(K,1)+0.333*K,2), COLORYELLOW;

J: 3*K-2*D, COLORFF00FF;

EMA3:=EMA(C,2.6);

EMA5:=EMA(C,5.1);

DRAWBAND (K, RGB(255,0,0), D, RGB(0,222,0)); {//填充浅红色}

{DRAWBAND (K<D, D, K), COLOR66FF99; {//填充浅绿色}

条件1:= CROSS(K,D) AND K<60;

DRAWTEXT(REF(J,1)<0 AND J>=0 AND K<25, 60, '安全点现'),COLORRED;

{VARC:=SMA(ABS(L-REF(L,1)),3,1)/SMA(MAX(L-REF(L,1),0),3,1);

VARD:=EMA(IF(C< EMA(C,250),VARC*1000,VARC*10),3);

火焰山:=EMA(IF(L<=LLV(L,30),VARD/2+HHV(VARD,30),0),3)/618, COLOR99FFFF, LINETHICK2;

}

开心:=EMA(EMA(C,12)-EMA(C,25),2),COLORCC00CC,LINETHICK2;

短线交易:=EMA(开心,6),COLORD4FF7F,LINETHICK2;

系统:=(短线交易<(MA(C,3)*0.618/C))*短线交易 ,LINETHICK0;

WWW:=EMA(EMA(C,12)-EMA(C,25),2),COLORYELLOW,LINETHICK0;

XDKXGS:=EMA(开心,6),COLORYELLOW,LINETHICK0;

CN:=(短线交易<(MA(C,3)*0.618/C))*短线交易,COLORYELLOW ,LINETHICK0;

启动条件:=(系统 OR 短线交易<(MA(C,3)*0.618/C)) AND CROSS(开心 ,短线交易 ) AND V>REF( MA(V,5),1)*1.1 AND C>MA(C,125) AND C>REF(C,1)*1.02;

DRAWTEXT(启动条件 ,35,'↑通吃启动'),COLORRED;

VARA:=REF(LOW,1);

VARB:=SMA(ABS(LOW-VARA),3,1)/SMA(MAX(LOW-VARA,0),3,1)*100;

VARC1:=EMA(IF(CLOSE*1.3,VARB*10,VARB/10),3);

VARD1:=LLV(LOW,30);

VARE:=HHV(VARC1,30);

VARF:=IF(MA(CLOSE,58),1,0);

VARG:=EMA(IF(LOW<=VARD1,(VARC1+VARE*2)/2,0),3)/618*VARF;

VARH:=IF(VARG>28,28,VARG);

{黄柱吸筹区:STICKLINE(VARH>-120,0,VARH,6,0),COLOR0FFFFF;}

RSV1:=(((CLOSE - LLV(LOW,9)) / (HHV(HIGH,9) - LLV(LOW,9))) * 100);

K1:=SMA(RSV1,3,1);

D11:=SMA(K1,3,1);

J11:=3*K1-2*D11;

X:=LLV(J11,2)=LLV(J11,8);

DRAWTEXT(BARSLAST(CROSS(J11,3))<6 AND 条件1,51,'跟庄'),COLORBLUE;

腰线:=(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4,,;

KKA:=EMA(C-L,5) ;

顶线:=MA((C+REF(C,1)+REF(C,1))/3+KKA,5);

底线:=MA(REF(C,1)-KKA,5);

MA10:= MA(C,10);

MA20:= MA(C,20);

MA60:= MA(C,60);

BBA:=MA(C,2);

CCA:=MA(C,10);

DDA:=MA(C,20);

EEA:=EXIST(CROSS(BBA,CCA) AND CROSS(BBA,DDA),1);

RV:=(CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100;

RG:=(CLOSE-LLV(LOW,5))/(HHV(HIGH,5)-LLV(LOW,5))*100;

J0:=(HIGH+LOW)/2;

QJ:=EMA(J0,3);

J1:=IF(CLOSE>QJ,VOL,0);

J2:=IF(CLOSE<QJ,VOL,0);

BB:=MA(SUM(J1-J2,22),3);

累加:=21*BB+20*REF(BB,1)+19*REF(BB,2)+18*REF(BB,3)+17*REF(BB,4)

+16*REF(BB,5)+15*REF(BB,6)+14*REF(BB,7)+13*REF(BB,8)+12*REF

(BB,9)+11*REF(BB,10)+10*REF(BB,11)+9*REF(BB,12)+8*REF(BB,13)

+7*REF(BB,14)+6*REF(BB,15)+5*REF(BB,16)+4*REF(BB,17)+3*REF

(BB,18)+2*REF(BB,19)+REF(BB,20);

WMA1:=累加/(21+1)/21*2;

CC:=WMA1;

VAR3:=(BB-CC);VAR4:=SMA(RV,3,1);

VAR5:=SMA(VAR4,3,1);

KK:=EMA(SMA(RG,3,1),2),COLORFFFFFF;

DD:=SMA(KK,3,1),COLOR00FFFF;

圆月弯刀:=腰线>O AND O>底线 AND C>顶线 AND C>MA20 AND C>腰线 AND EEA

AND CROSS(VAR4,VAR5) AND CROSS(KK,DD)COLORGREEN;

DRAWTEXT(圆月弯刀, 100, '圆月弯刀'), COLORBLUE;

涨停:=CLOSE>REF(CLOSE,1)*1.093 AND C=H;

高阴:=O>MA(C,50) AND (O-C)/O*100>0.01 AND VOL/CAPITAL*100 >=3 AND REF(C,1)>REF(C,2) AND HIGH/LOW>=1.05 AND V>REF(V,1);

A:=REF(涨停,1) AND 高阴;

定位高价:=REF(H,BARSLAST(A));

选股:=C>定位高价*0.94 AND COUNT(A,30) AND REF(HHV(C,BARSLAST(A))<定位高价,1) AND BARSLAST(A)>6;

DRAWTEXT(选股, 50, '小牛来了'), COLORGREEN;

STICKLINE(选股,10,80,1,0),COLORGREEN;

缺口:=DRAWLINE(REF(L,1)>H AND C<REF(L,1),H,REF(REF(L,1)>H AND C<REF(L,1),1),REF(H,1),1);

突破:CROSS(C,缺口) AND (C-REF(C,1))/REF(C,1)*100>5 AND DYNAINFO(4)>0, COLORBLUE;

{一定时跌，涨的不算，上涨的最高点到当前的周期数据 肯定大于 最小值到当前的周期数 }

N:=100;

下跌 := HHVBARS(HIGH, N) > LLVBARS(LOW, 6);

去停牌 := DYNAINFO(8)>0;

跌幅 := (HHV(HIGH, N) - LLV(LOW, 6)) / HHV(HIGH, N) ;

跌幅100 : 跌幅 * (下跌) * (去停牌) * 100;