INDICADOR RADIUS TREND TRADINGVIEW !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
Forums › ProRealTime foro Español › Soporte ProBuilder › INDICADOR RADIUS TREND TRADINGVIEW !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
- This topic has 4 replies, 3 voices, and was last updated 1 month ago by NEOMKEY.
-
-
10/02/2024 at 1:26 AM #238383
Hola a todos, a ver si me podéis ayudar a transcribir el siguiente código del indicador Radius Trend de Tradingview.
https://es.tradingview.com/v/4KIHf36j/
// Indicator: Radius Trend [ChartPrime]
// User Inputs
DEFPARAM Step = 0.15 // Radius Step
DEFPARAM Multi = 2 // Start Points Distance// Initialize variables
Var Trend = 0
Var Multi1 = 0
Var Multi2 = 0
Var N = 3
Var Band = 0// Calculate distances for band placement
Distance = Average100 * Multi
Distance1 = Average100 * 0.2// Initialize trend and band on the 101st bar
IF BarIndex = 101 THEN
Trend = 1
Band = Low * 0.8
ENDIF// Update trend based on price relation to band
IF Close < Band THEN
Trend = 0
ENDIFIF Close > Band THEN
Trend = 1
ENDIF// Adjust band on trend changes
IF Trend[1] = 0 AND Trend = 1 THEN
Band = Low – Distance
ENDIFIF Trend[1] = 1 AND Trend = 0 THEN
Band = High + Distance
ENDIF// Apply step angle to trend lines
IF BarIndex MOD N = 0 AND Trend = 1 THEN
Multi1 = 0
Multi2 = Multi2 + Step
Band = Band + Distance1 * Multi2
ENDIFIF BarIndex MOD N = 0 AND Trend = 0 THEN
Multi1 = Multi1 + Step
Multi2 = 0
Band = Band – Distance1 * Multi1
ENDIF// Smooth the band
Sband = AverageN// Set color based on trend
Color = IF Trend = 1 THEN RGB(84, 182, 212) ELSE RGB(207, 43, 43)// Calculate upper and lower bands
BandUpper = AverageN
BandLower = AverageN
Band1 = IF Trend = 1 THEN BandUpper ELSE BandLower// Visualization
// Plot the outer band
IF BarIndex MOD 2 = 0 THEN
DRAWBAND(Band1, Color, 50)
ENDIF// Plot the main band and fill area
P1 = DRAWLINE(Trend = 0, Sband, Color)
P2 = DRAWLINE(Average20 / 2, Color, 0)FILL(P1, P2, Band, Average20 / 2, Color, 60)
10/02/2024 at 3:40 PM #238413Me he dado cuenta de que en todos tus posts siempre escribes los títulos en mayúsculas y desde hace aproximadamente un año añades al final de ellos muchos símbolos repetidos obsesivamente (asteriscos, signos de exclamación, etc…).
Evidentemente es un intento de buscar mayor atención y una respuesta más rápida.
Les recuerdo que NETIQUETTE desaconseja el uso de todas las letras mayúsculas, excepto excepcionalmente para poner énfasis en una palabra específica. El uso de MAYÚSCULAS se considera de mala educación ya que se equipara a “gritar” para hacerse oír entre los demás.
Gracias por tu cooperación 🙂10/02/2024 at 3:56 PM #238425Gracias por tu pronta respuesta Señor Roberto. Lo de mala educación en cuanto a las letras mayúsculas depende del contexto y parte de una conversación. Puesto que no se trata de una conversación sino de un “Título” no se da el caso que describes. Según tu criterio los títulos de libros, textos y películas serían de mala educación. Creo honestamente que estás en un error.
De todos modos gracias por tu aporte.
10/03/2024 at 3:35 PM #238466Buenas tardes.
Ahí va el código:123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384//--------------------------------------------------////PRC_Radius Trend//version = 0//03.10.2024//Iván González @ www.prorealcode.com//Sharing ProRealTime knowledge//--------------------------------------------------////-------------------Inputs-------------------------////--------------------------------------------------//step=0.15 //Radius stepmulti=2 //Start Points Distancen=3//--------------------------------------------------////-----------Indicator Calculations-----------------////--------------------------------------------------////Calculate distance for band placementdistance=average[100](high-low)*multidistance1=average[100](high-low)*0.2//--------------------------------------------------////Initialize trend and band on 101st baronce trend=0once band=0if barindex=101 thentrend=1band=low*0.8endif//--------------------------------------------------////Update trend based on price relation to bandif close<band thentrend=0r=207g=43b=43elsif close>band thentrend=1r=84g=182b=212endif//--------------------------------------------------////Adjust band on trend changesif trend[1]=0 and trend<>trend[1]thenband=low-distancealpha=0elsif trend[1]=1 and trend<>trend[1]thenband=high+distancealpha=0elsealpha=255endif//--------------------------------------------------////Apply step angle to trend linesonce multi1=0once multi2=0if barindex MOD n = 0 and trend=1 thenmulti1=0multi2=multi2+stepband=band+distance1*multi2endifif barindex MOD n = 0 and trend=0 thenmulti1=step+multi1multi2=0band=band-distance1*multi1endif//--------------------------------------------------////Smooth the bandSband=average[n](band)//--------------------------------------------------////Calculate upper and lower bandsbandUpper=average[n](band+distance*0.5)bandLower=average[n](band-distance*0.5)if trend=1 thenband1=bandUpperelseband1=bandLowerendif//--------------------------------------------------////Fill coloravgHL2=average[20]((high+low)/2)if barindex>101 thencolorbetween(Sband,avgHL2,r,g,b,alpha*0.2)endif//--------------------------------------------------//return sband coloured("grey",alpha)style(line,2), band1 coloured("grey",alpha)style(dottedline,1)1 user thanked author for this post.
10/03/2024 at 5:49 PM #238482 -
AuthorPosts