-- More information about this indicator can be found at: -- http://fxcodebase.com/code/viewtopic.php?f=27&t=66632 --+------------------------------------------------------------------+ --| 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 | --| BitCoin : 15VCJTLaz12Amr7adHSBtL9v8XomURo9RF | --| BitCoin Cash: 1BEtS465S3Su438Kc58h2sqvVvHK9Mijtg | --| Ethereum : 0x8C110cD61538fb6d7A2B47858F0c0AaBd663068D | --| LiteCoin : LLU8PSY2vsq7B9kRELLZQcKf5nJQrdeqwD | --+------------------------------------------------------------------+ -- Indicator profile initialization routine function Init() indicator:name("Averaged Arc elasticity"); indicator:description(""); indicator:requiredSource(core.Bar); indicator:type(core.Oscillator); indicator.parameters:addGroup("Calculation"); indicator.parameters:addInteger("Period", "Period", "", 14, 2, 2000); indicator.parameters:addGroup("MA Calculation"); indicator.parameters:addInteger("Period1", "Period", "", 14, 2, 2000); indicator.parameters:addString("Price1", "Power Price", "", "close"); indicator.parameters:addStringAlternative("Price1","CLOSE", "", "close"); indicator.parameters:addStringAlternative("Price1", "OPEN", "", "open"); 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:addString("Method1", "MA Method", "Method" , "MVA"); indicator.parameters:addStringAlternative("Method1", "MVA", "MVA" , "MVA"); indicator.parameters:addStringAlternative("Method1", "EMA", "EMA" , "EMA"); indicator.parameters:addStringAlternative("Method1", "LWMA", "LWMA" , "LWMA"); indicator.parameters:addStringAlternative("Method1", "TMA", "TMA" , "TMA"); indicator.parameters:addStringAlternative("Method1", "SMMA", "SMMA" , "SMMA"); indicator.parameters:addStringAlternative("Method1", "KAMA", "KAMA" , "KAMA"); indicator.parameters:addStringAlternative("Method1", "VIDYA", "VIDYA" , "VIDYA"); indicator.parameters:addStringAlternative("Method1", "WMA", "WMA" , "WMA"); indicator.parameters:addGroup("Style"); indicator.parameters:addColor("color", "Line Color", "", core.rgb(255, 0, 0)); indicator.parameters:addInteger("style", "Line Style", "", core.LINE_SOLID); indicator.parameters:setFlag("style", core.FLAG_LEVEL_STYLE); indicator.parameters:addInteger("width", "Line Width", "", 3, 1, 5); end -- Indicator instance initialization routine -- Processes indicator parameters and creates output streams -- Parameters block local Period; local first; local source = nil; local Method1, Price1, Period1,MA1,MA2; local Oscillator; local Indicator={}; local FirstStart; local LastTime; local RealVolume; -- Routine function Prepare(nameOnly) local name = profile:id() .. "(" .. instance.source:name() .. ")"; instance:name(name); if (nameOnly) then return; end Period1= instance.parameters.Period1; Method1= instance.parameters.Method1; Price1 = instance.parameters.Price1; Period= instance.parameters.Period; source = instance.source; RealVolume = core.indicators:create("REAL VOLUME", source); MA1 = core.indicators:create(Method1, source.close, Period1); MA2 = core.indicators:create(Method1, source.volume, Period1); first=math.max(source:first()+Period, MA1.DATA:first()); FirstStart=true; LastTime=0; Oscillator = instance:addStream("Oscillator" , core.Line, " Oscillator"," Oscillator",instance.parameters.color, first); Oscillator:setWidth(instance.parameters.width); Oscillator:setStyle(instance.parameters.style); end -- Indicator calculation routine function Update(period, mode) if period < first then return; end MA1:update(mode); MA2:update(mode); RealVolume:update(mode); if not(RealVolume.DATA:hasData(period)) then if period==first then FirstStart=true; end return; elseif FirstStart then FirstStart=false; instance:updateFrom(first); elseif LastTime~=source:date(period) and period==source:size()-1 then LastTime=source:date(period); instance:updateFrom(period-Period); end Oscillator[period]=((MA2.DATA[period]-MA2.DATA[period-Period+1])/((MA2.DATA[period]+MA2.DATA[period-Period+1])/2))/ ((MA1.DATA[period]-MA1.DATA[period-Period+1])/((MA1.DATA[period]+MA1.DATA[period-Period+1])/2)); end