一个简单实用的kdj公式(通达信)
2019/11/29 18:51:33
我把公式起名为“实用kdj”。源码为:
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K:SMA(RSV,3,1);
D:SMA(K,3,1);
J:3*K-2*D;
VARK:=K,COLORWHITE;
升K:=IF(VARK>REF(VARK,1),VARK,DRAWNULL),COLORRED;
平K:=IF(VARK=REF(VARK,1),VARK,DRAWNULL),COLORWHITE;
降K:=IF(VARK<REF(VARK,1),VARK,DRAWNULL),COLORGREEN;
VARD:=D,COLORWHITE;
升D:=IF(VARD>REF(VARD,1),VARD,DRAWNULL),COLORRED;
平D:=IF(VARD=REF(VARD,1),VARD,DRAWNULL),COLORWHITE;
降D:=IF(VARD<REF(VARD,1),VARD,DRAWNULL),COLORGREEN;
VARJ:=J,COLORWHITE;
升J:IF(VARJ>REF(VARJ,1),VARJ,DRAWNULL),COLORRED,LINETHICK2;
平J:IF(VARJ=REF(VARJ,1),VARJ,DRAWNULL),COLORWHITE,LINETHICK1;
降J:IF(VARJ<REF(VARJ,1),VARJ,DRAWNULL),COLORGREEN,LINETHICK1;
DRAWBAND(K,RGB(155,50,50),D,RGB(0,100,50));
STICKLINE(J<0,J,0,1,1),COLORYELLOW;
STICKLINE(J>100,J,100,1,1),COLORWHITE;
投股 票网 www.tou 18.cn
[源码翻译]通达信软件动态翻译的结果
RSV赋值:(收盘价-9日内最低价的最低值)/(9日内最高价的最高值-9日内最低价的最低值)*100
输出K:RSV的3日[1日权重]移动平均
输出D:K的3日[1日权重]移动平均
输出J:3*K-2*D
VARK赋值:K,画白色
升K赋值:如果VARK>1日前的VARK,返回VARK,否则返回无效数,画红色
平K赋值:如果VARK=1日前的VARK,返回VARK,否则返回无效数,画白色
降K赋值:如果VARK<1日前的VARK,返回VARK,否则返回无效数,画绿色
VARD赋值:D,画白色
升D赋值:如果VARD>1日前的VARD,返回VARD,否则返回无效数,画红色
平D赋值:如果VARD=1日前的VARD,返回VARD,否则返回无效数,画白色
降D赋值:如果VARD<1日前的VARD,返回VARD,否则返回无效数,画绿色
VARJ赋值:J,画白色
输出升J:如果VARJ>1日前的VARJ,返回VARJ,否则返回无效数,画红色,线宽为2
输出平J:如果VARJ=1日前的VARJ,返回VARJ,否则返回无效数,画白色,线宽为1
输出降J:如果VARJ<1日前的VARJ,返回VARJ,否则返回无效数,画绿色,线宽为1
画带状线
当满足条件J<0时,在J和0位置之间画柱状线,宽度为1,1不为0则画空心柱.,画黄色
当满足条件J>100时,在J和100位置之间画柱状线,宽度为1,1不为0则画空心柱.,画白色
股市公式下载推荐