多空转换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;

IF(J<0,J,DRAWNULL),COLORGREEN,LINETHICK4;

IF(K>90,K,DRAWNULL),COLOR0000FF,LINETHICK4;

IF(K<REF(K,1),K,DRAWNULL),COLORGREEN,LINETHICK2;

IF(D<REF(D,1),D,DRAWNULL),COLORGREEN,LINETHICK2;

IF(J<REF(J,1),J,DRAWNULL),COLORFFFF00,LINETHICK2;

IF(K>REF(K,1),K,DRAWNULL),COLORRED,LINETHICK2;

IF(D>REF(D,1),D,DRAWNULL),COLORRED,LINETHICK2;

IF(J>REF(J,1),J,DRAWNULL),COLORFF00FF,LINETHICK2;

(K-D)*2,COLORSTICK;

STICKLINE((K-D)*2>0,0,(K-D)*2,3,0),COLORRED;

STICKLINE((K-D)*2<0,0,(K-D)*2,3,0),COLORGREEN;

STICKLINE((K-D)*2<0 AND (K-D)*2<REF((K-D)*2,1),(K-D)*2,0,3,0),COLOR007700;

STICKLINE((K-D)*2<0 AND (K-D)*2<REF((K-D)*2,1),(K-D)*2,0,3,0),COLOR005500;

STICKLINE((K-D)*2<0 AND (K-D)*2<REF((K-D)*2,1),(K-D)*2,0,3,0),COLOR006600;

STICKLINE((K-D)*2<0 AND (K-D)*2<REF((K-D)*2,1),(K-D)*2,0,3,0),COLOR007700;

STICKLINE((K-D)*2=0 AND (K-D)*2<REF((K-D)*2,1),(K-D)*2,0,3,0 ),COLORFF66AA;

STICKLINE((K-D)*2>=0 AND (K-D)*2<REF((K-D)*2,1),(K-D)*2,0,3,0),COLORFF66AA;

STICKLINE((K-D)*2>=0 AND (K-D)*2<REF((K-D)*2,1),(K-D)*2,0,3,0 ),COLORFF11FF;

STICKLINE((K-D)*2>=0 AND (K-D)*2<REF((K-D)*2,1),(K-D)*2,0,3,0 ),COLORFF44FF;

STICKLINE((K-D)*2>=0 AND (K-D)*2<REF((K-D)*2,1),(K-D)*2,0,3,0 ),COLORFF66FF;

{STICKLINE(1,64,67,3,1),COLORWHITE;}

 

 

STICKLINE((K-D)*2>0 AND (K-D)*2>REF((K-D)*2,1),(K-D)*2,0,3,0),COLORRED;

STICKLINE((K-D)*2>0 AND (K-D)*2<REF((K-D)*2,1),(K-D)*2,0,3,0),COLOR008080;

STICKLINE((K-D)*2<0 AND (K-D)*2<REF((K-D)*2,1),(K-D)*2,0,3,0),COLOR00FF00;

STICKLINE((K-D)*2<0 AND (K-D)*2>REF((K-D)*2,1),(K-D)*2,0,3,0),COLORFFFFFF;

 

STICKLINE((K-D)*2<0 AND (K-D)*2>REF((K-D)*2,1),(K-D)*2,0,3,0 ),COLORFFAA00;

STICKLINE((K-D)*2<0 AND (K-D)*2>REF((K-D)*2,1),(K-D)*2,0,3.3 ,0 ),COLORFFBB11;

STICKLINE((K-D)*2<0 AND (K-D)*2>REF((K-D)*2,1),(K-D)*2,0,2.2,0 ),COLORFFCC22;

STICKLINE((K-D)*2<0 AND (K-D)*2>REF((K-D)*2,1),(K-D)*2,0,1.65 ,0 ),COLORFFDD33;

STICKLINE((K-D)*2<0 AND (K-D)*2>REF((K-D)*2,1),(K-D)*2,0,1.1 ,0 ),COLORFFEE44;

STICKLINE((K-D)*2<0 AND (K-D)*2>REF((K-D)*2,1),(K-D)*2,0,0.55 ,0 ),COLORFFFF55;

 

