mirror of
https://github.com/mihakralj/QuanTAlib.git
synced 2026-08-17 10:08:05 +00:00
Miha Kralj
24e86d762a
- Updated BBWN, BBWP, CCV, CV, CVI, EWMA, GKV, HLV, HV, Jvolty, JVOLTYN, MASSI, NATR, RSV, RV, RVI, TR, UI, VOV, VR, YZV indicators with documentation links. - Added documentation links for Aberration, Acceleration Bands, Andrews' Pitchfork, Adaptive Price Zone, ATR Bands, Bollinger Bands, Center of Gravity, Donchian Channels, Decay Min-Max Channel, Detrended Synthetic Price, EACP, EBSW, HOMOD, Jurik Volatility Bands, Keltner Channel, MA Envelope, Min-Max Channel, Price Channel, Regression Channels, Standard Deviation Channel, Stoller Average Range Channel, Super Trend Bands, Ultimate Bands, Ultimate Channel, VWAP Bands, and VWAP with Standard Deviation Bands.
63 lines
2.0 KiB
Plaintext
63 lines
2.0 KiB
Plaintext
// The MIT License (MIT)
|
|
// © mihakralj
|
|
//@version=6
|
|
indicator("Price Relative Strength (PRS)", "PRS", overlay=false)
|
|
|
|
//@function Calculates Price Relative Strength comparing two assets
|
|
//@param base Base asset price series
|
|
//@param comp Compare asset price series
|
|
//@param smooth_len Smoothing period for ratio
|
|
//@returns Tuple containing raw ratio and smoothed ratio
|
|
prs(series float base, series float comp, simple int smooth_len=1)=>
|
|
if smooth_len<=0
|
|
runtime.error("Smoothing length must be greater than 0")
|
|
float ratio = na
|
|
if not na(base) and not na(comp) and comp != 0
|
|
ratio := base/comp
|
|
float alpha = 2.0/math.max(smooth_len,1)
|
|
var float ema = na, var float result = na, var float e = 1.0, var bool warmup = true
|
|
if not na(ratio)
|
|
if na(ema)
|
|
ema := 0
|
|
result := ratio
|
|
else
|
|
ema := alpha*(ratio-ema)+ema
|
|
if warmup
|
|
e *= (1-alpha)
|
|
float c = 1.0/(1.0-e)
|
|
result := c*ema
|
|
if e<=1e-10
|
|
warmup := false
|
|
else
|
|
result := ema
|
|
[ratio, result]
|
|
|
|
// ---------- Main loop ----------
|
|
|
|
// Inputs
|
|
i_base = input.source(close, "Base Asset")
|
|
i_comp = input.symbol("SPY", "Compare Symbol")
|
|
i_smooth = input.int(1, "Smoothing Length", minval=1)
|
|
i_norm = input.bool(false, "Normalize to 100")
|
|
i_log = input.bool(false, "Logarithmic Scale")
|
|
|
|
// Get comparison data
|
|
float comp_close = request.security(i_comp, timeframe.period, close, barmerge.gaps_off, barmerge.lookahead_off)
|
|
|
|
// Calculate PRS
|
|
[raw_ratio, smooth_ratio] = prs(i_base, comp_close, i_smooth)
|
|
|
|
// Apply optional normalization
|
|
if i_norm
|
|
raw_ratio := raw_ratio/raw_ratio[1] * 100
|
|
smooth_ratio := smooth_ratio/smooth_ratio[1] * 100
|
|
|
|
// Apply optional log scale
|
|
if i_log
|
|
raw_ratio := math.log(raw_ratio)
|
|
smooth_ratio := math.log(smooth_ratio)
|
|
|
|
// Plot
|
|
plot(raw_ratio, "Raw Ratio", color=color.yellow, linewidth=2)
|
|
plot(smooth_ratio, "Smoothed", color=color.blue, linewidth=2, display=i_smooth>1?display.all:display.none)
|