Three Oscillators Script

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

-- SPDX-License-Identifier: MIT
-- IQOptionWiki QCS Library
-- IQOW Three Oscillators v1.0.0
--
-- 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.
--
-- 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",
    short_name = "IQOW 3 OSC",
    overlay = false
}

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",
    lines_visible = input { default = true, type = input.plot_visibility },
    signals_visible = input { default = true, type = input.plot_visibility },
    advice_enabled = input { default = false, name = "Enable platform advice", type = input.boolean }
}

input_group {
    "Colors",
    bull_color = input { default = "#25E154", type = input.color },
    bear_color = input { default = "#FF6C58", type = input.color },
    level_color = input { default = rgba(255, 255, 255, 0.30), type = input.color },
    line_width = input { default = 2, type = input.line_width },
    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_value = rsi (close, rsi_period)
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

-- Series versions of the counts, for the panel plot.
bullish_agreement = close * 0 + bullish_count
bearish_agreement = close * 0 - bearish_count

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)
)

-- Panel: how many oscillators crossed up (above zero) or down (below zero).
if lines_visible then
    hline (needed_crossings, "Crossings needed", level_color, 1)
    hline (0, "Zero", rgba (255, 255, 255, 0.25), 1)
    hline (-needed_crossings, "Crossings needed", level_color, 1)
    plot (bullish_agreement, "Oscillators crossed up", bull_color, line_width)
    plot (bearish_agreement, "Oscillators crossed down", bear_color, line_width)
end

if signals_visible then
    plot_shape (
        confirmed_higher,
        "3 OSC HIGHER",
        shape_style.triangleup,
        shape_size.small,
        higher_color,
        shape_location.bottom,
        -1,
        "HIGHER",
        signal_text_color
    )

    plot_shape (
        confirmed_lower,
        "3 OSC LOWER",
        shape_style.triangledown,
        shape_size.small,
        lower_color,
        shape_location.top,
        -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