Heiken Ashi smoothed

• 11/30/2016 at 2:54 PM #17559
  torkelab

  Hi there!

  I´m a newbie and this is my first indicator query 🙂

  I found this in the web, but it doesen´t work in this state, its giving syntax error and I don´t have the skill yet to correct it.
  Could someone have mercy with me? I think it is a quite simple error..

  This is the link, it´s in french.
  http://sohocool.over-blog.com/article-29022036.html

  Here is the code: Syntax error line 28, 30

  /// Heiken ashi smoothed histogram // Average variable p = 1 period (default = 6) and t = mm Type (default smoothing wilder) // Average variable 2 p1 = period (default = 2) and t1 = mm type (weighted default) {// t and the deviation of the mean: t = 0 = simple average t = 1 = exponential average t = 2 weighted average = t = 3 = average wilder t = 4 = average triangular t = 5 = average end-point t = 6 = average time series} // set histogrammme if BarIndex> p Then mo = average [p, t] (open) mc = average [p, t] (close) ml = average [p, t] (low) mh = average [p, t] (high) endif haopen ounce = mo haclose = (mc mo + + + mh ml) / 4 if BarIndex> p + 1 then haopen = (haopen [1] + haclose [1]) / 2 endif haopen1 average = [p1, t1] (haopen) haclose1 average = [p1, t1] (haclose) if haclose1> haopen1 Then a = 1 else a = -1 endif return 1 colored by aa as "Smoothed Heiken Histo" ///////// end cloud code to open in the graph: /// Heiken ashi smoothed histogram // Average variable p = 1 period (default = 6) and t = mm Type (default smoothing wilder) // Average variable 2 p1 = period (default = 2) and t1 = mm type (weighted default) {t and the deviation of the mean: t = 0 = simple average t = 1 = exponential average t = 2 = weighted average t = 3 = average wilder t = 4 = average triandulaire t = 5 = average end-point t = 6 = average time series} if BarIndex> p Then mo = average [p, t] (open) mc = average [p, t] (close) ml = average [p, t] (low) mh = average [p, t] (high) endif haopen ounce = mo haclose = (mc mo + + + mh ml) / 4 if BarIndex> p + 1 then haopen = (haopen [1] + haclose [1]) / 2 endif haopen1 average = [p1, t1] (haopen) haclose1 average = [p1, t1] (haclose) haopen1 return as "Smoothed Heiken Nuageopen" haclose1 as "Smoothed Heiken nuageclose" ///////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

  /// Heiken ashi smoothed histogram   // Average variable p = 1 period (default = 6) and t = mm Type (default smoothing wilder)   // Average variable 2 p1 = period (default = 2) and t1 = mm type (weighted default)   {// t and the deviation of the mean: t = 0 = simple average t = 1 = exponential average t = 2 weighted average = t = 3 = average wilder t = 4 = average triangular t = 5 = average end-point t = 6 = average time series}   // set histogrammme     if BarIndex> p Then mo = average [p, t] (open) mc = average [p, t] (close) ml = average [p, t] (low) mh = average [p, t] (high) endif     haopen ounce = mo   haclose = (mc mo + + + mh ml) / 4 if BarIndex> p + 1 then haopen = (haopen [1] + haclose [1]) / 2 endif   haopen1 average = [p1, t1] (haopen) haclose1 average = [p1, t1] (haclose)   if haclose1> haopen1 Then a = 1 else a = -1 endif     return 1 colored by aa as "Smoothed Heiken Histo"   ///////// end     cloud code to open in the graph:     /// Heiken ashi smoothed histogram   // Average variable p = 1 period (default = 6) and t = mm Type (default smoothing wilder)   // Average variable 2 p1 = period (default = 2) and t1 = mm type (weighted default) {t and the deviation of the mean: t = 0 = simple average t = 1 = exponential average t = 2 = weighted average t = 3 = average wilder t = 4 = average triandulaire t = 5 = average end-point t = 6 = average time series}   if BarIndex> p Then mo = average [p, t] (open) mc = average [p, t] (close) ml = average [p, t] (low) mh = average [p, t] (high) endif     haopen ounce = mo   haclose = (mc mo + + + mh ml) / 4 if BarIndex> p + 1 then haopen = (haopen [1] + haclose [1]) / 2 endif   haopen1 average = [p1, t1] (haopen) haclose1 average = [p1, t1] (haclose)     haopen1 return as "Smoothed Heiken Nuageopen" haclose1 as "Smoothed Heiken nuageclose"     ///////end

   

   

   

  

  torkelab

  Participant

  Topics: 3

  Replies: 9

  Been thanked: 1 time
  11/30/2016 at 3:04 PM #17563
  Nicolas

  You made wrong copy/paste of the 2 codes and into a single one too ..

  Please find attached the modified and fixed version to import directly into prorealtime.

  

  Nicolas

  Keymaster

  Topics: 81

  Replies: 20863

  Been thanked: 4774 times
  11/30/2016 at 4:12 PM #17584
  torkelab

  Thanks a lot Nicholas, very kind of you!

  I also found this indicator on your eminent website, but it seemes only to work in 10.3 and I have 10.2..?

  Is it possible to have a beta PRT10.3 working in the IG-world or do we have to wait for the official one? Have you heard anything about when?
  I would love to get my hands on it and get rid of the inside-bar problem when backtesting.

  http://www.prorealcode.com/documentation/drawbarchart/

  //Smooth Heiken Ashi barchart period = 20 if barindex>period then avgO = average[period](open) avgH = average[period](high) avgL = average[period](low) avgC = average[period](close) HAClose = (avgO+avgH+avgL+avgC) /4 HAOpen = (HAOpen[1]+HAClose[1]) / 2 HAHigh = MAX(avgH,MAX(HAOpen,HAClose)) HALow = MIN(avgL,MIN(HAOpen,HAClose)) IF avgO <= avgC THEN // Green candlestick DRAWBARCHART(HAOpen,HAHigh,HALow,HAClose) COLOURED(0,255,0) ELSE // Red candlestick DRAWBARCHART(HAOpen,HAHigh,HALow,HAClose) COLOURED(255,0,0) ENDIF endif RETURN

  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

  //Smooth Heiken Ashi barchart   period = 20   if barindex>period then     avgO = average[period](open)   avgH = average[period](high)   avgL = average[period](low)   avgC = average[period](close)     HAClose = (avgO+avgH+avgL+avgC) /4   HAOpen = (HAOpen[1]+HAClose[1]) / 2   HAHigh = MAX(avgH,MAX(HAOpen,HAClose))   HALow = MIN(avgL,MIN(HAOpen,HAClose))      IF avgO <= avgC THEN      // Green candlestick      DRAWBARCHART(HAOpen,HAHigh,HALow,HAClose) COLOURED(0,255,0)    ELSE      // Red candlestick      DRAWBARCHART(HAOpen,HAHigh,HALow,HAClose) COLOURED(255,0,0)    ENDIF endif   RETURN

   

  

  torkelab

  Participant

  Topics: 3

  Replies: 9

  Been thanked: 1 time
  11/30/2016 at 4:30 PM #17588
  Nicolas

  You’ll have to wait until next year for 10.3 if you are an IG customer, you’ll get the ETA information directly @ IG

  

  Nicolas

  Keymaster

  Topics: 81

  Replies: 20863

  Been thanked: 4774 times
  11/30/2016 at 6:54 PM #17603
  torkelab

  Aha, you mean draw barchart is not possible in prt 10.2?

  

  torkelab

  Participant

  Topics: 3

  Replies: 9

  Been thanked: 1 time
  11/30/2016 at 8:03 PM #17614
  Nicolas

  Exactly, this is a part of PRT 10.3 new graphical instructions. I should make the tag “prorealtime 10.3” more readable in the documentation’s pages I believe 🙂

  1 user thanked author for this post.

  torkelab

  

  Nicolas

  Keymaster

  Topics: 81

  Replies: 20863

  Been thanked: 4774 times
• Author
  Posts