STICKLINE((K-D)*2<0 AND (K-D)*2<REF((K-D)*2,1),(K-D)*2,0,0,0 ),COLOR00E600;

STICKLINE((K-D)*2<0 AND (K-D)*2<REF((K-D)*2,1),(K-D)*2,0,3.5,0 ),COLOR007700;

STICKLINE((K-D)*2<0 AND (K-D)*2<REF((K-D)*2,1),(K-D)*2,0,2.7,0 ),COLOR008E00;

STICKLINE((K-D)*2<0 AND (K-D)*2<REF((K-D)*2,1),(K-D)*2,0,2.1,0 ),COLOR009900;

STICKLINE((K-D)*2<0 AND (K-D)*2<REF((K-D)*2,1),(K-D)*2,0,1.5,0 ),COLOR00B500;

STICKLINE((K-D)*2<0 AND (K-D)*2<REF((K-D)*2,1),(K-D)*2,0,0.9,0 ),COLOR00D500;

STICKLINE((K-D)*2<0 AND (K-D)*2<REF((K-D)*2,1),(K-D)*2,0,0.3,0 ),COLOR00E600;

STICKLINE((K-D)*2<0 AND (K-D)*2<REF((K-D)*2,1),(K-D)*2,0,0,1 ),COLOR00E600;

STICKLINE((K-D)*2>0 AND (K-D)*2<REF((K-D)*2,1),(K-D)*2,0,3.5,0),COLOR0044AA;

STICKLINE((K-D)*2>0 AND (K-D)*2<REF((K-D)*2,1),(K-D)*2,0,3.4,0),COLOR0055AA;

STICKLINE((K-D)*2>0 AND (K-D)*2<REF((K-D)*2,1),(K-D)*2,0,3.2,0),COLOR0066BB;

STICKLINE((K-D)*2>0 AND(K-D)*2<REF((K-D)*2,1),(K-D)*2,0,3.0,0),COLOR0077BB;

STICKLINE((K-D)*2>0 AND(K-D)*2<REF((K-D)*2,1),(K-D)*2,0,2.7,0),COLOR0088CC;

STICKLINE((K-D)*2>0 AND (K-D)*2<REF((K-D)*2,1),(K-D)*2,0,2.4,0),COLOR0099CC;

STICKLINE((K-D)*2>0 AND (K-D)*2<REF((K-D)*2,1),(K-D)*2,0,2.1,0),COLOR00AADD;

STICKLINE((K-D)*2>0 AND (K-D)*2<REF((K-D)*2,1),(K-D)*2,0,1.8,0),COLOR00BBDD;

STICKLINE((K-D)*2>0 AND (K-D)*2<REF((K-D)*2,1),(K-D)*2,0,1.4,0),COLOR00CCEE;

STICKLINE((K-D)*2>0 AND (K-D)*2<REF((K-D)*2,1),(K-D)*2,0,1.0,0),COLOR00DDEE;

STICKLINE((K-D)*2>0 AND (K-D)*2<REF((K-D)*2,1),(K-D)*2,0,0.6,0),COLOR00EEEE;

STICKLINE((K-D)*2>0 AND (K-D)*2<REF((K-D)*2,1),(K-D)*2,0,0.2,0),COLOR00F0F3;

STICKLINE((K-D)*2>0 AND (K-D)*2<REF((K-D)*2,1),(K-D)*2,0,0.05,0),COLOR00F6F3;

 

STICKLINE((K-D)*2>0 AND (K-D)*2>REF((K-D)*2,1),(K-D)*2,0,3.5,0) ,COLOR00005A;

STICKLINE((K-D)*2>0 AND (K-D)*2>REF((K-D)*2,1),(K-D)*2,0,3.4,0) ,COLOR00006A;

STICKLINE((K-D)*2>0 AND (K-D)*2>REF((K-D)*2,1),(K-D)*2,0,3.3,0) ,COLOR00007A;

STICKLINE((K-D)*2>0 AND (K-D)*2>REF((K-D)*2,1),(K-D)*2,0,3.2,0) ,COLOR00008A;

