Type: Indicator, Name: RSI Oscillator
Inputs:
Price(Close),
RSILen(14),
Histgram(«Y»),
Line(«Y»);
Vars:
RSIVal(0);
RSIVal = RSI(Price, RSILen);
IF UpperStr(Histgram) = «Y» OR UpperStr(Histgram) = «YES»
Then Begin
IF RSIVal >= 50 Then
Plot1(RSIVal — 50, «+RSI_Osc»)
Else
Plot2(RSIVal — 50, «-RSI_Osc»);
End;
IF UpperStr(Line) = «Y» OR UpperStr(Line) = «YES»
Then
Plot3(RSIVal — 50, «RSI_Osc»);
Plot4(0, «Even-Line»);
IF RSIVal Crosses Below 50 OR RSIVal Crosses Above 50
Then Alert = True;