相關標簽:

 

源碼如下
FILLRGN(動能B,動能A,動能B<動能A,rgb(180,50,0),動能B>動能A,rgb(0,50,180)),layer5;
改為：DRAWBAND(動能B<動能A,RGB(180,50,0),動能B>動能A,RGB(0,50,180));
老朽按自己的方式修改為通達信指標；如圖、……嘻嘻、喜歡就下載。原貼(請老師將大智慧的綜合乖離指標修改為通達信指標)
指標原碼：
DIFF:=EMA(CLOSE,3)-EMA(CLOSE,8);
DEA:=EMA(DIFF,5);
MACD:=2*(DIFF-DEA);
A1:=EMA(DIFF,5)*100;
A2:((EMA(CLOSE,3)-EMA(CLOSE,8)))*100,LINETHICK0;
A3:=IF(A2>0,A2,50);
A4:=IF(A2<0,A2,50);
動能A:=A2;
動能B:=A1;
FILLRGN(動能B,動能A,動能B<動能A,rgb(180,50,0),動能B>動能A,rgb(0,50,180)),layer5;
STICKLINE(A2>0 and A2>=REF(A2,1),A2,0,6,0),Color0000F2;
STICKLINE(A2>0 and A2<REF(A2,1),A2,0,6,1),Color0000F2;
STICKLINE(A2<0 and A2<REF(A2,1),A2,0,6,0),Color008000;
STICKLINE(A2<0 and A2>=REF(A2,1),A2,0,6,1),Color008000;
VAR2:=(CLOSE-LLV(LOW,26))/(HHV(HIGH,26)-LLV(LOW,26))*100;
VAR3:=SMA(SMA(VAR2,3,1),3,1);
VAR4:=EMA(VAR3,5);
AA:=VOL>=REF(V,1)*1.91 AND C>REF(C,1)*1.01;
BB:=EMA(100*(C-LLV(LOW,34))/(HHV(H,34)-LLV(LOW,34)),3);
AA1:=STICKLINE(動能A<動能B,0,-3,4,0);
BB1:=STICKLINE(動能A>動能B,0,3,4,0);
持幣:AA1,ColorFF00FF;
持股:BB1,COLORRED;
底部:STICKLINE(CROSS(BB,9),0,10,4,0),ColorFF00FF;
STICKLINE(CROSS(BB,9),10,20,4,0),COLOR00FFFF;
STICKLINE(CROSS(BB,9),20,30,4,0),COLORRED;
DRAWTEXT(CROSS(BB,9),30,'底部'),COLOR00FFFF;
BIAS1:=(CLOSE-MA(CLOSE,6))/MA(CLOSE,6)*100;
BIAS2:=(CLOSE-MA(CLOSE,12))/MA(CLOSE,12)*100;
BIAS3:=(CLOSE-MA(CLOSE,24))/MA(CLOSE,24)*100;
BIAS:=(BIAS1+2*BIAS2+3*BIAS3)/6;
綜合乖離:MA(BIAS,3),COLORFFFF00,LINETHICK0;
BIAS底A:IF(綜合乖離<-18,12,0),ColorFF00FF,LINETHICK2;
BIAS底B:IF(綜合乖離<-12,10,0), COLOR0000CC,LINETHICK2;
BIAS底C:IF(綜合乖離<-6,8,0),COLORFFFF00,LINETHICK2;
BIAS底D:IF(綜合乖離<0,6,0),COLOR00FFFF,LINETHICK2;DRAWTEXT_FIX(C>O,0.01,0.9,0,' www.kzuj.com.cn '),COLORRED;
DRAWTEXT_FIX(C>O,1,1,0,'程序化交易模型'),COLORRED;


DRAWTEXT_FIX(C>O,0.01,0.9,0,' www.kzuj.com.cn '),COLORRED;
DRAWTEXT_FIX(C>O,1,1,0,'程序化交易模型'),COLORRED;