suivi de tendance

This topic has 1 reply, 2 voices, and was last updated 7 hours ago by Iván.

Viewing 2 posts - 1 through 2 (of 2 total)

11/10/2025 at 10:12 PM #253512

Philippe04

Bonjour j’ai trouvé cet indicateur sur trading view si quelqu’un pouvait le traduire en prt merci d’avance
//@version=5
// This source code is subject to the terms of the Mozilla Public License 2.0 at https://mozilla.org/MPL/2.0/
// © KivancOzbilgic

//created by: @Anil_Ozeksi
//developer: ANIL ÖZEKŞİ
//author: @kivancozbilgic

strategy(‘Twin Optimized Trend Tracker’, ‘TOTT’, overlay=true)
src = input(close, title=’Source’)
length = input.int(40, ‘OTT Period’, minval=1)
percent = input.float(1, ‘Optimization Constant’, step=0.1, minval=0)
coeff = input.float(0.001, ‘Twin OTT Coefficient’, step=0.001, minval=0)
showsupport = input(title=’Show Support Line?’, defval=true)
showsignalsk = input(title=’Show Signals?’, defval=true)
mav = input.string(title=’Moving Average Type’, defval=’VAR’, options=[‘SMA’, ‘EMA’, ‘WMA’, ‘TMA’, ‘VAR’, ‘WWMA’, ‘ZLEMA’, ‘TSF’])
highlighting = input(title=’Highlighter On/Off ?’, defval=true)
Var_Func(src, length) =>
valpha = 2 / (length + 1)
vud1 = src > src[1] ? src – src[1] : 0
vdd1 = src < src[1] ? src[1] - src : 0 vUD = math.sum(vud1, 9) vDD = math.sum(vdd1, 9) vCMO = nz((vUD - vDD) / (vUD + vDD)) VAR = 0.0 VAR := nz(valpha * math.abs(vCMO) * src) + (1 - valpha * math.abs(vCMO)) * nz(VAR[1]) VAR VAR = Var_Func(src, length) Wwma_Func(src, length) =>
wwalpha = 1 / length
WWMA = 0.0
WWMA := wwalpha * src + (1 – wwalpha) * nz(WWMA[1])
WWMA
WWMA = Wwma_Func(src, length)
Zlema_Func(src, length) =>
zxLag = length / 2 == math.round(length / 2) ? length / 2 : (length – 1) / 2
zxEMAData = src + src – src[zxLag]
ZLEMA = ta.ema(zxEMAData, length)
ZLEMA
ZLEMA = Zlema_Func(src, length)
Tsf_Func(src, length) =>
lrc = ta.linreg(src, length, 0)
lrc1 = ta.linreg(src, length, 1)
lrs = lrc – lrc1
TSF = ta.linreg(src, length, 0) + lrs
TSF
TSF = Tsf_Func(src, length)
getMA(src, length) =>
ma = 0.0
if mav == ‘SMA’
ma := ta.sma(src, length)
ma

if mav == ‘EMA’
ma := ta.ema(src, length)
ma

if mav == ‘WMA’
ma := ta.wma(src, length)
ma

if mav == ‘TMA’
ma := ta.sma(ta.sma(src, math.ceil(length / 2)), math.floor(length / 2) + 1)
ma

if mav == ‘VAR’
ma := VAR
ma

if mav == ‘WWMA’
ma := WWMA
ma

if mav == ‘ZLEMA’
ma := ZLEMA
ma

if mav == ‘TSF’
ma := TSF
ma
ma

MAvg = getMA(src, length)
fark = MAvg * percent * 0.01
longStop = MAvg – fark
longStopPrev = nz(longStop[1], longStop)
longStop := MAvg > longStopPrev ? math.max(longStop, longStopPrev) : longStop
shortStop = MAvg + fark
shortStopPrev = nz(shortStop[1], shortStop)
shortStop := MAvg < shortStopPrev ? math.min(shortStop, shortStopPrev) : shortStop dir = 1 dir := nz(dir[1], dir) dir := dir == -1 and MAvg > shortStopPrev ? 1 : dir == 1 and MAvg < longStopPrev ? -1 : dir MT = dir == 1 ? longStop : shortStop OTT = MAvg > MT ? MT * (200 + percent) / 200 : MT * (200 – percent) / 200
OTTup = OTT * (1 + coeff)
OTTdn = OTT * (1 – coeff)

