Convert Amibroker code for Support Resistance Lines into MetaStock code

Hi Traderji ,

Would anyone be kind enough to convert the Amibroker code below
for "Support Resistance Lines" into MetaStock code

http://www.stockbangladesh.com/blog/support-resistance-amibroker-afl/

Thanking you in advance
Hoping that you can oblige

Derek

===========================================

_SECTION_BEGIN("Price");
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() );
_SECTION_END();

_SECTION_BEGIN("Sup / Res Lines");
= ParamToggle("Sup / Res Lines","On,Off");
CHLswitch = ParamToggle("Hi Low / Close","Hi Low,Close");
NoLines = Param("No of Lines",3,1,10,1);
Sen = Param("Sensitivity",5,1,100,1);

Rcolor=ParamColor( "Res Color", colorGreen );
Rstyle=ParamStyle( "Res Style", styleLine );

Scolor=ParamColor( "Sup Color", colorBrown );
Sstyle=ParamStyle( "Sup Style", styleLine );

y=0;
x=0;

for( i = 1; i < NoLines+1 ; i++ )
{
Y=LastValue(Peak(IIf(CHLswitch,C,H),Sen,i));
x=BarCount - 1 - LastValue(PeakBars(IIf(CHLswitch,C,H),Sen,i));
Line = LineArray( x, y, Null, y, 1 );
Plot( IIf(,Null,Line), "", Rcolor, Rstyle );

Y=LastValue(Trough(IIf(CHLswitch,C,L),Sen,i));
x=BarCount - 1 - LastValue(TroughBars(IIf(CHLswitch,C,L),Sen,i));
Line = LineArray( x, y, Null, y, 1 );
Plot( IIf(,Null,Line), "", Scolor, Sstyle );
}
_SECTION_END();
================================