STICKLINE((K-D)*2>0 AND (K-D)*2>REF((K-D)*2,1),(K-D)*2,0,3.1,0) ,COLOR00009A;

STICKLINE((K-D)*2>0 AND(K-D)*2>REF((K-D)*2,1),(K-D)*2,0,2.8,0) ,COLOR0000AA;

STICKLINE((K-D)*2>0 AND (K-D)*2>REF((K-D)*2,1),(K-D)*2,0,2.5,0) ,COLOR0000BA;

STICKLINE((K-D)*2>0 AND (K-D)*2>REF((K-D)*2,1),(K-D)*2,0,2.1,0) ,COLOR0000CA;

STICKLINE((K-D)*2>0 AND (K-D)*2>REF((K-D)*2,1),(K-D)*2,0,1.7,0) ,COLOR0000DA;

STICKLINE((K-D)*2>0 AND (K-D)*2>REF((K-D)*2,1),(K-D)*2,0,1.2,0) ,COLOR0000EA;

STICKLINE((K-D)*2>0 AND (K-D)*2>REF((K-D)*2,1),(K-D)*2,0,0.7,0) ,COLOR0000F5;

STICKLINE((K-D)*2>0 AND (K-D)*2>REF((K-D)*2,1),(K-D)*2,0,0.2,0) ,COLOR0000FC;

STICKLINE((K-D)*2>0 AND (K-D)*2>REF((K-D)*2,1),(K-D)*2,0,0.05,0),COLOR0000FF;

