ATR & Volume Adjusted Momentum

• 05/29/2017 at 2:30 PM #36915
  Fr7

  Hola Nicolas,
  ¿Podría ser tan amable o alguien de traducir este código?
  Gracias

  ////////////////////////////////////////////////// ////////////////////////// ////////////////////////////////////////////////// ////////////////////////////////////////////////// / ////////////////////////////////////////////////// ////////////////////////////////////////////////// ////// ////////////////////////////////////////////////// ////////////////////////// _SECTION_BEGIN ( "ATR y el impulso de volumen ajustado"); SetBarsRequired (sbrAll); SetChartBkColor (Colorblack); p1 = Param ( "Primer período", 5,2,14,1); p2 = Param ( "Segundo Período", 30,14,60,1); MOMP = Param ( "Período de Momentum", 5,3,14,1); Mtm = (C - Ref (C, -momp)) / ATR (MOMP); /// cambiaron AbsMtm = (abs (MTM) + abs (V-Ref (V, -momp))); // cambiado /// =============================================== Num_E = EMA (EMA (Mtm, P1), P2); // cambió Den_E = EMA (EMA (AbsMtm, P1), p2); // cambió /// =============================================== Bensu = 100 * Nz (Num_E / Den_E); //// Sude = (Bensu + (2 * Ref (Bensu, -1)) + (2 * Ref (Bensu, -2)) + Ref (Bensu, -3)) / 6; AA1 = C / Ref (C, -8) * 100; AA2 = C / Ref (C, -13) * 100; AA3 = C / Ref (C, -21) * 100; a1 = EMA (AA1,1); a2 = EMA (AA2,1); a3 = EMA (AA3,1); b1 = DesvEst (a1,8); b2 = DesvEst (a2,13); b3 = DesvEst (a3,21); RMOV = ((a1 b1 *) + (a2 * b2) + (a3 * b3)) / (b1 + b2 + b3); KK = EMA (EMA (RMOV, 3), 3); _SECTION_END (); ////////////////////////////////////////////////// ////////////////////////// _SECTION_BEGIN ( ""); upcolor = ParamColor ( "UpCandleColor", Colorblack); downcolor = ParamColor ( "DownCandleColor", Colorblack); // Cambio de Volumen Volwma = WMA (Bensu, 13); Volchange = (((Bensu-Volwma) / Volwma) * 100); Vol = (ROC (Bensu, 1)); GraphXSpace = Param ( "Xspace", 10, 2, 20, 1); // vol con std LBP = Param ( "mirar hacia atrás", 15, 0, 150,1); Media = MA (ln (Bensu), LBP); StD = DesvEst (ln (Bensu), LBP); xp3 = exp (media + 2 * std); // 3 banda XP2 = exp (media + 1,5 * std); // banda 2 nd xp1 = exp (media + 1 * std); // primera banda xm = exp (media); // promedio xn1 = exp (media - 1 * std); // -1 banda xn2 = exp (media - 1,5 * std); // - 2 bandas VolColor = IIf (KK> 100, colorGold, colorred); Terreno (Volwma, "VOLUMEN DE IMPULSO AJUSTADO", VolColor, ParamStyle ( "AvgStyle", Styleline | styleThick | styleDots, MASKALL), 1 | 4096); // ParamColor ( "AvgColor", colorGold), ParamStyle ( "AvgStyle", Styleline | | styleThick puntos de estilo, MASKALL), 1 | 4096); Terreno (xn1, "", ColorBlue, 1 | 4096); Terreno (xn2, "", 1,1 | 4096); upbar = Bensu> Ref (Bensu, -1); downbar = Bensu <Ref (Bensu, -1); barcolor2 = IIf (downbar, colorred, IIf (upbar, 2,19)); upbar = Bensu> Ref (Bensu, -1); downbar = Bensu <Ref (Bensu, -1); O = IIf (downbar, Bensu, 0); C = IIf (downbar, 0, Bensu); L = 0; H = Bensu; ColorHighliter = IIf (upbar, upcolor, IIf (downbar, downcolor, colorDarkGreen)); SetBarFillColor (ColorHighliter); pds = 10; V1 = Bensu / MA (Bensu, 13); V2 = Bensu / MA (Bensu, 21); V3 = Bensu / MA (Bensu, 34); BARCOLOR = IIf (Bensu <MA (Bensu, pds), colorred, ColorWhite);<span class="goog-text-highlight"> SetBarFillColor (BARCOLOR);</span> PlotOHLC (O, H, L, C, "", barColor2, ParamStyle ( "CandleStyle", styleCandle, MASKALL)); // GfxTextOut ( "VOLUME IMPULSO ajustado", el estado ( "pxwidth") / 2, de estado ( "pxheight") / 3); _SECTION_END (); _SECTION_BEGIN ( "centrada en StochRSI Line"); x = ((RSI (21) - LLV (RSI (21), 21)) / ((HHV (RSI (21), 21)) - LLV (RSI (21), 21))) * 100; Valor1 = 0,1 * ((x) -50); Value2 = WMA (Value1,7); KK4 = (exp (Valor2) -1) / (exp (Valor2) 1); Parcela (0, "", IIf (EMA (KK4,3)> 0,50, colorBrightGreen, colorred), 4 + styleNoLabel); // ================================================ ===================== // nombre de fondo stock (sólo funciona en Amibroker la versión 5.00 en adelante. // ================================================ ===================== _SECTION_BEGIN ( "Nombre"); GfxSetOverlayMode (1); GfxSelectFont ( "Tahoma", el estado ( "pxheight") / 6); GfxSetTextAlign (6); // alineación central // GfxSetTextColor (ColorRGB (200, 200, 200)); GfxSetTextColor (ColorHSB (41, 41, 41)); GfxSetBkMode (0); // transparente GfxTextOut (Nombre (), Posición ( "pxwidth") / 2, de estado ( "pxheight") / 12); GfxSelectFont ( "Tahoma", de estado ( "pxheight") / 12); GfxTextOut ( "kargocu AFL", el estado ( "pxwidth") / 2, de estado ( "pxheight") / 3); GfxSelectFont ( "Tahoma", el estado ( "pxheight") / 36); GfxTextOut ( "Dedicado a ZULTAN ... Que lo disfruten ... AFL Especial", de estado ( "pxwidth") / 2, de estado ( "pxheight") / 2); _SECTION_END ();

  1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119

  ////////////////////////////////////////////////// //////////////////////////   ////////////////////////////////////////////////// ////////////////////////////////////////////////// / ////////////////////////////////////////////////// ////////////////////////////////////////////////// //////   ////////////////////////////////////////////////// //////////////////////////   _SECTION_BEGIN ( "ATR y el impulso de volumen ajustado"); SetBarsRequired (sbrAll); SetChartBkColor (Colorblack);   p1 = Param ( "Primer período", 5,2,14,1); p2 = Param ( "Segundo Período", 30,14,60,1); MOMP = Param ( "Período de Momentum", 5,3,14,1);   Mtm = (C - Ref (C, -momp)) / ATR (MOMP); /// cambiaron AbsMtm = (abs (MTM) + abs (V-Ref (V, -momp))); // cambiado /// =============================================== Num_E = EMA (EMA (Mtm, P1), P2); // cambió Den_E = EMA (EMA (AbsMtm, P1), p2); // cambió /// =============================================== Bensu = 100 * Nz (Num_E / Den_E); //// Sude = (Bensu + (2 * Ref (Bensu, -1)) + (2 * Ref (Bensu, -2)) + Ref (Bensu, -3)) / 6;   AA1 = C / Ref (C, -8) * 100; AA2 = C / Ref (C, -13) * 100; AA3 = C / Ref (C, -21) * 100; a1 = EMA (AA1,1); a2 = EMA (AA2,1); a3 = EMA (AA3,1); b1 = DesvEst (a1,8); b2 = DesvEst (a2,13); b3 = DesvEst (a3,21); RMOV = ((a1 b1 *) + (a2 * b2) + (a3 * b3)) / (b1 + b2 + b3); KK = EMA (EMA (RMOV, 3), 3); _SECTION_END (); ////////////////////////////////////////////////// ////////////////////////// _SECTION_BEGIN ( "");       upcolor = ParamColor ( "UpCandleColor", Colorblack); downcolor = ParamColor ( "DownCandleColor", Colorblack);     // Cambio de Volumen Volwma = WMA (Bensu, 13); Volchange = (((Bensu-Volwma) / Volwma) * 100); Vol = (ROC (Bensu, 1));     GraphXSpace = Param ( "Xspace", 10, 2, 20, 1); // vol con std LBP = Param ( "mirar hacia atrás", 15, 0, 150,1); Media = MA (ln (Bensu), LBP); StD = DesvEst (ln (Bensu), LBP); xp3 = exp (media + 2 * std); // 3 banda XP2 = exp (media + 1,5 * std); // banda 2 nd xp1 = exp (media + 1 * std); // primera banda xm = exp (media); // promedio xn1 = exp (media - 1 * std); // -1 banda xn2 = exp (media - 1,5 * std); // - 2 bandas VolColor = IIf (KK> 100, colorGold, colorred); Terreno (Volwma, "VOLUMEN DE IMPULSO AJUSTADO", VolColor, ParamStyle ( "AvgStyle", Styleline | styleThick | styleDots, MASKALL), 1 | 4096); // ParamColor ( "AvgColor", colorGold), ParamStyle ( "AvgStyle", Styleline | | styleThick puntos de estilo, MASKALL), 1 | 4096);   Terreno (xn1, "", ColorBlue, 1 | 4096); Terreno (xn2, "", 1,1 | 4096);   upbar = Bensu> Ref (Bensu, -1); downbar = Bensu <Ref (Bensu, -1); barcolor2 = IIf (downbar, colorred, IIf (upbar, 2,19));   upbar = Bensu> Ref (Bensu, -1); downbar = Bensu <Ref (Bensu, -1);   O = IIf (downbar, Bensu, 0); C = IIf (downbar, 0, Bensu); L = 0; H = Bensu;   ColorHighliter = IIf (upbar, upcolor, IIf (downbar, downcolor, colorDarkGreen)); SetBarFillColor (ColorHighliter); pds = 10; V1 = Bensu / MA (Bensu, 13); V2 = Bensu / MA (Bensu, 21); V3 = Bensu / MA (Bensu, 34);   BARCOLOR = IIf (Bensu <MA (Bensu, pds), colorred, ColorWhite);<span class="goog-text-highlight"> SetBarFillColor (BARCOLOR);</span> PlotOHLC (O, H, L, C, "", barColor2, ParamStyle ( "CandleStyle", styleCandle, MASKALL)); // GfxTextOut ( "VOLUME IMPULSO ajustado", el estado ( "pxwidth") / 2, de estado ( "pxheight") / 3);   _SECTION_END ();   _SECTION_BEGIN ( "centrada en StochRSI Line"); x = ((RSI (21) - LLV (RSI (21), 21)) / ((HHV (RSI (21), 21)) - LLV (RSI (21), 21))) * 100; Valor1 = 0,1 * ((x) -50); Value2 = WMA (Value1,7); KK4 = (exp (Valor2) -1) / (exp (Valor2) 1);   Parcela (0, "", IIf (EMA (KK4,3)> 0,50, colorBrightGreen, colorred), 4 + styleNoLabel);     // ================================================ ===================== // nombre de fondo stock (sólo funciona en Amibroker la versión 5.00 en adelante. // ================================================ ===================== _SECTION_BEGIN ( "Nombre"); GfxSetOverlayMode (1); GfxSelectFont ( "Tahoma", el estado ( "pxheight") / 6); GfxSetTextAlign (6); // alineación central // GfxSetTextColor (ColorRGB (200, 200, 200)); GfxSetTextColor (ColorHSB (41, 41, 41)); GfxSetBkMode (0); // transparente GfxTextOut (Nombre (), Posición ( "pxwidth") / 2, de estado ( "pxheight") / 12); GfxSelectFont ( "Tahoma", de estado ( "pxheight") / 12); GfxTextOut ( "kargocu AFL", el estado ( "pxwidth") / 2, de estado ( "pxheight") / 3); GfxSelectFont ( "Tahoma", el estado ( "pxheight") / 36); GfxTextOut ( "Dedicado a ZULTAN ... Que lo disfruten ... AFL Especial", de estado ( "pxwidth") / 2, de estado ( "pxheight") / 2); _SECTION_END ();

  

  Fr7

  Participant

  Topics: 39

  Replies: 142

  Been thanked: 17 times
  05/29/2017 at 6:07 PM #36959
  Nicolas

  Es de AmiBroker lenguaje de codificación, pero me gustaría más ejemplos de capturas de pantalla por favor.

  

  Nicolas

  Keymaster

  Topics: 81

  Replies: 20828

  Been thanked: 4738 times
  05/29/2017 at 8:40 PM #36973
  Fr7

  Exacto Nicolas, es un indicador de “AmiBroker”. Lo siento,no tengo más capturas de pantalla……..

  

  Fr7

  Participant

  Topics: 39

  Replies: 142

  Been thanked: 17 times
  05/30/2017 at 1:28 PM #37037
  Nicolas

  Bueno, he hecho la traducción, pero hay un montón de códigos que no son útiles en el programa .. He encontrado un sitio web donde alguien hizo la traducción de la plataforma de TOS y él hizo la misma conclusión .. Puedo estar equivocado, pero el código no No incluyen el promedio móvil que genera la señal. Así que añado uno que usted puede controlar el tipo y el período en los ajustes. Lo terminaré y lo publicaré en la biblioteca más tarde.

  

  Nicolas

  Keymaster

  Topics: 81

  Replies: 20828

  Been thanked: 4738 times
  05/30/2017 at 2:23 PM #37052
  Nicolas

  El indicador ya está disponible para su descarga en la biblioteca de códigos:

  https://www.prorealcode.com/prorealtime-indicators/atr-volume-adjusted-momentum-indicator/

  

  Nicolas

  Keymaster

  Topics: 81

  Replies: 20828

  Been thanked: 4738 times
  05/30/2017 at 3:27 PM #37055
  Fr7

  Muchas gracias Nicolas,usted es el mejor!!

  

  Fr7

  Participant

  Topics: 39

  Replies: 142

  Been thanked: 17 times
• Author
  Posts