通达信资金流量、成交量、MACD、KDJ、RSI日周共振分析副图指标源码
65,COLORBLACK;
DIF60:=EMA(CLOSE,12/2)-EMA(CLOSE,26/2);
DEA60:=EMA(DIF60,9/2);
STICKLINE(DIF60>=DEA60,54,58,3,0),COLORRED;
STICKLINE(DIF60<DEA60,54,58,3,1),COLOR696969;
DRAWTEXT(CURRBARSCOUNT=98,56,'60分钟MACD'),COLORWHITE;
RSV60:=(CLOSE-LLV(LOW,36))/(HHV(HIGH,36)-LLV(LOW,36));
K60:=SMA(RSV60,3,1);
D60:=SMA(K60,3,1);
STICKLINE(K60>= D60,60,64,3,0),COLOR00FFFF;
STICKLINE(K60 < D60,60,64,3,1),COLOR696969;
DRAWTEXT(CURRBARSCOUNT=98,62,'60分钟KDJ '),COLORWHITE;
DIF:=EMA(CLOSE,12)-EMA(CLOSE,26);
DEA:=EMA(DIF,9);
STICKLINE(DIF>=DEA,48,52,3,0),COLOR00BBBB;
STICKLINE(DIF<DEA,48,52,3,1),COLOR696969;
DRAWTEXT(CURRBARSCOUNT=98,50,'MACD日线'),COLOR00FFFF;
周MD:=MACD.DIF#WEEK;
周MA:=MACD.DEA#WEEK;
STICKLINE(周MD>=周MA,42,46,3,0),COLOR00BBBB;
STICKLINE(周MD<周MA,42,46,3,1),COLOR696969;
DRAWTEXT(CURRBARSCOUNT=98,44,'MACD周线'),COLOR00FFFF;
月MD:=MACD.DIF#MONTH;
月MA:=MACD.DEA#MONTH;
STICKLINE(月MD>=月MA,36,40,3,0),COLOR00BBBB;
STICKLINE(月MD<月MA,36,40,3,1),COLOR696969;
DRAWTEXT(CURRBARSCOUNT=98,38,'月MACD'),COLORWHITE;
RSV:=(CLOSE-LLV(LOW,12))/(HHV(HIGH,12)-LLV(LOW,12));
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
J:=3*K-2*D;
STICKLINE(K>=D,30,34,3,0),COLORFF00FF;
STICKLINE(K<D,30,34,3,1),COLOR696969;
DRAWTEXT(CURRBARSCOUNT=98,32,'KDJ日线'),COLORFFFFFF;
周K:=MA("KDJ.K#WEEK"(9,3,3) ,5);
周D:=MA("KDJ.D#WEEK"(9,3,3) ,5);
周J:=MA("KDJ.J#WEEK"(9,3,3) ,5);
STICKLINE(周K>=周D,24,28,3,0),COLORRED;
STICKLINE(周K<周D,24,28,3,1),COLOR696969;
DRAWTEXT(CURRBARSCOUNT=98,26,'KDJ周线'),COLORWHITE;
月K:="KDJ.K#MONTH" ;
月D:="KDJ.D#MONTH" ;
STICKLINE(月K>=月D,18,22,3,0),COLORFF00FF;
STICKLINE(月K<月D,18,22,3,1),COLOR696969;
DRAWTEXT(CURRBARSCOUNT=98,20,'KDJ月线'),COLORWHITE;
日RSI1:="RSI.RSI1#DAY"(9);
日RSI2:="RSI.RSI2#DAY"(9);
STICKLINE(日RSI1>=日RSI2,12,16,3,0),COLOR990066;
STICKLINE(日RSI1<日RSI2,12,16,3,1),COLOR696969;
DRAWTEXT(CURRBARSCOUNT=98,14,'日R金叉'),COLORFFFFFF;
周RSI1:="RSI.RSI1#WEEK"(9);
周RSI2:="RSI.RSI2#WEEK"(9);
STICKLINE(周RSI1>=周RSI2,6,10,3,0),COLOR990066;
STICKLINE(周RSI1<周RSI2,6,10,3,1),COLOR696969;
DRAWTEXT(CURRBARSCOUNT=98,8,'周R金叉'),COLORFFFFFF;
月RSI1:="RSI.RSI1#MONTH"(9);
月RSI2:="RSI.RSI1#MONTH"(9);
STICKLINE(月RSI1>=月RSI2,0,4,3,0),COLOR990066;
STICKLINE(月RSI1<月RSI2,0,4,3,1),COLOR696969;
DRAWTEXT(CURRBARSCOUNT=98,2,'月R金叉'),COLORFFFFFF;
STICKLINE(周K>=REF(周K,1),-6,-2,3,0),COLORRED;
STICKLINE (周K<REF(周K,1),-6,-2,3,0),COLOR333333;
DRAWTEXT(CURRBARSCOUNT=98,-4,'周K拐头'),COLOR00FFFF;
STICKLINE(周J>=REF(周J,1),-12,-8,3,0),COLORRED;
STICKLINE(周J<REF(周J,1),-12,-8,3,0),COLOR333333;
DRAWTEXT(CURRBARSCOUNT=98,-10,'周J拐头'),COLORFFFFFF;
VOLUME:=VOL,VOLSTICK;
MAVOL1:=MA(VOLUME,5);
MAVOL2:=MA(VOLUME,10);
STICKLINE(MAVOL1>=MAVOL2,-18,-14,3,0),COLORBLUE;
STICKLINE (MAVOL1<MAVOL2,-18,-14,3,1),COLOR333333;
DRAWTEXT(CURRBARSCOUNT=98,-16,'成交量'),COLORFFFFFF;
PJJ:=DMA((HIGH+LOW+CLOSE*2)/4,0.9);
JJ:=REF(EMA(PJJ,3),1);
QJJ:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));
XVL:=IF(CLOSE>OPEN,QJJ*(HIGH-LOW),IF(CLOSE<OPEN,QJJ*(HIGH-OPEN+CLOSE-LOW),VOL/2))+IF
(CLOSE>OPEN,0-QJJ*(HIGH-CLOSE+OPEN-LOW),IF(CLOSE<OPEN,0-QJJ*(HIGH-LOW),0-VOL/2));
HSL:=(XVL/20)/1.15;
攻击流量:=((HSL*0.55+(REF(HSL,1)*0.33))+(REF(HSL,2)*0.22));
GJJ:=EMA(攻击流量,8);
LLJX:=EMA(攻击流量,3);
资金流量:=LLJX,LINETHICK0,COLOR0000FF;
A10:=资金流量>0;
STICKLINE(资金流量>=0,-24,-20,3,0),COLORYELLOW;
STICKLINE (资金流量<0,-24,-20,3,1),COLOR333333;
DRAWTEXT(CURRBARSCOUNT=98,-22,'资金流量'),COLORFFFFFF;
DRAWICON(周K>=REF(周K,1) AND DIF60>=DEA60,-30,25);