st1=(high-close)
st2=(low-close)
if st1 / -st2 > (1) then
DRAWLINE (barindex, close, barindex[2], close[2]) coloured (255,0,0, 25)
endif
if -st2 / st1 > (1) then
DRAWLINE (barindex, close, barindex[2], close[2]) coloured (0,255,0, 25)
endif
if st1 / -st2 > (5) then
DRAWLINE (barindex, close, barindex[2], close[2]) coloured (255,0,0, 50)
endif
if -st2 / st1 > (5) then
DRAWLINE (barindex, close, barindex[2], close[2]) coloured (0,255,0, 50)
endif
if st1 / -st2 > (10) then
DRAWLINE (barindex, close, barindex[2], close[2]) coloured (255,0,0, 100)
endif
if -st2 / st1 > (10) then
DRAWLINE (barindex, close, barindex[2], close[2]) coloured (0,255,0, 100)
endif
if st1 / -st2 > (20) then
DRAWLINE (barindex, close, barindex[2], close[2]) coloured (255,0,0, 200)
endif
if -st2 / st1 > (20) then
DRAWLINE (barindex, close, barindex[2], close[2]) coloured (0,255,0, 200)
endif
if st1 / -st2 > (1) then
DRAWELLIPSE(barindex, close, barindex[2], close[2]) coloured (255,0,0, 25)
endif
if -st2 / st1 > (1) then
DRAWELLIPSE(barindex, close, barindex[2], close[2]) coloured (0,255,0, 25)
endif
if st1 / -st2 > (5) then
DRAWELLIPSE(barindex, close, barindex[2], close[2]) coloured (255,0,0, 50)
endif
if -st2 / st1 > (5) then
DRAWELLIPSE(barindex, close, barindex[2], close[2]) coloured (0,255,0, 50)
endif
if st1 / -st2 > (10) then
drawrectangle(barindex, close, barindex[2], close[2]) coloured (255,0,0, 100)
endif
if -st2 / st1 > (10) then
drawrectangle(barindex, close, barindex[2], close[2]) coloured (0,255,0, 100)
endif
if st1 / -st2 > (20) then
drawrectangle(barindex, close, barindex[2], close[2]) coloured (255,0,0, 200)
endif
if -st2 / st1 > (20) then
drawrectangle(barindex, close, barindex[2], close[2]) coloured (0,255,0, 200)
endif
return