Three Oscillators Markers

The download and this preview resolve to the same reviewed file. SHA-256: 7813f661ca60ecf0bca39286d02ba55e3b5a293b8a6ec0e9c3b6f0e4e27ea272

-- SPDX-License-Identifier: MIT
-- IQOptionWiki QCS Library
-- IQOW Three Oscillators Markers v1.0.0
--
-- Price-chart companion of IQOW Three Oscillators (three-oscillators). It
-- draws no lines: only that script's HIGHER and LOWER markers, above and below
-- the candles on the price chart. A script with its own panel draws its
-- markers at the candle's price on the panel's axis, so on assets priced above
-- about 100 (for example JPY pairs) they fall outside the panel. Add IQOW
-- Three Oscillators as well to see the lines that count the crossings. Keep
-- the settings of both scripts equal.
--
-- The article's trio setup: RSI, CCI and Williams %R, each watched for a cross
-- back out of its own extreme zone. A strong setup has all three; the article
-- says two of three is enough, so the number needed is an input (default 2).
-- Crossings may be spread over a short window of candles.
--
-- RSI follows IQ Option's built-in RSI: closing prices, with the average gain
-- and the average loss smoothed by an exponential average (alpha 2 / (period +
-- 1)).
--
-- HIGHER: at least 2 of 3 cross upward within the window: RSI(14) above 30,
--         CCI(20) above -100, Williams %R(14) above -80.
-- LOWER:  at least 2 of 3 cross downward within the window: RSI below 70,
--         CCI below +100, Williams %R below -20.
--
-- Markers use the previous completed candle: they appear after the next candle
-- opens and are shifted back one bar onto the candle that qualified.
-- Educational chart tool only. It does not place trades, choose an expiry,
-- predict outcomes, or guarantee results. Test on a Practice balance first.

instrument {
    name = "IQOW Three Oscillators Markers",
    short_name = "MK 3 OSC",
    overlay = true
}

input_group {
    "1. Oscillators",
    rsi_period = input (14, "RSI period", input.integer, 2, 100),
    cci_period = input (20, "CCI period", input.integer, 5, 100),
    wpr_period = input (14, "Williams %R period", input.integer, 2, 100)
}

input_group {
    "2. Levels",
    rsi_low = input (30, "RSI oversold", input.double, 5, 45, 1, false),
    rsi_high = input (70, "RSI overbought", input.double, 55, 95, 1, false),
    cci_level = input (100, "CCI level (+/-)", input.double, 50, 300, 10, false),
    wpr_low = input (-80, "Williams %R oversold", input.double, -99, -55, 1, false),
    wpr_high = input (-20, "Williams %R overbought", input.double, -45, -1, 1, false)
}

input_group {
    "3. Confirmation",
    needed_crossings = input (2, "Oscillators that must cross (2 or 3)", input.integer, 2, 3),
    cross_window = input (3, "Window for the crossings (candles)", input.integer, 1, 10)
}

input_group {
    "Display and advice",
    signals_visible = input { default = true, type = input.plot_visibility },
    advice_enabled = input { default = false, name = "Enable platform advice", type = input.boolean }
}

input_group {
    "Colors",
    higher_color = input { default = "#25E154", type = input.color },
    lower_color = input { default = "#FF6C58", type = input.color },
    signal_text_color = input { default = "#FFFFFF", type = input.color }
}

-- RSI as IQ Option's built-in RSI draws it: the average gain and the average
-- loss are exponential averages (alpha = 2 / (period + 1)), not Wilder's
-- smoothing (alpha = 1 / period). It stays empty until both averages exist and
-- is 50 when price did not move at all.
rsi_change = close - close [1]
rsi_gain = ema (max (rsi_change, 0), rsi_period)
rsi_loss = ema (max (-rsi_change, 0), rsi_period)
rsi_total = rsi_gain + rsi_loss
rsi_value = iff (rsi_total > 0, 100 * rsi_gain / rsi_total, rsi_total + 50)
cci_value = cci (close, cci_period)
range_high = highest (high, wpr_period)
range_low = lowest (low, wpr_period)
wpr_value = 100 * (close - range_high) / max (range_high - range_low, 1e-10)

