Indicatore Market resilience

• 10/03/2024 at 8:14 AM #238442
  Msport71

  Buongiorno,

   

  sto guardando questo indicatore in libreria, che indica i livelli di fibonacci in base alla pre apertura mercati tra le 8,05 e le 9,00 della seduta corrente.

  Sarebbe possibile modificarlo in modo che mostri i livelli anche in look back , fermo restando l’intervallo temporale cui sopra?

  Grazie per l’aiuto.

  https://www.prorealcode.com/prorealtime-indicators/market-resilience/

  

  Msport71

  Participant

  Topics: 47

  Replies: 100

  Been thanked: 3 times
  10/03/2024 at 12:31 PM #238461
  Iván

  Puoi convertire le variabili in array e creare un riquadro nell'ultima barra.

  // Market Resilence EUR | Graph Indicator // 19.01.2019 (Release 1.0) // Swapping @ www.forexswap.fr // Sharing ProRealTime knowledge (alt+16) ( use with time frame 5mn ) DefParam DrawOnLastBarOnly = true // --- property settings Alpha = 180 // Transparency text Offset = 10 // Offset alphanumeric/rectangle OPR Level = 1 // (0=hidden; 1=observable) Text = 1 // (0=no text; 1=text) numshow = 15 // Show last X days // --- end starttime = 080500 // 08h00 Pré Market EU (Cac, Dax, Footsie, ect...) endtime = 090000 // 09h00 Ouverture session européenne alpha = max(alpha,0) // Restricted input variable Max-Min alpha = min(alpha,255) if day<>day[1] and dayofweek<>0 then n=n+1 $hh[n]=0 $ll[n]=0 endif if time = starttime then startbar = barindex $startbar[n]=barindex endif if time = endtime then endbar = barindex $endbar[n]=barindex endif if time >= starttime and time <= endtime then if high > $hh[n] then $hh[n] = high endif if low < $ll[n] or $ll[n] = 0 then $ll[n] = low endif endif if islastbarupdate then for i=n downto n-min(n,numshow)+1 do hh=$hh[i] ll=$ll[i] dif = $hh[i]-$ll[i] fib38 = $hh[i] fib0 = $ll[i] fibobull200 = (fib38-fib0)*5.236+fib0 fibobull162 = (fib38-fib0)*4.236+fib0 fibobull124 = (fib38-fib0)*3.236+fib0 fibobull100 = (fib38-fib0)*1.618+fib38 fibobull76 = (fib38-fib0)+fib38 fibobull62 = (fib38-fib0)*1.618+fib0 fibobear62 = (fib0-fib38)*.618+fib0 fibobear76 = (fib0-fib38)+fib0 fibobear100 = (fib0-fib38)*1.618+fib0 fibobear124 = (fib0-fib38)*2.236+fib0 fibobear162 = (fib0-fib38)*3.236+fib0 fibobear200 = (fib0-fib38)*4.236+fib0 if Text = 1 then DrawText("OPR #dif#pts",$startbar[i]+6,$hh[i]+(offset*4),SansSerif,Bold,11) coloured(150,150,150,alpha) DrawText(" HI #hh# ",$startbar[i]+6,$hh[i]+(offset),SansSerif,Standard,10) coloured(22,111,0,alpha) DrawSegment($endbar[i],$hh[i],$endbar[i-1],$hh[i]) coloured(0,200,0,alpha) DrawText("╔═════► ",$startbar[i]+6,$hh[i]+(dif),Dialog,Bold,10) coloured(22,111,0,alpha) // Option OPR - 100% (Glyphe alt+201, alt+205) DrawText(" LO #ll# ",$startbar[i]+6,$ll[i]-(offset),SansSerif,Standard,10) coloured(200,20,20,alpha) DrawSegment($endbar[i],$ll[i],$endbar[i-1],$ll[i]) coloured(200,0,0,alpha) DrawText("╚═════► ",$startbar[i]+6,$ll[i]-(dif),Dialog,Bold,10) coloured(200,10,10,alpha) // Option OPR - 100% (Glyphe alt+200, alt+205) endif if Level = 1 then DrawSegment($endbar[i]+2,fibobull200,$endbar[i-1]-10,fibobull200) coloured(25,100,0,alpha) DrawText("Bullish 200%",$endbar[i-1]-2,fibobull200,SansSerif,Bold,11) coloured(25,100,0,alpha) DrawSegment($endbar[i]+2,fibobull162,$endbar[i-1]-10,fibobull162) coloured(25,100,0,alpha) DrawText("161.8%",$endbar[i-1]-3,fibobull162,SansSerif,Bold,11) coloured(25,100,0,alpha) DrawSegment($endbar[i]+2,fibobull124,$endbar[i-1]-10,fibobull124) coloured(25,100,0,alpha) DrawText("123.6%",$endbar[i-1]-3,fibobull124,SansSerif,Bold,11) coloured(25,100,0,alpha) DrawSegment($endbar[i]+2,fibobull100,$endbar[i-1]-10,fibobull100) coloured(25,100,0,alpha) DrawText("100%",$endbar[i-1]-3,fibobull100,SansSerif,Bold,11) coloured(25,100,0,alpha) DrawSegment($endbar[i]+2,fibobull76,$endbar[i-1]-10,fibobull76) coloured(25,100,0,alpha) DrawText("76.4%",$endbar[i-1]-3,fibobull76,SansSerif,Bold,11) coloured(25,100,0,alpha) DrawSegment($endbar[i]+2,fibobull62,$endbar[i-1]-10,fibobull62) coloured(25,100,0,alpha) DrawText("61.8%",$endbar[i-1]-3,fibobull62,SansSerif,Bold,11) coloured(25,100,0,alpha) DrawSegment($endbar[i]+2,fibobear62,$endbar[i-1]-10,fibobear62) coloured(200,11,11,alpha) DrawText("61.8%",$endbar[i-1]-3,fibobear62,SansSerif,Bold,11) coloured(200,10,10,alpha) DrawText("76.4%",$endbar[i-1]-3,fibobear76,SansSerif,Bold,11) coloured(200,10,10,alpha) DrawSegment($endbar[i]+2,fibobear76,$endbar[i-1]-10,fibobear76) coloured(200,11,11,alpha) DrawText("100%",$endbar[i-1]-3,fibobear100,SansSerif,Bold,11) coloured(200,10,10,alpha) DrawSegment($endbar[i]+2,fibobear100,$endbar[i-1]-10,fibobear100) coloured(200,11,11,alpha) DrawSegment($endbar[i]+2,fibobear124,$endbar[i-1]-10,fibobear124) coloured(200,11,11,alpha) DrawText("123.6%",$endbar[i-1]-3,fibobear124,SansSerif,Bold,11) coloured(200,10,10,alpha) DrawSegment($endbar[i]+2,fibobear162,$endbar[i-1]-10,fibobear162) coloured(200,11,11,alpha) DrawText("161.8%",$endbar[i-1]-3,fibobear162,SansSerif,Bold,11) coloured(200,10,10,alpha) DrawSegment($endbar[i]+2,fibobear200,$endbar[i-1]-10,fibobear200) coloured(200,11,11,alpha) DrawText("Bearish 200%",$endbar[i-1]-2,fibobear200,SansSerif,Bold,11) coloured(200,10,10,alpha) endif next 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 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 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119

  // Market Resilence EUR | Graph Indicator // 19.01.2019 (Release 1.0) // Swapping @ www.forexswap.fr // Sharing ProRealTime knowledge (alt+16) ( use with time frame 5mn ) DefParam DrawOnLastBarOnly = true // --- property settings Alpha   = 180 // Transparency text Offset  = 10  // Offset alphanumeric/rectangle OPR Level   = 1   // (0=hidden; 1=observable) Text    = 1   // (0=no text; 1=text) numshow = 15  // Show last X days // --- end   starttime = 080500     // 08h00 Pré Market EU (Cac, Dax, Footsie, ect...) endtime   = 090000     // 09h00 Ouverture session européenne   alpha = max(alpha,0)   // Restricted input variable Max-Min alpha = min(alpha,255)       if day<>day[1] and dayofweek<>0 then n=n+1 $hh[n]=0 $ll[n]=0 endif   if time = starttime then startbar = barindex $startbar[n]=barindex endif if time = endtime then endbar = barindex $endbar[n]=barindex endif   if time >= starttime and time <= endtime then if high > $hh[n] then $hh[n] = high endif if low < $ll[n] or $ll[n] = 0 then $ll[n] = low endif endif   if islastbarupdate then for i=n downto n-min(n,numshow)+1 do hh=$hh[i] ll=$ll[i] dif = $hh[i]-$ll[i] fib38 = $hh[i] fib0  = $ll[i] fibobull200 = (fib38-fib0)*5.236+fib0 fibobull162 = (fib38-fib0)*4.236+fib0 fibobull124 = (fib38-fib0)*3.236+fib0 fibobull100 = (fib38-fib0)*1.618+fib38 fibobull76 = (fib38-fib0)+fib38 fibobull62 = (fib38-fib0)*1.618+fib0 fibobear62 = (fib0-fib38)*.618+fib0 fibobear76 = (fib0-fib38)+fib0 fibobear100 = (fib0-fib38)*1.618+fib0 fibobear124 = (fib0-fib38)*2.236+fib0 fibobear162 = (fib0-fib38)*3.236+fib0 fibobear200 = (fib0-fib38)*4.236+fib0   if Text = 1 then   DrawText("OPR #dif#pts",$startbar[i]+6,$hh[i]+(offset*4),SansSerif,Bold,11) coloured(150,150,150,alpha) DrawText(" HI  #hh# ",$startbar[i]+6,$hh[i]+(offset),SansSerif,Standard,10) coloured(22,111,0,alpha) DrawSegment($endbar[i],$hh[i],$endbar[i-1],$hh[i]) coloured(0,200,0,alpha) DrawText("╔═════► ",$startbar[i]+6,$hh[i]+(dif),Dialog,Bold,10) coloured(22,111,0,alpha) // Option OPR - 100% (Glyphe alt+201, alt+205) DrawText(" LO  #ll# ",$startbar[i]+6,$ll[i]-(offset),SansSerif,Standard,10) coloured(200,20,20,alpha) DrawSegment($endbar[i],$ll[i],$endbar[i-1],$ll[i]) coloured(200,0,0,alpha) DrawText("╚═════► ",$startbar[i]+6,$ll[i]-(dif),Dialog,Bold,10) coloured(200,10,10,alpha) // Option OPR - 100% (Glyphe alt+200, alt+205) endif   if Level = 1 then   DrawSegment($endbar[i]+2,fibobull200,$endbar[i-1]-10,fibobull200) coloured(25,100,0,alpha) DrawText("Bullish 200%",$endbar[i-1]-2,fibobull200,SansSerif,Bold,11) coloured(25,100,0,alpha)   DrawSegment($endbar[i]+2,fibobull162,$endbar[i-1]-10,fibobull162) coloured(25,100,0,alpha) DrawText("161.8%",$endbar[i-1]-3,fibobull162,SansSerif,Bold,11) coloured(25,100,0,alpha)   DrawSegment($endbar[i]+2,fibobull124,$endbar[i-1]-10,fibobull124) coloured(25,100,0,alpha) DrawText("123.6%",$endbar[i-1]-3,fibobull124,SansSerif,Bold,11) coloured(25,100,0,alpha)   DrawSegment($endbar[i]+2,fibobull100,$endbar[i-1]-10,fibobull100) coloured(25,100,0,alpha) DrawText("100%",$endbar[i-1]-3,fibobull100,SansSerif,Bold,11) coloured(25,100,0,alpha)   DrawSegment($endbar[i]+2,fibobull76,$endbar[i-1]-10,fibobull76) coloured(25,100,0,alpha) DrawText("76.4%",$endbar[i-1]-3,fibobull76,SansSerif,Bold,11) coloured(25,100,0,alpha)   DrawSegment($endbar[i]+2,fibobull62,$endbar[i-1]-10,fibobull62) coloured(25,100,0,alpha) DrawText("61.8%",$endbar[i-1]-3,fibobull62,SansSerif,Bold,11) coloured(25,100,0,alpha)     DrawSegment($endbar[i]+2,fibobear62,$endbar[i-1]-10,fibobear62) coloured(200,11,11,alpha) DrawText("61.8%",$endbar[i-1]-3,fibobear62,SansSerif,Bold,11) coloured(200,10,10,alpha)   DrawText("76.4%",$endbar[i-1]-3,fibobear76,SansSerif,Bold,11) coloured(200,10,10,alpha) DrawSegment($endbar[i]+2,fibobear76,$endbar[i-1]-10,fibobear76) coloured(200,11,11,alpha)   DrawText("100%",$endbar[i-1]-3,fibobear100,SansSerif,Bold,11) coloured(200,10,10,alpha) DrawSegment($endbar[i]+2,fibobear100,$endbar[i-1]-10,fibobear100) coloured(200,11,11,alpha)   DrawSegment($endbar[i]+2,fibobear124,$endbar[i-1]-10,fibobear124) coloured(200,11,11,alpha) DrawText("123.6%",$endbar[i-1]-3,fibobear124,SansSerif,Bold,11) coloured(200,10,10,alpha)   DrawSegment($endbar[i]+2,fibobear162,$endbar[i-1]-10,fibobear162) coloured(200,11,11,alpha) DrawText("161.8%",$endbar[i-1]-3,fibobear162,SansSerif,Bold,11) coloured(200,10,10,alpha)   DrawSegment($endbar[i]+2,fibobear200,$endbar[i-1]-10,fibobear200) coloured(200,11,11,alpha) DrawText("Bearish 200%",$endbar[i-1]-2,fibobear200,SansSerif,Bold,11) coloured(200,10,10,alpha) endif next endif   return

  

  Iván

  Moderator

  Topics: 0

  Replies: 978

  Been thanked: 340 times
  10/03/2024 at 12:49 PM #238463
  Msport71

  Grazie e mille!

  

  Msport71

  Participant

  Topics: 47

  Replies: 100

  Been thanked: 3 times
• Author
  Posts