Skip to main content

MACD Divergence Detector for Amibroker (AFL)

prasadbrao almost 14 years ago Amibroker (AFL)

  • Rating:
    3 / 5 (Votes 6)
  • Tags:
    oscillator, amibroker, divergence

Divergence detector for MACD.

Move the starting point as well as the end point to detect divergence.

For Back testing Make the cursor select a particular peak or trough. Open the parameters box and move the line on another peak or trough. No line will be drawn if u move the line thru parameters behind the selected line.

If u get a error on the screen press reset in the parameters box.

The default for the end point of the line is the last trading day.

Hope u enjoy this…

Plz feel free to ask ne queries.

Screenshots

Indicator / Formula

Copy & Paste Friendly
/// PROGRAMME  CREATED BY PRASAD RAO FOR MASTER PLOTTER MACD DIVERGENGE DETECTOR///
_SECTION_BEGIN("BACK COLR");
_SECTION_BEGIN("PRASAD SYSTEMS");
ParamStr("DEDICATED TO MY FATHER", "BALKRISHNA RAO");
_SECTION_END();
SetChartBkColor( ParamColor("Chart Color", colorBlack));
_SECTION_BEGIN("BACKGROUD LTRS");
SetChartOptions(0,chartShowArrows|chartShowDates);
GfxSetOverlayMode(1);
GfxSetTextAlign( 6 );// center alignment
GfxSetTextColor( ParamColor("Text Color", ColorHSB( 42, 42, 42 ) ));
GfxSetBkMode(0); // transparent
GfxSelectFont("Tahoma", Status("pxheight")/12);
GfxTextOut( "PRASAD ANALYTICS ©", Status("pxwidth")/2, Status("pxheight")/14);
GfxSelectFont("Tahoma", Status("pxheight")/9 );
GfxTextOut( Name(), Status("pxwidth")/2, Status("pxheight")/4.1 );
GfxSelectFont("Arial Narrow", Status("pxheight")/28 );
GfxTextOut( "prasad9rao@gmail.com", Status("pxwidth")/2, Status("pxheight")/1.5);
GfxSelectFont("arial narrow", Status("pxheight")/27 );
GfxTextOut( "Dedicated to MY FATHER : BALKRISHNA RAO", Status("pxwidth")/2, Status("pxheight")/1.15);
_SECTION_END();
k = (GetPerformanceCounter()/100)%256; 
printf("GetPerformance Counter %g",k);
GfxSelectFont("Arial Narrow", 10,700 ); 
GfxSetBkMode(1); 
GfxSetTextColor(colorYellow); 
//GfxTextOut("Dedicated to the loving memory of MY FATHER on his 75th Birth  Anniversay - LATE BALKRISHNA RAMCHANDRA RAO 13.10.1935",100+k ,26); 
RequestTimedRefresh(1); 
_SECTION_END();
_SECTION_BEGIN(" MACD");
MACDw = MACD( 12, 26 ) - Signal( 12, 26, 9 );
MACDwLINE =  MACD( 12, 26 ) ;
MACDwSignal = Signal( 12, 26, 9 );
Plot(MACDw,"MACD Weekly",colorLavender,styleHistogram);
_SECTION_END();
WeekHistRising =  Ref(MACDw , -1) < Ref(MACDw , 0);
WeekHistFalling = Ref(MACDw , -1) > Ref(MACDw , 0);
Lastbarindex = Param("last",EndValue(BarIndex()),1,EndValue(BarIndex()),1);
Line02=MACDw[Lastbarindex];
Thisbarindex = SelectedValue(BarIndex());
Line01 = SelectedValue(MACDw);
//Line02 = SelectedValue(MACDw);
//GfxTextOut("lINE01"+Line01,10,10);
//GfxTextOut("lINE02"+Line02,200,10);
PriceLine1= LineArray(Thisbarindex,Line01 ,Lastbarindex,Line02,0,1);
Plot(PriceLine1,"", colorYellow,styleLine|styleDots);
GfxSetTextAlign( TA_left = 0);
GfxSelectFont("Tahoma", 11, 700 ); 
GfxSetTextColor(ColorRGB(209,191,255)); 
GfxTextOut("PRASAD ANALYTICS - MACD DIVERGENCE DETECTOR",07, 0); 
GfxSetTextAlign( TA_LEFT = 0 );
GfxSelectFont("Tahoma", 11, 700 ); 
GfxSetTextColor(ColorRGB(255,180,61)); 
GfxTextOut(Name()+ "   " + Date(),07,25); 
Title = " "; 


//prasad9rao@gmail.com

2 comments

1. anandnst
almost 14 years ago

Lots of Macd Divergence indicators already available on this website … Need something new n Interesting.

Report as Spam
2. nimishsdll
almost 14 years ago

I get lot of errors while backtesting..

can you please write a short tutorial how to use this?

Report as Spam

Leave Comment

Please login here to leave a comment.