Перепишите на mq4 пожалуйста

Помогите, кто умеет, сделать из этого советника - граф. индикатор ( со стрелочками вверх-вниз) для МТ4, пожалуйста.

(Прим. от автора.. " по медленному стохастику
Адекватные сиги дает на всех таймфреймах")

/*[[
	Name :=RSI56 WMA LowHigh следуй за трендом
	Author := Bil Software Corp.
	Link := https://www.metaquotes.net/
	Lots := 0.01
	Stop Loss := 0
	Take Profit :=50
	Trailing Stop := 0
]]*/
Defines: Slippage(2);
var: cnt(0),pos(0),sl(0),tp(0);
defines: LWMATrendPeriod(10);
var: LWMaCurrent(0),LWMaPrevious(0);

If Bars<100 or TakeProfit<10 then Exit;
If IsIndirect(Symbol)=TRUE then Exit;

LWMaCurrent=iMA(LWMATrendPeriod,MODE_LWMA,0);
LWMaPrevious=iMA(LWMATrendPeriod,MODE_LWMA,1);


If TotalTrades<1 then
  {
   If FreeMargin<100 then Exit;  // not enough money
 
  
   
If 
( LWMaCurrent>LWMaPrevious and  iRSI(56,0) > 50  and///даунтренд 
 Low[1]<LWMaCurrent and  Close[1]>LWMaCurrent and
 Close[1]>Open[1]and 
 Close[1]>Close[2])or    //бычья свеча как подтверждение





( LWMaCurrent>LWMaPrevious and  iRSI(56,0) > 50  and///даунтренд 
 Low[1]>LWMaCurrent and
 Close[1]>Open[1]and 
 Close[1]>Close[2])or    //бычья свеча как подтверждение


  
(High[3]<=High[4]and  LWMaCurrent>LWMaPrevious and///даунтренд    
Close[1]>Open[1]and  Close[1]>Close[2])    //бычья свеча как подтверждение


    
    then
     {
      // calculate Stop Loss
      sl=Low[Lowest(MODE_LOW,10,10)];  
      tp=High[Highest(MODE_HIGH,10,10)];
      if (tp-Ask)<15 then tp=Ask+15*Point;
      if (Bid-sl)<15 then sl=Bid-15*Point;
      SetOrder(OP_BUY,Lots,Ask,Slippage,sl,Ask+TakeProfit*Point,BLUE);
      Exit;
     };
 

   
  
  
   If 

( LWMaCurrent<LWMaPrevious and iRSI(56,0) < 50 and  //аптренд
High[1]>LWMaCurrent and Close[1]< LWMaCurrent and
 Close[1]<Open[1]and  Close[1]<Close[2])  or        //медвежья свеча как подтверждение
 



( LWMaCurrent<LWMaPrevious and iRSI(56,0) < 50 and  //аптренд
High[1]< LWMaCurrent and
 Close[1]<Open[1]and  Close[1]<Close[2])  or        //медвежья свеча как подтверждение
 
( Low[3]>=Low[4]and LWMaCurrent<LWMaPrevious  and  //аптренд
Close[1]<Open[1]and  Close[1]<Close[2])      //медвежья свеча как подтверждение
 
 


  
 
 

then
     {
        // calculate Stop Loss
      sl=High[Highest(MODE_HIGH,10,10)];
      tp=Low[Lowest(MODE_LOW,10,10)];
      if (Bid-tp)<15 then tp=Bid-15*Point;
      if (sl-Bid)<15 then sl=Bid+15*Point;
      SetOrder(OP_SELL,Lots,Bid,Slippage,sl,Bid-TakeProfit*Point,Fuchsia);
      Exit;
     };
  };