instrument { name = " Rei do Fractal Pro", icon="jpg", overlay = true }



    input_group {
        "Compra", 
        comprar_color = input {default = "#b811f0", type = input.color} 
    }
    
    input_group {
        "Periodo Max/Min", 
        doch_time = input {default = "10", type = input.string} 
    }
    
    input_group {
        "Periodo da Micro Tendencia", 
        emaa_per = input {default = "10", type = input.string} 
    }
    
    input_group {
        "Periodo da  Macro Tendencia", 
        emab_per = input {default = "100", type = input.string} 
    }
    
    input_group {
        "Media Rapida", 
        emac_per = input {default = "3", type = input.string} 
    }
    
    input_group {
        "Media Lenta", 
        emad_per = input {default = "13", type = input.string} 
    }
    
    input_group {
        "Venda", 
        vender_color = input {default = "#fcf805", type = input.color} 
    }
    
    input_group {
        "Candles",
        positivo = input { default = "#00ff55",type = input.color },
        neutro   = input { default = "#000000", type = input.color },
        negativo = input { default = "#f70202",  type = input.color },
    }
    
    --PARAMETROS
    
    EMAA   = ema(close,emaa_per)
    EMAB   = ema(close,emab_per)
    EMAC   = ema(hlc3,emac_per)
    EMAD   = ema(hlc3,emad_per)
    upper  = highest (high, doch_time)
    lower  = lowest  (low,  doch_time)
    
    --CALCULOS
    
    TA    = ((close > close[1]) and (close > EMAA) and (EMAA > EMAA[1]))
    TB    = ((close < close[1]) and (close < EMAA) and (EMAA < EMAA[1]))
    ENC   = ((EMAC[1] < EMAD[1]) and (EMAC > EMAD))
    ENV   = ((EMAC[1] > EMAD[1]) and (EMAC < EMAD))
    
    sec = security (current_ticker_id, "1m")
    if sec then
    
    local bar_color
    
    if (TA == true) then
        bar_color = positivo
    elseif (TB == true) then
        bar_color = negativo
    else
        bar_color = neutro
    end
    
        plot_candle (open, high, low, close, "ES", bar_color)
        plot (upper, "Resistencia", upline_color)
        plot (lower, "Suporte",lowline_color)
    end
    
    input_group { "CALL - UP COLOR", call_color = input { default="#fcfc03", type = input.color } }
    input_group { "PUT - DOWN COLOR", put_color = input { default="#fcfc03", type = input.color } }
    
     
    if ((close[1] < open[1]) and (close > open) and (close > high[1]) and close[2] >= open) then
    
        plot_shape(1,
                'Bull_Engulfing',
                shape_style.square,
                shape_size.huge,
                call_color,
                shape_location.belowbar,
                0,
                "Alert",
                "A"
                          )
    else
        if ((close[1] > open[1]) and (close < open) and (close < low[1]) and close[2] <= open) then
    
        plot_shape(1,
                'Bear_Engulfing',
                shape_style.square,
                shape_size.huge,
                put_color,
                shape_location.abovebar,
                0,
                "Alert",
                "A"
                          )
        end
    end 
    
    input_group { "UP - UP COLOR", call_color = input { default="#0bd104", type = input.color } }
    input_group { "DOWN - DOWN COLOR", put_color = input { default="#f70202", type = input.color } }
    
     
    if ((close > close[1]) and (close[1] > open[2]) and (close[3] > close[2])) then
    
        plot_shape(1,
                'Bull_UP',
                shape_style.arrowup,
                shape_size.huge,
                call_color,
                shape_location.belowbar,
                0,
                "Fractal PRO",
                "#fcfc03"           
                           ) 
    else
        if ((close < close[1]) and (close[1] < open[2]) and (close[3] < close[2])) then
    
        plot_shape(1,
                'Bear_DOWN',
                shape_style.arrowdown,
                shape_size.huge,
                put_color,
                shape_location.abovebar,
                0,
                "Fractal PRO",
                "#fcfc03"
                           )
        end
    end
    
    
    method_id = input (2, "Type", input.string_selection, { "M5" })
    --IQ OPTION SCRIPT HAOAN,SD 9870DFS DS87SDF BDSJBJSDF8 DFNS--
    --IQ OPTION SCRIPT HAOAN,
    --SD 9870DFS DS87SDF BDSJBJSDF8 DFNS----IQ OPTION LOGIN JNASDU8Q737YQ!@#$%&*()H9DS8AJDLKAMSDLKW4WOIFSDFJFBNWE9RHIEF
    --HAOAN,SD 9870DFS DS87SDF BDSJBJSDF8 DFNS--
    --SDJKO3Q384EF8JSDFEESRJSDFFDSDFSD56D6843543SDF
    --hgy&y*(&(&(y9H78YG9U8HO8V6RfghyujgfjhfgCHBVKUYTKKBLLHBLIY--JNASDU8Q737YQ!@#$%&()H9DS8AJDLKAMSDLKW4bnfgkguyloWOIFSDFJFBNWE9RHIEF
    --HAOAN,SD 9870DFS DS87SDF BDSJBJSDF8 DFNS--
    --JNASDU8Q737YQ!@#$%&*()H9DS8AJDLKAMSDLKW4WOIFSDFJFBNWE9RHIEF