Balance Of Power

Hi Guys/Girls!

I was just looking on the net for the indicator- Balance Of Power (to be used on MT4). I could only find it in Metastock language, is anyone able to code it for MT4?

This formula is for METASTOCK 6.52 (OR ABOVE)
Balance Of Power - BOP
THL:=If(H-L=0,.00001,H-L);
{Reward Based on the Open}
BuRBoO:=(H-O)/(THL);
BeRBoO:=(O-L)/(THL);
{Reward Based on the Close}
BuRBoC:=(C-L)/(THL);
BeRBoC:=(H-C)/(THL);
{Reward Based on the Open-Close}
BuRBoOC:=If(C>O,(C-O)/(THL),0);
BeRBoOC:=If(C>O,0,(O-C)/(THL));
BOP:=(BuRBoO+BuRBoC+BuRBoOC)/3 - (BeRBoO+BeRBoC+BeRBoOC)/3;
BOP

Your help is appreciated!!

Rossini.