久久精品精选,精品九九视频,www久久只有这里有精品,亚洲熟女乱色综合一区
    分享

    秋葉正紅的三級聯立MACD公式源碼

     agl2722 2014-06-15

    感謝秋葉正紅

     

    本博提示:1、思路絕對沒問題;2、三級不夠;3、各級之間不同步,存在相位差;4、參數需要個性化優化,沒有改進MACD的滯后性;5、將其中的收盤價改為AMOUNT即變為VMACD,同樣存在上面三個問題;

     

     

    秋葉正紅的三級聯立MACD公式源碼

    http://blog.sina.com.cn/s/blog_5101bb000100iga9.html

     

    以下是在分鐘K線圖上顯示上兩個級別MACD的公式,1F、5F、30F的公式周期不一樣,一定按公式說明的周期使用,否則顯示的MACD是不對的。只有飛狐和大智慧L2的源碼,其它軟件的源碼沒有編寫,哪位網友有興趣可以幫忙改寫。


    {用在1分鐘K線圖上的5分鐘/30分鐘MACD紅綠柱面積(大智慧L2版),在1分鐘K線圖上顯示5分鐘、30分鐘的MACD}

     

    DIFF1:=EMA(CLOSE,60) - EMA(CLOSE,130);
    DEA1:=EMA(DIFF1,45);
    MACD:=2*(DIFF1-DEA1);
    DIFF30:=EMA(CLOSE,360) - EMA(CLOSE,780);
    DEA30:=EMA(DIFF30,270);
    MACD30:=2*(DIFF30-DEA30);
    MACD5分鐘:MACD,Color0000FF,LINETHICK0;
    DIFF5分鐘:DIFF1,Color0000FF;
    DEA5分鐘:DEA1,ColorFF9999;
    MACD30分鐘:MACD30,ColorFF00FF,LINETHICK0;
    DIFF30分鐘:DIFF30,ColorFF00FF;
    DEA30分鐘:DEA30,Color00FF00;
    綠柱面積:10*IF (MACD<0,SUM(MACD,BARSLAST(MACD>0)),0),LINETHICK0,colorred;
    紅柱面積:10*IF (MACD>0,SUM(MACD,BARSLAST(MACD<0)),0),LINETHICK0,Color00ff00;
    MACDhs:=IF(MACD>0 AND MACD>=REF(MACD,1),MACD,0);
    MACDhx:=IF(MACD>0 AND MACD<=REF(MACD,1),MACD,0);
    MACDlx:=IF(MACD<0 AND MACD<REF(MACD,1),MACD,0);
    MACDls:=IF(MACD<0 AND MACD>REF(MACD,1),MACD,0);
    STICKLINE(MACD30>0 AND MACD30>=REF(MACD30,1),0,MACD30,9,0),ColorFF99FF;
    STICKLINE(MACD30>0 AND MACD30<REF(MACD30,1),0,MACD30,9,0),Color99ffFF;
    STICKLINE(MACD30<0 AND MACD30<=REF(MACD30,1),0,MACD30,9,0),ColorFFff99;
    STICKLINE(MACD30<0 AND MACD30>REF(MACD30,1),0,MACD30,9,0),ColorbbFFbb;
    STICKLINE(MACDhs>0,0,MACD,9,0),Color0000BB;
    STICKLINE(MACDhs>0,0,MACD,8,0),Color0000CC;
    STICKLINE(MACDhs>0,0,MACD,7,0),Color0011CC;
    STICKLINE(MACDhs>0,0,MACD,6,0),Color1122DD;
    STICKLINE(MACDhs>0,0,MACD,5,0),Color2233DD;
    STICKLINE(MACDhs>0,0,MACD,4,0),Color3344EE;
    STICKLINE(MACDhs>0,0,MACD,3,0),Color4455EE;
    STICKLINE(MACDhs>0,0,MACD,2,0),Color5566FF;
    STICKLINE(MACDhs>0,0,MACD,1,0),Color6677FF;
    STICKLINE(MACDhx>0,0,MACD,9,0),Color0077BB;
    STICKLINE(MACDhx>0,0,MACD,8,0),Color0088CC;
    STICKLINE(MACDhx>0,0,MACD,7,0),Color0099CC;
    STICKLINE(MACDhx>0,0,MACD,6,0),Color00AADD;
    STICKLINE(MACDhx>0,0,MACD,5,0),Color00BBDD;
    STICKLINE(MACDhx>0,0,MACD,4,0),Color00CCEE;
    STICKLINE(MACDhx>0,0,MACD,3,0),Color00DDEE;
    STICKLINE(MACDhx>0,0,MACD,2,0),Color00EEFF;
    STICKLINE(MACDhx>0,0,MACD,1,0),Color00FFFF;
    STICKLINE(MACDlx<0,MACD,0,9,0),Color770000;
    STICKLINE(MACDlx<0,MACD,0,8,0),Color881100;
    STICKLINE(MACDlx<0,MACD,0,7,0),Color992200;
    STICKLINE(MACDlx<0,MACD,0,6,0),ColorAA3300;
    STICKLINE(MACDlx<0,MACD,0,5,0),ColorBB4400;
    STICKLINE(MACDlx<0,MACD,0,4,0),ColorCC5500;
    STICKLINE(MACDlx<0,MACD,0,3,0),ColorDD6600;
    STICKLINE(MACDlx<0,MACD,0,2,0),ColorEE7700;
    STICKLINE(MACDlx<0,MACD,0,1,0),ColorFF8800;
    STICKLINE(MACDls<0,MACD,0,9,0),Color005500;
    STICKLINE(MACDls<0,MACD,0,8,0),Color007700;
    STICKLINE(MACDls<0,MACD,0,7,0),Color009900;
    STICKLINE(MACDls<0,MACD,0,6,0),Color00AA00;
    STICKLINE(MACDls<0,MACD,0,5,0),Color00BB00;
    STICKLINE(MACDls<0,MACD,0,4,0),Color00CC00;
    STICKLINE(MACDls<0,MACD,0,3,0),Color00DD00;
    STICKLINE(MACDls<0,MACD,0,2,0),Color00EE00;
    STICKLINE(MACDls<0,MACD,0,1,0),Color00FF00;
    DRAWTEXT(ref(MACD,1)>0 and MACD<=0 ,HHV(MACD,8),''+ref(紅柱面積,1)),ALIGN1,VALIGN1,colorred;
    DRAWTEXT(ref(MACD,1)<0 and MACD>=0 ,LLV(MACD,4),''+ref(abs(綠柱面積),1)),ALIGN1,Color00ff00;
    DRAWTEXT(BARSTATUS=2 AND MACD<0,LLV(MACD,8),''+abs(綠柱面積)),align2,Color00AA00;
    DRAWTEXT(BARSTATUS=2 AND MACD>0,HHV(MACD,4),''+abs(紅柱面積)),align2,VALIGN1,colorred;

     

    {用在5分鐘K線圖上的30分鐘/日線MACD紅綠柱面積(大智慧L2版),在5分鐘K線圖上顯示30分鐘、日線MACD}
    DIFF1:=EMA(CLOSE,60) - EMA(CLOSE,130);
    DEA1:=EMA(DIFF1,45);
    MACD:=2*(DIFF1-DEA1);
    DIFFr:=EMA(CLOSE,576) - EMA(CLOSE,1248);
    DEAr:=EMA(DIFFr,432);
    MACDr:=2*(DIFFr-DEAr);
    MACD30分鐘:MACD,Color0000FF,LINETHICK0;
    DIFF30分鐘:DIFF1,Color0000FF;
    DEA30分鐘:DEA1,ColorFF0000;
    MACD日線:MACDr,ColorFF00FF,LINETHICK0;
    DIFF日線:DIFFr,ColorFF00FF;
    DEA日線:DEAr,Color00FF00;
    綠柱面積:10*IF (MACD<0,SUM(MACD,BARSLAST(MACD>0)),0),LINETHICK0,colorred;
    紅柱面積:10*IF (MACD>0,SUM(MACD,BARSLAST(MACD<0)),0),LINETHICK0,Color00ff00;
    MACDhs:=IF(MACD>0 AND MACD>=REF(MACD,1),MACD,0);
    MACDhx:=IF(MACD>0 AND MACD<=REF(MACD,1),MACD,0);
    MACDlx:=IF(MACD<0 AND MACD<REF(MACD,1),MACD,0);
    MACDls:=IF(MACD<0 AND MACD>REF(MACD,1),MACD,0);
    STICKLINE(MACDr>0 AND MACDr>=REF(MACDr,1),0,MACDr,6,1),ColorFF99FF;
    STICKLINE(MACDr>0 AND MACDr<REF(MACDr,1),0,MACDr,6,1),Color99ffFF;
    STICKLINE(MACDr<0 AND MACDr<=REF(MACDr,1),0,MACDr,6,1),ColorFFbb99;
    STICKLINE(MACDr<0 AND MACDr>REF(MACDr,1),0,MACDr,6,1),ColorbbFFbb;
    STICKLINE(MACDhs>0,0,MACD,9,0),Color0000BB;
    STICKLINE(MACDhs>0,0,MACD,8,0),Color0000CC;
    STICKLINE(MACDhs>0,0,MACD,7,0),Color0011CC;
    STICKLINE(MACDhs>0,0,MACD,6,0),Color1122DD;
    STICKLINE(MACDhs>0,0,MACD,5,0),Color2233DD;
    STICKLINE(MACDhs>0,0,MACD,4,0),Color3344EE;
    STICKLINE(MACDhs>0,0,MACD,3,0),Color4455EE;
    STICKLINE(MACDhs>0,0,MACD,2,0),Color5566FF;
    STICKLINE(MACDhs>0,0,MACD,1,0),Color6677FF;
    STICKLINE(MACDhx>0,0,MACD,9,0),Color0077BB;
    STICKLINE(MACDhx>0,0,MACD,8,0),Color0088CC;
    STICKLINE(MACDhx>0,0,MACD,7,0),Color0099CC;
    STICKLINE(MACDhx>0,0,MACD,6,0),Color00AADD;
    STICKLINE(MACDhx>0,0,MACD,5,0),Color00BBDD;
    STICKLINE(MACDhx>0,0,MACD,4,0),Color00CCEE;
    STICKLINE(MACDhx>0,0,MACD,3,0),Color00DDEE;
    STICKLINE(MACDhx>0,0,MACD,2,0),Color00EEFF;
    STICKLINE(MACDhx>0,0,MACD,1,0),Color00FFFF;
    STICKLINE(MACDlx<0,MACD,0,9,0),Color770000;
    STICKLINE(MACDlx<0,MACD,0,8,0),Color881100;
    STICKLINE(MACDlx<0,MACD,0,7,0),Color992200;
    STICKLINE(MACDlx<0,MACD,0,6,0),ColorAA3300;
    STICKLINE(MACDlx<0,MACD,0,5,0),ColorBB4400;
    STICKLINE(MACDlx<0,MACD,0,4,0),ColorCC5500;
    STICKLINE(MACDlx<0,MACD,0,3,0),ColorDD6600;
    STICKLINE(MACDlx<0,MACD,0,2,0),ColorEE7700;
    STICKLINE(MACDlx<0,MACD,0,1,0),ColorFF8800;
    STICKLINE(MACDls<0,MACD,0,9,0),Color005500;
    STICKLINE(MACDls<0,MACD,0,8,0),Color007700;
    STICKLINE(MACDls<0,MACD,0,7,0),Color009900;
    STICKLINE(MACDls<0,MACD,0,6,0),Color00AA00;
    STICKLINE(MACDls<0,MACD,0,5,0),Color00BB00;
    STICKLINE(MACDls<0,MACD,0,4,0),Color00CC00;
    STICKLINE(MACDls<0,MACD,0,3,0),Color00DD00;
    STICKLINE(MACDls<0,MACD,0,2,0),Color00EE00;
    STICKLINE(MACDls<0,MACD,0,1,0),Color00FF00;
    DRAWTEXT(ref(MACD,1)>0 and MACD<=0 ,HHV(MACD,8),''+ref(紅柱面積,1)),ALIGN1,VALIGN1,colorred;
    DRAWTEXT(ref(MACD,1)<0 and MACD>=0 ,LLV(MACD,4),''+ref(abs(綠柱面積),1)),ALIGN1,Color00ff00;
    DRAWTEXT(BARSTATUS=2 AND MACD<0,LLV(MACD,8),''+abs(綠柱面積)),align2,Color00AA00;
    DRAWTEXT(BARSTATUS=2 AND MACD>0,HHV(MACD,4),''+abs(紅柱面積)),align2,VALIGN1,colorred;

     

    {用在30分鐘K線圖上的日線/周線MACD紅綠柱面積(大智慧L2版),在30分鐘K線圖上顯示日線、周線MACD}
    DIFF1:=EMA(CLOSE,96) - EMA(CLOSE,208);
    DEA1:=EMA(DIFF1,72);
    MACD:=2*(DIFF1-DEA1);
    DIFFz:=EMA(CLOSE,480) - EMA(CLOSE,1040);
    DEAz:=EMA(DIFFz,360);
    MACDz:=2*(DIFFz-DEAz);
    MACD日線:MACD,COLOR0000FF,LINETHICK0;
    DIFF日線:DIFF1,Color0000FF;
    DEA日線:DEA1,ColorFF0000;
    MACD周線:MACDz,ColorFF00FF,LINETHICK0;
    DIFF周線:DIFFz,ColorFF00FF;
    DEA周線:DEAz,Color00FF00;
    綠柱面積:10*IF (MACD<0,SUM(MACD,BARSLAST(MACD>0)),0),LINETHICK0,colorred;
    紅柱面積:10*IF (MACD>0,SUM(MACD,BARSLAST(MACD<0)),0),LINETHICK0,Color00ff00;
    MACDhs:=IF(MACD>0 AND MACD>=REF(MACD,1),MACD,0);
    MACDhx:=IF(MACD>0 AND MACD<=REF(MACD,1),MACD,0);
    MACDlx:=IF(MACD<0 AND MACD<REF(MACD,1),MACD,0);
    MACDls:=IF(MACD<0 AND MACD>REF(MACD,1),MACD,0);
    STICKLINE(MACDz>0 AND MACDz>=REF(MACDz,1),0,MACDz,6,1),ColorFF99FF;
    STICKLINE(MACDz>0 AND MACDz<REF(MACDz,1),0,MACDz,6,1),Color99ffFF;
    STICKLINE(MACDz<0 AND MACDz<=REF(MACDz,1),0,MACDz,6,1),ColorFFbb99;
    STICKLINE(MACDz<0 AND MACDz>REF(MACDz,1),0,MACDz,6,1),ColorbbFFbb;
    STICKLINE(MACDhs>0,0,MACD,9,0),Color0000BB;
    STICKLINE(MACDhs>0,0,MACD,8,0),Color0000CC;
    STICKLINE(MACDhs>0,0,MACD,7,0),Color0011CC;
    STICKLINE(MACDhs>0,0,MACD,6,0),Color1122DD;
    STICKLINE(MACDhs>0,0,MACD,5,0),Color2233DD;
    STICKLINE(MACDhs>0,0,MACD,4,0),Color3344EE;
    STICKLINE(MACDhs>0,0,MACD,3,0),Color4455EE;
    STICKLINE(MACDhs>0,0,MACD,2,0),Color5566FF;
    STICKLINE(MACDhs>0,0,MACD,1,0),Color6677FF;
    STICKLINE(MACDhx>0,0,MACD,9,0),Color0077BB;
    STICKLINE(MACDhx>0,0,MACD,8,0),Color0088CC;
    STICKLINE(MACDhx>0,0,MACD,7,0),Color0099CC;
    STICKLINE(MACDhx>0,0,MACD,6,0),Color00AADD;
    STICKLINE(MACDhx>0,0,MACD,5,0),Color00BBDD;
    STICKLINE(MACDhx>0,0,MACD,4,0),Color00CCEE;
    STICKLINE(MACDhx>0,0,MACD,3,0),Color00DDEE;
    STICKLINE(MACDhx>0,0,MACD,2,0),Color00EEFF;
    STICKLINE(MACDhx>0,0,MACD,1,0),Color00FFFF;
    STICKLINE(MACDlx<0,MACD,0,9,0),Color770000;
    STICKLINE(MACDlx<0,MACD,0,8,0),Color881100;
    STICKLINE(MACDlx<0,MACD,0,7,0),Color992200;
    STICKLINE(MACDlx<0,MACD,0,6,0),ColorAA3300;
    STICKLINE(MACDlx<0,MACD,0,5,0),ColorBB4400;
    STICKLINE(MACDlx<0,MACD,0,4,0),ColorCC5500;
    STICKLINE(MACDlx<0,MACD,0,3,0),ColorDD6600;
    STICKLINE(MACDlx<0,MACD,0,2,0),ColorEE7700;
    STICKLINE(MACDlx<0,MACD,0,1,0),ColorFF8800;
    STICKLINE(MACDls<0,MACD,0,9,0),Color005500;
    STICKLINE(MACDls<0,MACD,0,8,0),Color007700;
    STICKLINE(MACDls<0,MACD,0,7,0),Color009900;
    STICKLINE(MACDls<0,MACD,0,6,0),Color00AA00;
    STICKLINE(MACDls<0,MACD,0,5,0),Color00BB00;
    STICKLINE(MACDls<0,MACD,0,4,0),Color00CC00;
    STICKLINE(MACDls<0,MACD,0,3,0),Color00DD00;
    STICKLINE(MACDls<0,MACD,0,2,0),Color00EE00;
    STICKLINE(MACDls<0,MACD,0,1,0),Color00FF00;
    DRAWTEXT(ref(MACD,1)>0 and MACD<=0 ,HHV(MACD,8),''+ref(紅柱面積,1)),ALIGN1,VALIGN1,colorred;
    DRAWTEXT(ref(MACD,1)<0 and MACD>=0 ,LLV(MACD,4),''+ref(abs(綠柱面積),1)),ALIGN1,Color00ff00;
    DRAWTEXT(BARSTATUS=2 AND MACD<0,LLV(MACD,8),''+abs(綠柱面積)),align2,Color00AA00;
    DRAWTEXT(BARSTATUS=2 AND MACD>0,HHV(MACD,4),''+abs(紅柱面積)),align2,VALIGN1,colorred;

     

    {用在1分鐘K線圖上的5分鐘/30分鐘MACD紅綠柱面積(飛狐纏友版),在1分鐘K線圖上顯示5分鐘、30分鐘的MACD}
    DIFF30:=EMA(CLOSE,360) - EMA(CLOSE,780);
    DEA30:=EMA(DIFF30,270);
    MACD30:=2*(DIFF30-DEA30){,COLORSTICK},LINETHICK0;
    STICKLINE(MACD30>0 AND MACD30>=REF(MACD30,1),0,MACD30,9,0),ColorFF99FF;
    STICKLINE(MACD30>0 AND MACD30<REF(MACD30,1),0,MACD30,9,0),Color99ffFF;
    STICKLINE(MACD30<0 AND MACD30<=REF(MACD30,1),0,MACD30,9,0),ColorFFff99;
    STICKLINE(MACD30<0 AND MACD30>REF(MACD30,1),0,MACD30,9,0),ColorbbFFbb;
    DIFF1:=EMA(CLOSE,60) - EMA(CLOSE,130);
    DEA1:=EMA(DIFF1,45);
    MACD:=2*(DIFF1-DEA1){,COLORSTICK},LINETHICK0;
    MACD5分鐘:MACD,Color0000FF,LINETHICK0;
    MACDhs:=IF(MACD>0 AND MACD>=REF(MACD,1),MACD,0);
    MACDhx:=IF(MACD>0 AND MACD<=REF(MACD,1),MACD,0);
    MACDlx:=IF(MACD<0 AND MACD<REF(MACD,1),MACD,0);
    MACDls:=IF(MACD<0 AND MACD>REF(MACD,1),MACD,0);
    STICKLINE(MACDhs>0,0,MACD,9,0),Color0000BB;
    STICKLINE(MACDhs>0,0,MACD,8,0),Color0000CC;
    STICKLINE(MACDhs>0,0,MACD,7,0),Color0011CC;
    STICKLINE(MACDhs>0,0,MACD,6,0),Color1122DD;
    STICKLINE(MACDhs>0,0,MACD,5,0),Color2233DD;
    STICKLINE(MACDhs>0,0,MACD,4,0),Color3344EE;
    STICKLINE(MACDhs>0,0,MACD,3,0),Color4455EE;
    STICKLINE(MACDhs>0,0,MACD,2,0),Color5566FF;
    STICKLINE(MACDhs>0,0,MACD,1,0),Color6677FF;
    STICKLINE(MACDhx>0,0,MACD,9,0),Color0077BB;
    STICKLINE(MACDhx>0,0,MACD,8,0),Color0088CC;
    STICKLINE(MACDhx>0,0,MACD,7,0),Color0099CC;
    STICKLINE(MACDhx>0,0,MACD,6,0),Color00AADD;
    STICKLINE(MACDhx>0,0,MACD,5,0),Color00BBDD;
    STICKLINE(MACDhx>0,0,MACD,4,0),Color00CCEE;
    STICKLINE(MACDhx>0,0,MACD,3,0),Color00DDEE;
    STICKLINE(MACDhx>0,0,MACD,2,0),Color00EEFF;
    STICKLINE(MACDhx>0,0,MACD,1,0),Color00FFFF;
    STICKLINE(MACDlx<0,MACD,0,9,0),Color770000;
    STICKLINE(MACDlx<0,MACD,0,8,0),Color881100;
    STICKLINE(MACDlx<0,MACD,0,7,0),Color992200;
    STICKLINE(MACDlx<0,MACD,0,6,0),ColorAA3300;
    STICKLINE(MACDlx<0,MACD,0,5,0),ColorBB4400;
    STICKLINE(MACDlx<0,MACD,0,4,0),ColorCC5500;
    STICKLINE(MACDlx<0,MACD,0,3,0),ColorDD6600;
    STICKLINE(MACDlx<0,MACD,0,2,0),ColorEE7700;
    STICKLINE(MACDlx<0,MACD,0,1,0),ColorFF8800;
    STICKLINE(MACDls<0,MACD,0,9,0),Color005500;
    STICKLINE(MACDls<0,MACD,0,8,0),Color007700;
    STICKLINE(MACDls<0,MACD,0,7,0),Color009900;
    STICKLINE(MACDls<0,MACD,0,6,0),Color00AA00;
    STICKLINE(MACDls<0,MACD,0,5,0),Color00BB00;
    STICKLINE(MACDls<0,MACD,0,4,0),Color00CC00;
    STICKLINE(MACDls<0,MACD,0,3,0),Color00DD00;
    STICKLINE(MACDls<0,MACD,0,2,0),Color00EE00;
    STICKLINE(MACDls<0,MACD,0,1,0),Color00FF00;
    DIFF5分鐘:DIFF1,Color0000FF;
    DEA5分鐘:DEA1,ColorFF0000;
    MACD30分鐘:MACD30,ColorFF00FF,LINETHICK0;
    DIFF30分鐘:DIFF30,ColorFF00FF;
    DEA30分鐘:DEA30,Color00FF00;
    紅柱面積:10*IF(MACD>0,SUM(MACD,BARSLAST(MACD<0)),0),LINETHICK0,Color0000FF;
    綠柱面積:10*IF(MACD<0,SUM(MACD,BARSLAST(MACD>0)),0),LINETHICK0,Color006000;
    DRAWNUMBER(ref(MACD,1)>0 and MACD<=0 ,HHV(MACD,4),ref(紅柱面積,1),2),ALIGN1,pxup10,colorred;
    DRAWNUMBER(ref(MACD,1)<0 and MACD>=0 ,LLV(MACD,4),ref(abs(綠柱面積),1),2),ALIGN1,pxdn5,Color006000;
    DRAWNUMBER(BARSTATUS=2 AND MACD<0,LLV(MACD,4),abs(綠柱面積),2),align2,pxdn5,Color006000;
    DRAWNUMBER(BARSTATUS=2 AND MACD>0,HHV(MACD,4),abs(紅柱面積),2),align2,pxup10,colorred;
    DRAWNUMBER(MACD>0 AND MACD=HHV(MACD,BARSLAST(MACD<0)) AND MACD>=REFX(MACD,1) AND MACD>=REFX(MACD,2),MACD,MACD,2),align0,pxup20,ColorFF0000;
    DRAWNUMBER(MACD<0 AND MACD=LLV(MACD,BARSLAST(MACD>0)) AND MACD<=REFX(MACD,1) AND MACD<=REFX(MACD,2),MACD,MACD,2),align0,pxup10,ColorFF00FF;
    0,Color000000;


    {用在5分鐘K線圖上的30分鐘/日線MACD紅綠柱面積(飛狐纏友版),在5分鐘K線圖上顯示30分鐘、日線MACD}
    DIFFr:=EMA(CLOSE,576) - EMA(CLOSE,1248);
    DEAr:=EMA(DIFFr,432);
    MACDr:=2*(DIFFr-DEAr){,COLORSTICK},LINETHICK0;
    STICKLINE(MACDr>0 AND MACDr>=REF(MACDr,1),0,MACDr,9,0),ColorFF99FF;
    STICKLINE(MACDr>0 AND MACDr<REF(MACDr,1),0,MACDr,9,0),Color99ffFF;
    STICKLINE(MACDr<0 AND MACDr<=REF(MACDr,1),0,MACDr,9,0),ColorFFbb99;
    STICKLINE(MACDr<0 AND MACDr>REF(MACDr,1),0,MACDr,9,0),ColorbbFFbb;
    DIFF1:=EMA(CLOSE,72) - EMA(CLOSE,156);
    DEA1:=EMA(DIFF1,54);
    MACD:=2*(DIFF1-DEA1){,COLORSTICK},LINETHICK0;
    MACD30分鐘:MACD,Color0000FF,LINETHICK0;
    MACDhs:=IF(MACD>0 AND MACD>=REF(MACD,1),MACD,0);
    MACDhx:=IF(MACD>0 AND MACD<=REF(MACD,1),MACD,0);
    MACDlx:=IF(MACD<0 AND MACD<REF(MACD,1),MACD,0);
    MACDls:=IF(MACD<0 AND MACD>REF(MACD,1),MACD,0);
    STICKLINE(MACDhs>0,0,MACD,9,0),Color0000BB;
    STICKLINE(MACDhs>0,0,MACD,8,0),Color0000CC;
    STICKLINE(MACDhs>0,0,MACD,7,0),Color0011CC;
    STICKLINE(MACDhs>0,0,MACD,6,0),Color1122DD;
    STICKLINE(MACDhs>0,0,MACD,5,0),Color2233DD;
    STICKLINE(MACDhs>0,0,MACD,4,0),Color3344EE;
    STICKLINE(MACDhs>0,0,MACD,3,0),Color4455EE;
    STICKLINE(MACDhs>0,0,MACD,2,0),Color5566FF;
    STICKLINE(MACDhs>0,0,MACD,1,0),Color6677FF;
    STICKLINE(MACDhx>0,0,MACD,9,0),Color0077BB;
    STICKLINE(MACDhx>0,0,MACD,8,0),Color0088CC;
    STICKLINE(MACDhx>0,0,MACD,7,0),Color0099CC;
    STICKLINE(MACDhx>0,0,MACD,6,0),Color00AADD;
    STICKLINE(MACDhx>0,0,MACD,5,0),Color00BBDD;
    STICKLINE(MACDhx>0,0,MACD,4,0),Color00CCEE;
    STICKLINE(MACDhx>0,0,MACD,3,0),Color00DDEE;
    STICKLINE(MACDhx>0,0,MACD,2,0),Color00EEFF;
    STICKLINE(MACDhx>0,0,MACD,1,0),Color00FFFF;
    STICKLINE(MACDlx<0,MACD,0,9,0),Color770000;
    STICKLINE(MACDlx<0,MACD,0,8,0),Color881100;
    STICKLINE(MACDlx<0,MACD,0,7,0),Color992200;
    STICKLINE(MACDlx<0,MACD,0,6,0),ColorAA3300;
    STICKLINE(MACDlx<0,MACD,0,5,0),ColorBB4400;
    STICKLINE(MACDlx<0,MACD,0,4,0),ColorCC5500;
    STICKLINE(MACDlx<0,MACD,0,3,0),ColorDD6600;
    STICKLINE(MACDlx<0,MACD,0,2,0),ColorEE7700;
    STICKLINE(MACDlx<0,MACD,0,1,0),ColorFF8800;
    STICKLINE(MACDls<0,MACD,0,9,0),Color005500;
    STICKLINE(MACDls<0,MACD,0,8,0),Color007700;
    STICKLINE(MACDls<0,MACD,0,7,0),Color009900;
    STICKLINE(MACDls<0,MACD,0,6,0),Color00AA00;
    STICKLINE(MACDls<0,MACD,0,5,0),Color00BB00;
    STICKLINE(MACDls<0,MACD,0,4,0),Color00CC00;
    STICKLINE(MACDls<0,MACD,0,3,0),Color00DD00;
    STICKLINE(MACDls<0,MACD,0,2,0),Color00EE00;
    STICKLINE(MACDls<0,MACD,0,1,0),Color00FF00;
    DIFF30分鐘:DIFF1,Color0000FF;
    DEA30分鐘:DEA1,ColorFF0000;
    MACD日線:MACDr,ColorFF00FF,LINETHICK0;
    DIFF日線:DIFFr,ColorFF00FF;
    DEA日線:DEAr,Color00FF00;
    紅柱面積:10*IF(MACD>0,SUM(MACD,BARSLAST(MACD<0)),0),LINETHICK0,Color0000FF;
    綠柱面積:10*IF(MACD<0,SUM(MACD,BARSLAST(MACD>0)),0),LINETHICK0,Color006000;
    DRAWNUMBER(ref(MACD,1)>0 and MACD<=0 ,HHV(MACD,4),ref(紅柱面積,1),2),ALIGN1,pxup10,colorred;
    DRAWNUMBER(ref(MACD,1)<0 and MACD>=0 ,LLV(MACD,4),ref(abs(綠柱面積),1),2),ALIGN1,pxdn5,Color006000;
    DRAWNUMBER(BARSTATUS=2 AND MACD<0,LLV(MACD,4),abs(綠柱面積),2),align2,pxdn5,Color006000;
    DRAWNUMBER(BARSTATUS=2 AND MACD>0,HHV(MACD,4),abs(紅柱面積),2),align2,pxup10,colorred;
    DRAWNUMBER(MACD>0 AND MACD=HHV(MACD,BARSLAST(MACD<0)) AND MACD>=REFX(MACD,1) AND MACD>=REFX(MACD,2),MACD,MACD,2),align0,pxup20,ColorFF0000;
    DRAWNUMBER(MACD<0 AND MACD=LLV(MACD,BARSLAST(MACD>0)) AND MACD<=REFX(MACD,1) AND MACD<=REFX(MACD,2),MACD,MACD,2),align0,pxup10,ColorFF00FF;
    0,Color000000;


    {用在30分鐘K線圖上的日線/周線MACD紅綠柱面積(飛狐纏友版),在30分鐘K線圖上顯示日線、周線MACD}
    DIFFz:=EMA(CLOSE,480) - EMA(CLOSE,1040);
    DEAz:=EMA(DIFFz,360);
    MACDz:=2*(DIFFz-DEAz){,COLORSTICK},LINETHICK0;
    STICKLINE(MACDz>0 AND MACDz>=REF(MACDz,1),0,MACDz,9,0),ColorFF99FF;
    STICKLINE(MACDz>0 AND MACDz<REF(MACDz,1),0,MACDz,9,0),Color99ffFF;
    STICKLINE(MACDz<0 AND MACDz<=REF(MACDz,1),0,MACDz,9,0),ColorFFbb99;
    STICKLINE(MACDz<0 AND MACDz>REF(MACDz,1),0,MACDz,9,0),ColorbbFFbb;
    DIFF1:=EMA(CLOSE,96) - EMA(CLOSE,208);
    DEA1:=EMA(DIFF1,72);
    MACD:=2*(DIFF1-DEA1){,COLORSTICK},LINETHICK0;
    MACD日線:MACD,COLOR0000FF,LINETHICK0;
    MACDhs:=IF(MACD>0 AND MACD>=REF(MACD,1),MACD,0);
    MACDhx:=IF(MACD>0 AND MACD<=REF(MACD,1),MACD,0);
    MACDlx:=IF(MACD<0 AND MACD<REF(MACD,1),MACD,0);
    MACDls:=IF(MACD<0 AND MACD>REF(MACD,1),MACD,0);
    STICKLINE(MACDhs>0,0,MACD,9,0),Color0000BB;
    STICKLINE(MACDhs>0,0,MACD,8,0),Color0000CC;
    STICKLINE(MACDhs>0,0,MACD,7,0),Color0011CC;
    STICKLINE(MACDhs>0,0,MACD,6,0),Color1122DD;
    STICKLINE(MACDhs>0,0,MACD,5,0),Color2233DD;
    STICKLINE(MACDhs>0,0,MACD,4,0),Color3344EE;
    STICKLINE(MACDhs>0,0,MACD,3,0),Color4455EE;
    STICKLINE(MACDhs>0,0,MACD,2,0),Color5566FF;
    STICKLINE(MACDhs>0,0,MACD,1,0),Color6677FF;
    STICKLINE(MACDhx>0,0,MACD,9,0),Color0077BB;
    STICKLINE(MACDhx>0,0,MACD,8,0),Color0088CC;
    STICKLINE(MACDhx>0,0,MACD,7,0),Color0099CC;
    STICKLINE(MACDhx>0,0,MACD,6,0),Color00AADD;
    STICKLINE(MACDhx>0,0,MACD,5,0),Color00BBDD;
    STICKLINE(MACDhx>0,0,MACD,4,0),Color00CCEE;
    STICKLINE(MACDhx>0,0,MACD,3,0),Color00DDEE;
    STICKLINE(MACDhx>0,0,MACD,2,0),Color00EEFF;
    STICKLINE(MACDhx>0,0,MACD,1,0),Color00FFFF;
    STICKLINE(MACDlx<0,MACD,0,9,0),Color770000;
    STICKLINE(MACDlx<0,MACD,0,8,0),Color881100;
    STICKLINE(MACDlx<0,MACD,0,7,0),Color992200;
    STICKLINE(MACDlx<0,MACD,0,6,0),ColorAA3300;
    STICKLINE(MACDlx<0,MACD,0,5,0),ColorBB4400;
    STICKLINE(MACDlx<0,MACD,0,4,0),ColorCC5500;
    STICKLINE(MACDlx<0,MACD,0,3,0),ColorDD6600;
    STICKLINE(MACDlx<0,MACD,0,2,0),ColorEE7700;
    STICKLINE(MACDlx<0,MACD,0,1,0),ColorFF8800;
    STICKLINE(MACDls<0,MACD,0,9,0),Color005500;
    STICKLINE(MACDls<0,MACD,0,8,0),Color007700;
    STICKLINE(MACDls<0,MACD,0,7,0),Color009900;
    STICKLINE(MACDls<0,MACD,0,6,0),Color00AA00;
    STICKLINE(MACDls<0,MACD,0,5,0),Color00BB00;
    STICKLINE(MACDls<0,MACD,0,4,0),Color00CC00;
    STICKLINE(MACDls<0,MACD,0,3,0),Color00DD00;
    STICKLINE(MACDls<0,MACD,0,2,0),Color00EE00;
    STICKLINE(MACDls<0,MACD,0,1,0),Color00FF00;
    DIFF日線:DIFF1,Color0000FF;
    DEA日線:DEA1,ColorFF0000;
    MACD周線:MACDz,ColorFF00FF,LINETHICK0;
    DIFF周線:DIFFz,ColorFF00FF;
    DEA周線:DEAz,Color00FF00;
    紅柱面積:10*IF(MACD>0,SUM(MACD,BARSLAST(MACD<0)),0),LINETHICK0,Color0000FF;
    綠柱面積:10*IF(MACD<0,SUM(MACD,BARSLAST(MACD>0)),0),LINETHICK0,Color006000;
    DRAWNUMBER(ref(MACD,1)>0 and MACD<=0 ,HHV(MACD,4),ref(紅柱面積,1),2),ALIGN1,pxup10,colorred;
    DRAWNUMBER(ref(MACD,1)<0 and MACD>=0 ,LLV(MACD,4),ref(abs(綠柱面積),1),2),ALIGN1,pxdn5,Color006000;
    DRAWNUMBER(BARSTATUS=2 AND MACD<0,LLV(MACD,4),abs(綠柱面積),2),align2,pxdn5,Color006000;
    DRAWNUMBER(BARSTATUS=2 AND MACD>0,HHV(MACD,4),abs(紅柱面積),2),align2,pxup10,colorred;
    DRAWNUMBER(MACD>0 AND MACD=HHV(MACD,BARSLAST(MACD<0)) AND MACD>=REFX(MACD,1) AND MACD>=REFX(MACD,2),MACD,MACD,2),align0,pxup20,ColorFF0000;
    DRAWNUMBER(MACD<0 AND MACD=LLV(MACD,BARSLAST(MACD>0)) AND MACD<=REFX(MACD,1) AND MACD<=REFX(MACD,2),MACD,MACD,2),align0,pxup10,ColorFF00FF;
    0,Color000000;

     

    附:

    有朋友對我針對秋葉正紅的三級MACD的點評有異議,請看下圖,副圖中上面的是我的多級聯立,下面的是秋葉正紅的,請對比一下就知道我的點評是到位的,轉載秋葉正紅的公式是想給出大家將多級MACD整合到一個公式里的一個范本而已,只是強調不可以原樣照搬過來需要個性化的優化而已:

     秋葉正紅的三級聯立MACD公式源碼

     

    按照上圖,秋葉正紅的MACD的5f、30f的買點滯后1f買點不少,1f在2481買入、5f在2493附近買入、30f在2512附近方可買入。再看看附圖中上面的提示,多級MACD的買點提示幾乎是同步的。所以進行個性化的優化是必須的,按照1f、5f、30f來區分級別過于死板,與大多數人使用相同的參數,如何能超前或消除滯后?(我是按照1/5/25/125倍來多級聯立的)

        轉載此公式只是想給大家些啟發,點評也只是個人看法,作者發布的也未必是自用公式,各位朋友心里有數就行,不再口水。

      本站是提供個人知識管理的網絡存儲空間,所有內容均由用戶發布,不代表本站觀點。請注意甄別內容中的聯系方式、誘導購買等信息,謹防詐騙。如發現有害或侵權內容,請點擊一鍵舉報。
      轉藏 分享 獻花(0

      0條評論

      發表

      請遵守用戶 評論公約

      類似文章 更多

      主站蜘蛛池模板: 男人扒开女人腿桶到爽免费| 96在线看片免费视频国产| 久久天天躁狠狠躁夜夜AVAPP| 无码日韩精品一区二区人妻| 国产午夜福利视频在线| 麻豆成人传媒一区二区| 伊人久久大香线蕉AV五月天| 国产成人无码A区在线观| 成在线人午夜剧场免费无码 | 日韩精品一区二区亚洲AV| 天天澡日日澡狠狠欧美老妇| 少妇人妻在线视频| 亚洲天堂精品一区二区| 亚洲国产精品久久电影欧美| 亚洲日本欧洲二区精品| 我的公强要了我高潮在线观看| 男人狂桶女人出白浆免费视频 | 亚洲色成人网站WWW永久| 亚洲夂夂婷婷色拍ww47| 中文字幕无线码中文字幕免费| 亚洲色婷婷综合开心网| 国产精品麻豆成人AV电影艾秋| 亚洲精品麻豆一区二区| 久亚洲一线产区二线产区三线产区| 18禁无遮挡啪啪无码网站破解版| 国产乱妇无码大片在线观看| 黄色A级国产免费大片视频| 亚洲AV综合色区无码二区偷拍 | 日韩免费无码一区二区三区| 国产精品成人午夜久久| 人妻少妇精品久久久久久| 成人免费A级毛片无码片2022 | 老子午夜精品无码| 久久精品国产99国产精品严洲| 久久人人玩人妻潮喷内射人人 | 国产午夜福利在线视频| 一个人免费视频观看在线WWW| 免费A级毛片樱桃视频| 宝贝腿开大点我添添公视频免| 精品久久久久久无码国产| 国产偷国产偷亚洲清高APP|