麻煩老師修改下

作者：文華財(cái)經(jīng) 來源：cxh99.com 發(fā)布時(shí)間：2021年07月25日

咨詢內(nèi)容： ?麻煩老師把綠MACD綠柱改成跟紅柱一樣的效果，綠柱縮短則顯示實(shí)體綠柱加長(zhǎng)則顯示空心
?下載信息??[文件大小：???下載次數(shù)：?]文件名：新建文本文檔.txt
　　
?
?來源:程序化99
文華技術(shù)人員： ? DIFF:EMA(CLOSE,12)-EMA(CLOSE,26); DEA:EMA(DIFF,9),COLORFFAA00; MACD:=2*(DIFF-DEA);

DRAWICON(CROSS(DIFF,DEA),0,4),VALIGN0; DRAWICON(CROSSDOWN(DIFF,DEA),0,5),VALIGN2;

STICKLINE(MACD>=0,MACD,0,4,1),COLORRED; STICKLINE(MACD<0,MACD,0,4,1),COLORGREEN; STICKLINE(MACD<REF(MACD,1) AND MACD>0,0,MACD,4,0 ),COLORRED; STICKLINE(MACD>REF(MACD,1) AND MACD<0,0,MACD,4,0 ),COLORGREEN;

X1:IF(DIFF<0,DIFF,0),COLOR0000FF,LINETHICK2; X2:IF(DIFF<0,0,DIFF),COLORMAGENTA,LINETHICK1; X3:IF(DIFF<DEA,DIFF,DEA),COLOR00FF00,LINETHICK1; X4:IF(DIFF>DEA,DEA,DEA),LINETHICK1,COLORFFBB11; 低位金叉:=CROSS(DIFF,DEA) AND DIFF<-0.1; DRAWTEXT(低位金叉,DEA*0.86,'低',COLORYELLOW; JCCOUNT:=COUNT(CROSS(DIFF,DEA),BARSLAST(DEA>=0)); 二次金叉:=CROSS(DIFF,DEA) AND DEA<0 AND COUNT(JCCOUNT=2,21)=1; STICKLINE(二次金叉,DEA*0.96,DEA*0.76,6,0),COLORFF00FF; //DRAWICON(二次金叉,DEA*1.1,'UY' ; DRAWTEXT(二次金叉,DEA*0.96,'二叉',COLORFF3300; A1:=BARSLAST(REF(CROSS(DIFF,DEA),1)); 底背離:=REF(CLOSE,A1+1)>CLOSE AND DIFF>REF(DIFF,A1+1) AND CROSS(DIFF,DEA); STICKLINE(底背離,DEA*1.09,DEA*0.86,6,0),COLOR00FF00; DRAWLINE(A1=0,DEA,底背離,DEA,0),COLORRED,LINETHICK1; DRAWTEXT(底背離,DEA*1.09,'底',COLORDD22FF; 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,LINETHICK1; DRAWTEXT(頂背離,DEA*1.02,'頂',COLOR00FF00; DRAWLINE3(頂背離,DIFF,0,頂背離,REF(VALUEWHEN( CROSS(DEA,DIFF),DIFF) ,1),SUMBARS(CROSS(DEA,DIFF),2)-1,0 ),COLORGREEN; DRAWLINE3(底背離,DIFF,0,底背離,REF(VALUEWHEN( CROSSDOWN(DEA,DIFF),DIFF) ,1),SUMBARS(CROSSDOWN(DEA,DIFF),2)-1,0 ),COLORRED;
J:=CROSS(DIFF,DEA),NODRAW; S:=CROSSDOWN(DIFF,DEA),NODRAW;
前方死叉區(qū)域面積:VALUEWHEN(J,REF(SUM(ABS(MACD),BARSLAST(S)+1),1)),NODRAW; 前方金叉區(qū)域面積:VALUEWHEN(S,REF(SUM(ABS(MACD),BARSLAST(J)+1),1)),NODRAW; DRAWNUMBER(J,REF(MACD,1),前方死叉區(qū)域面積,2,COLORWHITE),VALIGN0; DRAWNUMBER(S,REF(MACD,1),前方金叉區(qū)域面積,2,COLORMAGENTA),VALIGN2;