原理解析：
RSV赋值:(收盘价-9日内最低价最低值)/(9日内最高价最高值-9日内最低价最低值)*100
RSV的3日[1日权重]移动平均
K的3日[1日权重]移动平均
输出J:3*K-2*D
如果J<0返回J否则返回DRAWNULL
如果K>90返回K否则返回DRAWNULL
IF(K<1日前的K,K,DRAWNULL),画绿色,LINETHICK2
IF(D<1日前的D,D,DRAWNULL),画绿色,LINETHICK2
IF(J<1日前的J,J,DRAWNULL),COLORFFFF00,LINETHICK2
IF(K>1日前的K,K,DRAWNULL),COLORRED,LINETHICK2
IF(D>1日前的D,D,DRAWNULL),COLORRED,LINETHICK2
IF(J>1日前的J,J,DRAWNULL),COLORFF00FF,LINETHICK2
(K-D)*2,COLORSTICK
STICKLINE((K-D)*2>0,0,(K-D)*2,3,0),COLORRED
STICKLINE((K-D)*2<0,0,(K-D)*2,3,0),画绿色
STICKLINE((K-D)*2<0 AND (K-D)*2 STICKLINE((K-D)*2<0 AND (K-D)*2 STICKLINE((K-D)*2<0 AND (K-D)*2 STICKLINE((K-D)*2<0 AND (K-D)*2 STICKLINE((K-D)*2=0 AND (K-D)*2 STICKLINE((K-D)*2>=0 AND (K-D)*2 STICKLINE((K-D)*2>=0 AND (K-D)*2 STICKLINE((K-D)*2>=0 AND (K-D)*2 STICKLINE((K-D)*2>=0 AND (K-D)*2当满足条件1时,在64和67之间画柱状线
}
 
 
STICKLINE((K-D)*2>0 AND (K-D)*2>REF((K-D)*2,1),(K-D)*2,0,3,0),COLORRED
STICKLINE((K-D)*2>0 AND (K-D)*2 STICKLINE((K-D)*2<0 AND (K-D)*2 STICKLINE((K-D)*2<0 AND (K-D)*2>REF((K-D)*2,1),(K-D)*2,0,3,0),COLORFFFFFF
 
STICKLINE((K-D)*2<0 AND (K-D)*2>REF((K-D)*2,1),(K-D)*2,0,3,0 ),COLORFFAA00
STICKLINE((K-D)*2<0 AND (K-D)*2>REF((K-D)*2,1),(K-D)*2,0,3.3 ,0 ),COLORFFBB11
STICKLINE((K-D)*2<0 AND (K-D)*2>REF((K-D)*2,1),(K-D)*2,0,2.2,0 ),COLORFFCC22
STICKLINE((K-D)*2<0 AND (K-D)*2>REF((K-D)*2,1),(K-D)*2,0,1.65 ,0 ),COLORFFDD33
STICKLINE((K-D)*2<0 AND (K-D)*2>REF((K-D)*2,1),(K-D)*2,0,1.1 ,0 ),COLORFFEE44
STICKLINE((K-D)*2<0 AND (K-D)*2>REF((K-D)*2,1),(K-D)*2,0,0.55 ,0 ),COLORFFFF55
 
STICKLINE((K-D)*2<0 AND (K-D)*2 STICKLINE((K-D)*2<0 AND (K-D)*2 STICKLINE((K-D)*2<0 AND (K-D)*2 STICKLINE((K-D)*2<0 AND (K-D)*2 STICKLINE((K-D)*2<0 AND (K-D)*2 STICKLINE((K-D)*2<0 AND (K-D)*2 STICKLINE((K-D)*2<0 AND (K-D)*2 STICKLINE((K-D)*2<0 AND (K-D)*2 STICKLINE((K-D)*2>0 AND (K-D)*2 STICKLINE((K-D)*2>0 AND (K-D)*2 STICKLINE((K-D)*2>0 AND (K-D)*2 STICKLINE((K-D)*2>0 AND(K-D)*2 STICKLINE((K-D)*2>0 AND(K-D)*2 STICKLINE((K-D)*2>0 AND (K-D)*2 STICKLINE((K-D)*2>0 AND (K-D)*2 STICKLINE((K-D)*2>0 AND (K-D)*2 STICKLINE((K-D)*2>0 AND (K-D)*2 STICKLINE((K-D)*2>0 AND (K-D)*2 STICKLINE((K-D)*2>0 AND (K-D)*2 STICKLINE((K-D)*2>0 AND (K-D)*2 STICKLINE((K-D)*2>0 AND (K-D)*2  
STICKLINE((K-D)*2>0 AND (K-D)*2>REF((K-D)*2,1),(K-D)*2,0,3.5,0) ,COLOR00005A
STICKLINE((K-D)*2>0 AND (K-D)*2>REF((K-D)*2,1),(K-D)*2,0,3.4,0) ,COLOR00006A
STICKLINE((K-D)*2>0 AND (K-D)*2>REF((K-D)*2,1),(K-D)*2,0,3.3,0) ,COLOR00007A
STICKLINE((K-D)*2>0 AND (K-D)*2>REF((K-D)*2,1),(K-D)*2,0,3.2,0) ,COLOR00008A
STICKLINE((K-D)*2>0 AND (K-D)*2>REF((K-D)*2,1),(K-D)*2,0,3.1,0) ,COLOR00009A
STICKLINE((K-D)*2>0 AND(K-D)*2>REF((K-D)*2,1),(K-D)*2,0,2.8,0) ,COLOR0000AA
STICKLINE((K-D)*2>0 AND (K-D)*2>REF((K-D)*2,1),(K-D)*2,0,2.5,0) ,COLOR0000BA
STICKLINE((K-D)*2>0 AND (K-D)*2>REF((K-D)*2,1),(K-D)*2,0,2.1,0) ,COLOR0000CA
STICKLINE((K-D)*2>0 AND (K-D)*2>REF((K-D)*2,1),(K-D)*2,0,1.7,0) ,COLOR0000DA
STICKLINE((K-D)*2>0 AND (K-D)*2>REF((K-D)*2,1),(K-D)*2,0,1.2,0) ,COLOR0000EA
STICKLINE((K-D)*2>0 AND (K-D)*2>REF((K-D)*2,1),(K-D)*2,0,0.7,0) ,COLOR0000F5
STICKLINE((K-D)*2>0 AND (K-D)*2>REF((K-D)*2,1),(K-D)*2,0,0.2,0) ,COLOR0000FC
STICKLINE((K-D)*2>0 AND (K-D)*2>REF((K-D)*2,1),(K-D)*2,0,0.05,0),COLOR0000FF