local rsi_now = get_value (rsi_value, nil)
local rsi_before = get_value (rsi_value [1], nil)
local cci_now = get_value (cci_value, nil)
local cci_before = get_value (cci_value [1], nil)
local wpr_now = get_value (wpr_value, nil)
local wpr_before = get_value (wpr_value [1], nil)

local levels_are_valid = rsi_low < 50 and rsi_high > 50 and wpr_low < wpr_high
local data_is_ready =
    levels_are_valid and
    rsi_now ~= nil and rsi_before ~= nil and
    cci_now ~= nil and cci_before ~= nil and
    wpr_now ~= nil and wpr_before ~= nil

-- Each oscillator crossing back out of its extreme zone on this candle.
rsi_up = conditional (data_is_ready and rsi_before <= rsi_low and rsi_now > rsi_low)
cci_up = conditional (data_is_ready and cci_before <= -cci_level and cci_now > -cci_level)
wpr_up = conditional (data_is_ready and wpr_before <= wpr_low and wpr_now > wpr_low)

rsi_down = conditional (data_is_ready and rsi_before >= rsi_high and rsi_now < rsi_high)
cci_down = conditional (data_is_ready and cci_before >= cci_level and cci_now < cci_level)
wpr_down = conditional (data_is_ready and wpr_before >= wpr_high and wpr_now < wpr_high)

-- Did the event happen on this candle or inside the window?
local function seen_recently (event, bars)
    if get_value (event, false) then
        return true
    end
    for back = 1, bars - 1 do
        if get_value (event [back], false) then
            return true
        end
    end
    return false
end

local bullish_count = 0
local bearish_count = 0
if seen_recently (rsi_up, cross_window) then bullish_count = bullish_count + 1 end
if seen_recently (cci_up, cross_window) then bullish_count = bullish_count + 1 end
if seen_recently (wpr_up, cross_window) then bullish_count = bullish_count + 1 end
if seen_recently (rsi_down, cross_window) then bearish_count = bearish_count + 1 end
if seen_recently (cci_down, cross_window) then bearish_count = bearish_count + 1 end
if seen_recently (wpr_down, cross_window) then bearish_count = bearish_count + 1 end

higher_setup = conditional (data_is_ready and bullish_count >= needed_crossings)
lower_setup = conditional (data_is_ready and bearish_count >= needed_crossings)

-- Confirm only a new setup on the previous completed candle.
confirmed_higher = conditional (
    get_value (higher_setup [1], false) and
    not get_value (higher_setup [2], false)
)

confirmed_lower = conditional (
    get_value (lower_setup [1], false) and
    not get_value (lower_setup [2], false)
)

-- Markers on the price chart: HIGHER below the candle, LOWER above it. Offset -1
-- puts each one on the candle that completed the setup (the confirmation above
-- is evaluated when the next candle opens).
if signals_visible then
    plot_shape (
        confirmed_higher,
        "3 OSC HIGHER",
        shape_style.triangleup,
        shape_size.small,
        higher_color,
        shape_location.belowbar,
        -1,
        "HIGHER",
        signal_text_color
    )

    plot_shape (
        confirmed_lower,
        "3 OSC LOWER",
        shape_style.triangledown,
        shape_size.small,
        lower_color,
        shape_location.abovebar,
        -1,
        "LOWER",
        signal_text_color
    )
end

-- QCS advice is a platform notification state only; it does not place trades.
if advice_enabled and
    get_value (confirmed_higher, false) and
    not get_value (confirmed_lower, false) then
    advise (advice.buy)
elseif advice_enabled and
    get_value (confirmed_lower, false) and
    not get_value (confirmed_higher, false) then
    advise (advice.sell)
else
    advise (advice.neutral)
end