Percentage cross

want an AFL CODE IN AMI BROKER

BUY: WHEN PRICE CROSSES 0.5% ABOVE 200 SMA

SELL WHEN PRICE CROSSES 0.5% BELOW 200 EMA

For the above given contition

SetChartOptions(0,chartShowArrows|chartShowDates);
_N(Title = StrFormat("{{NAME}} - {{INTERVAL}} {{DATE}} Open %g, Hi %g, Lo %g, Close %g (%.1f%%) {{VALUES}}", O, H, L, C, SelectedValue( ROC( C, 1 ) ) ));
Plot( C, "Close", ParamColor("Color", colorDefault ), styleNoTitle | ParamStyle("Style") | GetPriceStyle() ); 

pchng = (C - Ref(C,-1)) /( Ref(C,-1) * 100);
pchng=ROC(C,1);
Filter = pchng;
AddColumn(Close, "Close Price",1.2 );
AddColumn(pchng, "Percent Change",1.2 );

Buy = Cross(Close , pchng) AND Close > MA(Close,200);

Sell = Cross(pchng, Close) AND Close < MA(Close,200);  

 PlotShapes(IIf(Buy, shapeHollowUpArrow, shapeNone),colorGreen, 0,L, Offset=-30); 
PlotShapes(IIf(Short, shapeHollowDownArrow, shapeNone),colorRed, 0,H, Offset=-30);