thinkorswim

#VM_C_osc_v01
#by GrOweX
declare lower;
input ob = 75;
input os = 25;
def r1length = 3;
def r2length = 2;
script rsi {
input length = 2;
input price = close;
def gain = if price > price[1] then price - price[1] else 0;
def loss = if price < price[1] then price[1] - price else 0;
def firstgain = Sum(gain, length) / length;
def firstloss = Sum(loss, length) / length;
def avgain = (firstgain[1] * (length - 1) + gain) / length;
def avloss = (firstloss[1] * (length - 1) + loss) / length;
def rs = avgain / avloss;
plot rsi = 100 - (100 / (1 + rs));
}
#=====
rec a = if close > close[1] then a[1] + 1 else 0;
rec b = if close < close[1] then b[1] - 1 else 0;
def streak = if a <> 0 then a else if b <> 0 then b else 0;
#=====

def r1 = rsi(r1length, close);
def r2 = rsi(r2length, streak);
plot ind = (r1 + r2) / 2;
plot overbought = ob;
plot oversold = os;