自适应macd源码（超级macd指标源码）
1、求变色MACD指标代码？通达信变色MACD指标和博易大师变色MACD指标，谢谢朋友们！
1、通达信变色MACD指标
DIFIF1:=EMA(C,12) - EMA(C,26);
DEAEA1:=EMA(DIFIF1,9);
MACD1:=2*(DIFIF1-DEAEA1),STICK;
MACD2:=EMA(MACD1,3);
STICKLINE(MACD1>MACD2 AND MACD1>0,0,MACD1,1,0),COLORRED;
STICKLINE(MACD1>MACD2 AND MACD1<0,0,MACD1,1,0),COLORGREEN;
STICKLINE(MACD1<MACD2,0,MACD1,1,0),COLORCBCBC0;
STICKLINE(MACD1>=0 OR MACD1<=0,0,0,50,1),COLORWHITE;
DIFIF1,COLORFFFFFF,LINETHICK2;
DEAEA1,COLORYELLOW,LINETHICK2;
MACD:MACD1,NODRAW,COLORMAGENTA;
上升:IF(DEAEA1>REF(DEAEA1,1),DEAEA1,DRAWNULL),COLORYELLOW,LINETHICK2;
下降:IF(DEAEA1<REF(DEAEA1,1),DEAEA1,DRAWNULL),COLOR227700,LINETHICK2;
上翘:IF(DIFIF1>REF(DIFIF1,1),DIFIF1,DRAWNULL),COLORFFFFFF,LINETHICK2;
下拐:IF(DIFIF1<REF(DIFIF1,1),DIFIF1,DRAWNULL),COLOR227700,LINETHICK2;
DRAWICON(CROSS(DIFIF1,DEAEA1),DEAEA1*1.00,5);
DRAWICON(CROSS(DEAEA1,DIFIF1),DEAEA1*1.00,6);
2、博易大师变色MACD指标
DIFIF1:=EMA(C,12)-EMA(C,26);
DEAEA1:=EMA(DIFIF1,9);
MACD1:=2*(DIFIF1-DEAEA1),STICK;
MACD:2*(DIFIF1-DEAEA1),COLORSTICK;
PARTLINE(DEAEA1>REF(DEAEA1,1),DEAEA1),COLORYELLOW,LINETHICK2;
PARTLINE(DEAEA1<REF(DEAEA1,1),DEAEA1),COLOR008800,LINETHICK2;
PARTLINE(DIFIF1>REF(DIFIF1,1),DIFIF1),COLORFFFFFF,LINETHICK2;
PARTLINE(DIFIF1<REF(DIFIF1,1),DIFIF1),COLOR008800,LINETHICK2;
DRAWICON(CROSS(DIFIF1,DEAEA1),DEAEA1*1.00,1);
DRAWICON(CROSS(DEAEA1,DIFIF1),DEAEA1*1.00,2);
2、20个极品通达信指标公式源码
内容来自用户:gd19850130
N1:=5;N2:=10;N3:=20;N4:=30;P:=2;M:=20;N:=250;M1:=55;W:=21;P3:=500;N9:=90;HR:=HHV(HIGH,M1);
HRY:=LLV(LOW,M1);
HRY11:=HR*HRY;
HRY33:SQRT(HRY11),COLORGREEN,LINETHICK2;
IF(C>HRY33 AND HRY33 >=REF(HRY33 ,1), HRY33 ,DRAWNULL),LINETHICK2,COLORRED;
MA1:EMA(CLOSE,N1);
MA2:EMA(CLOSE,N2);
MA3:EMA(CLOSE,N3),COLOR00FFFF;
MA4:EMA(CLOSE,N4),LINETHICK2;
TJ1:=CROSS(MA1,MA2) AND C>O AND C>REF(C,1) AND C/REF(C,1)>=1.018
OR CROSS(MA1,MA4) AND C>O AND C>REF(C,1) AND C/REF(C,1)>=1.018
OR CROSS(MA2,MA3) AND C>O AND C>REF(C,1) AND C/REF(C,1)>=1.018
OR CROSS(MA1,MA3) AND C>O AND C>REF(C,1) AND C/REF(C,1)>=1.018;
TJ2:=(MAX(MA1,MAX(MA2,MA3))-MIN(MA1,MIN(MA2,MA3)))/
MIN(MA1,MIN(MA2,MA3))*100<=P;
XG:=TJ1 AND TJ2;
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
DIFF:= EMA(CLOSE,12) - EMA(CLOSE,26);
DEA :=EMA(DIFF,9);
MACD:=2*(DIFF-DEA);
做多:=IF(K>D AND MACD>0 AND V>1,2,0),COLORRED;
做空:=IF(K<D AND MACD1,-2,0),COLOR00FF00;
强洗:=IF(MACD>0 AND K1,1,0),COLOR0099FF;
弱升:=IF(MACDD AND V>1,-1,0),COLORFFFF00;
STICKLINE(做多AND C>=O,C,O,3,1),COLORRED;
STICKLINE(做多AND
3、跪求通达信冠军MACD和冠军背离线附图指标源码，那位大神给下！
{供参考}
{冠军MACD+顶底背离画线}
DIFF:=EMA(CLOSE,12)-EMA(CLOSE,26);
DEA:=EMA(DIFF,9);
MACD2:=2*(DIFF-DEA);
DU0:=CROSS(DIFF,0);
UD0:=CROSS(0,DIFF);
TDU0:=BARSLAST(DU0);
TUD0:=BARSLAST(UD0);
DU3:=REF(DU0,1);
UD3:=REF(UD0,1);
TDU3:=BARSLAST(DU3);
TUD3:=BARSLAST(UD3);
UDGLINE:=IF(TDU3<TUD3,REF(HHV(HIGH,2),TDU3),REF(LLV(LOW,2),TUD3));
JDU0:=REF(CLOSE,1)<=REF(UDGLINE,1) AND CLOSE>UDGLINE AND TDU0<TUD0;
JUD0:=REF(CLOSE,1)>=REF(UDGLINE,1) AND CLOSE<UDGLINE AND TUD0<TDU0;
JDU1:=JDU0 AND COUNT(JDU0,TDU0)=1;
JUD1:=JUD0 AND COUNT(JUD0,TUD0)=1;
STICKLINE(MACD2>=0,0,MACD2,1,1),COLOR0000FF;
STICKLINE(MACD2>=0 AND MACD2<REF(MACD2,1),0,MACD2,1,0),COLORGREEN;
STICKLINE(MACD2<0,0,MACD2,2,0),COLORFFFF00;
STICKLINE(MACD2<0 AND MACD2>REF(MACD2,1),0,MACD2,1,1),COLORFFFF00;
STICKLINE(CLOSE>0,0,0,1,0),COLOR808080;
DEFUT:=BARSLAST(CROSS(MACD2,0));
DEFDT:=BARSLAST(CROSS(0,MACD2));
DEFUL:=IF(MACD2>=0,HHV(MACD2,DEFUT+1),REF(HHV(MACD2,DEFUT+1),DEFDT+1));
DEFDL:=IF(MACD2<0,LLV(MACD2,DEFDT+1),REF(LLV(MACD2,DEFDT+1),DEFUT+1));
DEFU2L:=REF(DEFUL,DEFUT+1);
DEFD2L:=REF(DEFDL,DEFDT+1);
DRAWICON(LLV(MACD2,4)>0 AND MACD2<REF(MACD2,1) AND REF(MACD2,1)>REF(MACD2,2) AND REF(MACD2,2)>REF(MACD2,3),MACD2+0.38,9);
DRAWICON(HHV(MACD2,4)<0 AND MACD2>REF(MACD2,1) AND REF(MACD2,1)<REF(MACD2,2) AND REF(MACD2,2)<REF(MACD2,3),MACD2-0.13,11);
DRAWICON((JUD1 OR BARSLAST(JDU1)>BARSLAST(JUD1)) AND MACD2>=0 AND REF(MACD2,1)<REF(DEFU2L,1) AND MACD2>DEFU2L,MACD2+0.50,5);
DRAWICON((JDU1 OR BARSLAST(JDU1)<BARSLAST(JUD1)) AND MACD2<0 AND REF(MACD2,1)>REF(DEFD2L,1) AND MACD2<DEFD2L,MACD2-0.14,6);
VAR111:=JDU1 OR BARSLAST(JDU1)<BARSLAST(JUD1);
VAR112:=HHV(MACD2,4)<0 AND MACD2>REF(MACD2,1) AND REF(MACD2,1)<REF(MACD2,2) AND REF(MACD2,2)<REF(MACD2,3);
价因子:=IF(CLOSE/OPEN>1.06,2.5,0),COLORLIBLUE;
STICKLINE(价因子,0,1,1,1),COLORYELLOW;
量变线:=VOL/MA(VOL,5)COLORWHITE,LINETHICK2;
量因子:=IF(VOL/MA(VOL,5)>2,2.5,0);
STICKLINE(量因子,0,1,1,1),COLORYELLOW;
DRAWICON(CLOSE/OPEN>1.06,1,24);
DRAWICON(VOL/MA(VOL,5)>2,0.8,25);
A1:=BARSLAST(REF(CROSS(DIFF,DEA),1));
底背离:=REF(CLOSE,A1+1)>CLOSE AND DIFF>REF(DIFF,A1+1) AND CROSS(DIFF,DEA);
STICKLINE(底背离,0,0.03,6,0),COLOR00FF00;
底背:DRAWLINE(A1=0,DEA,底背离,DEA,0),COLORRED,LINETHICK4;
DRAWTEXT(底背离,0.12,' 底背离'),COLORFF00FF;
A2:=BARSLAST(REF(CROSS(DEA,DIFF),1));
顶背离:=REF(CLOSE,A2+1)<CLOSE AND REF(DIFF,A2+1)>DIFF AND CROSS(DEA,DIFF);
顶背:DRAWLINE(A2=0,DEA,顶背离,DEA,0),COLORGREEN,LINETHICK4;
DRAWICON(CROSS(DIFF,DEA),DEA,1);
DRAWICON(CROSS(DEA,DIFF),DEA,2);
4、极品MACD,无加密,造福小散。通达信指标公式源码
内容来自用户:孙玲玲
极品MACD，无加密，造福小散。指标源码：DIFF:= EMA(CLOSE,12) - EMA(CLOSE,26);DIF:EMA(CLOSE,12)-EMA(CLOSE,26),LINETHICK2;DEA:EMA(DIF,9),COLORWHITE;MACD:(DIF-DEA)*2,NODRAW;DRAWBAND(DIF,RGB(150,20,20),DEA,RGB(10,150,20));
DRAWBAND(IF(DIF,DIF,DRAWNULL),RGB(250,250,250),DIF,RGB(0,0,0));DRAWBAND(IF(DEA,DEA,DRAWNULL),RGB(250,250,10),DEA,RGB(0,0,0));
上堆小缩头卖:(DIF-DEA)*2,COLORSTICK;空中加油再续航:上堆小缩头卖,NODRAW;VARF:=TROUGHBARS(3,15,1)<4;多空:=EMA((CLOSE-MA((2*CLOSE+HIGH+LOW)/4,30))/MA((2*CLOSE+HIGH+LOW)/4,30)*100,3),LINETHICK1,COLORYELLOW;
STICKLINE(FILTER(VARF=1,5) AND多空<-10,空中加油再续航,0,3.2,1),COLOR00FFFF;STICKLINE(FILTER(VARF=1,5),空中加油再续航,0,4,0),COLORRED;
STICKLINE(MACD>0,0,MACD,1,0),COLORRED;STICKLINE(MACD0 AND MACD<=REF(MACD,1),0,MACD,1,0),COLORYELLOW;STICKLINE(MACD=REF(MACD,1),0,MACD,1,0),COLORWHITE;
FH1:=REF(MACD,1)<REF(MACD,2) AND REF(MACD,2)<REF(MACD,3) AND REF(MACD,3)=0 AND COUNT(MACD>REF(MACD,1),1)=1;FH3:=FH1 AND FH2 AND EMA(C,13)>REF(EMA(C,13),1);FH4:=FH1 AND FH2 AND ABS((DIF-DEA)/C)<0.018;FH5:=FH1 AND FH2 AND MACDOPEN AND MA(CLOSE,5)>MA(CLOSE,10)
5、求MACD空中加油指标源码（通达信）
CROSS(MACD.DIF,MACD.DEA) AND LLV(MACD.DIF,5)>0 AND COUNT(MACD.DIF>MACD.DEA,5)=1;
6、请高手把大智慧彩色MACD公式修改为通达信公式（续前）：
DIF:EMA(CLOSE,12)-EMA(CLOSE,26);
DEA:EMA(DIF,9);
MACD:(DIF-DEA)*2,COLORSTICK;
JCCOUNT:=COUNT(CROSS(DIF,DEA),BARSLAST(DEA>=0));
二金:=CROSS(DIF,DEA) AND DEA<0 AND COUNT(JCCOUNT=2,21)=1;
STICKLINE(二金,0,-0.10,6,0),COLORFF00FF;
DRAWICON(二金,DEA*1.04,13);
DRAWTEXT(二金,-0.08,' 二金'),COLORFF00FF;
A1:=BARSLAST(REF(CROSS(DIF,DEA),1));
底背离:=REF(CLOSE,A1+1)>CLOSE AND DIF>REF(DIF,A1+1) AND CROSS(DIF,DEA);
STICKLINE(底背离,0,0.13,6,0),COLORRED;
DRAWTEXT(底背离,DEA,' 底背离'),COLORRED;
A2:=BARSLAST(REF(CROSS(DEA,DIF),1));
顶背离:=REF(CLOSE,A2+1)<CLOSE AND REF(DIF,A2+1)>DIF AND CROSS(DEA,DIF);
DRAWTEXT(顶背离,DEA,' 顶背离'),COLORGREEN;
AA1:=DIF<0 AND DEA<0;
AA2:=AA1>REF(AA1,1);
AA3:=BARSLAST(AA2);
AA4:=COUNT(DEA>0 AND DIF>0,AA3)=0;
AA5:=CROSS(DIF,DEA);{金叉}
AA6:=BARSLAST(AA5);
AA7:=REF(AA6,AA6+1)+AA6;
AA8:=(DIF+DEA)/2;
AA9:=(HIGH+LOW)/2;
AA10:=AA5 AND AA7<AA3 AND AA4 AND AA8>REF(AA8,AA7) AND AA9<REF(AA9,AA7) AND MACD>0;
DRAWTEXT(AA10,DIF*0.95,'★'),COLORYELLOW;
7、MACD背离指标通达信指标公式源码
咳 有人答了