-- Id: 9131 -- More information about this indicator can be found at: -- http://fxcodebase.com/code/viewtopic.php?f=17&t=36625 --+------------------------------------------------------------------+ --| 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 -- Defines indicator profile properties and indicator parameters -- TODO: Add minimal and maximal value of numeric parameters and default color of the streams function Init() indicator:name("STLM "); indicator:description("STLM "); indicator:requiredSource(core.Tick); indicator:type(core.Oscillator); indicator.parameters:addGroup("Style"); indicator.parameters:addColor("STLM_color", "Color of STLM", "Color of STLM", core.rgb(0, 255, 0)); indicator.parameters:addInteger("width2", "Line width", "", 1, 1, 5); indicator.parameters:addInteger("style2", "Line style", "", core.LINE_SOLID); indicator.parameters:setFlag("style2", core.FLAG_LINE_STYLE); end -- Indicator instance initialization routine -- Processes indicator parameters and creates output streams -- TODO: Refine the first period calculation for each of the output streams. -- TODO: Calculate all constants, create instances all subsequent indicators and load all required libraries -- Parameters block local first; local price = nil; -- Streams block local FTLM = nil; local STLM = nil; -- Routine function Prepare(nameOnly) price = instance.source; first = price:first()+90; local name = profile:id() .. "(" .. price:name() .. ")"; instance:name(name); if (not (nameOnly)) then STLM = instance:addStream("STLM", core.Line, name .. ".STLM", "STLM", instance.parameters.STLM_color, first); STLM:setPrecision(math.max(2, instance.source:getPrecision())); STLM:setWidth(instance.parameters.width2); STLM:setStyle(instance.parameters.style2); end end -- Indicator calculation routine -- TODO: Add your code for calculation output values function Update(period) if period < first then return; end local value1=0; local value2=0; local bar= period; value1=value1 +0.0982862174 * price[bar - 0] +0.0975682269 * price[bar - 1] +0.0961401078 * price[bar - 2] +0.0940230544 * price[bar - 3] +0.0912437090 * price[bar - 4] +0.0878391006 * price[bar - 5] +0.0838544303 * price[bar - 6] +0.0793406350 * price[bar - 7] +0.0743569346 * price[bar - 8] +0.0689666682 * price[bar - 9] +0.0632381578 * price[bar - 10] +0.0572428925 * price[bar - 11] +0.0510534242 * price[bar - 12] +0.0447468229 * price[bar - 13] +0.0383959950 * price[bar - 14] +0.0320735368 * price[bar - 15] +0.0258537721 * price[bar - 16] +0.0198005183 * price[bar - 17] +0.0139807863 * price[bar - 18] +0.0084512448 * price[bar - 19] +0.0032639979 * price[bar - 20] -0.0015350359 * price[bar - 21] -0.0059060082 * price[bar - 22] -0.0098190256 * price[bar - 23] -0.0132507215 * price[bar - 24] -0.0161875265 * price[bar - 25] -0.0186164872 * price[bar - 26] -0.0205446727 * price[bar - 27] -0.0219739146 * price[bar - 28] -0.0229204861 * price[bar - 29] -0.0234080863 * price[bar - 30] -0.0234566315 * price[bar - 31] -0.0231017777 * price[bar - 32] -0.0223796900 * price[bar - 33] -0.0213300463 * price[bar - 34] -0.0199924534 * price[bar - 35] -0.0184126992 * price[bar - 36] -0.0166377699 * price[bar - 37] -0.0147139428 * price[bar - 38] -0.0126796776 * price[bar - 39] -0.0105938331 * price[bar - 40] -0.0084736770 * price[bar - 41] -0.0063841850 * price[bar - 42] -0.0043466731 * price[bar - 43] -0.0023956944 * price[bar - 44] -0.0005535180 * price[bar - 45] +0.0011421469 * price[bar - 46] +0.0026845693 * price[bar - 47] +0.0040471369 * price[bar - 48] +0.0052380201 * price[bar - 49] +0.0062194591 * price[bar - 50] +0.0070340085 * price[bar - 51] +0.0076266453 * price[bar - 52] +0.0080376628 * price[bar - 53] +0.0083037666 * price[bar - 54] +0.0083694798 * price[bar - 55] +0.0082901022 * price[bar - 56] +0.0080741359 * price[bar - 57] +0.0077543820 * price[bar - 58] +0.0073260526 * price[bar - 59] +0.0068163569 * price[bar - 60] +0.0062325477 * price[bar - 61] +0.0056078229 * price[bar - 62] +0.0049516078 * price[bar - 63] +0.0161380976 * price[bar - 64]; value2=value2 -0.0074151919 * price[bar - 0] -0.0060698985 * price[bar - 1] -0.0044979052 * price[bar - 2] -0.0027054278 * price[bar - 3] -0.0007031702 * price[bar - 4] +0.0014951741 * price[bar - 5] +0.0038713513 * price[bar - 6] +0.0064043271 * price[bar - 7] +0.0090702334 * price[bar - 8] +0.0118431116 * price[bar - 9] +0.0146922652 * price[bar - 10] +0.0175884606 * price[bar - 11] +0.0204976517 * price[bar - 12] +0.0233865835 * price[bar - 13] +0.0262218588 * price[bar - 14] +0.0289681736 * price[bar - 15] +0.0315922931 * price[bar - 16] +0.0340614696 * price[bar - 17] +0.0363444061 * price[bar - 18] +0.0384120882 * price[bar - 19] +0.0402373884 * price[bar - 20] +0.0417969735 * price[bar - 21] +0.0430701377 * price[bar - 22] +0.0440399188 * price[bar - 23] +0.0446941124 * price[bar - 24] +0.0450230100 * price[bar - 25] +0.0450230100 * price[bar - 26] +0.0446941124 * price[bar - 27] +0.0440399188 * price[bar - 28] +0.0430701377 * price[bar - 29] +0.0417969735 * price[bar - 30] +0.0402373884 * price[bar - 31] +0.0384120882 * price[bar - 32] +0.0363444061 * price[bar - 33] +0.0340614696 * price[bar - 34] +0.0315922931 * price[bar - 35] +0.0289681736 * price[bar - 36] +0.0262218588 * price[bar - 37] +0.0233865835 * price[bar - 38] +0.0204976517 * price[bar - 39] +0.0175884606 * price[bar - 40] +0.0146922652 * price[bar - 41] +0.0118431116 * price[bar - 42] +0.0090702334 * price[bar - 43] +0.0064043271 * price[bar - 44] +0.0038713513 * price[bar - 45] +0.0014951741 * price[bar - 46] -0.0007031702 * price[bar - 47] -0.0027054278 * price[bar - 48] -0.0044979052 * price[bar - 49] -0.0060698985 * price[bar - 50] -0.0074151919 * price[bar - 51] -0.0085278517 * price[bar - 52] -0.0094111161 * price[bar - 53] -0.0100658241 * price[bar - 54] -0.0104994302 * price[bar - 55] -0.0107227904 * price[bar - 56] -0.0107450280 * price[bar - 57] -0.0105824763 * price[bar - 58] -0.0102517019 * price[bar - 59] -0.0097708805 * price[bar - 60] -0.0091581551 * price[bar - 61] -0.0084345004 * price[bar - 62] -0.0076214397 * price[bar - 63] -0.0067401718 * price[bar - 64] -0.0058083144 * price[bar - 65] -0.0048528295 * price[bar - 66] -0.0038816271 * price[bar - 67] -0.0029244713 * price[bar - 68] -0.0019911267 * price[bar - 69] -0.0010974211 * price[bar - 70] -0.0002535559 * price[bar - 71] +0.0005231953 * price[bar - 72] +0.0012297491 * price[bar - 73] +0.0018539149 * price[bar - 74] +0.0023994354 * price[bar - 75] +0.0028490136 * price[bar - 76] +0.0032221429 * price[bar - 77] +0.0034936183 * price[bar - 78] +0.0036818974 * price[bar - 79] +0.0038037944 * price[bar - 80] +0.0038338964 * price[bar - 81] +0.0037975350 * price[bar - 82] +0.0036986051 * price[bar - 83] +0.0035521320 * price[bar - 84] +0.0033559226 * price[bar - 85] +0.0031224409 * price[bar - 86] +0.0028550092 * price[bar - 87] +0.0025688349 * price[bar - 88] +0.0022682355 * price[bar - 89] +0.0073925495 * price[bar - 90]; STLM[period] = value1-value2; end