-- More information about this indicator can be found at:
-- http://fxcodebase.com/code/viewtopic.php?f=17&t=3781
-- Id: 3477

--+------------------------------------------------------------------+
--|                                            http://fxcodebase.com |
--+------------------------------------------------------------------+
--|                                 Support our efforts by donating  |
--|                                   Paypal: https://goo.gl/9Rj74e  |
--|                    Patreon : https://www.patreon.com/mariojemic  |
--|                    BitCoin : 15VCJTLaz12Amr7adHSBtL9v8XomURo9RF  |
--|               BitCoin Cash : 1BEtS465S3Su438Kc58h2sqvVvHK9Mijtg  |
--|           Ethereum : 0x8C110cD61538fb6d7A2B47858F0c0AaBd663068D  |
--|                   LiteCoin : LLU8PSY2vsq7B9kRELLZQcKf5nJQrdeqwD  |
--+------------------------------------------------------------------+

function Init()
    indicator:name("Pip threshold");
    indicator:description("Pip threshold(indicator)");
    indicator:requiredSource(core.Tick);
    indicator:type(core.Indicator);
  
    indicator.parameters:addGroup("First threshold");
    indicator.parameters:addBoolean("Thr1Enabled", "Enable first threshold?","Threshold for high price moves",true);
    indicator.parameters:addInteger("Thr1", "First threshold", "", 10);
    indicator.parameters:addGroup("Second threshold");
    indicator.parameters:addBoolean("Thr2Enabled","Enable second threshold?","Threshold for medium price moves",true);
    indicator.parameters:addInteger("Thr2", "Second threshold", "", 5);
    indicator.parameters:addGroup("Third threshold");
    indicator.parameters:addBoolean("Thr3Enabled","Enabled third threshold?", "Threshold for low price moves", true);
    indicator.parameters:addInteger("Thr3", "Third threshold", "", 1);
    indicator.parameters:addGroup("Style options");
    indicator.parameters:addInteger("FontSize","Size of markers", "", 10);
    indicator.parameters:addColor("Thr1Color","Color of marker for the first threshold","",core.rgb(255,0,0));
    indicator.parameters:addColor("Thr2Color","Color of marker for the second threshold","",core.rgb(255,255,0));
    indicator.parameters:addColor("Thr3Color","Color of marker for the third threshold","",core.rgb(0,255,0));
end

local source;
local pipSize;
local thr1;
local thr2;
local thr3;
local isThr1;
local isThr2;
local isThr3;
local dFont;
local colors;
local thr1Output;
local thr2Output;
local thr3Output;

function Prepare(nameOnly)
    source = instance.source;
    pipSize = source:pipSize();
    thr1 = instance.parameters.Thr1;
    thr2 = instance.parameters.Thr2;
    thr3 = instance.parameters.Thr3;
    isThr1 = instance.parameters.Thr1Enabled;
    isThr2 = instance.parameters.Thr2Enabled;
    isThr3 = instance.parameters.Thr3Enabled;
    local name = profile:id() .. "(" .. source:name() .. ", " .. thr1 .. "," .. thr2 .. "," .. thr3 .. ")";
    instance:name(name);
    if nameOnly then
        return;
    end
    colors = core.colors();
    thr1Output = instance:createTextOutput("thr1Output", "Threshold 1", "Wingdings", instance.parameters.FontSize, core.H_Center, core.V_Center, instance.parameters.Thr1Color, 0);
    thr2Output = instance:createTextOutput("thr2Output", "Threshold 2", "Wingdings", instance.parameters.FontSize, core.H_Center, core.V_Center, instance.parameters.Thr2Color, 0);
    thr3Output = instance:createTextOutput("thr3Output", "Threshold 3", "Wingdings", instance.parameters.FontSize, core.H_Center, core.V_Center, instance.parameters.Thr3Color, 0);
end

function Update(period, mode)
    if period > 1 then
        local priceDiff = (source[period] - source[period - 1])/pipSize*10;
        if isThr1 then
            if priceDiff >= thr1 or priceDiff <= (thr1*-1) then
                thr1Output:set(period, source[period], "\108");
				 thr2Output:setNoData (period); 	
                  thr3Output:setNoData (period); 
                return;
            end
        end
        if isThr2 then
            if priceDiff >= thr2 or priceDiff <= (thr2*-1) then
                thr2Output:set(period, source[period], "\108");
				 thr3Output:setNoData (period); 	
                 thr1Output:setNoData (period); 
                return;
            end
        end
        if isThr3 then
            if priceDiff >= thr3 or priceDiff <= (thr3*-1) then
                thr3Output:set(period, source[period], "\108");
				 thr2Output:setNoData (period); 	
                 thr1Output:setNoData (period); 
                return;
            end
        end 
    end
end