PLEASE HELP ME MODIFY THIS BELOW AFL FOR BUY SELL ARROWS

#1
PLEASE HELP ME MODIFY THIS BELOW AFL FOR BUY SELL ARROWS ( CONDITION BUY WHEN MA LINE CHANGES COLOR FROM BLUE TO WHITE / SELL WHEN MA LINE CHANGES COLOR FROM WHITE TO BLUE)


_SECTION_BEGIN("MA Swing");
SetBarsRequired(200,0);

GraphXSpace = 5;
SetChartOptions(0,chartShowArrows|chartShowDates);
k = Optimize("K",Param("K",1,0.25,5,0.25),0.25,5,0.25);
Per= Optimize("atr",Param("atr",4,13,20,1),3,20,1);
HACLOSE=(O+H+L+C)/4;
HaOpen = AMA( Ref( HaClose, -1 ), 0.5 );
HaHigh = Max( H, Max( HaClose, HaOpen ) );
HaLow = Min( L, Min( HaClose, HaOpen ) );
PlotOHLC( HaOpen, HaHigh, HaLow, HaClose, "" + Name(), colorBlack, styleCandle | styleNoLabel );
j=Haclose;
//TIME FRAME CALCULATION
H1 =TimeFrameGetPrice("H", inDaily, -1); // yesterdays high
L1 =TimeFrameGetPrice("L", inDaily, -1); // low
C1=TimeFrameGetPrice("C", inDaily, -1); // close
DayO =TimeFrameGetPrice("O", inDaily); // current day open

//PlotDT();


icol = IIf (MA (Close,25) > Ref (MA (Close,25),-1),colorBlue,colorWhite);

Plot( MA( High, 25 ),"", icol, styleThick);




_SECTION_END();