From Metastock to AFL please

Need help translate to AFL



Trend
{ Bullish % Step Variable *trend Peak&trough for Expert Advisor Trends n Symbols = Green }
MinimumChange :=LastValue( Fml( "% Variable Step") );
FearFactor :=0.5;
DwTrendMinChange := MinimumChange * FearFactor ;
DwTrendMinChange := LastValue(If(Mov(C,5,S)>Mov(C,25,S), MinimumChange , DwTrendMinChange ));
UpTrendMinChange:= MinimumChange;

BarsSince(Cross(ValueWhen(1,Trough(1,L, DwTrendMinChange )<>Ref(Trough(1,L, DwTrendMinChange ),-1),L),C))>BarsSince(Cross(C,ValueWhen(1,Peak(1,H, UpTrendMinChange)<>Ref(Peak(1,H, UpTrendMinChange ),-1),H)));

{ Bearish % Step Variable *trend Peak&trough for Expert Advisor Trends n Symbols = Red }
MinimumChange :=LastValue( Fml( "% Variable Step") );
FearFactor :=0.5;
DwTrendMinChange := MinimumChange * FearFactor ;
DwTrendMinChange := LastValue(If(Mov(C,5,S)>Mov(C,25,S), MinimumChange , DwTrendMinChange ));
UpTrendMinChange:= MinimumChange;

BarsSince(Cross(ValueWhen(1,Trough(1,L, DwTrendMinChange )<>Ref(Trough(1,L, DwTrendMinChange ),-1),L),C))<BarsSince(Cross(C,ValueWhen(1,Peak(1,H, UpTrendMinChange )<>Ref(Peak(1,H, UpTrendMinChange ),-1),H)));