Naive System 02 by Sosrodiningrat @2017 for Amibroker (AFL)

//Naive System 02 by Sosrodiningrat @2017

OptimizerSetEngine("spso");OptimizerSetOption("Runs",1);OptimizerSetOption("MaxEval",1000);

SetTradeDelays(0,0,0,0);
SetOption( "AllowSameBarExit",True);
b1=Optimize("b1",16,1,31,1);
s1=Optimize("s1",9,1,31,1);

BuyPrice=O;
SellPrice=O;

Buy=Day()==b1;
Sell=Day()==s1;

Buy=ExRem(Buy,Sell);Sell=ExRem(Sell,Buy);

Plot(C,"",colorBlack,styleCandle);
//Plot(Equity(1),"",colorGrey50,styleLine|styleOwnScale);
//====================================
GfxSetOverlayMode(1);
GfxSetBkMode(1); // transparent
GfxSelectFont("Tahoma", Status("pxheight")/16 );
GfxSetTextColor(colorGreen);
//GfxTextOut("Equity= "+NumToStr(Equity(1)/ValueWhen(BarIndex()==1,Equity(1)),1.0)+" times",510,80);
//====================================
PlotShapes(IIf(Buy,shapeUpArrow,shapeNone),colorBlue,0,L,-12);
PlotShapes(IIf(Sell,shapeDownArrow,shapeNone),colorRed,0,H,-12);
//====================================