Building iADXWilder procedure in MT4 similar to iADX - again

Previous developer failed to deliver the task, so im trying again here. Please do not apply for it if you may not be able to provide the working procedure.

It is a simple and quick job for someone with experience. I need to have an iADXWilder procedure that would work exactly like iADX function to finnish conversion of my EA from MQL5 to MQL4. 

Result goal is MT4 EA what would look like this:

double iADXWilder(string symbol, int timeframe, int period, int applied_price, int mode, int shift)
{
// your procedure here
}

void OnTick()
{
Alert("adx wilder=", iADXWilder(Symbol(), PERIOD_CURRENT, 14, PRICE_CLOSE, MODE_MAIN, 0) );
Alert("adx=", iADX(Symbol(), PERIOD_CURRENT, 14, PRICE_CLOSE, MODE_MAIN, 0) );
}

Any additional necessary procedures can also be added. The function has to have all specified arguments (symbol, timeframe, period, applied price, shift).

I already tried it myself and I got returns of zeros. I dont have time to fight with it further.

Maybe someone has that ready or is experienced enough, that conversion from publicly available ADX Wilder indicator (ripping the math out) to procedure can take him little time.


I dont want to use external indicator, i want it incorporated in the code.

Detailed MQL5 ADX Wilder description + code:
https://www.mql5.com/en/code/8



I'm attaching my attempt of a conversion (not working, returning only zeros). I examine 500 bars behind as the more periods in the past are examined, the more accurate SSMA is going to be. (like exponential MA it counts all available bars to count its value). Maybe someone can do a quick fix?