Custom Relative Strength Index (RSI)

Custom Relative Strength Index (RSI)
This custom RSI will allow you to choose what price to use the data when you plot. RSI uses the standard value as close to Welles Wilder did when he created the indicator. This custom indicator will allow you to use other cost areas, including volume.
Q: = Input ("periods", 1,1000,14);
B: = Input ("Field 1 = Close, 2 = Open, 3 = High, 4 = Low, 5 = Tom ', 1,5,1);
Z: = If (C = 1, Wilders (ROC (C, 1, $)> 0, Taiwan (C, 1, $), 0), LastValue (If (P)) if (B = 2, Wilders ( If (ROC (O, 1, $)> 0, Taiwan (O, 1, $), 0), LastValue (Q)) if (C = 3, Wilders (If (ROC (H, 1 $)> 0, Taiwan (H, 1 $), 0), LastValue (Q)) if (C = 4, Wilders (If (ROC (L, 1, $)> 0, Taiwan (L, 1, $) 0), LastValue (Q)), Wilders (If (ROC (V, 1, $)> 0, Taiwan (V, 1, $), 0), LastValue (Q ))))));
Y: = If (C = 1, Wilders (If (ROC (C, 1, $) <0, ABS (Taiwan (C, a ,$)), 0), LastValue (Q)) if (C = 2 , Wilders (If (ROC (O, 1, $) <0, ABS (Taiwan (O, 1 ,$)), 0), LastValue (Q)) if (C = 3, Wilders (If (ROC (N , 1, $) <0, ABS (Taiwan (H, 1 ,$)), 0), LastValue (Q)) if (C = 4, Wilders (If (ROC (L, 1, $) <0, ABS (Taiwan (L, 1 ,$)), 0), LastValue (Q)), Wilders (If (ROC (V, 1, $) <0, ABS (Taiwan (V, 1, $)), 0) , LastValue (Q ))))));
Serbia: = Z / Y;
100 - (100 / (1 + RS))