MACD变色变天修改(大智慧)

源码正文：

difF : ema(CLOSE,12) - Ema(CLOSE,26){XG51};
DEA : EMA(DIFF,9){XG51};
macd : 2*(DIFF-DEA), COLORstICK{XG51};
PARTLINE(dea,dea>REF(dea,1),RGB(255,255,255),dea<REF(dea,1),RGB(255,255,255)),Linethick1{XG51};
PARTLINE(DIFF,DIFF>=REF(DIFF,1),RGB(255,0,0),DIFF<REF(DIFF,1),RGB(0,255,0)),Linethick2{XG51};
DRAWGBKLAST(DEA>0,STRIP(RGB(90,0,0),RGB(10,150,0),0)) and DRAWGBKLAST(dea<0,STRIP(RGB(0,128,128),RGB(25,25,112),0)){XG51};
日金:DRAWTEXT(crOSS(DIFF,DEA) ,MacD,'▲'),align2,COLORred{XG51};
日死:DRAWTEXT(CROSS(DEA,DIFF) ,macd*1.5,'▼'),align2,COLORgreen{XG51};
DRAWTEXTAbs(3,1,'DIFF翻红，结合增仓及均线多头抓主升。'),linethick1,Color00ffff{XG51};
DRAWTEXTABS(3,16,'DIFF泛绿时持币，宁缺毋滥。'),linethick1,Color00ffff;

 {X_G^5.1_C_N_{};

源码正文：

大智慧1可用！
VAR1:=ema(Ema(EMA(CLOSE,5),2),1){XG51};
牛熊先知: (VAR1-REF(VAR1,1))/REF(VAR1,1)*1,COLORWHITE,COLORstICK{XG51};
牛熊神经: EMA(牛熊先知,13),COLORBLUE{XG51};
牛熊界线: 0, COLORFF00FF{XG51};
VAR2:=AMOUNT/vol/100{XG51};
VAR3:=MAX(Abs(HIGH-VAR2),ABS(VAR2-LOW)){XG51};
VAR4:=ABS((OPEN+CLOSE)/2-VAR2){XG51};
VAR5:=5{XG51};
VAR6:=(VAR3+VAR4)/VAR2*50{XG51};
牛熊变换: IF(crOSS(VAR6,VAR5),0.008,0),COLORFFCC66;

 {X=G~5^1=C=N={};