MACD升级（源码、副图、通达信、贴图）

源码

DIFF:=( EMA(CLOSE,12) - EMA(CLOSE,26));

DEA:=EMA(DIFF,9);

MACD:=2*(DIFF-DEA),STICK;

STICKLINE(DIFF<0,0,DIFF,2,0),COLORGREEN;

STICKLINE(DIFF>=0,0,DIFF,2,0),COLORRED;

STICKLINE(DEA>=0,0,DEA,2,-1),COLOR0000CC;

STICKLINE(DEA<0,0,DEA,2,-1),COLORGREEN;

柱1:=IF(DIFF>DEA,DIFF,0),COLORRED;

柱2:=IF(DEA
DRAWICON(CROSS(DIFF,DEA),柱2,1);

DRAWICON(CROSS(DEA,DIFF),DEA*1.1,2);

M:=9; SHORT:=12;LONG:=26;

JCSC:=(M-1)/(M+1)*DEA/(1-2/(M+1));

DD:=(MACD/2+(DEA*(M-1)/(M+1)))/(1-2/(M+1));{计算出明日MACD=MACD时的DIFF值}

DIF拐头价:=(DIFF*(SHORT+1)*(LONG+1)-(LONG+1)*(SHORT-1)*EMA(C,SHORT)+(SHORT+1)*(LONG-1)*EMA(C,LONG))/(2*((LONG+1)-(SHORT+1)))COLORCYAN,LINETHICK3;

柱变向价:=(DD*(SHORT+1)*(LONG+1)-(LONG+1)*(SHORT-1)*EMA(C,SHORT)+(SHORT+1)*(LONG-1)*EMA(C,LONG))/(2*((LONG+1)-(SHOR