 | |  |  |
[通达信]通达信主图KDJ MACD CCI【定制版面】跨周期用源码公式
{主图 MACD}
ZTA:=HHV(C,30);
ZTB:=LLV(C,30);
ZTC:=CONST((ZTA+ZTB)/2);
DIF:EMA(CLOSE,12)-EMA(CLOSE,26),NODRAW,COLORFFFFFF;
DEA:EMA(DIF,9),COLOR00FFFF,NODRAW;
MACD:(DIF-DEA)*2,COLORFF00FF,NODRAW;
DIFF:(EMA(CLOSE,12) - EMA(CLOSE,26))*60+ZTC,NODRAW;
DEAA :EMA(DIFF,9),NODRAW;
MACDA:=(2*(DIFF-DEAA))+ZTC;
STICKLINE(MACDA>0+ZTC,0+ZTC,MACDA,0,0) ,COLOR0000FF;
STICKLINE(MACDA<0+ZTC,0+ZTC,MACDA,0,0) ,COLORFFF000;
0+ZTC,COLORFFFF00,LINETHICK1;
DIFFA:(EMA(CLOSE,12) - EMA(CLOSE,26))*60+ZTC,COLORFFFFFF;
DEAAA :EMA(DIFFA,9),COLOR00FFFF;
{主图 KDJ}
ZTA:=HHV(C,30);
ZTB:=LLV(C,30);
ZTC:=CONST((ZTA+ZTB)/2);
RSA:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K:SMA(RSA,3,1),NODRAW,COLORFFFFFF;
D:SMA(K,3,1),COLOR00FFFF,NODRAW;
J:3*K-2*D,COLORFF00FF,NODRAW;
KSG:=((CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100)*60+ZTC;
KA:SMA(KSG,3,1),COLORFFFFFF;
DA:SMA(KA,3,1),COLOR00FFFF;
JA:3*KA-2*DA,COLORFF00FF;
DRAWTEXT(ISLASTBAR,KA,' ↖K'),COLORFFFFFF;
DRAWNUMBER(ISLASTBAR AND KA,KA*1.005,K),COLORFFFFFF;
DRAWTEXT(ISLASTBAR,DA,' ↖D'),COLOR00FFFF;
DRAWNUMBER(ISLASTBAR AND DA,DA*1.005,D),COLOR00FFFF;
DRAWTEXT(ISLASTBAR,JA,' ↖J'),COLORFF00FF;
DRAWNUMBER(ISLASTBAR AND JA,JA*1.005,J),COLORFF00FF;
{主图 CCI}
QWX1:=HHV(CLOSE,30);
QWX2:=LLV(CLOSE,30);
QWX3:=CONST((QWX1+QWX2)/2);
TYP:=(HIGH+LOW+CLOSE)/3;
CCI20:((TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14)))*60+QWX3, COLORYELLOW;
K:=SMA(CCI20,3,1);
D:=SMA(K,3,1);
LJ2:=((C-LLV(LOW,8))/(HHV(HIGH,8)-LLV(LOW,8))*100)*60+QWX3;
LJF2:=(EMA(LJ2,3));
顶部:150*60+QWX3,COLOR999599,LINETHICK5;
超跌:-175*60+QWX3,COLOR999500,LINETHICK5;
DRAWBAND(K,RGB(255,50,100),D,RGB(0,200,0));
IF(CCI20<REF(CCI20,1),CCI20,DRAWNULL),COLORFFFF00,LINETHICK1;
IF(CCI20>REF(CCI20,1),CCI20,DRAWNULL),COLOR0000EA,LINETHICK2;
STICKLINE(CCI20<=-185*60+QWX3,-185*60+QWX3,-200*60+QWX3,2,0),COLOREE77EE;
STICKLINE(CCI20>=150*60+QWX3,158*60+QWX3,172*60+QWX3,2,0),COLOR00FFFF;
强势买入:STICKLINE(C,100*60+QWX3,100*60+QWX3,-1,0),COLORLIMAGENTA;
反弹买入:STICKLINE(C,-100*60+QWX3,-100*60+QWX3,-1,0),COLOR0099FF;
DRAWICON(CROSS(CCI20,-170*60+QWX3) AND LJF2<18*60+QWX3,-175*60+QWX3,1);
DRAWICON(CROSS(CCI20,-100*60+QWX3) AND CROSS(K,D),-121*60+QWX3,34);
DRAWICON(CROSS(CCI20,-100*60+QWX3) AND K>-100*60+QWX3,-111*60+QWX3,38);
DRAWICON(CROSS(CCI20,-100*60+QWX3) AND K>-100*60+QWX3 AND CROSS(LJF2,18*60+QWX3),-175*60+QWX3,9);
0+QWX3; |
| |  | |  |
|
