MACD Amazing Histogram Buy Sell Zone |
//www.aflcode.com _SECTION_BEGIN("MACD_12-26-9+HIST + ADXR band"); r1 = Param( "Fast avg", 12, 2, 200, 1 ); r2 = Param( "Slow avg", 26, 2, 200, 1 ); r3 = Param( "Signal avg", 9, 2, 200, 1 ); m1= MACD(r1,r2); s1= Signal(r1,r2,r3); ////////////////////////////////////////////// HIST ////////////////////////////////////// hist=m1-s1; Colorhist=IIf(hist>Ref(hist,-1),colorYellow,colorRed); Plot( hist*2, "MACD Histogram", Colorhist, styleNoTitle | ParamStyle("Histogram style", styleHistogram | styleNoLabel, maskHistogram ) ); Plot( hist*2, "MACD Histogram", Colorhist, styleNoTitle | styleNoLabel, maskHistogram ); PlotOHLC( 0, hist*2, 0 , 0 , "hist",Colorhist, styleCloud | styleNoLabel); /////////////////////////////////////// MACD ////////////////////////////////////////////////////////////////// Colorm=IIf(m1>Ref(m1,-1),colorGreen,colorDarkRed); Plot( m1, "MACD12269", Colorm, styleHistogram ); Plot( m1, "MACD", colorRed, styleNoLabel ); Plot( s1, "Signal", colorTeal, styleNoLabel|styleThick); PlotOHLC( 0, m1, 0 , 0 , "MACD",Colorm, styleCloud | styleNoLabel); //////////////////////////////////////////// ADXR BAND ////////////////////////////////////////////////////// pds=14; Adxr = ( ADX(pds) + Ref( ADX(pds), -14 ) )/2; //Plot(ADxr,"",colorWhite,4); //Plot( PDI(14), "+DI",ColorRGB(0,100,20),styleThick | styleNoLabel); //Plot( MDI(14), "-DI",ColorRGB(100,0,20),styleThick | styleNoLabel); A = PDI(14); B = MDI(14); //PlotOHLC( 0, A , B , B , "Cloud", IIf(A > B ,ColorRGB(0,25,10),ColorRGB(35,0,10)), styleCloud | styleNoLabel); ColorA=IIf(ADXr>25,IIf(A>B,IIf(ADXr>EMA(ADXr,3),colorBrightGreen,colorGreen),IIf(ADXr>EMA(ADXr,3),colorRed,colorDarkRed)),colorBlack); Plot( 3,"",ColorA, /* choose color */styleOwnScale|styleArea|styleNoLabel, -0.5, 100 ); Plot( 4,"",colorBlack, /* choose color */styleOwnScale|styleArea|styleNoLabel, -0.5, 100 ); ////////////////////////////////////////////////// MACD TRENDING BAND ///////////////////////////////////////////////////////////////// r1_5=r1*5; r2_5=r2*5; m_5= MACD(r1_5, r2_5); s_5= Signal(r1_5,r2_5,r3); r1_10=r1*10; r2_10=r2*10; m_10= MACD(r1_10, r2_10); s_10= Signal(r1_10,r2_10,r3); r1_20=r1*20; r2_20=r2*20; m_20= MACD(r1_20, r2_20); s_20= Signal(r1_20,r2_20,r3); r1_40=r1*40; r2_40=r2*40; m_40= MACD(r1_40, r2_40); s_40= Signal(r1_40,r2_40,r3); r1_80=r1*80; r2_80=r2*80; m_80= MACD(r1_80, r2_80); s_80= Signal(r1_80,r2_80,r3); ColorT=IIf(m1>0,IIf(m1>s1,colorBrightGreen,colorDarkRed),IIf(m1<s1,colorRed,colorDarkGreen)); Plot( 7,"",ColorT, /* choose color */styleOwnScale|styleArea|styleNoLabel, -0.5, 100 ); Plot( 8,"",colorBlack, /* choose color */styleOwnScale|styleArea|styleNoLabel, -0.5, 100 ); ColorT5=IIf(m_5>0,IIf(m_5>s_5,colorBrightGreen,colorDarkGreen),IIf(m_5<s_5,colorRed,colorDarkRed)); Plot( 11,"",ColorT5, /* choose color */styleOwnScale|styleArea|styleNoLabel, -0.5, 100 ); Plot( 12,"",colorBlack, /* choose color */styleOwnScale|styleArea|styleNoLabel, -0.5, 100 ); ColorT10=IIf(m_10>0,IIf(m_10>s_10,colorBrightGreen,colorDarkGreen),IIf(m_10<s_10,colorRed,colorDarkRed)); Plot( 15,"",ColorT10, /* choose color */styleOwnScale|styleArea|styleNoLabel, -0.5, 100 ); Plot( 16,"",colorBlack, /* choose color */styleOwnScale|styleArea|styleNoLabel, -0.5, 100 ); ColorT20=IIf(m_20>0,IIf(m_20>s_20,colorBrightGreen,colorDarkGreen),IIf(m_20<s_20,colorRed,colorDarkRed)); Plot( 19,"",ColorT20, /* choose color */styleOwnScale|styleArea|styleNoLabel, -0.5, 100 ); Plot( 20,"",colorBlack, /* choose color */styleOwnScale|styleArea|styleNoLabel, -0.5, 100 ); ColorT40=IIf(m_40>0,IIf(m_40>s_40,colorBrightGreen,colorDarkGreen),IIf(m_40<s_40,colorRed,colorDarkRed)); Plot( 23,"",ColorT40, /* choose color */styleOwnScale|styleArea|styleNoLabel, -0.5, 100 ); Plot( 24,"",colorBlack, /* choose color */styleOwnScale|styleArea|styleNoLabel, -0.5, 100 ); ColorT80=IIf(m_80>0,IIf(m_80>s_80,colorBrightGreen,colorDarkGreen),IIf(m_80<s_80,colorRed,colorDarkRed)); Plot( 27,"",ColorT80, /* choose color */styleOwnScale|styleArea|styleNoLabel, -0.5, 100 ); Plot( 28,"",colorBlack, /* choose color */styleOwnScale|styleArea|styleNoLabel, -0.5, 100 ); _SECTION_END();
Sign up here with your email
ConversionConversion EmoticonEmoticon