Triple RAFF Channel projection (On Price)

Triple Raff Channel linear projection indicator for PRT.

Premise

PRT implementation of the “Bianca” trends visualization of 3 linear regressions. This indicator adopts the Raff channel algorithm and outputs 3 sets of support and resistance lines on the same chart. These sets represent:

Primary trend (blue)
Secondary trend (green)
Tertiary trend (red)

Interpretation:

If all three sets of trend-lines align, a strong sentiment is established. This could be bullish, bearish or consolidating.

If tertiary trend and/or secondary trend are diverging from primary trend, or diverging from each other, a breakout of the wider trend is more probable.

If you are not familiar with this concept and associated trading systems, read up on raf channels and/or bianca trends.
http://stockcharts.com/school/doku.php?id=chart_school:chart_analysis:raff_regression_chan

Variables

Defaults are 50 bars (primary); 20 (secondary); 10 (tertiary). These can be changed by you.

Developer Information

The mid lines are not plotted but they are available of course. If you would like to view them or adapt further then use reg
Support and resistance lines are averaged from raff and riff lines. If you want to see both, replace averaging code (source code is commented)

Enjoy!

Maz

— code —

// Triple RAF Channel (Bianca) indicator for PRT
// Written by "Maz" at prorealcode.com
// Adopted from RAFF algorithm
// --

for i = 1 to 3

// Blue (Long term)
if i = 1 then
k   = blue
det = DPO[k*2](close)
if det=det[1] and det[1]=det[2] and det[2]<>det[3] then
flag = 1
endif
n      = (k*2)-4
p      = (n/2)-1
d100   = DPO[n](close)
moy100 = close-d100
co     = (moy100-moy100[1]+(close[p])/n)*n
h100   = dpo[n](high)
moyh   = high-h100
hi     = (moyh-moyh[1]+(high[p])/n)*n
l100   = dpo[n](low)
moyl   = low-l100
lo     = (moyl-moyl[1]+(low[p])/n)*n
if flag=1 and flag[1]=0 then
somx  = 0
somy  = 0
somxx = 0
somxy = 0
for i=1 to k
somx = somx+i
next
for i=0 to k-1
somy=somy+co[i]
next
for i=1 to k
somxx=somxx+(i*i)
next
for i=0 to k-1
somxy=somxy+(co[i]*(k-i))
next
a = (k*somxy-somx*somy)/(k*somxx-somx*somx)
b = (somy-a*somx)/k
for i=0 to k-1
ecah = hi[i]-a*(k-i)-b
maxh = max(maxh,ecah)
ecal = a*(k-i)+b-lo[i]
maxl = max(maxl,ecal)
next
endif
if flag=0 then
reg = undefined
else
j = j + 1
reg = a * j + b
endif

raffBlue  = max(maxh,maxl)
rafflBlue = reg-raffBlue
raffhBlue = reg+raffBlue

riffBlue  = min(maxh,maxl)
riffhBlue = reg+riffBlue
rifflBlue = reg-riffBlue

// (optional) - let's take an average of the riff and raff
BlueResistance = (raffhBlue + riffhBlue) / 2
BlueSupport    = (rafflBlue + rifflBlue) / 2


