can somebody please help me to convert this AFL to mt4 version.... please

#1
_SECTION_BEGIN("Background Color");
SetChartOptions( 1, chartShowDates );
BKswitch = ParamToggle("Background Color","On,Off");

OUTcolor = ParamColor("Outer Panel Color",colorBlack);
INUPcolor = ParamColor("Inner Panel Upper",colorBlack);
INDNcolor = ParamColor("Inner Panel Lower",colorDarkGrey);
TitleColor = ParamColor("Title Color ",colorBlack);

if (NOT BKswitch)
{
SetChartBkColor(OUTcolor); // color of outer border
SetChartBkGradientFill(INUPcolor,INDNcolor,TitleCo lor); // color of inner panel
}
_SECTION_END();
_SECTION_BEGIN("007");
n= Param("WMA", 0, 0, 100);
Var1=HHV(High,9)-LLV(Low,9);
Var2=HHV(High,9)-Close;
Var3=Close-LLV(Low,9);
Var4=Var2/Var1*100-70;
Var5=(Close-LLV(Low,60))/(HHV(High,60)-LLV(Low,60))*100;
Var6=(2*Close+High+Low)/4;
Var7=WMA(Var3/Var1*100,3);
Var8=LLV(Low,34);
Var9=WMA(Var7,3)-WMA(Var4,9);
VarA=IIf(Var9>100,Var9-100,0);
VarB=HHV(High,34);
AA= VarA*2;
BB= EMA((Var6-Var8)/(VarB-Var8)*100,13);
VarC=EMA(0.667*Ref(BB,-1)+0.333*BB,2);
VAR1a=(HHV(High,9)-Close)/(HHV(High,9)-LLV(Low,9))*100-70;
VAR2a=WMA(VAR1a,9)+100;
VAR3a=(Close-LLV(Low,9))/(HHV(High,9)-LLV(Low,9))*100;
VAR4a=WMA(VAR3a,3);
VAR5a=WMA(VAR4a,3)+100;
VAR6a=VAR5a-VAR2a;

S = IIf(VAR6a>n,VAR6a-n,Var6a);

barcolor=IIf(Ref(S,-1)<S, colorBrightGreen, colorRed);

Oo=IIf(Ref(S,-1)<s,Ref(s,-1),s);
Hh=Oo;
Ll=IIf(Ref(S,-1)>s,Ref(s,-1),s);
Hor=Ll;
PlotOHLC( Oo,hh,ll,Hor, "" ,barcolor, styleCandle );
_SECTION_END();

_SECTION_BEGIN("007");

a0=MA(Close,3);
a1=(H+L+C)/3;
a2=HHV(a1,15);
a3=LLV(a1,15);
a4=a2-a3;
Orion=MA((a1-a3)/a4,2)*148;
a6=HHV(a1,4*15);
a7=LLV(a1,4*15);
a8=a6-a7;
Aries=MA((a1-a7)/a8,2)*148;
aA=HHV(a1,16*15);
aB=LLV(a1,16*15);
aC=aA-aB;
Cru=MA((a1-aB)/aC,2)*148;
bot=1;
top=5;
Plot(Orion,"", colorOrange,styleDashed ,1);
Plot(Aries,"",colorTan,styleDashed,1);
Plot(Cru,"",colorTurquoise,styleDashed,1);
W= Param("Sell1_adj", 98, 70, 120);//adjust sell signal
X= Param("Sell1_A_adj", 80, 70, 120);//adjust sell signal
Y= Param("Sell2_adj", 120, 70, 140);//adjust sell signal
Buy1 = Orion>Ref(Orion,-1) AND Orion<5 AND Aries>Ref(Aries,-1) AND Aries<5 AND Cru>Ref(Cru,-1) AND Cru<5 OR Cross (Orion,Cru) AND Cru < 12;
Buy2=(Cross(Orion,bot) AND a0>Ref(a0,-1)) OR (Cross(Orion,Aries) AND Orion<Cru AND Aries<Cru );
Buy = Buy1 OR Buy2;
Sell1 = Cross(Hor,Orion) AND Hor > W OR Cross(Aries,Orion) AND Aries>X;
Sell2 = Cross(Orion,Hor) AND Hor > Y;
Sell = Sell1 OR Sell2;

PlotShapes( IIf( Buy, shapeUpArrow, shapeNone ), colorDarkGrey, layer = 0, yposition = -20 );
PlotShapes( IIf( Sell, shapeDownArrow, shapeNone ), colorBlack, layer = 0, yposition = 150 );
Title = EncodeColor( colorWhite )
+ EncodeColor( colorOrange ) + " Ori =" + EncodeColor( colorOrange ) + WriteVal( Orion )
+ EncodeColor( colorTan ) + " Ari =" + EncodeColor( colorTan ) + WriteVal( Aries)
+ EncodeColor( colorTurquoise ) + " Cru =" + EncodeColor( colorTurquoise ) + WriteVal( Cru)
+ EncodeColor( colorRed) + " Hor =" + EncodeColor( colorRed ) + WriteVal( Hor);

GraphXSpace = 15 ;
_SECTION_END();
 

Similar threads