Seniors please help to code this afl

[atbalu]

Please add buy sell signals in this afl

_SECTION_BEGIN("Reverse 10 MA Strategy");
SetBarsRequired(100000,0);
GraphXSpace = 2;
SetChartOptions(0,chartShowArrows|chartShowDates);
SetChartBkColor(ParamColor("bkcolor",ColorRGB(0,0, 0)));
GfxSetBkMode(0);
GfxSetOverlayMode(1);
SetBarFillColor(IIf(C>O,ParamColor("Candle UP Color", colorGreen),IIf(C<=O,ParamColor("Candle Down Color", colorRed),colorLightGrey)));
Plot(C,"\nPrice",IIf(C>O,ParamColor("Wick UP Color", colorDarkGreen),IIf(C<=O,ParamColor("Wick Down Color", colorDarkRed),colorLightGrey)),64,0,0,0,0);

SetPositionSize(2,spsShares);
par1 = Optimize("par1",50,5,50,1);
A = MA(C,par1);
Buy = Cross(A,C);
Sell= Cross(C,A);

Short = Sell;
Cover = Buy;

ApplyStop(stopTypeLoss,
stopModePoint,
Optimize( "max. loss stop level", 58, 50, 300, 1 ),
True );
Plot(A,"MA 15",colorRed);
AlertIf( Buy, "SOUND E:\\Windows\\Media\\chord.wav", "Audio alert", 2 );
AlertIf( Sell, "SOUND E:\\Windows\\Media\\Ding.wav", "Audio alert", 2 );
_SECTION_END();



_SECTION_BEGIN("Magnified Market Price");
FS=Param("Font Size",30,11,100,1);
GfxSelectFont("Times New Roman", FS, 700, True );
GfxSetBkMode( colorBlue );
GfxSetTextColor( ParamColor("Color",colorGreen) );
Hor=Param("Horizontal Position",190,1,1200,1);
Ver=Param("Vertical Position",12,1,830,1);
GfxTextOut(""+C, Hor , Ver );
YC=TimeFrameGetPrice("C",inDaily,-1);
DD=Prec(C-YC,2);
xx=Prec((DD/YC)*100,2);
GfxSelectFont("Times New Roman", 11, 700, True );
GfxSetBkMode( colorBlack );
GfxSetTextColor(ParamColor("Color",colorGreen) );
GfxTextOut(""+DD+" ("+xx+"%)", Hor , Ver+45 );
_SECTION_END();

_SECTION_BEGIN("EMA");
P = ParamField("Price field",-1);
Periods = Param("Periods", 15, 2, 300, 1, 10 );
Plot( EMA( P, Periods ), _DEFAULT_NAME(), ParamColor( "Color", colorCycle ), ParamStyle("Style") );
_SECTION_END();

please add buy sell signals according to parameters
Thanking you in advance.

 

[Abhi1284]

_SECTION_BEGIN("Reverse 10 MA Strategy");
SetBarsRequired(100000,0);
GraphXSpace = 2;
SetChartOptions(0,chartShowArrows|chartShowDates);
SetChartBkColor(ParamColor("bkcolor",ColorRGB(0,0, 0)));
GfxSetBkMode(0);
GfxSetOverlayMode(1);
SetBarFillColor(IIf(C>O,ParamColor("Candle UP Color", colorGreen),IIf(C<=O,ParamColor("Candle Down Color", colorRed),colorLightGrey)));
Plot(C,"\nPrice",IIf(C>O,ParamColor("Wick UP Color", colorDarkGreen),IIf(C<=O,ParamColor("Wick Down Color", colorDarkRed),colorLightGrey)),64,0,0,0,0);

SetPositionSize(2,spsShares);
par1 = Optimize("par1",50,5,50,1);
A = MA(C,par1);
b=MA(C,15);
Buy = Cross(B,a);
Sell= Cross(a,b);

Short = Sell;
Cover = Buy;
PlotShapes(IIf(Buy==1, shapeUpArrow , shapeNone), colorGreen, 0,Low, Offset=-20);
PlotShapes(IIf(Sell==1, shapeDownArrow, shapeNone), colorRed, 0,High, Offset=-30);

//ApplyStop(stopTypeLoss, stopModePoint, Optimize( "max. loss stop level", 58, 50, 300, 1 ), True );
Plot(A,"MA 15",colorRed);
Plot(b,"MA 15",colorOrange);

AlertIf( Buy, "SOUND E:\\Windows\\Media\\chord.wav", "Audio alert", 2 );
AlertIf( Sell, "SOUND E:\\Windows\\Media\\Ding.wav", "Audio alert", 2 );
_SECTION_END();



_SECTION_BEGIN("Magnified Market Price");
FS=Param("Font Size",30,11,100,1);
GfxSelectFont("Times New Roman", FS, 700, True );
GfxSetBkMode( colorBlue );
GfxSetTextColor( ParamColor("Color",colorGreen) );
Hor=Param("Horizontal Position",190,1,1200,1);
Ver=Param("Vertical Position",12,1,830,1);
GfxTextOut(""+C, Hor , Ver );
YC=TimeFrameGetPrice("C",inDaily,-1);
DD=Prec(C-YC,2);
xx=Prec((DD/YC)*100,2);
GfxSelectFont("Times New Roman", 11, 700, True );
GfxSetBkMode( colorBlack );
GfxSetTextColor(ParamColor("Color",colorGreen) );
GfxTextOut(""+DD+" ("+xx+"%)", Hor , Ver+45 );
_SECTION_END();


Please check & reply

Abhishek

 

[atbalu]

Thank you
signal are ok
But both line color are same. do not able to identify the color.

 

[niftybreakout]

Thank you
signal are ok
But both line color are same. do not able to identify the color.

If colour is problem, then change Orange to Pink in the following line of the code.
Plot(b,"MA 15",colorOrange);

The line after change will be
Plot(b,"MA 15",colorPink);

Cheers