elsif i = 2 then // Green (Medium term)
k = green
Gdet = DPO[k*2](close)
if Gdet = Gdet[1] and Gdet[1] = Gdet[2] and Gdet[2] <> Gdet[3] then
Gflag = 1
endif
Gn      = (k*2)-4
Gp      = (Gn/2)-1
Gd100   = DPO[Gn](close)
Gmoy100 = close-Gd100
Gco     = (Gmoy100 - Gmoy100[1]+(close[Gp])/Gn)*Gn
Gh100   = dpo[Gn](high)
Gmoyh   = high-Gh100
Ghi     = (Gmoyh - Gmoyh[1]+(high[Gp])/Gn)*Gn
Gl100   = dpo[Gn](low)
Gmoyl   = low-Gl100
Glo     = (Gmoyl-Gmoyl[1]+(low[Gp])/Gn)*Gn
if Gflag = 1 and Gflag[1] = 0 then
Gsomx  = 0
Gsomy  = 0
Gsomxx = 0
Gsomxy = 0
for i = 1 to k
Gsomx = Gsomx+i
next
for i = 0 to k-1
Gsomy=Gsomy+Gco[i]
next
for i = 1 to k
Gsomxx=Gsomxx+(i*i)
next
for i = 0 to k-1
Gsomxy=Gsomxy+(Gco[i]*(k-i))
next
Ga = (k*Gsomxy-Gsomx*Gsomy)/(k*Gsomxx-Gsomx*Gsomx)
Gb = (Gsomy-Ga*Gsomx)/k
for i=0 to k-1
Gecah = Ghi[i]-Ga*(k-i)-Gb
Gmaxh = max(Gmaxh,Gecah)
Gecal = Ga*(k-i)+Gb-Glo[i]
Gmaxl = max(Gmaxl,Gecal)
next
endif
if Gflag = 0 then
Greg = undefined
else
Gj = Gj + 1
Greg = Ga * Gj + Gb
endif

raffGreen  = max(Gmaxh,Gmaxl)
rafflGreen = Greg-raffGreen
raffhGreen = Greg+raffGreen

riffGreen  = min(Gmaxh,Gmaxl)
riffhGreen = Greg+riffGreen
rifflGreen = Greg-riffGreen

// (optional) - let's take an average of the riff and raff
GreenResistance = (raffhGreen + riffhGreen) / 2
GreenSupport    = (rafflGreen + rifflGreen) / 2

elsif i = 3 then // Red (Short Term)
k = red
Rdet = DPO[k*2](close)
if Rdet = Rdet[1] and Rdet[1] = Rdet[2] and Rdet[2] <> Rdet[3] then
Rflag = 1
endif
Rn      = (k*2)-4
Rp      = (Rn/2)-1
Rd100   = DPO[Rn](close)
Rmoy100 = close-Rd100
Rco     = (Rmoy100 - Rmoy100[1]+(close[Rp])/Rn)*Rn
Rh100   = dpo[Rn](high)
Rmoyh   = high-Rh100
Rhi     = (Rmoyh - Rmoyh[1]+(high[Rp])/Rn)*Rn
Rl100   = dpo[Rn](low)
Rmoyl   = low-Rl100
Rlo     = (Rmoyl-Rmoyl[1]+(low[Rp])/Rn)*Rn
if Rflag = 1 and Rflag[1] = 0 then
Rsomx  = 0
Rsomy  = 0
Rsomxx = 0
Rsomxy = 0
for i = 1 to k
Rsomx = Rsomx+i
next
for i = 0 to k-1
Rsomy=Rsomy+Rco[i]
next
for i = 1 to k
Rsomxx=Rsomxx+(i*i)
next
for i = 0 to k-1
Rsomxy=Rsomxy+(Rco[i]*(k-i))
next
Ra = (k*Rsomxy-Rsomx*Rsomy)/(k*Rsomxx-Rsomx*Rsomx)
Rb = (Rsomy-Ra*Rsomx)/k
for i=0 to k-1
Recah = Rhi[i]-Ra*(k-i)-Rb
Rmaxh = max(Rmaxh,Recah)
Recal = Ra*(k-i)+Rb-Rlo[i]
Rmaxl = max(Rmaxl,Recal)
next
endif
if Rflag = 0 then
Rreg = undefined
else
Rj = Rj + 1
Rreg = Ra * Rj + Rb
endif

raffRed  = max(Rmaxh,Rmaxl)
rafflRed = Rreg-raffRed
raffhRed = Rreg+raffRed

riffRed  = min(Rmaxh,Rmaxl)
riffhRed = Rreg+riffRed
rifflRed = Rreg-riffRed

// (optional) - let's take an average of the riff and raff
RedResistance = (raffhRed + riffhRed) / 2
RedSupport    = (rafflRed + rifflRed) / 2
endif

next


return BlueSupport coloured (10, 10, 200) as "Blue Support", BlueResistance coloured (10, 10, 255) as "Blue Resistance" , GreenSupport coloured (10, 200, 10) as "Green Support", GreenResistance coloured (10, 255, 10) as "Green Resistance", RedSupport coloured (200, 10, 10) as "Red Support", RedResistance coloured (255, 10, 10) as "Red Resistance"

100

101

102

103

104

105

106

107

108

109

110

111

112

113

114

115

116

117

118

119

120

121

122

123

124

125

126

127

128

129

130

131

132

133

134

135

136

137

138

139

140

141

142

143

144

145

146

147

148

149

150

151

152

153

154

155

156

157

158

159

160

161

162

163

164

165

166

167

168

169

170

171

172

173

174

175

176

177

178

179

180

181

182

183

184

185

186

187

188

189

190

191

192

193

194

195

196

197

198

199

200

201

// Triple RAF Channel (Bianca) indicator for PRT

// Written by "Maz" at prorealcode.com

// Adopted from RAFF algorithm

// --

for i = 1 to 3

// Blue (Long term)

if i = 1 then

k = blue

det = DPO[k*2](close)

if det=det[1] and det[1]=det[2] and det[2]<>det[3] then

flag = 1

endif

n = (k*2)-4

p = (n/2)-1

d100 = DPO[n](close)

moy100 = close-d100

co = (moy100-moy100[1]+(close[p])/n)*n

h100 = dpo[n](high)

moyh = high-h100

hi = (moyh-moyh[1]+(high[p])/n)*n

l100 = dpo[n](low)

moyl = low-l100

lo = (moyl-moyl[1]+(low[p])/n)*n

if flag=1 and flag[1]=0 then

somx = 0

somy = 0

somxx = 0

somxy = 0

for i=1 to k

somx = somx+i

for i=0 to k-1

somy=somy+co[i]

for i=1 to k

somxx=somxx+(i*i)

for i=0 to k-1

somxy=somxy+(co[i]*(k-i))

a = (k*somxy-somx*somy)/(k*somxx-somx*somx)

b = (somy-a*somx)/k

for i=0 to k-1

ecah = hi[i]-a*(k-i)-b

maxh = max(maxh,ecah)

ecal = a*(k-i)+b-lo[i]

maxl = max(maxl,ecal)

endif

if flag=0 then

reg = undefined

else

j = j + 1

reg = a * j + b

endif

raffBlue = max(maxh,maxl)

rafflBlue = reg-raffBlue

raffhBlue = reg+raffBlue

riffBlue = min(maxh,maxl)

riffhBlue = reg+riffBlue

rifflBlue = reg-riffBlue

// (optional) - let's take an average of the riff and raff

BlueResistance = (raffhBlue + riffhBlue) / 2

BlueSupport = (rafflBlue + rifflBlue) / 2

elsif i = 2 then // Green (Medium term)

k = green

Gdet = DPO[k*2](close)

if Gdet = Gdet[1] and Gdet[1] = Gdet[2] and Gdet[2] <> Gdet[3] then

Gflag = 1

endif

Gn = (k*2)-4

Gp = (Gn/2)-1

Gd100 = DPO[Gn](close)

Gmoy100 = close-Gd100

Gco = (Gmoy100 - Gmoy100[1]+(close[Gp])/Gn)*Gn

Gh100 = dpo[Gn](high)

Gmoyh = high-Gh100

Ghi = (Gmoyh - Gmoyh[1]+(high[Gp])/Gn)*Gn

Gl100 = dpo[Gn](low)

Gmoyl = low-Gl100

Glo = (Gmoyl-Gmoyl[1]+(low[Gp])/Gn)*Gn

if Gflag = 1 and Gflag[1] = 0 then

Gsomx = 0

Gsomy = 0

Gsomxx = 0

Gsomxy = 0

for i = 1 to k

Gsomx = Gsomx+i

for i = 0 to k-1

Gsomy=Gsomy+Gco[i]

for i = 1 to k

Gsomxx=Gsomxx+(i*i)

for i = 0 to k-1

Gsomxy=Gsomxy+(Gco[i]*(k-i))

Ga = (k*Gsomxy-Gsomx*Gsomy)/(k*Gsomxx-Gsomx*Gsomx)

Gb = (Gsomy-Ga*Gsomx)/k

for i=0 to k-1

Gecah = Ghi[i]-Ga*(k-i)-Gb

Gmaxh = max(Gmaxh,Gecah)

Gecal = Ga*(k-i)+Gb-Glo[i]

Gmaxl = max(Gmaxl,Gecal)

endif

if Gflag = 0 then

Greg = undefined

else

Gj = Gj + 1

Greg = Ga * Gj + Gb

endif

raffGreen = max(Gmaxh,Gmaxl)

rafflGreen = Greg-raffGreen

raffhGreen = Greg+raffGreen

riffGreen = min(Gmaxh,Gmaxl)

riffhGreen = Greg+riffGreen

rifflGreen = Greg-riffGreen

// (optional) - let's take an average of the riff and raff

GreenResistance = (raffhGreen + riffhGreen) / 2

GreenSupport = (rafflGreen + rifflGreen) / 2

elsif i = 3 then // Red (Short Term)

k = red

Rdet = DPO[k*2](close)

if Rdet = Rdet[1] and Rdet[1] = Rdet[2] and Rdet[2] <> Rdet[3] then

Rflag = 1

endif

Rn = (k*2)-4

Rp = (Rn/2)-1

Rd100 = DPO[Rn](close)

Rmoy100 = close-Rd100

Rco = (Rmoy100 - Rmoy100[1]+(close[Rp])/Rn)*Rn

Rh100 = dpo[Rn](high)

Rmoyh = high-Rh100

Rhi = (Rmoyh - Rmoyh[1]+(high[Rp])/Rn)*Rn

Rl100 = dpo[Rn](low)

Rmoyl = low-Rl100

Rlo = (Rmoyl-Rmoyl[1]+(low[Rp])/Rn)*Rn

if Rflag = 1 and Rflag[1] = 0 then

Rsomx = 0

Rsomy = 0

Rsomxx = 0

Rsomxy = 0

for i = 1 to k

Rsomx = Rsomx+i

for i = 0 to k-1

Rsomy=Rsomy+Rco[i]

for i = 1 to k

Rsomxx=Rsomxx+(i*i)

for i = 0 to k-1

Rsomxy=Rsomxy+(Rco[i]*(k-i))

Ra = (k*Rsomxy-Rsomx*Rsomy)/(k*Rsomxx-Rsomx*Rsomx)

Rb = (Rsomy-Ra*Rsomx)/k

for i=0 to k-1

Recah = Rhi[i]-Ra*(k-i)-Rb

Rmaxh = max(Rmaxh,Recah)

Recal = Ra*(k-i)+Rb-Rlo[i]

Rmaxl = max(Rmaxl,Recal)

endif

if Rflag = 0 then

Rreg = undefined

else

Rj = Rj + 1

Rreg = Ra * Rj + Rb

endif

raffRed = max(Rmaxh,Rmaxl)

rafflRed = Rreg-raffRed

raffhRed = Rreg+raffRed

riffRed = min(Rmaxh,Rmaxl)

riffhRed = Rreg+riffRed

rifflRed = Rreg-riffRed

// (optional) - let's take an average of the riff and raff

RedResistance = (raffhRed + riffhRed) / 2

RedSupport = (rafflRed + rifflRed) / 2

endif

return BlueSupport coloured (10, 10, 200) as "Blue Support", BlueResistance coloured (10, 10, 255) as "Blue Resistance" , GreenSupport coloured (10, 200, 10) as "Green Support", GreenResistance coloured (10, 255, 10) as "Green Resistance", RedSupport coloured (200, 10, 10) as "Red Support", RedResistance coloured (255, 10, 10) as "Red Resistance"

raff raff channel trend trend following trendlines

Risk disclosure:

No information on this site is investment advice or a solicitation to buy or sell any financial instrument. Past performance is not indicative of future results. Trading may expose you to risk of loss greater than your deposits and is only suitable for experienced investors who have sufficient financial means to bear such risk.

ProRealTime ITF files and other attachments :

Filename : download the ITF files

How to import ITF files into ProRealTime platform?

Find other exclusive trading pro-tools on

PRC is also on YouTube, subscribe to our channel for exclusive content and tutorials


larouedegann • 02/10/2017 #
blue = 50
green = 20
red = 10
than you

shephinc • 02/10/2017 #
Is there an easy way get a value returned from the indicator that says if the blue channel is heading up or down ?

alf • 02/10/2017 #
Hello,
How can i project it on the chart?
Now it is below amongst the other indicators..
Thankss:)

lebrinque • 02/10/2017 #
This is AWESOME!

Thank you Maz!!
- Maz • 02/10/2017 #
  You’re welcome, thanks

lebrinque • 02/10/2017 #
Does anyone know how to make the lines extended? Like having an option for right and left?

Maz • 02/10/2017 #
With PRT it’s not currently possible to extend lines into the future (right) via the scripting language

Kris75 • 02/10/2017 #
Hi Maz,
How could we translate this in a strategy?

Kris75 • 02/10/2017 #
fantastic job btw

ggolfet • 02/10/2017 #
it seems it’s not working anymore with prorealtime 11, anyone has the same problem?

Moritz Müller • 02/10/2017 #
hi there,
I just checked and I does not work for me anymore neither – unfortunately. would be great if somebody could point to the right direction how to adjust the code.
Would be great if the code could be adjusted to work as a screener as well – as shephinc mentioned.
thanks
- jums • 02/10/2017 #
  Hi,
  
  Can you make an update for PRT v11 ?
  
  Best Regards,

Lotech123 • 02/10/2017 #
PLEASE, PLEASE someone modify the code of this special indicator for V 11.
Thank you in keen anticipation
- Nicolas • 02/10/2017 #
  just use 3 times a linear regression channel code you will find in the library.

Maz • 02/10/2017 #
Hi all, firstly happy to know that this is helping you. I look into updating it for PRT11 when I get the chance. All the best

leederbyshire • 345 days ago #
Here’s the link to alternative linear regression channel indicator Nicolas is referring to that works on v12 since v10.3 being discontinued if anyone struggling to find it.
https://www.prorealcode.com/prorealtime-indicators/standard-deviation-standard-error-linear-regression-channel/

Nicolas Oui le code est correct et il fonctionne, j'ai de bons résultats sur la liste NASDAQ par exe...

pincherman Bonjour :-) J'ai coller le script dans prorealtime pour jouer avec le supertrend et j'ai un...

Nicolas Vous l'avez sans doute collé au mauvais endroit, dans l'éditeur de code pour les stratégies,...

IV Mcm Bonjour, Je ne reconnais pas cette ligne dans le code, essayer de télécharger directement le...

Manu L. Bonjour, Possible de créer un screnner multiframe Mois dans Ichimoku semaine dans Ichimok...

Manu L. ?

Guillaume Mcm I gave the above message fix ;)

Tradingrob Is it possible to put the itf-file in the right way here in Prorealcode? so the right 'trend...

Guillaume Mcm Update link ;) https://www.prorealcode.com/topic/trend-histogramme-cci-mise-a-jour-suite-...

Godo Bonjour Souhait Sam, Après de nombreux essais pour le mettre en format afin d'utiliser ce c...

Nicolas Il faut supprimer celles qui existent dans la fenêtre d'optimisation et les créer en dur dan...

crusoe76 hi there, anyone can help making this strategy work, i have a message saying replace variabl...

Screw27 Salut nicolas j'aimerais savoir tes résulats grace a cettte methode

eva.g.forsgren It dose not work, I get a strap instead of candels???????????????????????????????????????????

Nicolas That indicator is the one below the chart. The indicator to put on the price chart is this o...

pyhrus P.S : IG , que j'ai contacté ,m'indique que la version V11 , ne sera pas disponible avant un...

Hasardeur Dear Nicolas, is there someting at the arry to modify in order to run the trend at the actu...

MALIMALO Dear Nicolas, just try touse your indicator with backtest but it's not working. is anybody...

ribes65 Bonjour Nicolas, Merci pour votre travail. Est-il envisageable de créer un screener pour ...

Nicolas Bien sûr, merci de formuler une demande dans le forum des screeners pour prorealtime. En res...

ipbvba Est il possible de le transformer en indicateur (pour ne plus avoir les lignes mais uniqueme...

supertiti Bonjour Nicolas, Je ne comprend pas bien , le trend change de couleur quand les prix sont a...

Nicolas Oui ce serait possible, cependant l'indicateur est bien prévu pour conserver la couleur de l...

supertiti Quand tu pourras si tu peux nous coder la troisième couleur cela améliorerait les trades cou...

Nicolas How to import file page: in the help section of the website explains howto

kenssa import through the indicator page/window in the Proreal time

chicoteca Buenas, no consigo que se me muestre en el chart de DAX. ¿Cómo procedo? Gracias.-

Ciccarelli Franco Per lasciare che la strategia venga eseguita (dopo aver importato il file): Basta eliminare...

JADINVEST Hello Jan, hello everyone, Thanks Jan for this strategy! Since 2020, have any of you found a...

Alessandro Furlani Hi Ian, hope you still use PRT and so you can read this post. I have tested a lot your work ...

Stockastiss Can this code be simply transferred into Backtestingcode so one doesnt need to use call ? (i...

Vonasi Sorry for the late reply. Add the code to your strategy and remove line 5 and line 39. Chang...

viktorthunss Hi! How many averages are there? Can I see the somewhere?

leofi https://www.prorealcode.com/topic/simple-average-with-visual-color/

leofi Go visit www.prorealcode.com/topic/simple-average-with-visual-color/ and watch 2em post

Dritan Hi,I am new on Prorealtime and coding.I downloaded the indi but I have it on a separate wind...

Nicolas Just add it on the price series.

yomisadiku Hello Nicolas, Can I use high and low price at lines hh=max(hh,close) and ll=min(ll,close) ...

Nicolas Yes you can do that, the impact will be that the trailing stop line will be much close to th...

Maxime Baudin Thanks!

Byggtrader Hi Nicolas! How do I get the indicator in the price chart? It only stays under i new chart.

Nicolas Just add it on the price chart by using the wrench on the left upper side of the chart (pric...

Dom Hello, hello....je commence le trading et découvre par la même occasion le codage....et ce n...

Nicolas Merci, ça fait plaisir !

Be-n Bonjour tout le monde ! Dans l'indicateur de tendance, j'ai du mal à saisir la nuance entre ...

Globalmarkets79 Thank you Vonasi for the answer. I have an other question. When i tried to run the indicator...

Vonasi Lines is either 0 or 1 to turn on or off the drawing of them. Once again if you download and...

Globalmarkets79 Thank you Vonasi, this indicator is very helpful!!!

Bateson Merci pour la réponse Nicolas. C'est bien ce que j'ai fait mais ça ne fonctionne toujours pa...

Enzo Paliotti Veramente ottimo, era quello che cercavo, si potrebbe modificare inserendo come variazione a...

Nicolas Perché no, chiedetelo con una descrizione dettagliata nel forum degli indicatori, per favore!

Triple Raff Channel linear projection indicator for PRT.

Share this

Likes