PPLOT = plot(showsupport ? MAvg : na, color=color.new(#0585E1, 0), linewidth=2, title=’Support Line’)

pALLup = plot(nz(OTTup[2]), color=color.new(color.green, 0), linewidth=2, title=’OTTup’)
pALLdn = plot(nz(OTTdn[2]), color=color.new(color.red, 0), linewidth=2, title=’OTTdown’)

buySignalk = ta.crossover(MAvg, OTTup[2])
sellSignalk = ta.crossunder(MAvg, OTTdn[2])
K1 = ta.barssince(buySignalk)
K2 = ta.barssince(sellSignalk)
O1 = ta.barssince(buySignalk[1])
O2 = ta.barssince(sellSignalk[1])

plotshape(buySignalk and showsignalsk and O1 > K2 ? math.min(low, OTTdn) : na, title=’Buy’, text=’Buy’, location=location.absolute, style=shape.labelup, size=size.tiny, color=color.new(color.green, 0), textcolor=color.new(color.white, 0))
plotshape(sellSignalk and showsignalsk and O2 > K1 ? math.max(high, OTTup) : na, title=’Sell’, text=’Sell’, location=location.absolute, style=shape.labeldown, size=size.tiny, color=color.new(color.red, 0), textcolor=color.new(color.white, 0))
mPlot = plot(ohlc4, title=”, style=plot.style_circles, linewidth=0, display=display.none)
longFillColor = highlighting ? O2 > K1 ? color.green : na : na
shortFillColor = highlighting ? O1 > K2 ? color.red : na : na
fill(mPlot, PPLOT, title=’UpTrend Highligter’, color=longFillColor, transp=90)
fill(mPlot, PPLOT, title=’DownTrend Highligter’, color=shortFillColor, transp=90)
fill(pALLup, pALLdn, title=’Flat Zone Highligter’, color=color.new(color.blue, 90))

dummy0 = input(true, title=’=Backtest Inputs=’)
FromDay = input.int(defval=1, title=’From Day’, minval=1, maxval=31)
FromMonth = input.int(defval=1, title=’From Month’, minval=1, maxval=12)
FromYear = input.int(defval=2005, title=’From Year’, minval=2005)
ToDay = input.int(defval=1, title=’To Day’, minval=1, maxval=31)
ToMonth = input.int(defval=1, title=’To Month’, minval=1, maxval=12)
ToYear = input.int(defval=9999, title=’To Year’, minval=2006)
Start = timestamp(FromYear, FromMonth, FromDay, 00, 00)
Finish = timestamp(ToYear, ToMonth, ToDay, 23, 59)
Timerange() =>
time >= Start and time <= Finish ? true : false if buySignalk strategy.entry('Long', strategy.long, when=Timerange()) if sellSignalk strategy.entry('Short', strategy.short, when=Timerange())

Philippe04

Participant

Topics: 1

Replies: 0

Been thanked: 0 times

11/11/2025 at 8:30 AM #253519

Iván

voici

// --------------------------------------------
// PRC_TOTT - Twin Optimized Trend Tracker
// version = 0
// 11.11.2025
// Iván González @ www.prorealcode.com
// Sharing ProRealTime knowledge
// --------------------------------------------
// --- Configuración de Variables (Inputs) ---
// --------------------------------------------
// 1=SMA, 2=EMA, 3=WMA, 4=TMA, 5=VAR, 6=WWMA, 7=ZLEMA, 8=TSF
mavType = 5
length = 40 // OTT Period
percent = 1 // Optimization Constant
coeff = 0.001 // Twin OTT Coefficient
showSupport = 1 // (1=true, 0=false)
showSignals = 1 // (1=true, 0=false)
// --------------------------------------------
// --- Cálculo de la Media Móvil (MAvg) ---
// --------------------------------------------
MAvg = 0
IF mavType = 1 THEN // 1. SMA
   MAvg = Average[length](close)
   
ELSIF mavType = 2 THEN // 2. EMA
   MAvg = ExponentialAverage[length](close)
   
ELSIF mavType = 3 THEN // 3. WMA
   MAvg = WeightedAverage[length](close)
   
ELSIF mavType = 4 THEN // 4. TMA (SMA de SMA)
   len1 = CEIL(length / 2)
   len2 = FLOOR(length / 2) + 1
   MAvg = Average[len2](Average[len1](close))
   
ELSIF mavType = 5 THEN // 5. VAR (Cálculo de VAR)
   valpha = 2 / (length + 1)
   
   vud1 = 0
   IF close > close[1] THEN
      vud1 = close - close[1]
   ENDIF
   
   vdd1 = 0
   IF close < close[1] THEN
      vdd1 = close[1] - close
   ENDIF
   
   vUD = SUMMATION[9](vud1)
   vDD = SUMMATION[9](vdd1)
   
   vCMO = 0
   IF (vUD + vDD) > 0 THEN
      vCMO = (vUD - vDD) / (vUD + vDD)
   ENDIF
   
   // Asignación recursiva para VAR
   IF BarIndex = 0 THEN
      VAR = 0
   ELSE
      VAR = (valpha * ABS(vCMO) * close) + (1 - valpha * ABS(vCMO)) * VAR[1]
   ENDIF
   MAvg = VAR
   
ELSIF mavType = 6 THEN // 6. WWMA (Wilder)
   MAvg = WilderAverage[length](close)
   
ELSIF mavType = 7 THEN // 7. ZLEMA (Zero-Lag EMA)
   zxLag = 0
   IF length MOD 2 = 0 THEN
      zxLag = length / 2
   ELSE
      zxLag = (length - 1) / 2
   ENDIF
   zxEMAData = close + (close - close[zxLag])
   MAvg = ExponentialAverage[length](zxEMAData)
   
ELSIF mavType = 8 THEN // 8. TSF (Time Series Forecast)
   lrc = LinearRegression[length](close)
   lrc1 = LinearRegression[length](close)[1]
   lrs = lrc - lrc1
   MAvg = lrc + lrs
ENDIF
// --------------------------------------------
// --- Cálculo de OTT ---
// --------------------------------------------
fark = MAvg * percent * 0.01

// Long Stop (Trailing)
longStop = MAvg - fark
IF MAvg > longStop[1] THEN
   longStop = MAX(longStop, longStop[1])
ENDIF

// Short Stop (Trailing)
shortStop = MAvg + fark
IF MAvg < shortStop[1] THEN
   shortStop = MIN(shortStop, shortStop[1])
ENDIF

// Dirección de la tendencia
once dir = 1

IF dir = -1 AND MAvg > shortStop[1] THEN
   dir = 1
ELSIF dir = 1 AND MAvg < longStop[1] THEN
   dir = -1
ENDIF

// MT (Trend)
once MT = 0
IF dir = 1 THEN
   MT = longStop
ELSE
   MT = shortStop
ENDIF

// OTT
once OTT = 0
IF MAvg > MT THEN
   OTT = MT * (200 + percent) / 200
ELSE
   OTT = MT * (200 - percent) / 200
ENDIF
// --------------------------------------------
// --- Bandas Gemelas y Señales ---
// --------------------------------------------
OTTup = OTT * (1 + coeff)
OTTdn = OTT * (1 - coeff)

buySignal = MAvg CROSSES OVER OTTup[2]
sellSignal = MAvg CROSSES UNDER OTTdn[2]

// --- Lógica Barssince (K1, K2, O1, O2) ---
// K1: Barssince(buySignal)
IF buySignal THEN
   K1 = 0
ELSE
   K1 = K1[1] + 1
ENDIF
// K2: Barssince(sellSignal)
IF sellSignal THEN
   K2 = 0
ELSE
   K2 = K2[1] + 1
ENDIF

O1 = K1[1]
O2 = K2[1]
// --------------------------------------------
// --- Dibujo de Señales ---
// --------------------------------------------
IF showSignals = 1 THEN
   IF buySignal AND O1 > K2 THEN
      DRAWARROWUP(barindex, low) COLOURED(0, 255, 0)
   ENDIF
   
   IF sellSignal AND O2 > K1 THEN
      DRAWARROWDOWN(barindex, high) COLOURED(255, 0, 0)
   ENDIF
ENDIF
// --------------------------------------------
// --- Relleno de Bandas ---
// --------------------------------------------
COLORBETWEEN(OTTup[2], OTTdn[2],0, 0, 255, 45)
// --------------------------------------------
// --- Support Line ---
// --------------------------------------------
supportLine = Undefined
IF showSupport = 1 THEN
   supportLine = MAvg
ENDIF
// --------------------------------------------
RETURN supportLine AS "MAvg" COLOURED(5, 133, 225), OTTup[2] AS "OTTup" COLOURED(0, 255, 0), OTTdn[2] AS "OTTdown" COLOURED(255, 0, 0)

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

// --------------------------------------------

// PRC_TOTT - Twin Optimized Trend Tracker

// version = 0

// 11.11.2025

// Iván González @ www.prorealcode.com

// Sharing ProRealTime knowledge

// --------------------------------------------

// --- Configuración de Variables (Inputs) ---

// --------------------------------------------

// 1=SMA, 2=EMA, 3=WMA, 4=TMA, 5=VAR, 6=WWMA, 7=ZLEMA, 8=TSF

mavType = 5

length = 40 // OTT Period

percent = 1 // Optimization Constant

coeff = 0.001 // Twin OTT Coefficient

showSupport = 1 // (1=true, 0=false)

showSignals = 1 // (1=true, 0=false)

// --------------------------------------------

// --- Cálculo de la Media Móvil (MAvg) ---

// --------------------------------------------

MAvg = 0

IF mavType = 1 THEN // 1. SMA

MAvg = Average[length](close)

ELSIF mavType = 2 THEN // 2. EMA

MAvg = ExponentialAverage[length](close)

ELSIF mavType = 3 THEN // 3. WMA

MAvg = WeightedAverage[length](close)

ELSIF mavType = 4 THEN // 4. TMA (SMA de SMA)

len1 = CEIL(length / 2)

len2 = FLOOR(length / 2) + 1

MAvg = Average[len2](Average[len1](close))

ELSIF mavType = 5 THEN // 5. VAR (Cálculo de VAR)

valpha = 2 / (length + 1)

vud1 = 0

IF close > close[1] THEN

vud1 = close - close[1]

ENDIF

vdd1 = 0

IF close < close[1] THEN

vdd1 = close[1] - close

ENDIF

vUD = SUMMATION[9](vud1)

vDD = SUMMATION[9](vdd1)

vCMO = 0

IF (vUD + vDD) > 0 THEN

vCMO = (vUD - vDD) / (vUD + vDD)

ENDIF

// Asignación recursiva para VAR

IF BarIndex = 0 THEN

VAR = 0

ELSE

VAR = (valpha * ABS(vCMO) * close) + (1 - valpha * ABS(vCMO)) * VAR[1]

ENDIF

MAvg = VAR

ELSIF mavType = 6 THEN // 6. WWMA (Wilder)

MAvg = WilderAverage[length](close)

ELSIF mavType = 7 THEN // 7. ZLEMA (Zero-Lag EMA)

zxLag = 0

IF length MOD 2 = 0 THEN

zxLag = length / 2

ELSE

zxLag = (length - 1) / 2

ENDIF

zxEMAData = close + (close - close[zxLag])

MAvg = ExponentialAverage[length](zxEMAData)

ELSIF mavType = 8 THEN // 8. TSF (Time Series Forecast)

lrc = LinearRegression[length](close)

lrc1 = LinearRegression[length](close)[1]

lrs = lrc - lrc1

MAvg = lrc + lrs

ENDIF

// --------------------------------------------

// --- Cálculo de OTT ---

// --------------------------------------------

fark = MAvg * percent * 0.01

// Long Stop (Trailing)

longStop = MAvg - fark

IF MAvg > longStop[1] THEN

longStop = MAX(longStop, longStop[1])

ENDIF

// Short Stop (Trailing)

shortStop = MAvg + fark

IF MAvg < shortStop[1] THEN

shortStop = MIN(shortStop, shortStop[1])

ENDIF

// Dirección de la tendencia

once dir = 1

IF dir = -1 AND MAvg > shortStop[1] THEN

dir = 1

ELSIF dir = 1 AND MAvg < longStop[1] THEN

dir = -1

ENDIF

// MT (Trend)

once MT = 0

IF dir = 1 THEN

MT = longStop

ELSE

MT = shortStop

ENDIF

// OTT

once OTT = 0

IF MAvg > MT THEN

OTT = MT * (200 + percent) / 200

ELSE

OTT = MT * (200 - percent) / 200

ENDIF

// --------------------------------------------

// --- Bandas Gemelas y Señales ---

// --------------------------------------------

OTTup = OTT * (1 + coeff)

OTTdn = OTT * (1 - coeff)

buySignal = MAvg CROSSES OVER OTTup[2]

sellSignal = MAvg CROSSES UNDER OTTdn[2]

// --- Lógica Barssince (K1, K2, O1, O2) ---

// K1: Barssince(buySignal)

IF buySignal THEN

K1 = 0

ELSE

K1 = K1[1] + 1

ENDIF

// K2: Barssince(sellSignal)

IF sellSignal THEN

K2 = 0

ELSE

K2 = K2[1] + 1

ENDIF

O1 = K1[1]

O2 = K2[1]

// --------------------------------------------

// --- Dibujo de Señales ---

// --------------------------------------------

IF showSignals = 1 THEN

IF buySignal AND O1 > K2 THEN

DRAWARROWUP(barindex, low) COLOURED(0, 255, 0)

ENDIF

IF sellSignal AND O2 > K1 THEN

DRAWARROWDOWN(barindex, high) COLOURED(255, 0, 0)

ENDIF

// --------------------------------------------

// --- Relleno de Bandas ---

// --------------------------------------------

COLORBETWEEN(OTTup[2], OTTdn[2],0, 0, 255, 45)

// --------------------------------------------

// --- Support Line ---

// --------------------------------------------

supportLine = Undefined

IF showSupport = 1 THEN

supportLine = MAvg

ENDIF

// --------------------------------------------

RETURN supportLine AS "MAvg" COLOURED(5, 133, 225), OTTup[2] AS "OTTup" COLOURED(0, 255, 0), OTTdn[2] AS "OTTdown" COLOURED(255, 0, 0)

1 user thanked author for this post.

robertogozzi

Iván

Moderator

Topics: 0

Replies: 1889

Been thanked: 834 times

Author

Posts

Viewing 2 posts - 1 through 2 (of 2 total)

Find exclusive trading pro-tools on