Colour coding the bars

• 09/05/2018 at 11:17 PM #79838
  TraderB

  Hello,

  Complete noob when it comes to coding (am trying my best to learn!), so any help is greatly appreciated. Is it possible to colour code the bars that close outside the bollinger bands?

  Ex. (Note, my candlestick colour scheme is black/white)

  Candle(s) close outside the upper bollinger band, it gets painted blue.

  Candle(s) close outside the lower bollinger band, it gets painted red.

  Thank you.

  

  TraderB

  Participant

  Topics: 1

  Replies: 2

  Been thanked: 0 times
  09/06/2018 at 12:04 AM #79839
  robertogozzi

  There you go. I tested it on EurUsd daily and it worked:

  Coloring CANDLESTICKS outside BB

  defparam calculateonlastbars=500 // construction of Bollinger Bands BBVal = 20 //20 periods BBdev = 2.0 //2.0 Deviation BBavg = Average[BBval,0](close) //BB mean (middle line) 0=sma BollUP = BBavg + ((std[BBval](close)) * BBdev) //Bollinger Upper Band BollDN = BBavg - ((std[BBval](close)) * BBdev) //Bollinger Lower Band // initialize colours to null r=0 g=0 b=0 // set colours when due if close > BollUP then b=255 elsif close < BollDN THEN r=255 endif // display candlestick, if above/below BB IF (r + g + b) <> 0 THEN DRAWCANDLE(open,high,low,close) COLOURED(r,g,b,255) //BORDERCOLOR(0,255,0,255) ENDIF RETURN

  1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22

  defparam calculateonlastbars=500 //  construction of Bollinger Bands BBVal      = 20                                      //20   periods BBdev      = 2.0                                     //2.0  Deviation BBavg      = Average[BBval,0](close)                 //BB mean (middle line)   0=sma BollUP     = BBavg + ((std[BBval](close)) * BBdev)   //Bollinger Upper Band BollDN     = BBavg - ((std[BBval](close)) * BBdev)   //Bollinger Lower Band //  initialize colours to null r=0 g=0 b=0 //  set colours when due if close > BollUP then    b=255 elsif close < BollDN THEN    r=255 endif //  display candlestick, if above/below BB IF (r + g + b) <> 0 THEN    DRAWCANDLE(open,high,low,close) COLOURED(r,g,b,255) //BORDERCOLOR(0,255,0,255) ENDIF RETURN

   

  

  robertogozzi

  Moderator

  Topics: 69

  Replies: 17148

  Been thanked: 4037 times
  09/06/2018 at 12:09 AM #79840
  TraderB

  Roberto, many many thanks for this!

  Question, if I was to replace bollingers and use the Keltner Channels found here (https://www.prorealcode.com/topic/keltner-channel-2/), would it work the samw?

  

  TraderB

  Participant

  Topics: 1

  Replies: 2

  Been thanked: 0 times
  09/06/2018 at 12:17 AM #79841
  robertogozzi

  It is, this is the modified code:

  defparam calculateonlastbars=500 // construction of Bollinger Bands a = average[20,0](customclose) b = AverageTrueRange[20](close) co= 1.5 //mm = a //middle line hi = a + co*b //Upper Limit lo = a - co*b //Lower Limit // initialize colours to null r=0 g=0 b=0 // set colours when due if close > hi then b=255 elsif close < lo THEN r=255 endif // display candlestick, if above/below Channel's limits IF (r + g + b) <> 0 THEN DRAWCANDLE(open,high,low,close) COLOURED(r,g,b,255) //BORDERCOLOR(0,255,0,255) 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

  defparam calculateonlastbars=500 //  construction of Bollinger Bands a = average[20,0](customclose) b = AverageTrueRange[20](close) co= 1.5 //mm = a       //middle line hi = a + co*b  //Upper Limit lo = a - co*b  //Lower Limit //  initialize colours to null r=0 g=0 b=0 //  set colours when due if close > hi then    b=255 elsif close < lo THEN    r=255 endif //  display candlestick, if above/below Channel's limits IF (r + g + b) <> 0 THEN    DRAWCANDLE(open,high,low,close) COLOURED(r,g,b,255) //BORDERCOLOR(0,255,0,255) ENDIF RETURN

   

  

  robertogozzi

  Moderator

  Topics: 69

  Replies: 17148

  Been thanked: 4037 times
  09/06/2018 at 12:19 AM #79842
  robertogozzi

  I added line 5.

  

  robertogozzi

  Moderator

  Topics: 69

  Replies: 17148

  Been thanked: 4037 times
  09/06/2018 at 2:57 AM #79843
  TraderB

  Roberto,  thank you for providing this! This works great!

  

  TraderB

  Participant

  Topics: 1

  Replies: 2

  Been thanked: 0 times
  03/23/2022 at 9:14 PM #190370
  Radetzky

  Good evening Roberto:

  is it possibile to get the same system but with the intraday stocastic indicator ???

  specifically smoohed stochastic 5.3.3     80/20

  overbought entry red colored bar    >80

  entry into oversold green colored bar     <20

  THANK YOU

  

  Radetzky

  Participant

  Topics: 3

  Replies: 17

  Been thanked: 4 times
  03/24/2022 at 8:49 AM #190378
  Nicolas

  I think that this indicator that color candlesticks based on the chosen oscillator might be of interest to you: 3D Candlesticks (CCI,RSI,Stochastic,Cycle,DI)

  

  Nicolas

  Keymaster

  Topics: 81

  Replies: 20863

  Been thanked: 4773 times
  03/28/2022 at 7:15 PM #190679
  Radetzky

  Thanks Nikolas but i’m not able to edit a script … i’ll ask roberto on the italian forum to specify better.. ..  Tank you

  

  Radetzky

  Participant

  Topics: 3

  Replies: 17

  Been thanked: 4 times
  03/29/2022 at 9:21 AM #190703
  robertogozzi

  There you go:

  // Stochastic Kline = Stochastic[5,3](close) Dline = Average[3](Kline) OB = 80 OS = 100 - OB // initialize colours to null r=0 g=0 b=0 // set colours when due if Kline > OB then r=255 elsif Kline < OS THEN g=255 endif // display candlestick, if above/below limits IF (r + g + b) <> 0 THEN DRAWCANDLE(open,high,low,close) COLOURED(r,g,b,255) //BORDERCOLOR(0,255,0,255) ENDIF RETURN

  1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20

  //  Stochastic Kline = Stochastic[5,3](close) Dline = Average[3](Kline) OB    = 80 OS    = 100 - OB //  initialize colours to null r=0 g=0 b=0 //  set colours when due if Kline > OB then    r=255 elsif Kline < OS THEN    g=255 endif //  display candlestick, if above/below limits IF (r + g + b) <> 0 THEN    DRAWCANDLE(open,high,low,close) COLOURED(r,g,b,255) //BORDERCOLOR(0,255,0,255) ENDIF RETURN

  

  robertogozzi

  Moderator

  Topics: 69

  Replies: 17148

  Been thanked: 4037 times
  03/31/2022 at 4:17 PM #190871
  Radetzky

  Grazie Roberto  ..fine settimana lo provo

  per l’intanto grazie per la gentilezza

  TANKS ROBERTO !

  

  Radetzky

  Participant

  Topics: 3

  Replies: 17

  Been thanked: 4 times
  03/31/2022 at 5:42 PM #190876
  Radetzky

  Radetzky wrote:

  Grazie Roberto ..fine settimana lo provo

  per l’intanto grazie per la gentilezza

  TANKS ROBERTO !

  Gia testato  ok perfetto  … solo un’ultima  richiesta se possibile :

  è possibile invertire  i colori ?  il verde in ipercomprato / rosso in ipervenduto ? Grazie
  ……………

  Already tested ok perfect … just one last request if possible: is it possible to invert the colors? green overbought / red oversold? Thanks

  

  Radetzky

  Participant

  Topics: 3

  Replies: 17

  Been thanked: 4 times
  03/31/2022 at 6:03 PM #190879
  robertogozzi

  Swap lines 12 and 14.

  

  robertogozzi

  Moderator

  Topics: 69

  Replies: 17148

  Been thanked: 4037 times
• Author
  Posts