Original LUA oscillator: viewtopic.php?f=17&t=60141.
Formulas:
PCI = 100*Up/(Up+Dn), where
Up = Sum(Abs(Price[i-Length]-Gradient)), if Price[i-Length]>Gradient,
Dn = Sum(Abs(Price[i-Length]-Gradient)), if Price[i-Length]<Gradient,
Gradient[i] = Price[i-Length]+Momentum[i]*i,
Momentum[i] = (Price[i]-Price[i-Length+1])/Length.
Download: