https://forex-station.com/

Already Converted TradingView Indicators to MT4 Indicators

https://forex-station.com/viewtopic.php?t=8473876

Page 34 of 66

Re: Already Converted TradingView Indicators to MT4 Indicators

Posted: Tue Oct 10, 2023 1:50 am
by wtjfree
any one could covert the following Tradingview Pine code to MT4 Indicators please?

Code: Select all

//@version=5
indicator("HoplaRanges", overlay = true, max_lines_count = 500, max_labels_count = 500)
//**************************************************************************************************************************************************************************************************
//Inputs
//**************************************************************************************************************************************************************************************************
string GeneralGroup                 = "GENERAL"
i_genNumberOfThreeRange             = input.int(        title = "Number of three range",    options = [3, 9, 27, 81, 243, 729, 2187],         defval = 27,              group = GeneralGroup)
i_genNumberOfRanges                 = input.int(        title = "Number of ranges to show", minval = 1,    maxval = 9,                        defval = 2,               group = GeneralGroup)
i_genMultiplyFactor                 = input.int(        title = "Multiply factor",                                                            defval = 1,               group = GeneralGroup)
i_genDynamicLabels                  = input.bool(       title = "Dynamic labels",                                                             defval = false,           group = GeneralGroup)
i_genEnable397                      = input.bool(       title = "Enable 3-97",                                                                defval = true,            group = GeneralGroup)
i_genEnable1189                     = input.bool(       title = "Enable 11-89",                                                               defval = true,            group = GeneralGroup)
i_genEnable1783                     = input.bool(       title = "Enable 17-83",                                                               defval = true,            group = GeneralGroup)
i_genEnable2971                     = input.bool(       title = "Enable 29-71",                                                               defval = true,            group = GeneralGroup)
i_genEnable4159                     = input.bool(       title = "Enable 41-59",                                                               defval = true,            group = GeneralGroup)
i_genEnable4753                     = input.bool(       title = "Enable 47-53",                                                               defval = true,            group = GeneralGroup)
i_genAccent397                      = input.bool(       title = "Accent 3-97",                                                                defval = false,           group = GeneralGroup)
i_genAccent1189                     = input.bool(       title = "Accent 11-89",                                                               defval = false,           group = GeneralGroup)
i_genAccent1783                     = input.bool(       title = "Accent 17-83",                                                               defval = false,           group = GeneralGroup)
i_genAccent2971                     = input.bool(       title = "Accent 29-71",                                                               defval = false,           group = GeneralGroup)
i_genAccent4159                     = input.bool(       title = "Accent 41-59",                                                               defval = false,           group = GeneralGroup)
i_genAccent4753                     = input.bool(       title = "Accent 47-53",                                                               defval = false,           group = GeneralGroup)
i_genColor                          = input.color(      title = "Color",                                                                      defval = color.black,   group = GeneralGroup)
i_genAccentColor                    = input.color(      title = "Accent color",                                                               defval = color.red,     group = GeneralGroup)
//**************************************************************************************************************************************************************************************************
//Libraries
//**************************************************************************************************************************************************************************************************
import paragjyoti2012/LoggerLib/5                   as Logger
import DewMic/FrameworkLib/44                       as Framework
import DewMic/HoplaRangesLib/12                     as Hopla
import DewMic/ConversionLib/14                      as Conversion
import DewMic/InformationLib/12                     as Information
//**************************************************************************************************************************************************************************************************
//Logger
//**************************************************************************************************************************************************************************************************
var logger                                          = Logger.init()
var logTable                                        = Logger.initTable(logger,max_rows_count=25,offset=0,position="right",size="small")
f_logMessage(_x)                                    => Logger.log(str.tostring(_x),logger,logTable,"message")
f_logWarning(_x)                                    => Logger.log(str.tostring(_x),logger,logTable,"warning")
f_logError(_x)                                      => Logger.log(str.tostring(_x),logger,logTable,"error")
f_logInfo(_x)                                       => Logger.log(str.tostring(_x),logger,logTable,"info")
f_logSucces(_x)                                     => Logger.log(str.tostring(_x),logger,logTable,"succes")
var     logLabel                                    = label.new(x=na,y=na,text="")
f_logLabel(_x)                                      => 
    label.set_x(        logLabel,   bar_index)
    label.set_y(        logLabel,   high)
    label.set_text(     logLabel,   str.tostring(_x))
    label.set_color(    logLabel,   color.red)
//**************************************************************************************************************************************************************************************************
//Information
//**************************************************************************************************************************************************************************************************
table       InfoTable               = table.new(columns=2, rows=15, border_width=2, frame_width=2, position=position.top_right)
string[]    Infos                   = array.new_string()
color[]     BackgroundColors        = array.new_color()
color[]     TextColors              = array.new_color()
//**************************************************************************************************************************************************************************************************
//Functions + data
//**************************************************************************************************************************************************************************************************
Hopla.draw_range(i_genMultiplyFactor, i_genNumberOfRanges, i_genNumberOfThreeRange, i_genEnable397, i_genEnable1189, i_genEnable1783, i_genEnable2971, i_genEnable4159, i_genEnable4753, i_genColor, i_genAccent397, i_genAccent1189, i_genAccent1783, i_genAccent2971, i_genAccent4159, i_genAccent4753, i_genAccentColor, i_genDynamicLabels)

Re: Already Converted TradingView Indicators to MT4 Indicators

Posted: Tue Oct 10, 2023 4:35 am
by Jimmy
wtjfree wrote: Tue Oct 10, 2023 1:50 am any one could covert the following Tradingview Pine code to MT4 Indicators please?
You have to make an effort to help us out by giving us more information on what that is and why you believe it would be a good code to convert.

All we see is lines of Pine Script garble pasted into a post with no information.

Re: Already Converted TradingView Indicators to MT4 Indicators

Posted: Tue Oct 10, 2023 5:47 am
by A_5
IMG_20231009_194553.jpg
This script is good for quick scalping of expansions. It colours candles based on timeframes selected and show if price is above the opening price for the TFs selected or below or mixed. It would be nice to have mt4 version of this

Code: Select all

// This source code is subject to the terms of the Mozilla Public License 2.0 at https://mozilla.org/MPL/2.0/
// © tradeforopp

//@version=5
indicator("Timeframe Continuity [TFO]", "Timeframe Continuity [TFO]", true, max_lines_count = 500, max_labels_count = 500)

// -------------------------------------------------- Inputs --------------------------------------------------
var g1 = "Settings"
table_position = input.string('Top Right', "Table Position", options = ['Bottom Center', 'Bottom Left', 'Bottom Right', 'Middle Center', 'Middle Left', 'Middle Right', 'Top Center', 'Top Left', 'Top Right'], group = g1)
display = input.string('Horizontal', "Table Display", options = ['Horizontal', 'Vertical'], group = g1)
paint_ftfc = input.bool(true, "FTFC Candles", inline = "FTFC", tooltip = "Paint candles as FTFC Up/Down/Neutral", group = g1)
ftfc_up_color = input.color(color.rgb(0, 255, 0), "", inline = "FTFC", group = g1)
ftfc_dn_color = input.color(color.rgb(255, 0, 0), "", inline = "FTFC", group = g1)
ftfc_nu_color = input.color(color.gray, "", inline = "FTFC", group = g1)
ftfc_labels = input.bool(false, "Labels", inline = "LABEL", group = g1)
ftfc_label_type = input.string("Flip", "", inline = "LABEL", options = ['Flip', 'Any'], tooltip = "Flip will only plot labels for the first FTFC Up/Down instance. Any will plot labels for any new indication of FTFC", group = g1)
show_mbhl = input.bool(false, "Show Mother Bar High & Low", tooltip = "If a given timeframe is currently trading as an inside bar, it will plot the previous high and low that must be exceeded to no longer be an inside bar", group = g1)

var g3 = "Table Colors"
text_color = input.color(color.white, "Text", group = g3) 
up_close_color = input.color(color.new(color.teal, 0), "Up-Close", group = g3) 
dn_close_color = input.color(color.new(color.red, 0), "Down-Close", group = g3)
inside_up_color = input.color(color.new(color.blue, 0), "Inside-Up-Close", group = g3) 
inside_dn_color = input.color(color.new(color.purple, 0), "Inside-Down-Close", group = g3)

var g2 = "Timeframes"
tf1 = input.timeframe("D", "TF 1", inline = "1", group = g2)
tf2 = input.timeframe("60", "TF 2", inline = "2", group = g2)
tf3 = input.timeframe("30", "TF 3", inline = "3", group = g2)
tf4 = input.timeframe("15", "TF 4", inline = "4", group = g2)
tf5 = input.timeframe("5", "TF 5", inline = "5", group = g2)
tf6 = input.timeframe("D", "TF 6", inline = "6", group = g2)
tf7 = input.timeframe("60", "TF 7", inline = "7", group = g2)
tf8 = input.timeframe("30", "TF 8", inline = "8", group = g2)
tf9 = input.timeframe("15", "TF 9", inline = "9", group = g2)
tf10 = input.timeframe("5", "TF 10", inline = "10", group = g2)

y1 = input.bool(true, "", inline = "1", group = g2)
y2 = input.bool(true, "", inline = "2", group = g2)
y3 = input.bool(true, "", inline = "3", group = g2)
y4 = input.bool(true, "", inline = "4", group = g2)
y5 = input.bool(true, "", inline = "5", group = g2)
y6 = input.bool(false, "", inline = "6", group = g2)
y7 = input.bool(false, "", inline = "7", group = g2)
y8 = input.bool(false, "", inline = "8", group = g2)
y9 = input.bool(false, "", inline = "9", group = g2)
y10 = input.bool(false, "", inline = "10", group = g2)
// -------------------------------------------------- Inputs --------------------------------------------------


// -------------------------------------------------- Variables --------------------------------------------------
[o1, h1, l1] = request.security(syminfo.tickerid, tf1, [open, high, low], barmerge.gaps_off, barmerge.lookahead_on)
[o2, h2, l2] = request.security(syminfo.tickerid, tf2, [open, high, low], barmerge.gaps_off, barmerge.lookahead_on)
[o3, h3, l3] = request.security(syminfo.tickerid, tf3, [open, high, low], barmerge.gaps_off, barmerge.lookahead_on)
[o4, h4, l4] = request.security(syminfo.tickerid, tf4, [open, high, low], barmerge.gaps_off, barmerge.lookahead_on)
[o5, h5, l5] = request.security(syminfo.tickerid, tf5, [open, high, low], barmerge.gaps_off, barmerge.lookahead_on)
[o6, h6, l6] = request.security(syminfo.tickerid, tf6, [open, high, low], barmerge.gaps_off, barmerge.lookahead_on)
[o7, h7, l7] = request.security(syminfo.tickerid, tf7, [open, high, low], barmerge.gaps_off, barmerge.lookahead_on)
[o8, h8, l8] = request.security(syminfo.tickerid, tf8, [open, high, low], barmerge.gaps_off, barmerge.lookahead_on)
[o9, h9, l9] = request.security(syminfo.tickerid, tf9, [open, high, low], barmerge.gaps_off, barmerge.lookahead_on)
[o10, h10, l10] = request.security(syminfo.tickerid, tf10, [open, high, low], barmerge.gaps_off, barmerge.lookahead_on)

var tf1_h = array.new_float()
var tf2_h = array.new_float()
var tf3_h = array.new_float()
var tf4_h = array.new_float()
var tf5_h = array.new_float()
var tf6_h = array.new_float()
var tf7_h = array.new_float()
var tf8_h = array.new_float()
var tf9_h = array.new_float()
var tf10_h = array.new_float()

var tf1_l = array.new_float()
var tf2_l = array.new_float()
var tf3_l = array.new_float()
var tf4_l = array.new_float()
var tf5_l = array.new_float()
var tf6_l = array.new_float()
var tf7_l = array.new_float()
var tf8_l = array.new_float()
var tf9_l = array.new_float()
var tf10_l = array.new_float()

var mbh_1 = line.new(na, na, na, na, color = color.new(up_close_color, 0), extend = extend.right)
var mbh_2 = line.new(na, na, na, na, color = color.new(up_close_color, 0), extend = extend.right)
var mbh_3 = line.new(na, na, na, na, color = color.new(up_close_color, 0), extend = extend.right)
var mbh_4 = line.new(na, na, na, na, color = color.new(up_close_color, 0), extend = extend.right)
var mbh_5 = line.new(na, na, na, na, color = color.new(up_close_color, 0), extend = extend.right)
var mbh_6 = line.new(na, na, na, na, color = color.new(up_close_color, 0), extend = extend.right)
var mbh_7 = line.new(na, na, na, na, color = color.new(up_close_color, 0), extend = extend.right)
var mbh_8 = line.new(na, na, na, na, color = color.new(up_close_color, 0), extend = extend.right)
var mbh_9 = line.new(na, na, na, na, color = color.new(up_close_color, 0), extend = extend.right)
var mbh_10 = line.new(na, na, na, na, color = color.new(up_close_color, 0), extend = extend.right)

var mbl_1 = line.new(na, na, na, na, color = color.new(dn_close_color, 0), extend = extend.right)
var mbl_2 = line.new(na, na, na, na, color = color.new(dn_close_color, 0), extend = extend.right)
var mbl_3 = line.new(na, na, na, na, color = color.new(dn_close_color, 0), extend = extend.right)
var mbl_4 = line.new(na, na, na, na, color = color.new(dn_close_color, 0), extend = extend.right)
var mbl_5 = line.new(na, na, na, na, color = color.new(dn_close_color, 0), extend = extend.right)
var mbl_6 = line.new(na, na, na, na, color = color.new(dn_close_color, 0), extend = extend.right)
var mbl_7 = line.new(na, na, na, na, color = color.new(dn_close_color, 0), extend = extend.right)
var mbl_8 = line.new(na, na, na, na, color = color.new(dn_close_color, 0), extend = extend.right)
var mbl_9 = line.new(na, na, na, na, color = color.new(dn_close_color, 0), extend = extend.right)
var mbl_10 = line.new(na, na, na, na, color = color.new(dn_close_color, 0), extend = extend.right)

var mbh_label_1 = label.new(na, na, str.tostring(tf1) + " H", color = color.new(up_close_color, 0), textcolor = color.white, style = label.style_label_down)
var mbh_label_2 = label.new(na, na, str.tostring(tf2) + " H", color = color.new(up_close_color, 0), textcolor = color.white, style = label.style_label_down)
var mbh_label_3 = label.new(na, na, str.tostring(tf3) + " H", color = color.new(up_close_color, 0), textcolor = color.white, style = label.style_label_down)
var mbh_label_4 = label.new(na, na, str.tostring(tf4) + " H", color = color.new(up_close_color, 0), textcolor = color.white, style = label.style_label_down)
var mbh_label_5 = label.new(na, na, str.tostring(tf5) + " H", color = color.new(up_close_color, 0), textcolor = color.white, style = label.style_label_down)
var mbh_label_6 = label.new(na, na, str.tostring(tf6) + " H", color = color.new(up_close_color, 0), textcolor = color.white, style = label.style_label_down)
var mbh_label_7 = label.new(na, na, str.tostring(tf7) + " H", color = color.new(up_close_color, 0), textcolor = color.white, style = label.style_label_down)
var mbh_label_8 = label.new(na, na, str.tostring(tf8) + " H", color = color.new(up_close_color, 0), textcolor = color.white, style = label.style_label_down)
var mbh_label_9 = label.new(na, na, str.tostring(tf9) + " H", color = color.new(up_close_color, 0), textcolor = color.white, style = label.style_label_down)
var mbh_label_10 = label.new(na, na, str.tostring(tf10) + " H", color = color.new(up_close_color, 0), textcolor = color.white, style = label.style_label_down)

var mbl_label_1 = label.new(na, na, str.tostring(tf1) + " L", color = color.new(dn_close_color, 0), textcolor = color.white, style = label.style_label_up)
var mbl_label_2 = label.new(na, na, str.tostring(tf2) + " L", color = color.new(dn_close_color, 0), textcolor = color.white, style = label.style_label_up)
var mbl_label_3 = label.new(na, na, str.tostring(tf3) + " L", color = color.new(dn_close_color, 0), textcolor = color.white, style = label.style_label_up)
var mbl_label_4 = label.new(na, na, str.tostring(tf4) + " L", color = color.new(dn_close_color, 0), textcolor = color.white, style = label.style_label_up)
var mbl_label_5 = label.new(na, na, str.tostring(tf5) + " L", color = color.new(dn_close_color, 0), textcolor = color.white, style = label.style_label_up)
var mbl_label_6 = label.new(na, na, str.tostring(tf6) + " L", color = color.new(dn_close_color, 0), textcolor = color.white, style = label.style_label_up)
var mbl_label_7 = label.new(na, na, str.tostring(tf7) + " L", color = color.new(dn_close_color, 0), textcolor = color.white, style = label.style_label_up)
var mbl_label_8 = label.new(na, na, str.tostring(tf8) + " L", color = color.new(dn_close_color, 0), textcolor = color.white, style = label.style_label_up)
var mbl_label_9 = label.new(na, na, str.tostring(tf9) + " L", color = color.new(dn_close_color, 0), textcolor = color.white, style = label.style_label_up)
var mbl_label_10 = label.new(na, na, str.tostring(tf10) + " L", color = color.new(dn_close_color, 0), textcolor = color.white, style = label.style_label_up)
// -------------------------------------------------- Variables --------------------------------------------------


// -------------------------------------------------- Functions --------------------------------------------------
get_table_pos(pos) =>
    result = switch pos
        "Bottom Center" => position.bottom_center
        "Bottom Left" => position.bottom_left
        "Bottom Right" => position.bottom_right
        "Middle Center" => position.middle_center
        "Middle Left" => position.middle_left
        "Middle Right" => position.middle_right
        "Top Center" => position.top_center
        "Top Left" => position.top_left
        "Top Right" => position.top_right
    result

update_hl(_ah, _al, _tf, _h, _l) =>
    if timeframe.change(_tf)
        _ah.unshift(_h[1])
        _al.unshift(_l[1])
    if _ah.size() > 3
        _ah.pop()
        _al.pop()

check_tfc(_tfc, _ah, _al, _h, _l) =>
    color table_color = na
    if _ah.size() > 0
        if _h <= _ah.get(0) and _l >= _al.get(0)
            if _tfc
                table_color := inside_up_color
            else
                table_color := inside_dn_color
        else
            if _tfc
                table_color := up_close_color
            else
                table_color := dn_close_color
        table_color

draw_lines(_h, _l, _ah, _al, _mbh, _mbl, _mbhl, _mbll, _idx, _u) =>
    i = _idx - 1
    if _ah.size() > 0 and _u.get(i)
        if _h <= _ah.get(0) and _l >= _al.get(0)
            _mbh.set_xy1(bar_index, _ah.get(0))
            _mbh.set_xy2(bar_index + 1, _ah.get(0))
            _mbhl.set_xy(bar_index, _ah.get(0))
            
            _mbl.set_xy1(bar_index, _al.get(0))
            _mbl.set_xy2(bar_index + 1, _al.get(0))
            _mbll.set_xy(bar_index, _al.get(0))
        else
            _mbh.set_xy1(na, na)
            _mbh.set_xy2(na, na)
            _mbhl.set_xy(na, na)
            
            _mbl.set_xy1(na, na)
            _mbl.set_xy2(na, na)
            _mbll.set_xy(na, na)
// -------------------------------------------------- Functions --------------------------------------------------


// -------------------------------------------------- Logic --------------------------------------------------
update_hl(tf1_h, tf1_l, tf1, h1, l1)
update_hl(tf2_h, tf2_l, tf2, h2, l2)
update_hl(tf3_h, tf3_l, tf3, h3, l3)
update_hl(tf4_h, tf4_l, tf4, h4, l4)
update_hl(tf5_h, tf5_l, tf5, h5, l5)
update_hl(tf6_h, tf6_l, tf6, h6, l6)
update_hl(tf7_h, tf7_l, tf7, h7, l7)
update_hl(tf8_h, tf8_l, tf8, h8, l8)
update_hl(tf9_h, tf9_l, tf9, h9, l9)
update_hl(tf10_h, tf10_l, tf10, h10, l10)

// Check if up-close
tfc1 = close > o1
tfc2 = close > o2
tfc3 = close > o3
tfc4 = close > o4
tfc5 = close > o5
tfc6 = close > o6
tfc7 = close > o7
tfc8 = close > o8
tfc9 = close > o9
tfc10 = close > o10

use_arr = array.from(y1, y2, y3, y4, y5, y6, y7, y8, y9, y10)
tfc_arr = array.from(tfc1, tfc2, tfc3, tfc4, tfc5, tfc6, tfc7, tfc8, tfc9, tfc10)

// Determine FTFC
ftfc_up = true
ftfc_dn = true

var bool ftfc_up_last = na

for i = 0 to tfc_arr.size() - 1
    if use_arr.get(i) 
        if tfc_arr.get(i)
            ftfc_dn := false
        else
            ftfc_up := false

if ftfc_up and not ftfc_up[1]
    ftfc_up_last := true
    if ftfc_labels
        if ftfc_label_type == 'Flip' ? (ftfc_up_last and not ftfc_up_last[1]) : true
            label.new(bar_index, low, "FTFC Up", color = color.new(up_close_color, 0), textcolor = color.white, style = label.style_label_up)
if ftfc_dn and not ftfc_dn[1]
    ftfc_up_last := false
    if ftfc_labels
        if ftfc_label_type == 'Flip' ? (not ftfc_up_last and ftfc_up_last[1]) : true
            label.new(bar_index, high, "FTFC Down", color = color.new(dn_close_color, 0), textcolor = color.white, style = label.style_label_down)

// Change bar color according to FTFC
barcolor(not paint_ftfc ? na : ftfc_up ? ftfc_up_color : ftfc_dn ? ftfc_dn_color : ftfc_nu_color)

if show_mbhl
    draw_lines(h1, l1, tf1_h, tf1_l, mbh_1, mbl_1, mbh_label_1, mbl_label_1, 1, use_arr)
    draw_lines(h2, l2, tf2_h, tf2_l, mbh_2, mbl_2, mbh_label_2, mbl_label_2, 2, use_arr)
    draw_lines(h3, l3, tf3_h, tf3_l, mbh_3, mbl_3, mbh_label_3, mbl_label_3, 3, use_arr)
    draw_lines(h4, l4, tf4_h, tf4_l, mbh_4, mbl_4, mbh_label_4, mbl_label_4, 4, use_arr)
    draw_lines(h5, l5, tf5_h, tf5_l, mbh_5, mbl_5, mbh_label_5, mbl_label_5, 5, use_arr)
    draw_lines(h6, l6, tf6_h, tf6_l, mbh_6, mbl_6, mbh_label_6, mbl_label_6, 6, use_arr)
    draw_lines(h7, l7, tf7_h, tf7_l, mbh_7, mbl_7, mbh_label_7, mbl_label_7, 7, use_arr)
    draw_lines(h8, l8, tf8_h, tf8_l, mbh_8, mbl_8, mbh_label_8, mbl_label_8, 8, use_arr)
    draw_lines(h9, l9, tf9_h, tf9_l, mbh_9, mbl_9, mbh_label_9, mbl_label_9, 9, use_arr)
    draw_lines(h10, l10, tf10_h, tf10_l, mbh_10, mbl_10, mbh_label_10, mbl_label_10, 10, use_arr)
// -------------------------------------------------- Logic --------------------------------------------------


// -------------------------------------------------- Table --------------------------------------------------
// Create TFC table
var table tfc = table.new(get_table_pos(table_position), 10, 10)
horizontal = display == 'Horizontal'

if barstate.islast
    if y1 
        table.cell(tfc, horizontal ? 0 : 0, horizontal ? 0 : 0, str.tostring(tf1), text_color = text_color, bgcolor = check_tfc(tfc1, tf1_h, tf1_l, h1, l1))
    if y2
        table.cell(tfc, horizontal ? 1 : 0, horizontal ? 0 : 1, str.tostring(tf2), text_color = text_color, bgcolor = check_tfc(tfc2, tf2_h, tf2_l, h2, l2))
    if y3
        table.cell(tfc, horizontal ? 2 : 0, horizontal ? 0 : 2, str.tostring(tf3), text_color = text_color, bgcolor = check_tfc(tfc3, tf3_h, tf3_l, h3, l3))
    if y4
        table.cell(tfc, horizontal ? 3 : 0, horizontal ? 0 : 3, str.tostring(tf4), text_color = text_color, bgcolor = check_tfc(tfc4, tf4_h, tf4_l, h4, l4))
    if y5
        table.cell(tfc, horizontal ? 4 : 0, horizontal ? 0 : 4, str.tostring(tf5), text_color = text_color, bgcolor = check_tfc(tfc5, tf5_h, tf5_l, h5, l5))
    if y6 
        table.cell(tfc, horizontal ? 5 : 0, horizontal ? 0 : 5, str.tostring(tf6), text_color = text_color, bgcolor = check_tfc(tfc6, tf6_h, tf6_l, h6, l6))
    if y7
        table.cell(tfc, horizontal ? 6 : 0, horizontal ? 0 : 6, str.tostring(tf7), text_color = text_color, bgcolor = check_tfc(tfc7, tf7_h, tf7_l, h7, l7))
    if y8
        table.cell(tfc, horizontal ? 7 : 0, horizontal ? 0 : 7, str.tostring(tf8), text_color = text_color, bgcolor = check_tfc(tfc8, tf8_h, tf8_l, h8, l8))
    if y9
        table.cell(tfc, horizontal ? 8 : 0, horizontal ? 0 : 8, str.tostring(tf9), text_color = text_color, bgcolor = check_tfc(tfc9, tf9_h, tf9_l, h9, l9))
    if y10
        table.cell(tfc, horizontal ? 9 : 0, horizontal ? 0 : 9, str.tostring(tf10), text_color = text_color, bgcolor = check_tfc(tfc10, tf10_h, tf10_l, h10, l10))
// -------------------------------------------------- Table --------------------------------------------------

Re: Already Converted TradingView Indicators to MT4 Indicators

Posted: Tue Oct 10, 2023 6:34 am
by wtjfree
Jimmy wrote: Tue Oct 10, 2023 4:35 am You have to make an effort to help us out by giving us more information on what that is and why you believe it would be a good code to convert.

All we see is lines of Pine Script garble pasted into a post with no information.
Sorry for the lack of information.

This is lines based on Goldenbach levels for trading. It's a very long story to tell. I shold recommend a book called "Demystifying ICT: What every ICT Trader Still Wants To Know" by Hoppiplaka

As those lines created via priviate libs. It's might not useful just the pine code we have now.

import paragjyoti2012/LoggerLib/5 as Logger
import DewMic/FrameworkLib/44 as Framework
import DewMic/HoplaRangesLib/12 as Hopla
import DewMic/ConversionLib/14 as Conversion
import DewMic/InformationLib/12 as Information

Re: Already Converted TradingView Indicators to MT4 Indicators

Posted: Sun Oct 15, 2023 11:58 am
by GaeBolg
Mod edit: Post removed, please use the guide on the first page.

Re: Already Converted TradingView Indicators to MT4 Indicators

Posted: Sun Oct 15, 2023 10:28 pm
by GaeBolg
Hi can anyone convert this pine script to mq5 or mq4 please? Its a good confirmation and trend following indicator.

Code: Select all

//@version=2
study("TrendAlert", overlay=false)

// Trend and direction determination Step 1 en Step 2 method conform ZoneRecovery from 4x-dat.com Joseph Nemeth 
// step 1 LongTerm timefram/resolution (LT) determine general direction 
//•	color last Heikenahsi bar gives is the general direction 
// step 2 MidTerm timeframe/resolution determine trend
//•	color last Heikenahsi bar must match Direction step 1 and
//•	slope of 20EMA in direction step 1 and 
//•	price relation to EMA20: above = up, below=down 
// Step 1 AND step 2 => TrendAlert (-1 for Short, 1 for Long, 0 for No trend)

//Heiken Ashi Candles
data = heikenashi(tickerid)
resLT = input(title="Res LT", type=resolution, defval="D")
resMT = input(title="Res MT", type=resolution, defval="240")


LTo = security(data, resLT, open)
LTc = security(data, resLT, close)
MTo = security(data, resMT, open)
MTc = security(data, resMT, close)

LTlong = LTc > LTo 
LTshort = LTc < LTo 
MTema20 = ema(MTc,20)
MTema20delta= change(MTema20)

MTlong = MTc > MTo and MTc > MTema20 and MTema20delta > 0
MTshort = MTc < MTo and MTc < MTema20 and MTema20delta < 0



Long = MTlong and LTlong
Short = MTshort and LTshort

plot(Long ? 1 : Short ? -1: 0, title="TrendAlert", color= Long ? lime : Short ? red : gray, style=columns )

Re: Already Converted TradingView Indicators to MT4 Indicators

Posted: Thu Nov 02, 2023 9:46 pm
by kyawswarlin
menber100 wrote: Mon Feb 06, 2023 12:13 pm Great Coders, I humbly beg everyone to convert this great indicator from tradingview to mt4, the indicator is open source and freely available, please help me by converting this indicator to mt4. https://www.tradingview.com/script/CnB3 ... s-LuxAlgo/
Image

Code: Select all

// © LuxAlgo

//@version=5
indicator("Smart Money Concepts [LUX]", "Smart Money Concepts [LuxAlgo]"
  , overlay = true
  , max_labels_count = 500
  , max_lines_count = 500
  , max_boxes_count = 500
  , max_bars_back = 500)
//-----------------------------------------------------------------------------{
//Constants
//-----------------------------------------------------------------------------{
color TRANSP_CSS = #ffffff00

//Tooltips
string MODE_TOOLTIP          = 'Allows to display historical Structure or only the recent ones'
string STYLE_TOOLTIP         = 'Indicator color theme'
string COLOR_CANDLES_TOOLTIP = 'Display additional candles with a color reflecting the current trend detected by structure'
string SHOW_INTERNAL         = 'Display internal market structure'
string CONFLUENCE_FILTER     = 'Filter non significant internal structure breakouts'
string SHOW_SWING            = 'Display swing market Structure'
string SHOW_SWING_POINTS     = 'Display swing point as labels on the chart'
string SHOW_SWHL_POINTS      = 'Highlight most recent strong and weak high/low points on the chart'
string INTERNAL_OB           = 'Display internal order blocks on the chart\n\nNumber of internal order blocks to display on the chart'
string SWING_OB              = 'Display swing order blocks on the chart\n\nNumber of internal swing blocks to display on the chart'
string FILTER_OB             = 'Method used to filter out volatile order blocks \n\nIt is recommended to use the cumulative mean range method when a low amount of data is available'
string SHOW_EQHL             = 'Display equal highs and equal lows on the chart'
string EQHL_BARS             = 'Number of bars used to confirm equal highs and equal lows'
string EQHL_THRESHOLD        = 'Sensitivity threshold in a range (0, 1) used for the detection of equal highs & lows\n\nLower values will return fewer but more pertinent results'
string SHOW_FVG              = 'Display fair values gaps on the chart'
string AUTO_FVG              = 'Filter out non significant fair value gaps'
string FVG_TF                = 'Fair value gaps timeframe'
string EXTEND_FVG            = 'Determine how many bars to extend the Fair Value Gap boxes on chart'
string PED_ZONES             = 'Display premium, discount, and equilibrium zones on chart'

//-----------------------------------------------------------------------------{
//Settings
//-----------------------------------------------------------------------------{
//General
//----------------------------------------{
mode = input.string('Historical'
  , options = ['Historical', 'Present']
  , group = 'Smart Money Concepts'
  , tooltip = MODE_TOOLTIP)

style = input.string('Colored'
  , options = ['Colored', 'Monochrome']
  , group = 'Smart Money Concepts'
  , tooltip = STYLE_TOOLTIP)

show_trend = input(false, 'Color Candles'
  , group = 'Smart Money Concepts'
  , tooltip = COLOR_CANDLES_TOOLTIP)

//----------------------------------------}
//Internal Structure
//----------------------------------------{
show_internals = input(true, 'Show Internal Structure'
  , group = 'Real Time Internal Structure'
  , tooltip = SHOW_INTERNAL)

show_ibull = input.string('All', 'Bullish Structure'
  , options = ['All', 'BOS', 'CHoCH']
  , inline = 'ibull'
  , group = 'Real Time Internal Structure')

swing_ibull_css = input(#089981, ''
  , inline = 'ibull'
  , group = 'Real Time Internal Structure')

//Bear Structure
show_ibear = input.string('All', 'Bearish Structure'
  , options = ['All', 'BOS', 'CHoCH']
  , inline = 'ibear'
  , group = 'Real Time Internal Structure')

swing_ibear_css = input(#f23645, ''
  , inline = 'ibear'
  , group = 'Real Time Internal Structure')

ifilter_confluence = input(false, 'Confluence Filter'
  , group = 'Real Time Internal Structure'
  , tooltip = CONFLUENCE_FILTER)

//----------------------------------------}
//Swing Structure
//----------------------------------------{
show_Structure = input(true, 'Show Swing Structure'
  , group = 'Real Time Swing Structure'
  , tooltip = SHOW_SWING)

//Bull Structure
show_bull = input.string('All', 'Bullish Structure'
  , options = ['All', 'BOS', 'CHoCH']
  , inline = 'bull'
  , group = 'Real Time Swing Structure')

swing_bull_css = input(#089981, ''
  , inline = 'bull'
  , group = 'Real Time Swing Structure')

//Bear Structure
show_bear = input.string('All', 'Bearish Structure'
  , options = ['All', 'BOS', 'CHoCH']
  , inline = 'bear'
  , group = 'Real Time Swing Structure')

swing_bear_css = input(#f23645, ''
  , inline = 'bear'
  , group = 'Real Time Swing Structure')

//Swings
show_swings = input(false, 'Show Swings Points'
  , inline = 'swings'
  , group = 'Real Time Swing Structure'
  , tooltip = SHOW_SWING_POINTS)

length = input.int(50, ''
  , minval = 10
  , inline = 'swings'
  , group = 'Real Time Swing Structure')

show_hl_swings = input(true, 'Show Strong/Weak High/Low'
  , group = 'Real Time Swing Structure'
  , tooltip = SHOW_SWHL_POINTS)

//----------------------------------------}
//Order Blocks
//----------------------------------------{
show_iob = input(true, 'Internal Order Blocks'
  , inline = 'iob'
  , group = 'Order Blocks'
  , tooltip = INTERNAL_OB)

iob_showlast = input.int(5, ''
  , minval = 1
  , inline = 'iob'
  , group = 'Order Blocks')

show_ob = input(false, 'Swing Order Blocks'
  , inline = 'ob'
  , group = 'Order Blocks'
  , tooltip = SWING_OB)

ob_showlast = input.int(5, ''
  , minval = 1
  , inline = 'ob'
  , group = 'Order Blocks')

ob_filter = input.string('Atr', 'Order Block Filter'
  , options = ['Atr', 'Cumulative Mean Range']
  , group = 'Order Blocks'
  , tooltip = FILTER_OB)

