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