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;