I want to convert one Indicator from Pinescript from trading view to mt4 metaquotes language

Hello everyone, I watch this indicator from TRADINGRUSH (He design this indicator is not my own) BeepBoop, 

I want to use it in my strategy on MT4, because i dont use tradingview 

This is the code he has on Tradingview: 

//(Improved) Beep Boop Indicator for Trending Markets 

//New and Improved version of the Beep Boop Indicator

//

//@version=4

study(title="Beep Boop", shorttitle="Beep Boop", resolution="")

fast_length = input(title="Fast Length", type=input.integer, defval=12)

slow_length = input(title="Slow Length", type=input.integer, defval=26)

EMATrend = input(title="EMA Trend", type=input.integer, defval=50)

src = input(title="Source", type=input.source, defval=close)

signal_length = input(title="Signal Smoothing", type=input.integer, minval = 1, maxval = 50, defval = 9)

sma_source = input(title="Simple MA(Oscillator)", type=input.bool, defval=false)

sma_signal = input(title="Simple MA(Signal Line)", type=input.bool, defval=false)

ema_signal = input(title="Simple MA(Signal Line)", type=input.bool, defval=false)

col_grow_above = #26A69A

col_grow_below = #FF0000

col_fall_above = #FFFFFF

col_fall_below = #FFFFFF

col_macd = #0094ff

col_signal = #ff6a00

variant_doubleema(src,len) =>

    v2 = ema(src, len)

    v6 = 2 * v2 - ema(v2, len)

    v6

variant_zerolagema(src, len) =>

    price = src

    l = (len - 1) / 2

    d = (price + (price - price[l]))

    z = ema(d, len)

    z

//fast_ma = sma_source ? sma(src, fast_length) : ema(src, fast_length)

//slow_ma = sma_source ? sma(src, slow_length) : ema(src, slow_length)

//macd = fast_ma - slow_ma

//signal = sma_signal ? sma(macd, signal_length) : ema(macd, signal_length)

fast_ma = sma_source ? sma(src, fast_length) : ema_signal ? ema(src, fast_length) : variant_doubleema(src, fast_length)

slow_ma = sma_source ? sma(src, slow_length) : ema_signal ? ema(src, slow_length) : variant_doubleema(src, slow_length)

macd = fast_ma - slow_ma

signal = sma_signal ? sma(macd, signal_length) : ema_signal ? ema(macd, signal_length) : variant_doubleema(macd, signal_length)

hist = macd - signal

histplot = hist

if (hist > 0)

    hist := 0.1

if (hist < 0)

    hist := 0.09

//fastMA = ema(close, EMATrend)

fastMA = ema_signal ? ema(close, EMATrend) : variant_doubleema(close, EMATrend)

//fastMA = 0

plot(hist, title="Histogram", style=plot.style_columns, color=(hist == 0.1 ? ((hist == 0.1) and (close > fastMA) and (open > fastMA) and (low > fastMA) ? col_grow_above : col_fall_above) : ((hist == 0.09) and (close < fastMA) and (open < fastMA) and (high < fastMA)? col_grow_below : col_fall_below) ), transp=0 )

plot(histplot)