ibull_ob_css = input.color(color.new(#3179f5, 80), 'Internal Bullish OB'
  , group = 'Order Blocks')

ibear_ob_css = input.color(color.new(#f77c80, 80), 'Internal Bearish OB'
  , group = 'Order Blocks')

bull_ob_css = input.color(color.new(#1848cc, 80), 'Bullish OB'
  , group = 'Order Blocks')

bear_ob_css = input.color(color.new(#b22833, 80), 'Bearish OB'
  , group = 'Order Blocks')

//----------------------------------------}
//EQH/EQL
//----------------------------------------{
show_eq = input(true, 'Equal High/Low'
  , group = 'EQH/EQL'
  , tooltip = SHOW_EQHL)

eq_len = input.int(3, 'Bars Confirmation'
  , minval = 1
  , group = 'EQH/EQL'
  , tooltip = EQHL_BARS)

eq_threshold = input.float(0.1, 'Threshold'
  , minval = 0
  , maxval = 0.5
  , step = 0.1
  , group = 'EQH/EQL'
  , tooltip = EQHL_THRESHOLD)

//----------------------------------------}
//Fair Value Gaps
//----------------------------------------{
show_fvg = input(false, 'Fair Value Gaps'
  , group = 'Fair Value Gaps'
  , tooltip = SHOW_FVG)
  
fvg_auto = input(true, "Auto Threshold"
  , group = 'Fair Value Gaps'
  , tooltip = AUTO_FVG)

fvg_tf = input.timeframe('', "Timeframe"
  , group = 'Fair Value Gaps'
  , tooltip = FVG_TF)

bull_fvg_css = input.color(color.new(#00ff68, 70), 'Bullish FVG'
  , group = 'Fair Value Gaps')

bear_fvg_css = input.color(color.new(#ff0008, 70), 'Bearish FVG'
  , group = 'Fair Value Gaps')

fvg_extend = input.int(1, "Extend FVG"
  , minval = 0
  , group = 'Fair Value Gaps'
  , tooltip = EXTEND_FVG)

//----------------------------------------}
//Previous day/week high/low
//----------------------------------------{
//Daily
show_pdhl = input(false, 'Daily'
  , inline = 'daily'
  , group = 'Highs & Lows MTF')

pdhl_style = input.string('⎯⎯⎯', ''
  , options = ['⎯⎯⎯', '----', '····']
  , inline = 'daily'
  , group = 'Highs & Lows MTF')

pdhl_css = input(#2157f3, ''
  , inline = 'daily'
  , group = 'Highs & Lows MTF')

//Weekly
show_pwhl = input(false, 'Weekly'
  , inline = 'weekly'
  , group = 'Highs & Lows MTF')

pwhl_style = input.string('⎯⎯⎯', ''
  , options = ['⎯⎯⎯', '----', '····']
  , inline = 'weekly'
  , group = 'Highs & Lows MTF')

pwhl_css = input(#2157f3, ''
  , inline = 'weekly'
  , group = 'Highs & Lows MTF')

//Monthly
show_pmhl = input(false, 'Monthly'
  , inline = 'monthly'
  , group = 'Highs & Lows MTF')

pmhl_style = input.string('⎯⎯⎯', ''
  , options = ['⎯⎯⎯', '----', '····']
  , inline = 'monthly'
  , group = 'Highs & Lows MTF')

pmhl_css = input(#2157f3, ''
  , inline = 'monthly'
  , group = 'Highs & Lows MTF')

//----------------------------------------}
//Premium/Discount zones
//----------------------------------------{
show_sd = input(false, 'Premium/Discount Zones'
  , group = 'Premium & Discount Zones'
  , tooltip = PED_ZONES)

premium_css = input.color(#f23645, 'Premium Zone'
  , group = 'Premium & Discount Zones')

eq_css = input.color(#b2b5be, 'Equilibrium Zone'
  , group = 'Premium & Discount Zones')

discount_css = input.color(#089981, 'Discount Zone'
  , group = 'Premium & Discount Zones')

//-----------------------------------------------------------------------------}
//Functions
//-----------------------------------------------------------------------------{
n = bar_index

atr = ta.atr(200)
cmean_range = ta.cum(high - low) / n

//HL Output function
hl() => [high, low]

//Get ohlc values function
get_ohlc()=> [close[1], open[1], high, low, high[2], low[2]]

//Display Structure function
display_Structure(x, y, txt, css, dashed, down, lbl_size)=>
    structure_line = line.new(x, y, n, y
      , color = css
      , style = dashed ? line.style_dashed : line.style_solid)

    structure_lbl = label.new(int(math.avg(x, n)), y, txt
      , color = TRANSP_CSS
      , textcolor = css
      , style = down ? label.style_label_down : label.style_label_up
      , size = lbl_size)

    if mode == 'Present'
        line.delete(structure_line[1])
        label.delete(structure_lbl[1])

//Swings detection/measurements
swings(len)=>
    var os = 0
    
    upper = ta.highest(len)
    lower = ta.lowest(len)

    os := high[len] > upper ? 0 : low[len] < lower ? 1 : os[1]

    top = os == 0 and os[1] != 0 ? high[len] : 0
    btm = os == 1 and os[1] != 1 ? low[len] : 0

    [top, btm]

//Order block coordinates function
ob_coord(use_max, loc, target_top, target_btm, target_left, target_type)=>
    min = 99999999.
    max = 0.
    idx = 1

    ob_threshold = ob_filter == 'Atr' ? atr : cmean_range 

    //Search for highest/lowest high within the structure interval and get range
    if use_max
        for i = 1 to (n - loc)-1
            if (high[i] - low[i]) < ob_threshold[i] * 2
                max := math.max(high[i], max)
                min := max == high[i] ? low[i] : min
                idx := max == high[i] ? i : idx
    else
        for i = 1 to (n - loc)-1
            if (high[i] - low[i]) < ob_threshold[i] * 2
                min := math.min(low[i], min)
                max := min == low[i] ? high[i] : max
                idx := min == low[i] ? i : idx

    array.unshift(target_top, max)
    array.unshift(target_btm, min)
    array.unshift(target_left, time[idx])
    array.unshift(target_type, use_max ? -1 : 1)

//Set order blocks
display_ob(boxes, target_top, target_btm, target_left, target_type, show_last, swing, size)=>
    for i = 0 to math.min(show_last-1, size-1)
        get_box = array.get(boxes, i)

        box.set_lefttop(get_box, array.get(target_left, i), array.get(target_top, i))
        box.set_rightbottom(get_box, array.get(target_left, i), array.get(target_btm, i))
        box.set_extend(get_box, extend.right)

        color css = na
        
        if swing 
            if style == 'Monochrome'
                css := array.get(target_type, i) == 1 ? color.new(#b2b5be, 80) : color.new(#5d606b, 80)
                border_css = array.get(target_type, i) == 1 ? #b2b5be : #5d606b
                box.set_border_color(get_box, border_css)
            else
                css := array.get(target_type, i) == 1 ? bull_ob_css : bear_ob_css
                box.set_border_color(get_box, css)

            box.set_bgcolor(get_box, css)
        else
            if style == 'Monochrome'
                css := array.get(target_type, i) == 1 ? color.new(#b2b5be, 80) : color.new(#5d606b, 80)
            else
                css := array.get(target_type, i) == 1 ? ibull_ob_css : ibear_ob_css
            
            box.set_border_color(get_box, css)
            box.set_bgcolor(get_box, css)
        
//Line Style function
get_line_style(style) =>
    out = switch style
        '⎯⎯⎯'  => line.style_solid
        '----' => line.style_dashed
        '····' => line.style_dotted

//Set line/labels function for previous high/lows
phl(h, l, tf, css)=>
    var line high_line = line.new(na,na,na,na
      , xloc = xloc.bar_time
      , color = css
      , style = get_line_style(pdhl_style))

    var label high_lbl = label.new(na,na
      , xloc = xloc.bar_time
      , text = str.format('P{0}H', tf)
      , color = TRANSP_CSS
      , textcolor = css
      , size = size.small
      , style = label.style_label_left)

    var line low_line = line.new(na,na,na,na
      , xloc = xloc.bar_time
      , color = css
      , style = get_line_style(pdhl_style))

    var label low_lbl = label.new(na,na
      , xloc = xloc.bar_time
      , text = str.format('P{0}L', tf)
      , color = TRANSP_CSS
      , textcolor = css
      , size = size.small
      , style = label.style_label_left)

    hy = ta.valuewhen(h != h[1], h, 1)
    hx = ta.valuewhen(h == high, time, 1)

    ly = ta.valuewhen(l != l[1], l, 1)
    lx = ta.valuewhen(l == low, time, 1)

    if barstate.islast
        ext = time + (time - time[1])*20

        //High
        line.set_xy1(high_line, hx, hy)
        line.set_xy2(high_line, ext, hy)

        label.set_xy(high_lbl, ext, hy)

        //Low
        line.set_xy1(low_line, lx, ly)
        line.set_xy2(low_line, ext, ly)

        label.set_xy(low_lbl, ext, ly)

//-----------------------------------------------------------------------------}
//Global variables
//-----------------------------------------------------------------------------{
var trend = 0, var itrend = 0

var top_y = 0., var top_x = 0
var btm_y = 0., var btm_x = 0

var itop_y = 0., var itop_x = 0
var ibtm_y = 0., var ibtm_x = 0

var trail_up = high, var trail_dn = low
var trail_up_x = 0,  var trail_dn_x = 0

var top_cross = true,  var btm_cross = true
var itop_cross = true, var ibtm_cross = true

var txt_top = '',  var txt_btm = ''

//Alerts
bull_choch_alert = false 
bull_bos_alert   = false 

bear_choch_alert = false 
bear_bos_alert   = false 

bull_ichoch_alert = false 
bull_ibos_alert   = false 

bear_ichoch_alert = false 
bear_ibos_alert   = false 

bull_iob_break = false 
bear_iob_break = false

bull_ob_break = false 
bear_ob_break = false

eqh_alert = false 
eql_alert = false 

//Structure colors
var bull_css = style == 'Monochrome' ? #b2b5be 
  : swing_bull_css

var bear_css = style == 'Monochrome' ? #b2b5be 
  : swing_bear_css

var ibull_css = style == 'Monochrome' ? #b2b5be 
  : swing_ibull_css

var ibear_css = style == 'Monochrome' ? #b2b5be 
  : swing_ibear_css

//Swings
[top, btm] = swings(length)

[itop, ibtm] = swings(5)

//-----------------------------------------------------------------------------}
//Pivot High
//-----------------------------------------------------------------------------{
var line extend_top = na

var label extend_top_lbl = label.new(na, na
  , color = TRANSP_CSS
  , textcolor = bear_css
  , style = label.style_label_down
  , size = size.tiny)

if top
    top_cross := true
    txt_top := top > top_y ? 'HH' : 'LH'

    if show_swings
        top_lbl = label.new(n-length, top, txt_top
          , color = TRANSP_CSS
          , textcolor = bear_css
          , style = label.style_label_down
          , size = size.small)

        if mode == 'Present'
            label.delete(top_lbl[1])

    //Extend recent top to last bar
    line.delete(extend_top[1])
    extend_top := line.new(n-length, top, n, top
      , color = bear_css)

    top_y := top
    top_x := n - length

    trail_up := top
    trail_up_x := n - length

if itop
    itop_cross := true

    itop_y := itop
    itop_x := n - 5

//Trailing maximum
trail_up := math.max(high, trail_up)
trail_up_x := trail_up == high ? n : trail_up_x

//Set top extension label/line
if barstate.islast and show_hl_swings
    line.set_xy1(extend_top, trail_up_x, trail_up)
    line.set_xy2(extend_top, n + 20, trail_up)

    label.set_x(extend_top_lbl, n + 20)
    label.set_y(extend_top_lbl, trail_up)
    label.set_text(extend_top_lbl, trend < 0 ? 'Strong High' : 'Weak High')

//-----------------------------------------------------------------------------}
//Pivot Low
//-----------------------------------------------------------------------------{
var line extend_btm = na 

var label extend_btm_lbl = label.new(na, na
  , color = TRANSP_CSS
  , textcolor = bull_css
  , style = label.style_label_up
  , size = size.tiny)

if btm
    btm_cross := true
    txt_btm := btm < btm_y ? 'LL' : 'HL'
    
    if show_swings
        btm_lbl = label.new(n - length, btm, txt_btm
          , color = TRANSP_CSS
          , textcolor = bull_css
          , style = label.style_label_up
          , size = size.small)

        if mode == 'Present'
            label.delete(btm_lbl[1])
    
    //Extend recent btm to last bar
    line.delete(extend_btm[1])
    extend_btm := line.new(n - length, btm, n, btm
      , color = bull_css)

    btm_y := btm
    btm_x := n-length

    trail_dn := btm
    trail_dn_x := n-length

if ibtm
    ibtm_cross := true

    ibtm_y := ibtm
    ibtm_x := n - 5

//Trailing minimum
trail_dn := math.min(low, trail_dn)
trail_dn_x := trail_dn == low ? n : trail_dn_x

//Set btm extension label/line
if barstate.islast and show_hl_swings
    line.set_xy1(extend_btm, trail_dn_x, trail_dn)
    line.set_xy2(extend_btm, n + 20, trail_dn)

    label.set_x(extend_btm_lbl, n + 20)
    label.set_y(extend_btm_lbl, trail_dn)
    label.set_text(extend_btm_lbl, trend > 0 ? 'Strong Low' : 'Weak Low')

//-----------------------------------------------------------------------------}
//Order Blocks Arrays
//-----------------------------------------------------------------------------{
var iob_top = array.new_float(0)
var iob_btm = array.new_float(0)
var iob_left = array.new_int(0)
var iob_type = array.new_int(0)

var ob_top = array.new_float(0)
var ob_btm = array.new_float(0)
var ob_left = array.new_int(0)
var ob_type = array.new_int(0)

//-----------------------------------------------------------------------------}
//Pivot High BOS/CHoCH
//-----------------------------------------------------------------------------{
//Filtering
var bull_concordant = true

if ifilter_confluence
    bull_concordant := high - math.max(close, open) > math.min(close, open - low)

//Detect internal bullish Structure
if ta.crossover(close, itop_y) and itop_cross and top_y != itop_y and bull_concordant
    bool choch = na
    
    if itrend < 0
        choch := true
        bull_ichoch_alert := true
    else 
        bull_ibos_alert := true
    
    txt = choch ? 'CHoCH' : 'BOS'

    if show_internals
        if show_ibull == 'All' or (show_ibull == 'BOS' and not choch) or (show_ibull == 'CHoCH' and choch)
            display_Structure(itop_x, itop_y, txt, ibull_css, true, true, size.tiny)
    
    itop_cross := false
    itrend := 1
    
    //Internal Order Block
    if show_iob
        ob_coord(false, itop_x, iob_top, iob_btm, iob_left, iob_type)

//Detect bullish Structure
if ta.crossover(close, top_y) and top_cross
    bool choch = na
    
    if trend < 0
        choch := true
        bull_choch_alert := true
    else 
        bull_bos_alert := true

    txt = choch ? 'CHoCH' : 'BOS'
    
    if show_Structure
        if show_bull == 'All' or (show_bull == 'BOS' and not choch) or (show_bull == 'CHoCH' and choch)
            display_Structure(top_x, top_y, txt, bull_css, false, true, size.small)
    
    //Order Block
    if show_ob
        ob_coord(false, top_x, ob_top, ob_btm, ob_left, ob_type)

    top_cross := false
    trend := 1

//-----------------------------------------------------------------------------}
//Pivot Low BOS/CHoCH
//-----------------------------------------------------------------------------{
var bear_concordant = true

if ifilter_confluence
    bear_concordant := high - math.max(close, open) < math.min(close, open - low)

//Detect internal bearish Structure
if ta.crossunder(close, ibtm_y) and ibtm_cross and btm_y != ibtm_y and bear_concordant
    bool choch = false
    
    if itrend > 0
        choch := true
        bear_ichoch_alert := true
    else 
        bear_ibos_alert := true
    
    txt = choch ? 'CHoCH' : 'BOS'

    if show_internals
        if show_ibear == 'All' or (show_ibear == 'BOS' and not choch) or (show_ibear == 'CHoCH' and choch)
            display_Structure(ibtm_x, ibtm_y, txt, ibear_css, true, false, size.tiny)
    
    ibtm_cross := false
    itrend := -1
    
    //Internal Order Block
    if show_iob
        ob_coord(true, ibtm_x, iob_top, iob_btm, iob_left, iob_type)

//Detect bearish Structure
if ta.crossunder(close, btm_y) and btm_cross
    bool choch = na
    
    if trend > 0
        choch := true
        bear_choch_alert := true
    else 
        bear_bos_alert := true

    txt = choch ? 'CHoCH' : 'BOS'
    
    if show_Structure
        if show_bear == 'All' or (show_bear == 'BOS' and not choch) or (show_bear == 'CHoCH' and choch)
            display_Structure(btm_x, btm_y, txt, bear_css, false, false, size.small)
    
    //Order Block
    if show_ob
        ob_coord(true, btm_x, ob_top, ob_btm, ob_left, ob_type)

    btm_cross := false
    trend := -1

//-----------------------------------------------------------------------------}
//Order Blocks
//-----------------------------------------------------------------------------{
//Set order blocks
var iob_boxes = array.new_box(0)
var ob_boxes = array.new_box(0)

//Delete internal order blocks box coordinates if top/bottom is broken
for element in iob_type
    index = array.indexof(iob_type, element)

    if close < array.get(iob_btm, index) and element == 1
        array.remove(iob_top, index) 
        array.remove(iob_btm, index) 
        array.remove(iob_left, index) 
        array.remove(iob_type, index)
        bull_iob_break := true

    else if close > array.get(iob_top, index) and element == -1
        array.remove(iob_top, index) 
        array.remove(iob_btm, index)
        array.remove(iob_left, index) 
        array.remove(iob_type, index)
        bear_iob_break := true

//Delete internal order blocks box coordinates if top/bottom is broken
for element in ob_type
    index = array.indexof(ob_type, element)

    if close < array.get(ob_btm, index) and element == 1
        array.remove(ob_top, index) 
        array.remove(ob_btm, index) 
        array.remove(ob_left, index) 
        array.remove(ob_type, index)
        bull_ob_break := true

    else if close > array.get(ob_top, index) and element == -1
        array.remove(ob_top, index) 
        array.remove(ob_btm, index)
        array.remove(ob_left, index) 
        array.remove(ob_type, index)
        bear_ob_break := true

iob_size = array.size(iob_type)
ob_size = array.size(ob_type)

if barstate.isfirst
    if show_iob
        for i = 0 to iob_showlast-1
            array.push(iob_boxes, box.new(na,na,na,na, xloc = xloc.bar_time))
    if show_ob
        for i = 0 to ob_showlast-1
            array.push(ob_boxes, box.new(na,na,na,na, xloc = xloc.bar_time))

if iob_size > 0
    if barstate.islast
        display_ob(iob_boxes, iob_top, iob_btm, iob_left, iob_type, iob_showlast, false, iob_size)

if ob_size > 0
    if barstate.islast
        display_ob(ob_boxes, ob_top, ob_btm, ob_left, ob_type, ob_showlast, true, ob_size)

//-----------------------------------------------------------------------------}
//EQH/EQL
//-----------------------------------------------------------------------------{
var eq_prev_top = 0.
var eq_top_x = 0

var eq_prev_btm = 0.
var eq_btm_x = 0

if show_eq
    eq_top = ta.pivothigh(eq_len, eq_len)
    eq_btm = ta.pivotlow(eq_len, eq_len)

    if eq_top 
        max = math.max(eq_top, eq_prev_top)
        min = math.min(eq_top, eq_prev_top)
        
        if max < min + atr * eq_threshold
            eqh_line = line.new(eq_top_x, eq_prev_top, n-eq_len, eq_top
              , color = bear_css
              , style = line.style_dotted)

            eqh_lbl = label.new(int(math.avg(n-eq_len, eq_top_x)), eq_top, 'EQH'
              , color = #00000000
              , textcolor = bear_css
              , style = label.style_label_down
              , size = size.tiny)

            if mode == 'Present'
                line.delete(eqh_line[1])
                label.delete(eqh_lbl[1])
            
            eqh_alert := true

        eq_prev_top := eq_top
        eq_top_x := n-eq_len

    if eq_btm 
        max = math.max(eq_btm, eq_prev_btm)
        min = math.min(eq_btm, eq_prev_btm)
        
        if min > max - atr * eq_threshold
            eql_line = line.new(eq_btm_x, eq_prev_btm, n-eq_len, eq_btm
              , color = bull_css
              , style = line.style_dotted)

            eql_lbl = label.new(int(math.avg(n-eq_len, eq_btm_x)), eq_btm, 'EQL'
              , color = #00000000
              , textcolor = bull_css
              , style = label.style_label_up
              , size = size.tiny)

            eql_alert := true

            if mode == 'Present'
                line.delete(eql_line[1])
                label.delete(eql_lbl[1])

        eq_prev_btm := eq_btm
        eq_btm_x := n-eq_len

//-----------------------------------------------------------------------------}
//Fair Value Gaps
//-----------------------------------------------------------------------------{
var bullish_fvg_max = array.new_box(0)
var bullish_fvg_min = array.new_box(0)

var bearish_fvg_max = array.new_box(0)
var bearish_fvg_min = array.new_box(0)

float bullish_fvg_avg = na
float bearish_fvg_avg = na

bullish_fvg_cnd = false
bearish_fvg_cnd = false

[src_c1, src_o1, src_h, src_l, src_h2, src_l2] =
  request.security(syminfo.tickerid, fvg_tf, get_ohlc())

if show_fvg
    delta_per = (src_c1 - src_o1) / src_o1 * 100

    change_tf = timeframe.change(fvg_tf)

    threshold = fvg_auto ? ta.cum(math.abs(change_tf ? delta_per : 0)) / n * 2 
      : 0

    //FVG conditions
    bullish_fvg_cnd := src_l > src_h2
      and src_c1 > src_h2 
      and delta_per > threshold
      and change_tf

    bearish_fvg_cnd := src_h < src_l2 
      and src_c1 < src_l2 
      and -delta_per > threshold
      and change_tf

    //FVG Areas
    if bullish_fvg_cnd
        array.unshift(bullish_fvg_max, box.new(n-1, src_l, n + fvg_extend, math.avg(src_l, src_h2)
          , border_color = bull_fvg_css
          , bgcolor = bull_fvg_css))
        
        array.unshift(bullish_fvg_min, box.new(n-1, math.avg(src_l, src_h2), n + fvg_extend, src_h2
          , border_color = bull_fvg_css
          , bgcolor = bull_fvg_css))
    
    if bearish_fvg_cnd
        array.unshift(bearish_fvg_max, box.new(n-1, src_h, n + fvg_extend, math.avg(src_h, src_l2)
          , border_color = bear_fvg_css
          , bgcolor = bear_fvg_css))
        
        array.unshift(bearish_fvg_min, box.new(n-1, math.avg(src_h, src_l2), n + fvg_extend, src_l2
          , border_color = bear_fvg_css
          , bgcolor = bear_fvg_css))

    for bx in bullish_fvg_min
        if low < box.get_bottom(bx)
            box.delete(bx)
            box.delete(array.get(bullish_fvg_max, array.indexof(bullish_fvg_min, bx)))
    
    for bx in bearish_fvg_max
        if high > box.get_top(bx)
            box.delete(bx)
            box.delete(array.get(bearish_fvg_min, array.indexof(bearish_fvg_max, bx)))

//-----------------------------------------------------------------------------}
//Previous day/week high/lows
//-----------------------------------------------------------------------------{
//Daily high/low
[pdh, pdl] = request.security(syminfo.tickerid, 'D', hl()
  , lookahead = barmerge.lookahead_on)

//Weekly high/low
[pwh, pwl] = request.security(syminfo.tickerid, 'W', hl()
  , lookahead = barmerge.lookahead_on)

//Monthly high/low
[pmh, pml] = request.security(syminfo.tickerid, 'M', hl()
  , lookahead = barmerge.lookahead_on)

//Display Daily
if show_pdhl
    phl(pdh, pdl, 'D', pdhl_css)

//Display Weekly
if show_pwhl
    phl(pwh, pwl, 'W', pwhl_css)
    
//Display Monthly
if show_pmhl
    phl(pmh, pml, 'M', pmhl_css)

//-----------------------------------------------------------------------------}
//Premium/Discount/Equilibrium zones
//-----------------------------------------------------------------------------{
var premium = box.new(na, na, na, na
  , bgcolor = color.new(premium_css, 80)
  , border_color = na)

var premium_lbl = label.new(na, na
  , text = 'Premium'
  , color = TRANSP_CSS
  , textcolor = premium_css
  , style = label.style_label_down
  , size = size.small)

var eq = box.new(na, na, na, na
  , bgcolor = color.rgb(120, 123, 134, 80)
  , border_color = na)

var eq_lbl = label.new(na, na
  , text = 'Equilibrium'
  , color = TRANSP_CSS
  , textcolor = eq_css
  , style = label.style_label_left
  , size = size.small)

var discount = box.new(na, na, na, na
  , bgcolor = color.new(discount_css, 80)
  , border_color = na)

var discount_lbl = label.new(na, na
  , text = 'Discount'
  , color = TRANSP_CSS
  , textcolor = discount_css
  , style = label.style_label_up
  , size = size.small)

//Show Premium/Discount Areas
if barstate.islast and show_sd
    avg = math.avg(trail_up, trail_dn)

    box.set_lefttop(premium, math.max(top_x, btm_x), trail_up)
    box.set_rightbottom(premium, n, .95 * trail_up + .05 * trail_dn)

    label.set_xy(premium_lbl, int(math.avg(math.max(top_x, btm_x), n)), trail_up)

    box.set_lefttop(eq, math.max(top_x, btm_x), .525 * trail_up + .475*trail_dn)
    box.set_rightbottom(eq, n, .525 * trail_dn + .475 * trail_up)

    label.set_xy(eq_lbl, n, avg)
    
    box.set_lefttop(discount, math.max(top_x, btm_x), .95 * trail_dn + .05 * trail_up)
    box.set_rightbottom(discount, n, trail_dn)
    label.set_xy(discount_lbl, int(math.avg(math.max(top_x, btm_x), n)), trail_dn)

//-----------------------------------------------------------------------------}
//Trend
//-----------------------------------------------------------------------------{
var color trend_css = na

if show_trend
    if style == 'Colored'
        trend_css := itrend == 1 ? bull_css : bear_css
    else if style == 'Monochrome'
        trend_css := itrend == 1 ? #b2b5be : #5d606b

plotcandle(open, high, low, close
  , color = trend_css
  , wickcolor = trend_css
  , bordercolor = trend_css
  , editable = false)

//-----------------------------------------------------------------------------}
//Alerts
//-----------------------------------------------------------------------------{
//Internal Structure
alertcondition(bull_ibos_alert, 'Internal Bullish BOS', 'Internal Bullish BOS formed')
alertcondition(bull_ichoch_alert, 'Internal Bullish CHoCH', 'Internal Bullish CHoCH formed')

alertcondition(bear_ibos_alert, 'Internal Bearish BOS', 'Internal Bearish BOS formed')
alertcondition(bear_ichoch_alert, 'Internal Bearish CHoCH', 'Internal Bearish CHoCH formed')

//Swing Structure
alertcondition(bull_bos_alert, 'Bullish BOS', 'Internal Bullish BOS formed')
alertcondition(bull_choch_alert, 'Bullish CHoCH', 'Internal Bullish CHoCH formed')

alertcondition(bear_bos_alert, 'Bearish BOS', 'Bearish BOS formed')
alertcondition(bear_choch_alert, 'Bearish CHoCH', 'Bearish CHoCH formed')

//order Blocks
alertcondition(bull_iob_break, 'Bullish Internal OB Breakout', 'Price broke bullish iternal OB')
alertcondition(bear_iob_break, 'Bearish Internal OB Breakout', 'Price broke bearish iternal OB')

alertcondition(bull_ob_break, 'Bullish OB Breakout', 'Price broke bullish iternal OB')
alertcondition(bear_ob_break, 'bearish OB Breakout', 'Price broke bearish iternal OB')

//EQH/EQL
alertcondition(eqh_alert, 'Equal Highs', 'Equal highs detected')
alertcondition(eql_alert, 'Equal Lows', 'Equal lows detected')

//FVG
alertcondition(bullish_fvg_cnd, 'Bullish FVG', 'Bullish FVG formed')
alertcondition(bearish_fvg_cnd, 'Bearish FVG', 'Bearish FVG formed')

//-----------------------------------------------------------------------------}

i converted some part of codes. some expert need to finish code

Code: Select all

//+------------------------------------------------------------------+
//|                                                   SMCluxalgo.mq4 |
//|                                  Copyright 2023, MetaQuotes Ltd. |
//|                                             https://www.mql5.com |
//+------------------------------------------------------------------+
// This work is licensed under a Attribution-NonCommercial-ShareAlike 4.0 International (CC BY-NC-SA 4.0) https://creativecommons.org/licenses/by-nc-sa/4.0/
// © LuxAlgo

#property indicator_chart_window
#property indicator_buffers 9
#property indicator_plots 9

//Constants
extern color TRANSP_CSS = CLR_NONE;

//Tooltips
string MODE_TOOLTIP = "Allows to display historical Structure or only the recent ones";
string STYLE_TOOLTIP = "Indicator color theme";
string COLOR_CANDLES_TOOLTIP = "Display additional candles with a color reflecting the current trend detected by structure";
string SHOW_INTERNAL = "Display internal market structure";
string CONFLUENCE_FILTER = "Filter non significant internal structure breakouts";
string SHOW_SWING = "Display swing market Structure";
string SHOW_SWING_POINTS = "Display swing point as labels on the chart";
string SHOW_SWHL_POINTS = "Highlight most recent strong and weak high/low points on the chart";
string INTERNAL_OB = "Display internal order blocks on the chart\n\nNumber of internal order blocks to display on the chart";
string SWING_OB = "Display swing order blocks on the chart\n\nNumber of internal swing blocks to display on the chart";
string FILTER_OB = "Method used to filter out volatile order blocks \n\nIt is recommended to use the cumulative mean range method when a low amount of data is available";
string SHOW_EQHL = "Display equal highs and equal lows on the chart";
string EQHL_BARS = "Number of bars used to confirm equal highs and equal lows";
string EQHL_THRESHOLD = "Sensitivity threshold in a range (0, 1) used for the detection of equal highs & lows\n\nLower values will return fewer but more pertinent results";
string SHOW_FVG = "Display fair values gaps on the chart";
string AUTO_FVG = "Filter out non significant fair value gaps";
string FVG_TF = "Fair value gaps timeframe";
string EXTEND_FVG = "Determine how many bars to extend the Fair Value Gap boxes on chart";
string PED_ZONES = "Display premium, discount, and equilibrium zones on chart";

// ... rest of the code

// Declaration of ENUM_BEAR_STRUCT_OPTIONS
enum ENUM_MODE_OPTIONS
{
    Historical,
    Present
   
};
enum ENUM_STYLE_OPTIONS
{
    Colored,
    Monochrome
   
};

enum ENUM_BULLBEAR_STRUCT_OPTIONS
{
    ALL,
    BOS,
    CHoCH
};


// Declaration of ENUM_LABEL_SIZE
enum ENUM_LABEL_SIZE
{
    TINY,
    SMALL,
    NORMAL
};

// Declaration of ENUM_OB_FILTER
enum ENUM_OB_FILTER
{
    Atr,
    CumulativeMeanRange
};

// Previous day/week high/low
enum ENUM_PDHL_STYLE
{
   Solid,
   Dash,
   Dot
};

//Generals

input ENUM_MODE_OPTIONS mode = Historical;

input ENUM_STYLE_OPTIONS style = Colored;
extern bool SHOW_TREND = false; 

//Internal structures
extern bool show_internals = false;

//Bull Structure
input ENUM_BULLBEAR_STRUCT_OPTIONS show_ibull = ALL;
input int swing_ibull_css = clrGreen;
//Bear Structure
input ENUM_BULLBEAR_STRUCT_OPTIONS show_ibear = ALL;
input int swing_ibear_css = clrRed;

input bool ifilter_confluence = false;
input ENUM_LABEL_SIZE internal_structure_size = TINY;


//Swing structures
extern bool show_Structure = false;

//Bull Structure
input ENUM_BULLBEAR_STRUCT_OPTIONS show_bull = ALL;
input int swing_bull_css = clrGreen;
//Bear Structure
input ENUM_BULLBEAR_STRUCT_OPTIONS show_bear = ALL;
input int swing_bear_css = clrRed;

input ENUM_LABEL_SIZE swing_structure_size = TINY;

extern bool show_swings = false;
extern bool show_hl_swings =false;
extern int length = 50; // Real Time Swing Structure - Length

// Order Blocks
input bool show_iob = true; // Internal Order Blocks
input int iob_showlast = 5; // Number of internal order blocks to display on the chart

// Order Blocks
input bool show_ob = false; // Swing Order Blocks
input int ob_showlast = 5; // Number of swing order blocks to display on the chart
input ENUM_OB_FILTER ob_filter = Atr; // Order Block Filter
// Order Blocks
input color ibull_ob_css = DodgerBlue; // Internal Bullish OB
input color ibear_ob_css = Tomato; // Internal Bearish OB
input color bull_ob_css = RoyalBlue; // Bullish OB
input color bear_ob_css = FireBrick; // Bearish OB
// EQH/EQL
input bool show_eq = true; // Equal High/Low
input int eq_len = 3; // Bars Confirmation
input double eq_threshold = 0.1; // Threshold
input ENUM_LABEL_SIZE eq_size = TINY; // Label Size

// Fair Value Gaps
input bool show_fvg = false; // Fair Value Gaps
input bool fvg_auto = true; // Auto Threshold
input ENUM_TIMEFRAMES fvg_tf; // Timeframe
input color bull_fvg_css = clrPaleGreen; // Bullish FVG
input color bear_fvg_css = clrRed; // Bearish FVG
input int fvg_extend = 1; // Extend FVG
// Previous day/week high/low
input bool show_pdhl = false; // Daily
input ENUM_PDHL_STYLE pdhl_style = Solid ; // Daily Style
input color pdhl_css = clrDodgerBlue; // Daily Color

// Weekly
bool show_pwhl = false;
input ENUM_PDHL_STYLE pwhl_style =  Solid; // Daily Style
color pwhl_css = clrBlue;

// Monthly
bool show_pmhl = false;
input ENUM_PDHL_STYLE pmhl_style =  Solid; // Daily Style
color pmhl_css = clrBlue;

// Premium/Discount zones
bool show_sd = false;

color premium_css = Red;
color eq_css = clrSilver;
color discount_css = clrAqua;

double atr;
double cmean_range;
int n;



//Global variables
int trend = 0;
int itrend = 0;

double top_y = 0.0;
int top_x = 0;
double btm_y = 0.0;
int btm_x = 0;

double itop_y = 0.0;
int itop_x = 0;
double ibtm_y = 0.0;
int ibtm_x = 0;

double trail_up = High[0];
double trail_dn = Low[0];
int trail_up_x = 0;
int trail_dn_x = 0;

bool top_cross = true;
bool btm_cross = true;
bool itop_cross = true;
bool ibtm_cross = true;

string txt_top = "";
string txt_btm = "";

// Alerts
bool bull_choch_alert = false;
bool bull_bos_alert = false;

bool bear_choch_alert = false;
bool bear_bos_alert = false;

bool bull_ichoch_alert = false;
bool bull_ibos_alert = false;

bool bear_ichoch_alert = false;
bool bear_ibos_alert = false;

bool bull_iob_break = false;
bool bear_iob_break = false;

bool bull_ob_break = false;
bool bear_ob_break = false;

bool eqh_alert = false;
bool eql_alert = false;

// Structure colors
color bull_css = (style == "Monochrome") ? clrGray : swing_bull_css;
color bear_css = (style == "Monochrome") ? clrGray : swing_bear_css;
color ibull_css = (style == "Monochrome") ? clrGray : swing_ibull_css;
color ibear_css = (style == "Monochrome") ? clrGray : swing_ibear_css;



//+------------------------------------------------------------------+
//| Custom indicator initialization function                         |
//+------------------------------------------------------------------+
int OnInit()
  {
//--- indicator buffers mapping
 
    n = Bars - 1;
    
    double sum = 0.0;
    for (int i = 0; i < n; i++)
    {
        sum += High[i] - Low[i];
    }
    cmean_range = sum / n;
    
    atr = iATR(NULL,0,200,0);
    
   
    

    
//---
   return(INIT_SUCCEEDED);
  }
  
 void HL(double& high, double& low)
{
    high = High[0];
    low = Low[0];
}


void GetOHLC(double &close1, double &open1, double &high, double &low, double &high2, double &low2)
{
    close1 = Close[1];   // Previous close
    open1 = Open[1];     // Previous open
    high = High[0];      // Current high
    low = Low[0];        // Current low
    high2 = High[2];     // Two bars ago high
    low2 = Low[2];       // Two bars ago low
}
// Display Structure function
void display_Structure(double x, double y, string txt, color css, bool dashed, bool down, int lbl_size)
{
    string structure_line = ObjectCreate(0, "structure_line", OBJ_TREND, 0, 0, 0);
    ObjectSetInteger(0, "structure_line", OBJPROP_COLOR, css);
    ObjectSetInteger(0, "structure_line", OBJPROP_STYLE, dashed ? STYLE_DASH : STYLE_SOLID);
    ObjectSetDouble(0, "structure_line", OBJPROP_PRICE1, y);
    ObjectSetDouble(0, "structure_line", OBJPROP_PRICE2, y);

    string structure_lbl = ObjectCreate(0, "structure_lbl", OBJ_LABEL, 0, 0, 0);
    ObjectSetInteger(0, "structure_lbl", OBJPROP_COLOR, TRANSP_CSS);
    ObjectSetInteger(0, "structure_lbl", OBJPROP_TEXT, css);
    ObjectSetInteger(0, "structure_lbl", OBJPROP_STYLE, down ? STYLE_DASHDOT : STYLE_DASHDOTDOT);
    ObjectSetInteger(0, "structure_lbl", OBJPROP_FONTSIZE, lbl_size);
    ObjectSetString(0, "structure_lbl", OBJPROP_TEXT, txt);
    ObjectSetDouble(0, "structure_lbl", OBJPROP_XDISTANCE, (x + n) / 2);
    ObjectSetDouble(0, "structure_lbl", OBJPROP_YDISTANCE, y);

    if (mode == "Present")
    {
        ObjectDelete(0, "structure_line");
        ObjectDelete(0, "structure_lbl");
    }
}
void swings(int len, double &out_top, double &out_bottom)
{
    static double upper, lower;
    static int os = 0;
    
 
    
    if (len >= Bars)
    {
        Print("Error: Length exceeds available bars");
        return;
    }
    
    upper = iHighest(NULL, 0, MODE_HIGH, len, 0);
    lower = iLowest(NULL, 0, MODE_LOW, len, 0);

    if (High[len] > upper)
        os = 0;
    else if (Low[len] < lower)
        os = 1;

    double prev_os = os;
    os = High[len] > upper ? 0 : Low[len] < lower ? 1 : os;

    double top = (os == 0 && prev_os != 0) ? High[len] : 0;
    double bottom = (os == 1 && prev_os != 1) ? Low[len] : 0;

    out_top = top;
    out_bottom = bottom;
}
void ob_coord(bool use_max, int loc, double& target_top[], double& target_btm[], datetime& target_left[], int& target_type[])
{
    double min = 99999999.0;
    double max = 0.0;
    int idx = 1;

    double ob_threshold;

    if (ob_filter == "Atr")
        ob_threshold = atr;
    else
        ob_threshold = cmean_range;

    if (use_max)
    {
        for (int i = 1; i <= (n - loc) - 1; i++)
        {
            if ((High[i] - Low[i]) < ob_threshold * 2)
            {
                max = MathMax(High[i], max);
                min = (max == High[i]) ? Low[i] : min;
                idx = (max == High[i]) ? i : idx;
            }
        }
    }
    else
    {
        for ( i = 1; i <= (n - loc) - 1; i++)
        {
            if ((High[i] - Low[i]) < ob_threshold * 2)
            {
                min = MathMin(Low[i], min);
                max = (min == Low[i]) ? High[i] : max;
                idx = (min == Low[i]) ? i : idx;
            }
        }
    }

    ArrayResize(target_top, ArraySize(target_top) + 1);
    ArrayResize(target_btm, ArraySize(target_btm) + 1);
    ArrayResize(target_left, ArraySize(target_left) + 1);
    ArrayResize(target_type, ArraySize(target_type) + 1);

    for ( i = ArraySize(target_top) - 2; i >= 0; i--)
    {
        target_top[i + 1] = target_top[i];
        target_btm[i + 1] = target_btm[i];
        target_left[i + 1] = target_left[i];
        target_type[i + 1] = target_type[i];
    }

    target_top[0] = max;
    target_btm[0] = min;
    target_left[0] = Time[idx];
    target_type[0] = use_max ? -1 : 1;
}
void display_ob(const string& boxes, const double& target_top[], const double& target_btm[], const datetime& target_left[], const int& target_type[], int show_last, bool swing, int size)
{
    int loop_count = MathMin(show_last - 1, size - 1);

    for (int i = 0; i <= loop_count; i++)
    {
        int get_box = i;

        ObjectSetDouble(boxes, OBJPROP_PRICE1, get_box, target_top[i]);
        ObjectSetDouble(boxes, OBJPROP_PRICE2, get_box, target_btm[i]);
        ObjectSetInteger(boxes, OBJPROP_TIME1, get_box, target_left[i]);

        color css = clrNONE;

        if (swing)
        {
            if (style == "Monochrome")
            {
                css = target_type[i] == 1 ? Silver : DimGray;
                color border_css = target_type[i] == 1 ? Silver : DimGray;
                ObjectSetInteger(boxes, OBJPROP_COLOR, get_box, border_css);
            }
            else
            {
                css = target_type[i] == 1 ? bull_ob_css : bear_ob_css;
                ObjectSetInteger(boxes, OBJPROP_COLOR, get_box, css);
            }

            ObjectSetInteger(boxes, OBJPROP_BGCOLOR, get_box, css);
        }
        else
        {
            if (style == "Monochrome")
            {
                css = target_type[i] == 1 ? Silver : DimGray;
            }
            else
            {
                css = target_type[i] == 1 ? ibull_ob_css : ibear_ob_css;
            }

            ObjectSetInteger(boxes, OBJPROP_COLOR, get_box, css);
            ObjectSetInteger(boxes, OBJPROP_BGCOLOR, get_box, css);
        }
    }
}

int get_line_style(const ENUM_PDHL_STYLE style)
{
    int out;
    
    if (style ==Solid )
        out = STYLE_SOLID;
    else if (style == Dash)
        out = STYLE_DASH;
    else if (style == Dot)
        out = STYLE_DOT;
    
    return out;
}

void phl(const double& h, const double& l, const string& tf, const color& css)
{
    int xloc = OBJPROP_TIME;

    int high_line = ObjectCreate(0, "HighLine", OBJ_TREND, 0, 0, 0);
     ObjectSetInteger(0, "HighLine", OBJPROP_STYLE, get_line_style(pdhl_style));
    ObjectSetInteger(0, "HighLine", OBJPROP_COLOR, css);
    ObjectSetInteger(0, "HighLine", OBJPROP_XDISTANCE, 20);
    ObjectSetInteger(0, "HighLine", OBJPROP_XOFFSET, -20);

    int high_lbl = ObjectCreate(0, "HighLabel", OBJ_LABEL, 0, 0, 0);
    ObjectSetString(0, "HighLabel", OBJPROP_TEXT, "PH" + tf);
    ObjectSetInteger(0, "HighLabel", OBJPROP_COLOR, css);
    ObjectSetInteger(0, "HighLabel", OBJPROP_FONTSIZE, 8);
    ObjectSetInteger(0, "HighLabel", OBJPROP_XDISTANCE, 20);
    ObjectSetInteger(0, "HighLabel", OBJPROP_XOFFSET, -20);
    ObjectSetInteger(0, "HighLabel", OBJPROP_ALIGN, TA_LEFT);

    int low_line = ObjectCreate(0, "LowLine", OBJ_TREND, 0, 0, 0);
    ObjectSetInteger(0, "LowLine", OBJPROP_STYLE, get_line_style(pdhl_style));
    ObjectSetInteger(0, "LowLine", OBJPROP_COLOR, css);
    ObjectSetInteger(0, "LowLine", OBJPROP_XDISTANCE, 20);
    ObjectSetInteger(0, "LowLine", OBJPROP_XOFFSET, -20);

    int low_lbl = ObjectCreate(0, "LowLabel", OBJ_LABEL, 0, 0, 0);
    ObjectSetString(0, "LowLabel", OBJPROP_TEXT, "PL" + tf);
    ObjectSetInteger(0, "LowLabel", OBJPROP_COLOR, css);
    ObjectSetInteger(0, "LowLabel", OBJPROP_FONTSIZE, 8);
    ObjectSetInteger(0, "LowLabel", OBJPROP_XDISTANCE, 20);
    ObjectSetInteger(0, "LowLabel", OBJPROP_XOFFSET, -20);
    ObjectSetInteger(0, "LowLabel", OBJPROP_ALIGN, TA_LEFT);

    double hy = iHigh(Symbol(), 0, 1);
    double hx = iTime(Symbol(), 0, 1);

    double ly = iLow(Symbol(), 0, 1);
    double lx = iTime(Symbol(), 0, 1);
    
    int totalBars = Bars;
    int currentBar = iBarShift(Symbol(), 0, Time[0]);

    if (currentBar == totalBars - 1)
    {
        datetime ext = Time[0] + (Time[0] - Time[1]) * 20;

        // High
        ObjectSetInteger(0, "HighLine", OBJPROP_TIME1, hx);
        ObjectSetDouble(0, "HighLine", OBJPROP_PRICE1, hy);
        ObjectSetInteger(0, "HighLine", OBJPROP_TIME2, ext);
        ObjectSetDouble(0, "HighLine", OBJPROP_PRICE2, hy);

        ObjectSetInteger(0, "HighLabel", OBJPROP_TIME1, ext);
        ObjectSetDouble(0, "HighLabel", OBJPROP_PRICE1, hy);

        // Low
        ObjectSetInteger(0, "LowLine", OBJPROP_TIME1, lx);
        ObjectSetDouble(0, "LowLine", OBJPROP_PRICE1, ly);
        ObjectSetInteger(0, "LowLine", OBJPROP_TIME2, ext);
        ObjectSetDouble(0, "LowLine", OBJPROP_PRICE2, ly);

        ObjectSetInteger(0, "LowLabel", OBJPROP_TIME1, ext);
        ObjectSetDouble(0, "LowLabel", OBJPROP_PRICE1, ly);
    }
}


//| Custom indicator iteration function                              |
//+------------------------------------------------------------------+
int OnCalculate(const int rates_total,
                const int prev_calculated,
                const datetime &time[],
                const double &open[],
                const double &high[],
                const double &low[],
                const double &close[],
                const long &tick_volume[],
                const long &volume[],
                const int &spread[])
  {
//---
   
//--- return value of prev_calculated for next call
   return(rates_total);
  }
//+------------------------------------------------------------------+

Re: Already Converted TradingView Indicators to MT4 Indicators

Posted: Thu Nov 02, 2023 10:57 pm
by BeatlemaniaSA
Why do you want to go to all that effort of converting it when Luxalgo has released the MT4 version of the Smart Money Concepts indicator for FREE?

It is NOT a cracked version but their own!

Here you go...
LuxAlgo - Smart Money Concepts.ex4 Downloaded 3949 times 219.84 KiB
Then again learning to covert the code would be great for coders ;-)

Re: Already Converted TradingView Indicators to MT4 Indicators

Posted: Fri Nov 03, 2023 12:30 am
by Jimmy
menber100 wrote: Mon Feb 06, 2023 12:13 pm Great Coders, I humbly beg everyone to convert this great indicator from tradingview to mt4, the indicator is open source and freely available, please help me by converting this indicator to mt4.
Image

Code: Select all

// © LuxAlgo

//@version=5
indicator("Smart Money Concepts [LUX]", "Smart Money Concepts [LuxAlgo]"
  , overlay = true
  , max_labels_count = 500
  , max_lines_count = 500
  , max_boxes_count = 500
  , max_bars_back = 500)
//-----------------------------------------------------------------------------{
//Constants
//-----------------------------------------------------------------------------{
color TRANSP_CSS = #ffffff00

//Tooltips
string MODE_TOOLTIP          = 'Allows to display historical Structure or only the recent ones'
string STYLE_TOOLTIP         = 'Indicator color theme'
string COLOR_CANDLES_TOOLTIP = 'Display additional candles with a color reflecting the current trend detected by structure'
string SHOW_INTERNAL         = 'Display internal market structure'
string CONFLUENCE_FILTER     = 'Filter non significant internal structure breakouts'
string SHOW_SWING            = 'Display swing market Structure'
string SHOW_SWING_POINTS     = 'Display swing point as labels on the chart'
string SHOW_SWHL_POINTS      = 'Highlight most recent strong and weak high/low points on the chart'
string INTERNAL_OB           = 'Display internal order blocks on the chart\n\nNumber of internal order blocks to display on the chart'
string SWING_OB              = 'Display swing order blocks on the chart\n\nNumber of internal swing blocks to display on the chart'
string FILTER_OB             = 'Method used to filter out volatile order blocks \n\nIt is recommended to use the cumulative mean range method when a low amount of data is available'
string SHOW_EQHL             = 'Display equal highs and equal lows on the chart'
string EQHL_BARS             = 'Number of bars used to confirm equal highs and equal lows'
string EQHL_THRESHOLD        = 'Sensitivity threshold in a range (0, 1) used for the detection of equal highs & lows\n\nLower values will return fewer but more pertinent results'
string SHOW_FVG              = 'Display fair values gaps on the chart'
string AUTO_FVG              = 'Filter out non significant fair value gaps'
string FVG_TF                = 'Fair value gaps timeframe'
string EXTEND_FVG            = 'Determine how many bars to extend the Fair Value Gap boxes on chart'
string PED_ZONES             = 'Display premium, discount, and equilibrium zones on chart'

//-----------------------------------------------------------------------------{
//Settings
//-----------------------------------------------------------------------------{
//General
//----------------------------------------{
mode = input.string('Historical'
  , options = ['Historical', 'Present']
  , group = 'Smart Money Concepts'
  , tooltip = MODE_TOOLTIP)

style = input.string('Colored'
  , options = ['Colored', 'Monochrome']
  , group = 'Smart Money Concepts'
  , tooltip = STYLE_TOOLTIP)

show_trend = input(false, 'Color Candles'
  , group = 'Smart Money Concepts'
  , tooltip = COLOR_CANDLES_TOOLTIP)

//----------------------------------------}
//Internal Structure
//----------------------------------------{
show_internals = input(true, 'Show Internal Structure'
  , group = 'Real Time Internal Structure'
  , tooltip = SHOW_INTERNAL)

show_ibull = input.string('All', 'Bullish Structure'
  , options = ['All', 'BOS', 'CHoCH']
  , inline = 'ibull'
  , group = 'Real Time Internal Structure')

swing_ibull_css = input(#089981, ''
  , inline = 'ibull'
  , group = 'Real Time Internal Structure')

//Bear Structure
show_ibear = input.string('All', 'Bearish Structure'
  , options = ['All', 'BOS', 'CHoCH']
  , inline = 'ibear'
  , group = 'Real Time Internal Structure')

swing_ibear_css = input(#f23645, ''
  , inline = 'ibear'
  , group = 'Real Time Internal Structure')

ifilter_confluence = input(false, 'Confluence Filter'
  , group = 'Real Time Internal Structure'
  , tooltip = CONFLUENCE_FILTER)

//----------------------------------------}
//Swing Structure
//----------------------------------------{
show_Structure = input(true, 'Show Swing Structure'
  , group = 'Real Time Swing Structure'
  , tooltip = SHOW_SWING)

//Bull Structure
show_bull = input.string('All', 'Bullish Structure'
  , options = ['All', 'BOS', 'CHoCH']
  , inline = 'bull'
  , group = 'Real Time Swing Structure')

swing_bull_css = input(#089981, ''
  , inline = 'bull'
  , group = 'Real Time Swing Structure')

//Bear Structure
show_bear = input.string('All', 'Bearish Structure'
  , options = ['All', 'BOS', 'CHoCH']
  , inline = 'bear'
  , group = 'Real Time Swing Structure')

swing_bear_css = input(#f23645, ''
  , inline = 'bear'
  , group = 'Real Time Swing Structure')

//Swings
show_swings = input(false, 'Show Swings Points'
  , inline = 'swings'
  , group = 'Real Time Swing Structure'
  , tooltip = SHOW_SWING_POINTS)

length = input.int(50, ''
  , minval = 10
  , inline = 'swings'
  , group = 'Real Time Swing Structure')

show_hl_swings = input(true, 'Show Strong/Weak High/Low'
  , group = 'Real Time Swing Structure'
  , tooltip = SHOW_SWHL_POINTS)

//----------------------------------------}
//Order Blocks
//----------------------------------------{
show_iob = input(true, 'Internal Order Blocks'
  , inline = 'iob'
  , group = 'Order Blocks'
  , tooltip = INTERNAL_OB)

iob_showlast = input.int(5, ''
  , minval = 1
  , inline = 'iob'
  , group = 'Order Blocks')

show_ob = input(false, 'Swing Order Blocks'
  , inline = 'ob'
  , group = 'Order Blocks'
  , tooltip = SWING_OB)

ob_showlast = input.int(5, ''
  , minval = 1
  , inline = 'ob'
  , group = 'Order Blocks')

ob_filter = input.string('Atr', 'Order Block Filter'
  , options = ['Atr', 'Cumulative Mean Range']
  , group = 'Order Blocks'
  , tooltip = FILTER_OB)

ibull_ob_css = input.color(color.new(#3179f5, 80), 'Internal Bullish OB'
  , group = 'Order Blocks')

ibear_ob_css = input.color(color.new(#f77c80, 80), 'Internal Bearish OB'
  , group = 'Order Blocks')

bull_ob_css = input.color(color.new(#1848cc, 80), 'Bullish OB'
  , group = 'Order Blocks')

bear_ob_css = input.color(color.new(#b22833, 80), 'Bearish OB'
  , group = 'Order Blocks')

//----------------------------------------}
//EQH/EQL
//----------------------------------------{
show_eq = input(true, 'Equal High/Low'
  , group = 'EQH/EQL'
  , tooltip = SHOW_EQHL)

eq_len = input.int(3, 'Bars Confirmation'
  , minval = 1
  , group = 'EQH/EQL'
  , tooltip = EQHL_BARS)

eq_threshold = input.float(0.1, 'Threshold'
  , minval = 0
  , maxval = 0.5
  , step = 0.1
  , group = 'EQH/EQL'
  , tooltip = EQHL_THRESHOLD)

//----------------------------------------}
//Fair Value Gaps
//----------------------------------------{
show_fvg = input(false, 'Fair Value Gaps'
  , group = 'Fair Value Gaps'
  , tooltip = SHOW_FVG)
  
fvg_auto = input(true, "Auto Threshold"
  , group = 'Fair Value Gaps'
  , tooltip = AUTO_FVG)

fvg_tf = input.timeframe('', "Timeframe"
  , group = 'Fair Value Gaps'
  , tooltip = FVG_TF)

bull_fvg_css = input.color(color.new(#00ff68, 70), 'Bullish FVG'
  , group = 'Fair Value Gaps')

bear_fvg_css = input.color(color.new(#ff0008, 70), 'Bearish FVG'
  , group = 'Fair Value Gaps')

fvg_extend = input.int(1, "Extend FVG"
  , minval = 0
  , group = 'Fair Value Gaps'
  , tooltip = EXTEND_FVG)

//----------------------------------------}
//Previous day/week high/low
//----------------------------------------{
//Daily
show_pdhl = input(false, 'Daily'
  , inline = 'daily'
  , group = 'Highs & Lows MTF')

pdhl_style = input.string('⎯⎯⎯', ''
  , options = ['⎯⎯⎯', '----', '····']
  , inline = 'daily'
  , group = 'Highs & Lows MTF')

pdhl_css = input(#2157f3, ''
  , inline = 'daily'
  , group = 'Highs & Lows MTF')

//Weekly
show_pwhl = input(false, 'Weekly'
  , inline = 'weekly'
  , group = 'Highs & Lows MTF')

pwhl_style = input.string('⎯⎯⎯', ''
  , options = ['⎯⎯⎯', '----', '····']
  , inline = 'weekly'
  , group = 'Highs & Lows MTF')

pwhl_css = input(#2157f3, ''
  , inline = 'weekly'
  , group = 'Highs & Lows MTF')

//Monthly
show_pmhl = input(false, 'Monthly'
  , inline = 'monthly'
  , group = 'Highs & Lows MTF')

pmhl_style = input.string('⎯⎯⎯', ''
  , options = ['⎯⎯⎯', '----', '····']
  , inline = 'monthly'
  , group = 'Highs & Lows MTF')

pmhl_css = input(#2157f3, ''
  , inline = 'monthly'
  , group = 'Highs & Lows MTF')

//----------------------------------------}
//Premium/Discount zones
//----------------------------------------{
show_sd = input(false, 'Premium/Discount Zones'
  , group = 'Premium & Discount Zones'
  , tooltip = PED_ZONES)

premium_css = input.color(#f23645, 'Premium Zone'
  , group = 'Premium & Discount Zones')

eq_css = input.color(#b2b5be, 'Equilibrium Zone'
  , group = 'Premium & Discount Zones')

discount_css = input.color(#089981, 'Discount Zone'
  , group = 'Premium & Discount Zones')

//-----------------------------------------------------------------------------}
//Functions
//-----------------------------------------------------------------------------{
n = bar_index

atr = ta.atr(200)
cmean_range = ta.cum(high - low) / n

//HL Output function
hl() => [high, low]

//Get ohlc values function
get_ohlc()=> [close[1], open[1], high, low, high[2], low[2]]

//Display Structure function
display_Structure(x, y, txt, css, dashed, down, lbl_size)=>
    structure_line = line.new(x, y, n, y
      , color = css
      , style = dashed ? line.style_dashed : line.style_solid)

    structure_lbl = label.new(int(math.avg(x, n)), y, txt
      , color = TRANSP_CSS
      , textcolor = css
      , style = down ? label.style_label_down : label.style_label_up
      , size = lbl_size)

    if mode == 'Present'
        line.delete(structure_line[1])
        label.delete(structure_lbl[1])

//Swings detection/measurements
swings(len)=>
    var os = 0
    
    upper = ta.highest(len)
    lower = ta.lowest(len)

    os := high[len] > upper ? 0 : low[len] < lower ? 1 : os[1]

    top = os == 0 and os[1] != 0 ? high[len] : 0
    btm = os == 1 and os[1] != 1 ? low[len] : 0

    [top, btm]

//Order block coordinates function
ob_coord(use_max, loc, target_top, target_btm, target_left, target_type)=>
    min = 99999999.
    max = 0.
    idx = 1

    ob_threshold = ob_filter == 'Atr' ? atr : cmean_range 

    //Search for highest/lowest high within the structure interval and get range
    if use_max
        for i = 1 to (n - loc)-1
            if (high[i] - low[i]) < ob_threshold[i] * 2
                max := math.max(high[i], max)
                min := max == high[i] ? low[i] : min
                idx := max == high[i] ? i : idx
    else
        for i = 1 to (n - loc)-1
            if (high[i] - low[i]) < ob_threshold[i] * 2
                min := math.min(low[i], min)
                max := min == low[i] ? high[i] : max
                idx := min == low[i] ? i : idx

    array.unshift(target_top, max)
    array.unshift(target_btm, min)
    array.unshift(target_left, time[idx])
    array.unshift(target_type, use_max ? -1 : 1)

//Set order blocks
display_ob(boxes, target_top, target_btm, target_left, target_type, show_last, swing, size)=>
    for i = 0 to math.min(show_last-1, size-1)
        get_box = array.get(boxes, i)

        box.set_lefttop(get_box, array.get(target_left, i), array.get(target_top, i))
        box.set_rightbottom(get_box, array.get(target_left, i), array.get(target_btm, i))
        box.set_extend(get_box, extend.right)

        color css = na
        
        if swing 
            if style == 'Monochrome'
                css := array.get(target_type, i) == 1 ? color.new(#b2b5be, 80) : color.new(#5d606b, 80)
                border_css = array.get(target_type, i) == 1 ? #b2b5be : #5d606b
                box.set_border_color(get_box, border_css)
            else
                css := array.get(target_type, i) == 1 ? bull_ob_css : bear_ob_css
                box.set_border_color(get_box, css)

            box.set_bgcolor(get_box, css)
        else
            if style == 'Monochrome'
                css := array.get(target_type, i) == 1 ? color.new(#b2b5be, 80) : color.new(#5d606b, 80)
            else
                css := array.get(target_type, i) == 1 ? ibull_ob_css : ibear_ob_css
            
            box.set_border_color(get_box, css)
            box.set_bgcolor(get_box, css)
        
//Line Style function
get_line_style(style) =>
    out = switch style
        '⎯⎯⎯'  => line.style_solid
        '----' => line.style_dashed
        '····' => line.style_dotted

//Set line/labels function for previous high/lows
phl(h, l, tf, css)=>
    var line high_line = line.new(na,na,na,na
      , xloc = xloc.bar_time
      , color = css
      , style = get_line_style(pdhl_style))

    var label high_lbl = label.new(na,na
      , xloc = xloc.bar_time
      , text = str.format('P{0}H', tf)
      , color = TRANSP_CSS
      , textcolor = css
      , size = size.small
      , style = label.style_label_left)

    var line low_line = line.new(na,na,na,na
      , xloc = xloc.bar_time
      , color = css
      , style = get_line_style(pdhl_style))

    var label low_lbl = label.new(na,na
      , xloc = xloc.bar_time
      , text = str.format('P{0}L', tf)
      , color = TRANSP_CSS
      , textcolor = css
      , size = size.small
      , style = label.style_label_left)

    hy = ta.valuewhen(h != h[1], h, 1)
    hx = ta.valuewhen(h == high, time, 1)

    ly = ta.valuewhen(l != l[1], l, 1)
    lx = ta.valuewhen(l == low, time, 1)

    if barstate.islast
        ext = time + (time - time[1])*20

        //High
        line.set_xy1(high_line, hx, hy)
        line.set_xy2(high_line, ext, hy)

        label.set_xy(high_lbl, ext, hy)

        //Low
        line.set_xy1(low_line, lx, ly)
        line.set_xy2(low_line, ext, ly)

        label.set_xy(low_lbl, ext, ly)

//-----------------------------------------------------------------------------}
//Global variables
//-----------------------------------------------------------------------------{
var trend = 0, var itrend = 0

var top_y = 0., var top_x = 0
var btm_y = 0., var btm_x = 0

var itop_y = 0., var itop_x = 0
var ibtm_y = 0., var ibtm_x = 0

var trail_up = high, var trail_dn = low
var trail_up_x = 0,  var trail_dn_x = 0

var top_cross = true,  var btm_cross = true
var itop_cross = true, var ibtm_cross = true

var txt_top = '',  var txt_btm = ''

//Alerts
bull_choch_alert = false 
bull_bos_alert   = false 

bear_choch_alert = false 
bear_bos_alert   = false 

bull_ichoch_alert = false 
bull_ibos_alert   = false 

bear_ichoch_alert = false 
bear_ibos_alert   = false 

bull_iob_break = false 
bear_iob_break = false

bull_ob_break = false 
bear_ob_break = false

eqh_alert = false 
eql_alert = false 

//Structure colors
var bull_css = style == 'Monochrome' ? #b2b5be 
  : swing_bull_css

var bear_css = style == 'Monochrome' ? #b2b5be 
  : swing_bear_css

var ibull_css = style == 'Monochrome' ? #b2b5be 
  : swing_ibull_css

var ibear_css = style == 'Monochrome' ? #b2b5be 
  : swing_ibear_css

//Swings
[top, btm] = swings(length)

[itop, ibtm] = swings(5)

//-----------------------------------------------------------------------------}
//Pivot High
//-----------------------------------------------------------------------------{
var line extend_top = na

var label extend_top_lbl = label.new(na, na
  , color = TRANSP_CSS
  , textcolor = bear_css
  , style = label.style_label_down
  , size = size.tiny)

if top
    top_cross := true
    txt_top := top > top_y ? 'HH' : 'LH'

    if show_swings
        top_lbl = label.new(n-length, top, txt_top
          , color = TRANSP_CSS
          , textcolor = bear_css
          , style = label.style_label_down
          , size = size.small)

        if mode == 'Present'
            label.delete(top_lbl[1])

    //Extend recent top to last bar
    line.delete(extend_top[1])
    extend_top := line.new(n-length, top, n, top
      , color = bear_css)

    top_y := top
    top_x := n - length

    trail_up := top
    trail_up_x := n - length

if itop
    itop_cross := true

    itop_y := itop
    itop_x := n - 5

//Trailing maximum
trail_up := math.max(high, trail_up)
trail_up_x := trail_up == high ? n : trail_up_x

//Set top extension label/line
if barstate.islast and show_hl_swings
    line.set_xy1(extend_top, trail_up_x, trail_up)
    line.set_xy2(extend_top, n + 20, trail_up)

    label.set_x(extend_top_lbl, n + 20)
    label.set_y(extend_top_lbl, trail_up)
    label.set_text(extend_top_lbl, trend < 0 ? 'Strong High' : 'Weak High')

//-----------------------------------------------------------------------------}
//Pivot Low
//-----------------------------------------------------------------------------{
var line extend_btm = na 

var label extend_btm_lbl = label.new(na, na
  , color = TRANSP_CSS
  , textcolor = bull_css
  , style = label.style_label_up
  , size = size.tiny)

if btm
    btm_cross := true
    txt_btm := btm < btm_y ? 'LL' : 'HL'
    
    if show_swings
        btm_lbl = label.new(n - length, btm, txt_btm
          , color = TRANSP_CSS
          , textcolor = bull_css
          , style = label.style_label_up
          , size = size.small)

        if mode == 'Present'
            label.delete(btm_lbl[1])
    
    //Extend recent btm to last bar
    line.delete(extend_btm[1])
    extend_btm := line.new(n - length, btm, n, btm
      , color = bull_css)

    btm_y := btm
    btm_x := n-length

    trail_dn := btm
    trail_dn_x := n-length

if ibtm
    ibtm_cross := true

    ibtm_y := ibtm
    ibtm_x := n - 5

//Trailing minimum
trail_dn := math.min(low, trail_dn)
trail_dn_x := trail_dn == low ? n : trail_dn_x

//Set btm extension label/line
if barstate.islast and show_hl_swings
    line.set_xy1(extend_btm, trail_dn_x, trail_dn)
    line.set_xy2(extend_btm, n + 20, trail_dn)

    label.set_x(extend_btm_lbl, n + 20)
    label.set_y(extend_btm_lbl, trail_dn)
    label.set_text(extend_btm_lbl, trend > 0 ? 'Strong Low' : 'Weak Low')

//-----------------------------------------------------------------------------}
//Order Blocks Arrays
//-----------------------------------------------------------------------------{
var iob_top = array.new_float(0)
var iob_btm = array.new_float(0)
var iob_left = array.new_int(0)
var iob_type = array.new_int(0)

var ob_top = array.new_float(0)
var ob_btm = array.new_float(0)
var ob_left = array.new_int(0)
var ob_type = array.new_int(0)

//-----------------------------------------------------------------------------}
//Pivot High BOS/CHoCH
//-----------------------------------------------------------------------------{
//Filtering
var bull_concordant = true

if ifilter_confluence
    bull_concordant := high - math.max(close, open) > math.min(close, open - low)

//Detect internal bullish Structure
if ta.crossover(close, itop_y) and itop_cross and top_y != itop_y and bull_concordant
    bool choch = na
    
    if itrend < 0
        choch := true
        bull_ichoch_alert := true
    else 
        bull_ibos_alert := true
    
    txt = choch ? 'CHoCH' : 'BOS'

    if show_internals
        if show_ibull == 'All' or (show_ibull == 'BOS' and not choch) or (show_ibull == 'CHoCH' and choch)
            display_Structure(itop_x, itop_y, txt, ibull_css, true, true, size.tiny)
    
    itop_cross := false
    itrend := 1
    
    //Internal Order Block
    if show_iob
        ob_coord(false, itop_x, iob_top, iob_btm, iob_left, iob_type)

//Detect bullish Structure
if ta.crossover(close, top_y) and top_cross
    bool choch = na
    
    if trend < 0
        choch := true
        bull_choch_alert := true
    else 
        bull_bos_alert := true

    txt = choch ? 'CHoCH' : 'BOS'
    
    if show_Structure
        if show_bull == 'All' or (show_bull == 'BOS' and not choch) or (show_bull == 'CHoCH' and choch)
            display_Structure(top_x, top_y, txt, bull_css, false, true, size.small)
    
    //Order Block
    if show_ob
        ob_coord(false, top_x, ob_top, ob_btm, ob_left, ob_type)

    top_cross := false
    trend := 1

//-----------------------------------------------------------------------------}
//Pivot Low BOS/CHoCH
//-----------------------------------------------------------------------------{
var bear_concordant = true

if ifilter_confluence
    bear_concordant := high - math.max(close, open) < math.min(close, open - low)

//Detect internal bearish Structure
if ta.crossunder(close, ibtm_y) and ibtm_cross and btm_y != ibtm_y and bear_concordant
    bool choch = false
    
    if itrend > 0
        choch := true
        bear_ichoch_alert := true
    else 
        bear_ibos_alert := true
    
    txt = choch ? 'CHoCH' : 'BOS'

    if show_internals
        if show_ibear == 'All' or (show_ibear == 'BOS' and not choch) or (show_ibear == 'CHoCH' and choch)
            display_Structure(ibtm_x, ibtm_y, txt, ibear_css, true, false, size.tiny)
    
    ibtm_cross := false
    itrend := -1
    
    //Internal Order Block
    if show_iob
        ob_coord(true, ibtm_x, iob_top, iob_btm, iob_left, iob_type)

//Detect bearish Structure
if ta.crossunder(close, btm_y) and btm_cross
    bool choch = na
    
    if trend > 0
        choch := true
        bear_choch_alert := true
    else 
        bear_bos_alert := true

    txt = choch ? 'CHoCH' : 'BOS'
    
    if show_Structure
        if show_bear == 'All' or (show_bear == 'BOS' and not choch) or (show_bear == 'CHoCH' and choch)
            display_Structure(btm_x, btm_y, txt, bear_css, false, false, size.small)
    
    //Order Block
    if show_ob
        ob_coord(true, btm_x, ob_top, ob_btm, ob_left, ob_type)

    btm_cross := false
    trend := -1

//-----------------------------------------------------------------------------}
//Order Blocks
//-----------------------------------------------------------------------------{
//Set order blocks
var iob_boxes = array.new_box(0)
var ob_boxes = array.new_box(0)

//Delete internal order blocks box coordinates if top/bottom is broken
for element in iob_type
    index = array.indexof(iob_type, element)

    if close < array.get(iob_btm, index) and element == 1
        array.remove(iob_top, index) 
        array.remove(iob_btm, index) 
        array.remove(iob_left, index) 
        array.remove(iob_type, index)
        bull_iob_break := true

    else if close > array.get(iob_top, index) and element == -1
        array.remove(iob_top, index) 
        array.remove(iob_btm, index)
        array.remove(iob_left, index) 
        array.remove(iob_type, index)
        bear_iob_break := true

//Delete internal order blocks box coordinates if top/bottom is broken
for element in ob_type
    index = array.indexof(ob_type, element)

    if close < array.get(ob_btm, index) and element == 1
        array.remove(ob_top, index) 
        array.remove(ob_btm, index) 
        array.remove(ob_left, index) 
        array.remove(ob_type, index)
        bull_ob_break := true

    else if close > array.get(ob_top, index) and element == -1
        array.remove(ob_top, index) 
        array.remove(ob_btm, index)
        array.remove(ob_left, index) 
        array.remove(ob_type, index)
        bear_ob_break := true

iob_size = array.size(iob_type)
ob_size = array.size(ob_type)

if barstate.isfirst
    if show_iob
        for i = 0 to iob_showlast-1
            array.push(iob_boxes, box.new(na,na,na,na, xloc = xloc.bar_time))
    if show_ob
        for i = 0 to ob_showlast-1
            array.push(ob_boxes, box.new(na,na,na,na, xloc = xloc.bar_time))

if iob_size > 0
    if barstate.islast
        display_ob(iob_boxes, iob_top, iob_btm, iob_left, iob_type, iob_showlast, false, iob_size)

if ob_size > 0
    if barstate.islast
        display_ob(ob_boxes, ob_top, ob_btm, ob_left, ob_type, ob_showlast, true, ob_size)

//-----------------------------------------------------------------------------}
//EQH/EQL
//-----------------------------------------------------------------------------{
var eq_prev_top = 0.
var eq_top_x = 0

var eq_prev_btm = 0.
var eq_btm_x = 0

if show_eq
    eq_top = ta.pivothigh(eq_len, eq_len)
    eq_btm = ta.pivotlow(eq_len, eq_len)

    if eq_top 
        max = math.max(eq_top, eq_prev_top)
        min = math.min(eq_top, eq_prev_top)
        
        if max < min + atr * eq_threshold
            eqh_line = line.new(eq_top_x, eq_prev_top, n-eq_len, eq_top
              , color = bear_css
              , style = line.style_dotted)

            eqh_lbl = label.new(int(math.avg(n-eq_len, eq_top_x)), eq_top, 'EQH'
              , color = #00000000
              , textcolor = bear_css
              , style = label.style_label_down
              , size = size.tiny)

            if mode == 'Present'
                line.delete(eqh_line[1])
                label.delete(eqh_lbl[1])
            
            eqh_alert := true

        eq_prev_top := eq_top
        eq_top_x := n-eq_len

    if eq_btm 
        max = math.max(eq_btm, eq_prev_btm)
        min = math.min(eq_btm, eq_prev_btm)
        
        if min > max - atr * eq_threshold
            eql_line = line.new(eq_btm_x, eq_prev_btm, n-eq_len, eq_btm
              , color = bull_css
              , style = line.style_dotted)

            eql_lbl = label.new(int(math.avg(n-eq_len, eq_btm_x)), eq_btm, 'EQL'
              , color = #00000000
              , textcolor = bull_css
              , style = label.style_label_up
              , size = size.tiny)

            eql_alert := true

            if mode == 'Present'
                line.delete(eql_line[1])
                label.delete(eql_lbl[1])

        eq_prev_btm := eq_btm
        eq_btm_x := n-eq_len

//-----------------------------------------------------------------------------}
//Fair Value Gaps
//-----------------------------------------------------------------------------{
var bullish_fvg_max = array.new_box(0)
var bullish_fvg_min = array.new_box(0)

var bearish_fvg_max = array.new_box(0)
var bearish_fvg_min = array.new_box(0)

float bullish_fvg_avg = na
float bearish_fvg_avg = na

bullish_fvg_cnd = false
bearish_fvg_cnd = false

[src_c1, src_o1, src_h, src_l, src_h2, src_l2] =
  request.security(syminfo.tickerid, fvg_tf, get_ohlc())

if show_fvg
    delta_per = (src_c1 - src_o1) / src_o1 * 100

    change_tf = timeframe.change(fvg_tf)

    threshold = fvg_auto ? ta.cum(math.abs(change_tf ? delta_per : 0)) / n * 2 
      : 0

    //FVG conditions
    bullish_fvg_cnd := src_l > src_h2
      and src_c1 > src_h2 
      and delta_per > threshold
      and change_tf

    bearish_fvg_cnd := src_h < src_l2 
      and src_c1 < src_l2 
      and -delta_per > threshold
      and change_tf

    //FVG Areas
    if bullish_fvg_cnd
        array.unshift(bullish_fvg_max, box.new(n-1, src_l, n + fvg_extend, math.avg(src_l, src_h2)
          , border_color = bull_fvg_css
          , bgcolor = bull_fvg_css))
        
        array.unshift(bullish_fvg_min, box.new(n-1, math.avg(src_l, src_h2), n + fvg_extend, src_h2
          , border_color = bull_fvg_css
          , bgcolor = bull_fvg_css))
    
    if bearish_fvg_cnd
        array.unshift(bearish_fvg_max, box.new(n-1, src_h, n + fvg_extend, math.avg(src_h, src_l2)
          , border_color = bear_fvg_css
          , bgcolor = bear_fvg_css))
        
        array.unshift(bearish_fvg_min, box.new(n-1, math.avg(src_h, src_l2), n + fvg_extend, src_l2
          , border_color = bear_fvg_css
          , bgcolor = bear_fvg_css))

    for bx in bullish_fvg_min
        if low < box.get_bottom(bx)
            box.delete(bx)
            box.delete(array.get(bullish_fvg_max, array.indexof(bullish_fvg_min, bx)))
    
    for bx in bearish_fvg_max
        if high > box.get_top(bx)
            box.delete(bx)
            box.delete(array.get(bearish_fvg_min, array.indexof(bearish_fvg_max, bx)))

//-----------------------------------------------------------------------------}
//Previous day/week high/lows
//-----------------------------------------------------------------------------{
//Daily high/low
[pdh, pdl] = request.security(syminfo.tickerid, 'D', hl()
  , lookahead = barmerge.lookahead_on)

//Weekly high/low
[pwh, pwl] = request.security(syminfo.tickerid, 'W', hl()
  , lookahead = barmerge.lookahead_on)

//Monthly high/low
[pmh, pml] = request.security(syminfo.tickerid, 'M', hl()
  , lookahead = barmerge.lookahead_on)

//Display Daily
if show_pdhl
    phl(pdh, pdl, 'D', pdhl_css)

//Display Weekly
if show_pwhl
    phl(pwh, pwl, 'W', pwhl_css)
    
//Display Monthly
if show_pmhl
    phl(pmh, pml, 'M', pmhl_css)

//-----------------------------------------------------------------------------}
//Premium/Discount/Equilibrium zones
//-----------------------------------------------------------------------------{
var premium = box.new(na, na, na, na
  , bgcolor = color.new(premium_css, 80)
  , border_color = na)

var premium_lbl = label.new(na, na
  , text = 'Premium'
  , color = TRANSP_CSS
  , textcolor = premium_css
  , style = label.style_label_down
  , size = size.small)

var eq = box.new(na, na, na, na
  , bgcolor = color.rgb(120, 123, 134, 80)
  , border_color = na)

var eq_lbl = label.new(na, na
  , text = 'Equilibrium'
  , color = TRANSP_CSS
  , textcolor = eq_css
  , style = label.style_label_left
  , size = size.small)

var discount = box.new(na, na, na, na
  , bgcolor = color.new(discount_css, 80)
  , border_color = na)

var discount_lbl = label.new(na, na
  , text = 'Discount'
  , color = TRANSP_CSS
  , textcolor = discount_css
  , style = label.style_label_up
  , size = size.small)

//Show Premium/Discount Areas
if barstate.islast and show_sd
    avg = math.avg(trail_up, trail_dn)

    box.set_lefttop(premium, math.max(top_x, btm_x), trail_up)
    box.set_rightbottom(premium, n, .95 * trail_up + .05 * trail_dn)

    label.set_xy(premium_lbl, int(math.avg(math.max(top_x, btm_x), n)), trail_up)

    box.set_lefttop(eq, math.max(top_x, btm_x), .525 * trail_up + .475*trail_dn)
    box.set_rightbottom(eq, n, .525 * trail_dn + .475 * trail_up)

    label.set_xy(eq_lbl, n, avg)
    
    box.set_lefttop(discount, math.max(top_x, btm_x), .95 * trail_dn + .05 * trail_up)
    box.set_rightbottom(discount, n, trail_dn)
    label.set_xy(discount_lbl, int(math.avg(math.max(top_x, btm_x), n)), trail_dn)

//-----------------------------------------------------------------------------}
//Trend
//-----------------------------------------------------------------------------{
var color trend_css = na

if show_trend
    if style == 'Colored'
        trend_css := itrend == 1 ? bull_css : bear_css
    else if style == 'Monochrome'
        trend_css := itrend == 1 ? #b2b5be : #5d606b

plotcandle(open, high, low, close
  , color = trend_css
  , wickcolor = trend_css
  , bordercolor = trend_css
  , editable = false)

//-----------------------------------------------------------------------------}
//Alerts
//-----------------------------------------------------------------------------{
//Internal Structure
alertcondition(bull_ibos_alert, 'Internal Bullish BOS', 'Internal Bullish BOS formed')
alertcondition(bull_ichoch_alert, 'Internal Bullish CHoCH', 'Internal Bullish CHoCH formed')

alertcondition(bear_ibos_alert, 'Internal Bearish BOS', 'Internal Bearish BOS formed')
alertcondition(bear_ichoch_alert, 'Internal Bearish CHoCH', 'Internal Bearish CHoCH formed')

//Swing Structure
alertcondition(bull_bos_alert, 'Bullish BOS', 'Internal Bullish BOS formed')
alertcondition(bull_choch_alert, 'Bullish CHoCH', 'Internal Bullish CHoCH formed')

alertcondition(bear_bos_alert, 'Bearish BOS', 'Bearish BOS formed')
alertcondition(bear_choch_alert, 'Bearish CHoCH', 'Bearish CHoCH formed')

//order Blocks
alertcondition(bull_iob_break, 'Bullish Internal OB Breakout', 'Price broke bullish iternal OB')
alertcondition(bear_iob_break, 'Bearish Internal OB Breakout', 'Price broke bearish iternal OB')

alertcondition(bull_ob_break, 'Bullish OB Breakout', 'Price broke bullish iternal OB')
alertcondition(bear_ob_break, 'bearish OB Breakout', 'Price broke bearish iternal OB')

//EQH/EQL
alertcondition(eqh_alert, 'Equal Highs', 'Equal highs detected')
alertcondition(eql_alert, 'Equal Lows', 'Equal lows detected')

//FVG
alertcondition(bullish_fvg_cnd, 'Bullish FVG', 'Bullish FVG formed')
alertcondition(bearish_fvg_cnd, 'Bearish FVG', 'Bearish FVG formed')

//-----------------------------------------------------------------------------}
Fixed your posts. Please wrap your code in future using the </> icon. Fuck scrolling through all of that!

Re: Already Converted TradingView Indicators to MT4 Indicators

Posted: Fri Nov 03, 2023 2:40 am
by BeatlemaniaSA
Jimmy wrote: Fri Nov 03, 2023 12:30 am Fixed your posts. Please wrap your code in future using the </> icon. Fuck scrolling through all of that!
Haha, yeah my index finger got a bit of a workout on the scroll wheel of my mouse with that post :Rofl: :Rofl: :Rofl:
All times are UTC+11:00
Page 34 of 66

Powered by phpBB® Forum Software © phpBB Limited