Quiktdr,, See if this is what you are looking for.
1000/ (MovingAverage[MA,High,5,0,30] - MovingAverage[MA,Low,5,0,30] / 2) + (Bar[High,15] - Bar[Close,30,1]) + (Bar[High,15,1] - Bar[Close,30,2]) + (Bar[Close,15,2] - Bar[Low,30,1]) + (Bar[High,15,2] - Bar[Close,30,3]) + (Bar[Close,15,3] - Bar[Low,30,2 ]) + (Bar[High,15,3] - Bar[Close,30,4]) + (Bar[Close,15,3] - Bar[Low,30,2] ) + (Bar[High,15,3] - Bar[Close,30,4]) + (Bar[Close,15,4] - Bar[Low,30,3 ]) + (Bar[High,15,4] - Bar[Close,30,5]) + (Bar[Close,15,5] - Bar[Low,30,4] )
You were missing a few ] and I think 1 ).
Larry