超牛kdj(指标 副图 通达信)
己验证后用的还可以,与朋友们分享下, 合适的拿走用,不合适看看就好
N:=10;
P1:=10;
P2:=20;
RSV:=(CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100;
K:SMA(RSV,P1,1),COLORYELLOW;
D:SMA(K,P2,1),COLOR00DD00;
J:3*K-2*D,COLORRED;
{KDJ日周金叉死叉}
周K:="KDJ.K#WEEK"(9,3,3);
周D:="KDJ.D#WEEK"(9,3,3);
周J:="KDJ.J#WEEK"(9,3,3);
周金叉:=CROSS(周K,周D);
日金叉:=FILTER(CROSS(K,D) AND K<20,4);
DRAWTEXT(周金叉,D,'★'),COLORYELLOW;
DRAWTEXT(周金叉,D*0.93,' KD周金叉'),COLORYELLOW;
DRAWTEXT(CROSS(周D,周K),D*0.95,'KD周死叉'),COLOR00DDBB;
DRAWICON(日金叉,K,1);
DRAWTEXT(日金叉,D,'低位金叉'),COLOR00CCCC;
KDB:=BARSLAST(REF(CROSS(K,D),1));
KDDB:=REF(CLOSE,KDB+1)>CLOSE AND REF(K,KDB+1)<K AND CROSS(K,D);
K底背:=IF(FILTER(KDDB>0,5),1,0);
DRAWTEXT(K底背=1,D*0.98,'底背离'),COLORRED;
KDD:=BARSLAST(REF(CROSS(D,K),1));
K顶背:=REF(CLOSE,KDD+1)<CLOSE AND REF(K,KDD+1)>K AND CROSS(D,K);
DRAWTEXT(FILTER(K顶背>0,5),D+8,'顶背离'),COLORFFAA22;
未来函数检测结果如下:
该公式包含未来函数:#WEEK
定制指标公式、软件请联系QQ或微信同号:88652583
RSV赋值:(收盘价-N日内最低价的最低值)/(N日内最高价的最高值-N日内最低价的最低值)*100
输出K:RSV的P1日[1日权重]移动平均,画黄色
输出D:K的P2日[1日权重]移动平均,COLOR00DD00
输出J:3*K-2*D,画红色
周K赋值:"KDJ的K[取周线数据]"(9,3,3)
周D赋值:"KDJ的D[取周线数据]"(9,3,3)
周J赋值:"KDJ的J[取周线数据]"(9,3,3)
周金叉赋值:周K上穿周D
日金叉赋值:K上穿DANDK<20的4日过滤
当满足条件周金叉时,在D位置书写文字,画黄色
当满足条件周金叉时,在D*0.93位置书写文字,画黄色
当满足条件周D上穿周K时,在D*0.95位置书写文字,COLOR00DDBB
当满足条件日金叉时,在K位置画1号图标
当满足条件日金叉时,在D位置书写文字,COLOR00CCCC
KDB赋值:上次1日前的K上穿D距今天数
KDDB赋值:KDB+1日前的收盘价>收盘价 AND KDB+1日前的KK底背赋值:如果KDDB>0的5日过滤,返回1,否则返回0
当满足条件K底背=1时,在D*0.98位置书写文字,画红色
KDD赋值:上次1日前的D上穿K距今天数
K顶背赋值:KDD+1日前的收盘价<收盘价 AND KDD+1日前的K>K AND D上穿K
当满足条件K顶背>0的5日过滤时,在D+8位置书写文字,COLORFFAA22