日周KDJ源码副图
KZ:="周KDJ.K";
DZ:="周KDJ.D";
JZ:="周KDJ.J";
KR:="KDJ.K";
DR:="KDJ.D";
JR:="KDJ.J";
ZR1:="周RSI.ZRSI1";
ZR2:="周RSI.ZRSI2";
KK:KZ,LINETHICK3,COLORFF0000;
DD:DZ,LINETHICK3,COLOR00FF00;
JJ:JZ,LINETHICK3,COLOR00FFFF;
FILLRGN(JJ,KK,JJ<=KK),COLOR680000;
FILLRGN(JJ,KK,JJ>KK),COLOR200023;
FILLRGN(KK,DD,KK<=DD),COLOR003300;
FILLRGN(KK,DD,KK>DD),COLOR883355;
回抽:=(CROSS("KDJ.J",-0.1)) AND KZ>DZ AND KZ>45 AND C>MA(C,60) AND MA(C,60)>=REF(MA(C,60),1);
STICKLINE(回抽,0,20,8,0),COLOR0000FF;
MACD_S:=(((EMA(C,12)-EMA(C,26))-EMA(EMA(C,12)-EMA(C,26),9))/(EMA(C,12)+EMA(C,26)))*IF(DATATYPE>=8,2000,3000);
MACD:="MACD.MACD";
{MACD柱子}
STICKLINE(MACD_S>0 AND MACD_S<=REF(MACD_S,1),0,MACD_S,4.9,0),COLORBBBBBB;
STICKLINE(MACD_S>0 AND MACD_S>REF(MACD_S,1),0,MACD_S,4.9,0),COLOR8899FF;
STICKLINE(MACD_S<0 AND MACD_S>REF(MACD_S,1),MACD_S,0,4.9,0),COLORFFF000;
STICKLINE(MACD_S<0 AND MACD_S<=REF(MACD_S,1),MACD_S,0,4.9,0),COLOR00ED00;
STICKLINE(1,50,50,3,0),COLORFF0000;
STICKLINE(ZR1>=ZR2,50,50,3,0),COLOR0000FF;
STICKLINE(1,20,20,3,0),COLORFF0000;
STICKLINE(1,80,80,3,0),COLORFF0000;
STICKLINE(1,100,100,3,0),COLORFF0000;
PARTLINE(0,"周MACD.MACD">0,RGB(255,0,0),"周MACD.MACD"<0,RGB(0,255,0),1,RGB(0,0,255)),LAYER0,LINETHICK2;
压力:EMA(100-ZR1,6),LINETHICK2,COLORCCC220,LAYER0;
Y:=9;RSV:=(C-LLV(L,Y))/(HHV(H,Y)-LLV(L,Y))*100;
K:SMA(RSV,3,1),COLOR0000FF,LAYER0;
D:SMA(K,3,1),COLORDD00EE,LAYER0;
J:3*K-2*D,COLORDDDDDD,LAYER0;
