-- Id: 2070 -- More information about this indicator can be found at: -- http://fxcodebase.com/code/viewtopic.php?f=17&t=2381 --+------------------------------------------------------------------+ --| Copyright © 2018, Gehtsoft USA LLC | --| http://fxcodebase.com | --+------------------------------------------------------------------+ --| Developed by : Mario Jemic | --| mario.jemic@gmail.com | --+------------------------------------------------------------------+ --| Support our efforts by donating | --| Paypal: https://goo.gl/9Rj74e | --+------------------------------------------------------------------+ --| Patreon : https://goo.gl/GdXWeN | --| BitCoin : 15VCJTLaz12Amr7adHSBtL9v8XomURo9RF | --| BitCoin Cash: 1BEtS465S3Su438Kc58h2sqvVvHK9Mijtg | --| Ethereum : 0x8C110cD61538fb6d7A2B47858F0c0AaBd663068D | --| LiteCoin : LLU8PSY2vsq7B9kRELLZQcKf5nJQrdeqwD | --+------------------------------------------------------------------+ function Init() indicator:name("Mirror RSI indicator"); indicator:description("Mirror RSI indicator"); indicator:requiredSource(core.Bar); indicator:type(core.Oscillator); indicator.parameters:addGroup("Calculation"); indicator.parameters:addString("Price1", "Price1", "", "close"); indicator.parameters:addStringAlternative("Price1", "open", "", "open"); indicator.parameters:addStringAlternative("Price1", "close", "", "close"); indicator.parameters:addStringAlternative("Price1", "high", "", "high"); indicator.parameters:addStringAlternative("Price1", "low", "", "low"); indicator.parameters:addStringAlternative("Price1", "median", "", "median"); indicator.parameters:addStringAlternative("Price1", "typical", "", "typical"); indicator.parameters:addStringAlternative("Price1", "weighted", "", "weighted"); indicator.parameters:addInteger("Period1", "Period1", "", 20); indicator.parameters:addString("Price2", "Price2", "", "open"); indicator.parameters:addStringAlternative("Price2", "open", "", "open"); indicator.parameters:addStringAlternative("Price2", "close", "", "close"); indicator.parameters:addStringAlternative("Price2", "high", "", "high"); indicator.parameters:addStringAlternative("Price2", "low", "", "low"); indicator.parameters:addStringAlternative("Price2", "median", "", "median"); indicator.parameters:addStringAlternative("Price2", "typical", "", "typical"); indicator.parameters:addStringAlternative("Price2", "weighted", "", "weighted"); indicator.parameters:addInteger("Period2", "Period2", "", 20); indicator.parameters:addString("MethodSig", "MethodSig", "", "MVA"); indicator.parameters:addStringAlternative("MethodSig", "MVA", "", "MVA"); indicator.parameters:addStringAlternative("MethodSig", "EMA", "", "EMA"); indicator.parameters:addStringAlternative("MethodSig", "KAMA", "", "KAMA"); indicator.parameters:addStringAlternative("MethodSig", "LWMA", "", "LWMA"); indicator.parameters:addStringAlternative("MethodSig", "TMA", "", "TMA"); indicator.parameters:addInteger("PeriodSig", "PeriodSig", "", 20); indicator.parameters:addGroup("Style"); indicator.parameters:addColor("clr1", "Color 1", "Color 1", core.rgb(0, 255, 0)); indicator.parameters:addColor("clr2", "Color 2", "Color 2", core.rgb(255, 0, 0)); indicator.parameters:addColor("clrSig", "Color Signal", "Color Signal", core.rgb(0, 0, 255)); indicator.parameters:addInteger("widthLinReg", "Line width", "Line width", 1, 1, 5); indicator.parameters:addInteger("styleLinReg", "Line style", "Line style", core.LINE_SOLID); indicator.parameters:setFlag("styleLinReg", core.FLAG_LINE_STYLE); end local first; local source = nil; local Price1; local Price2; local Period1; local Period2; local MethodSig; local PeriodSig; local RSI1; local RSI2; local MASig; local Buff1=nil; local Buff2=nil; local BuffSig=nil; function Prepare(nameOnly) source = instance.source; Price1=instance.parameters.Price1; Period1=instance.parameters.Period1; Price2=instance.parameters.Price2; Period2=instance.parameters.Period2; MethodSig=instance.parameters.MethodSig; PeriodSig=instance.parameters.PeriodSig; if Price1=="open" then RSI1 = core.indicators:create("RSI", source.open, Period1); elseif Price1=="close" then RSI1 = core.indicators:create("RSI", source.close, Period1); elseif Price1=="high" then RSI1 = core.indicators:create("RSI", source.high, Period1); elseif Price1=="low" then RSI1 = core.indicators:create("RSI", source.low, Period1); elseif Price1=="median" then RSI1 = core.indicators:create("RSI", source.median, Period1); elseif Price1=="typical" then RSI1 = core.indicators:create("RSI", source.typical, Period1); else RSI1 = core.indicators:create("RSI", source.weighted, Period1); end if Price2=="open" then RSI2 = core.indicators:create("RSI", source.open, Period2); elseif Price2=="close" then RSI2 = core.indicators:create("RSI", source.close, Period2); elseif Price2=="high" then RSI2 = core.indicators:create("RSI", source.high, Period2); elseif Price2=="low" then RSI2 = core.indicators:create("RSI", source.low, Period2); elseif Price2=="median" then RSI2 = core.indicators:create("RSI", source.median, Period2); elseif Price2=="typical" then RSI2 = core.indicators:create("RSI", source.typical, Period2); else RSI2 = core.indicators:create("RSI", source.weighted, Period2); end first = math.max(RSI1.DATA:first(),RSI2.DATA:first())+2; local name = profile:id() .. "(" .. source:name() .. ", " .. instance.parameters.Price1 .. ", " .. instance.parameters.Period1 .. ", " .. instance.parameters.Price2 .. ", " .. instance.parameters.Period2 .. ", " .. instance.parameters.MethodSig .. ", " .. instance.parameters.PeriodSig .. ")"; instance:name(name); if (nameOnly) then return; end Buff1 = instance:addStream("Buff1", core.Line, name .. ".Buff1", "Buff1", instance.parameters.clr1, first); Buff1:setPrecision(math.max(2, instance.source:getPrecision())); Buff2 = instance:addStream("Buff2", core.Line, name .. ".Buff2", "Buff2", instance.parameters.clr2, first); Buff2:setPrecision(math.max(2, instance.source:getPrecision())); BuffSig = instance:addStream("BuffSig", core.Line, name .. ".Signal", "Signal", instance.parameters.clrSig, first); BuffSig:setPrecision(math.max(2, instance.source:getPrecision())); Buff1:setWidth(instance.parameters.widthLinReg); Buff1:setStyle(instance.parameters.styleLinReg); Buff2:setWidth(instance.parameters.widthLinReg); Buff2:setStyle(instance.parameters.styleLinReg); BuffSig:setWidth(instance.parameters.widthLinReg); BuffSig:setStyle(instance.parameters.styleLinReg); assert(core.indicators:findIndicator(MethodSig) ~= nil, MethodSig .. " indicator must be installed"); MASig = core.indicators:create(MethodSig, Buff1, PeriodSig); end function Update(period, mode) if (period>first) then RSI1:update(mode); RSI2:update(mode); Buff1[period]=RSI1.DATA[period]-RSI2.DATA[period]; Buff2[period]=RSI2.DATA[period]-RSI1.DATA[period]; MASig:update(mode); BuffSig[period]=MASig.DATA[period]; end end