以下是通达信BOLL,CCI,KDJ合成公式源码(无源码的请下载附件导入)
M5:MA(CLOSE,5),colorwhite;
M10:MA(CLOSE,10),coloryellow;
M20:MA(CLOSE,20),colorff00ff;
M30:MA(CLOSE,30),colorgreen;
M60:MA(CLOSE,60), Colorred;
M120:MA(CLOSE,120),colorblue;
M240:MA(close,240),colorblue;
BOLL:MA(CLOSE,20);
UP:BOLL+2*STD(CLOSE,20),COLORYELLOW;
LO:BOLL-2*STD(CLOSE,20),COLORLIMAGENTA;
MA5:MA(CLOSE,5);
MA10:MA(CLOSE,10)POINTDOT,COLORLIBLUE;
Z:=2*STD(CLOSE,20);
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
D:=(SMA(SMA(RSV,3,1),3,1)*2.5)-100;
K:=(SMA(RSV,3,1)*2.5)-100;
J:=3*K-2*D;
TYP:=(HIGH+LOW+CLOSE)/3;
CCI:=(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14));
JJ:IF(J>=100,BOLL+Z*J/100,IF(J<=(-100),BOLL+Z*J/100,DRAWNULL)),POINTDOT,COLORMAGENTA;
CC:IF(CCI>=100,BOLL+Z*CCI/100,IF(CCI<=(-100),BOLL+Z*CCI/100,DRAWNULL)),POINTDOT,COLORGREEN;
DRAWICON(CROSS(BOLL+Z*CCI/100,LO)=1,BOLL-Z*1.3,1);DRAWICON(CROSS(UP,BOLL+Z*CCI/100)=1,BOLL+Z*1.3,2);
DRAWICON(CROSS(BOLL+Z*J/100,LO)=1,BOLL-Z*1.52,7);DRAWICON(CROSS(UP,BOLL+Z*J/100)=1,BOLL+Z*1.52,8);
DRAWICON(CROSS(J,D)=1 AND D<-20,BOLL-Z*1.3,9);
DRAWICON(CROSS(D,J)=1 AND D>20,BOLL+Z*1.3,15);
W:BOLL+2*STD(CLOSE,20)*1.25,POINTDOT,COLOR555555;
M:BOLL-2*STD(CLOSE,20)*1.25,POINTDOT,COLOR555555;
JN1:=INTPART(J)/41=INTPART(INTPART(J)/41);
JN2:=INTPART(J)/42=INTPART(INTPART(J)/42);
DRAWTEXT(CROSS(J,(-100))=1 AND JN1,BOLL-Z*1.52,' KDJ'),COLORRED;
DRAWTEXT(CROSS(CCI,(-100))=1 AND JN2,BOLL-Z*1.3,' CCI'),COLORRED;
DRAWTEXT(CROSS(CCI,(-100))=1 AND CROSS(J,D)=1 AND D<-20,BOLL-Z*1.3,' 金叉'),COLOR4AE9E9;
640422071.jpg
|