通达信井中月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;
