openLO=143000
closeLO=160000
//Long=1 //Boolean
//Short=1 //Boolean
limitday=220000
endentry=closeLO + 050000
endtime=closeLO
atr=AverageTrueRange[14](close)
if ticksize=1 or ticksize=0.01 then
decimalsPlaces=0
elsif ticksize=0.001 then//
decimalsPlaces=1
elsif ticksize=0.0001 then//
decimalsPlaces=3
elsif ticksize=0.00001 then
decimalsPlaces=4
endif
if gettimeframe<=3600 then
once maxHighLO=high
once minLowLO=low
if opentime>=openLO and opentime<=closeLO THEN
maxi = highest[max(1,barras+1)](high)
mini = LOWEST[max(1,barras+1)](low)
rangol = maxi-mini
objetivool = maxi+rangol
ENDIF
if opentime>=openLO and opentime<=closeLO then
barLO=barLO+1
if high>=maxHighLO then
maxHighLO=high
else
maxHighLO=maxHighLO
endif
if low<=minLowLO then
minLowLO=low
else
minLowLO=minLowLO
endif
endif
if opentime=closeLO then
MidRange0 = (maxHighLO – minLowLO) / 2
MidPrice = minLowLO + MidRange0
drawsegment(barindex[barLO],MidPrice,barindex,MidPrice)coloured(“blue”) style(dottedline,2)coloured(“cadetblue”,75)
ENDIF
endif
if opentime=closeLO then
Once Myt1 = openLO
Once Myt2 = endtime
Once Count = 0
MidRange=(maxHighLO – minLowLO) / 2
If OpenTime >= MyT1 AND OpenTime <= Myt2 then
Count = Count + 1
barras=barlo-1
if decimalsPlaces=0 then
pp=round(MidRange*2)
nivel=pp
elsif decimalsPlaces=1 then
pipsF=round(MidRange*200)
nivel=pipsF
elsif decimalsPlaces=3 then
pipsJ=MidRange*20000
nivel=pipsJ
elsif decimalsPlaces=4 then
pipsD=round(MidRange*20000)
nivel=pipsD
endif
Endif
drawrectangle(barindex[barLO],minLowLO,barindex,maxHighLO) coloured(“cadetblue”) fillcolor(“cadetblue”,30)
drawtext(“UP #maxHighLO#”,barindex[round(barLO/2)],maxHighLO+0.15*atr)coloured(“cadetblue”)
drawtext(“DOWN: #minLowLO# “,barindex[round(barLO/2)],minLowLO-0.15*atr)coloured(“cadetblue”)
drawtext(“#nivel#”,barindex[round(barLO/2)],MidPrice ,SansSerif,Bold,85)coloured(“cadetblue”,95)
prevLowLO=minLowLO
prevHighLO=maxHighLO
previdxLO=barindex
barLO=0
minLowLO=high*100
maxHighLO=0
ENDIF
if low crosses under prevLowLO then
drawsegment(previdxLO,prevLowLO,barindex,prevLowLO)coloured(“cadetblue”)
prevLowLO=0
elsif opentime=limitday and prevLowLO<>0 then
drawsegment(previdxLO,prevLowLO,barindex,prevLowLO)coloured(“cadetblue”)
prevLowLO=0
elsif islastbarupdate and prevLowLO<>0 then
drawsegment(previdxLO,prevLowLO,barindex,prevLowLO)coloured(“cadetblue”)
endif
if high crosses over prevHighLO then
drawsegment(previdxLO,prevHighLO,barindex,prevHighLO)coloured(“cadetblue”)
prevHighLO=0
elsif opentime=limitday and prevHighLO<>0 then
drawsegment(previdxLO,prevHighLO,barindex,prevHighLO)coloured(“cadetblue”)
prevHighLO=0
elsif islastbarupdate and prevHighLO<>0 then
drawsegment(previdxLO,prevHighLO,barindex,prevHighLO)coloured(“cadetblue”)
endif
////////////////////////////////////////////LONG////////////////////////////////////////////
if time = openlo then
startbarl = barindex
maximo = highest[max(1,barras+1)](high)
minimo = LOWEST[max(1,barras+1)](low)
endif
if time = closelo then
endbarl = barindex
maximo = highest[max(1,barras+1)](high)
minimo = LOWEST[max(1,barras+1)](low)
ENDIF
rangl=maxi-mini
objetivol= maxi+rangl
objetivos =mini -((abs(maximo-minimo)))
stoplosl=mini
if time <= endentry and long=1 then//
short=0
if time>endtime and time<=endentry and long=1 then
DrawRectangle(endbarl+barras,objetivool,endbarl+1,maxi)coloured(“cadetblue”,50)bordercolor(“cadetblue”,50 )
DrawRectangle(endbarl+barras,maxi,endbarl+1,stoplosl)coloured(“lightgray”,70)bordercolor(“lightgray”,90)
ENDIF
endif
if time=closelo and time<=endentry and long=1 then
short=0
DrawText(“ENTRY LEVEL #maxi#”,endbarl+0.5*barras,maxi+(+0.15*atr),SansSerif,standard,10)coloured(“cadetblue”)
DrawText(“TARGET: #objetivol# #objetivos#”,endbarl+0.5*barras,objetivol+(+0.15*atr),SansSerif,bold,10) coloured(“cadetblue”)
DrawText(“STOPLOSS LEVEL #mini#”,endbarl+0.5*barras,(mini+0.10*atr),SansSerif,bold,10)coloured(“cadetblue”)
endif
////////////////////////////////////////////SHORT///////////////////////////////////////////
if time = openlo then
startbars = barindex
maximol = highest[max(1,barras+1)](high)
minimos = LOWEST[max(1,barras+1)](low)
endif
if time = closelo then
endbars = barindex
maximol = highest[max(1,barras+1)](high)
minimo = LOWEST[max(1,barras+1)](low)
ENDIF
if time <= endentry and short=1 then//
long=0
if time>endtime and time<=endentry and short=1 then
DrawRectangle(endbars+barras,mini,endbars+1,maxi)coloured(“lightgray”,70)bordercolor(“lightgray”,70)
DrawRectangle(endbars+barras,objetivos,endbars+1,mini) coloured(“cadetblue”,50)bordercolor(“cadetblue”,50 )
ENDIF
endif
if time>closelo and time<=endentry and short=1 then
Long=0
DrawText(“ENTRY LEVEL #mini#”,endbars+0.5*barras,mini-(0.7*pointsize),SansSerif,standard,10)coloured(“cadetblue”)
DrawText(“TARGET: #objetivos#”,endbars+0.5*barras,objetivos+(1*pointsize),SansSerif,bold,10) coloured(“cadetblue”)
DrawText(“STOPLOSS LEVEL #maxi#”,endbars+0.5*barras,maximo+(0.7*pointsize),SansSerif,bold,10)coloured(“cadetblue”)
endif
return
