Sir, can you please convert the following code from ProRealtime language into a MT4 indicator?
// The13thWarrior_V1.1
//--init--
alpha = 255
myDIn = 5
myOBVn = 5
myBBn = 8
myBackround = 1 (true)
myCandle = 1 (true)
myBB = 1 (true)
//-- end--
//the 13th warrior
the13thwarrior = 0
//Heikin Ashi
ONCE haOpen = OPEN
ONCE haClose = CLOSE
N = 0
IF BARINDEX = 0 THEN
haOpen = OPEN
haClose = CLOSE
ELSIF N = 0 THEN
haClose =(OPEN+HIGH+LOW+CLOSE)/4
haOpen =(haOpen[1]+haClose[1])/2
ENDIF
//Backround from Directinal Movement
IF myBackround = 1 THEN
myDI = DI[myDIn](CLOSE)
IF myDI > 0 THEN
BACKGROUNDCOLOR(204,255,204,alpha)
ELSIF myDI < 0 THEN
BACKGROUNDCOLOR(255,204,204,alpha)
ENDIF
ENDIF
//Candle-Colour from OBV and HA
IF myCandle = 1 THEN
myOBV = OBV(CLOSE)
myAV = Average[myOBVn](myOBV)
IF myOBV > myAV AND haClose > haOpen THEN
DRAWCANDLE(haOpen, HIGH, LOW, haclose) COLOURED(0,255,0,alpha)
ELSIF myOBV < myAV AND haClose < haOpen THEN
DRAWCANDLE(haOpen, HIGH, LOW, haclose) COLOURED(255,0,0,alpha)
ENDIF
ENDIF
IF myBB = 1 Then
myBBup = BollingerUp[myBBn](haclose)
myBBdown = BollingerDown[myBBn](haclose)
myBBav = Average[myBBn](haclose)
ELSE
myBBup = 0
myBBdown = 0
myBBav = 0
ENDIF
RETURN the13thwarrior, myBBup COLOURED(102,102,102,alpha)as "myBBup", myBBdown COLOURED(102,102,102,alpha)as "myBBdown", myBBav COLOURED(0,51,255,alpha)as "myBBav"