提前MACD（源码 主图/副图 通达信）

{提前MACD}
DIF:=(EMA(C,3)-EMA(L,30))/EMA(L,30)*600;
DEA:=EMA(DIF,7);
BC:=2*(DIF-DEA);
DQS:=3*DEA-2*DIF;
信号:DIF,COLORWHITE;
平滑:DEA,COLORYELLOW;
倍差:BC,COLORLIMAGENTA,NODRAW;
趋势:DQS,COLORCYAN,NODRAW;
BC1:=MA(BC,2);
BC2:=IF(WINNER(C*0.95)*100>50 AND COST(85)=REF(BC,1),BC,DRAWNULL);
QSDT:=DIF>REF(DIF,1) AND DIF>0 AND BC>BC1 AND WINNER(C*0.95)*100>50 AND COST(85) 高度控盘:BARSLAST(QSDT=0),COLORYELLOW,NODRAW;
{DRAWBAND(BC,RGB(250,250,0),MA(BC,2),RGB(0,200,250))};
STICKLINE(BC>0 AND BC>=REF(BC,1),0,BC,2.8,0),COLOR000055;
STICKLINE(BC>0 AND BC>=REF(BC,1),0,BC,2.6,0),COLOR000077;
STICKLINE(BC>0 AND BC>=REF(BC,1),0,BC,2.4,0),COLOR000099;
STICKLINE(BC>0 AND BC>=REF(BC,1),0,BC,2.2,0),COLOR0000BB;
STICKLINE(BC>0 AND BC>=REF(BC,1),0,BC,2.0,2),COLOR0000DD;
STICKLINE(BC>0 AND BC>=REF(BC,1),0,BC,1.0,0),COLOR0000FF;
STICKLINE(BC<0 AND BC STICKLINE(BC<0 AND BC STICKLINE(BC<0 AND BC STICKLINE(BC<0 AND BC STICKLINE(BC<0 AND BC STICKLINE(BC<0 AND BC STICKLINE(BC>0 AND BC STICKLINE(BC>0 AND BC STICKLINE(BC>0 AND BC STICKLINE(BC>0 AND BC STICKLINE(BC>0 AND BC STICKLINE(BC>0 AND BC STICKLINE(BC>0 AND BC STICKLINE(BC<0 AND BC>=REF(BC,1),0,BC,2.8,0),COLORAA0044;
STICKLINE(BC<0 AND BC>=REF(BC,1),0,BC,2.6,0),COLORBB0055;
STICKLINE(BC<0 AND BC>=REF(BC,1),0,BC,2.4,0),COLORCC0066;
STICKLINE(BC<0 AND BC>=REF(BC,1),0,BC,2.2,0),COLORDD0077;
STICKLINE(BC<0 AND BC>=REF(BC,1),0,BC,2.0,2),COLOREE0088;
STICKLINE(BC<0 AND BC>=REF(BC,1),0,BC,1.0,0),COLORFF00BB;
STICKLINE(BC2,0,BC2,2.8,0),COLOR0044AA;
STICKLINE(BC2,0,BC2,2.6,0),COLOR0055BB;
STICKLINE(BC2,0,BC2,2.4,0),COLOR0066CC;
STICKLINE(BC2,0,BC2,2.2,0),COLOR0077DD;
STICKLINE(BC2,0,BC2,2.0,2),COLOR0088EE;
STICKLINE(BC2,0,BC2,1.0,0),COLOR00BBFF;
FG:=(DIF-DEA)/6;
PH1:=EMA(DIF,1);
PH2:=PH1-FG*1;
PH3:=PH1-FG*2;
PH4:=PH1-FG*3;
PH5:=PH1-FG*4;
PH6:=PH1-FG*5;
PH7:=EMA(DIF,7);
PH8:=IF(PH1 PH9:=IF(PH2 PH10:=IF(PH3 PH11:=IF(PH4 PH12:=IF(PH5 PH13:=IF(PH6 PH14:=IF(PH7 PH15:=IF(PH1>REF(PH1,1) AND PH1>PH7,PH1,DRAWNULL);
PH16:=IF(PH2>REF(PH2,1) AND PH2>PH7,PH2,DRAWNULL