st1=(close-high) * volume
st2=(close-low) * volume
st3=(cumsum (st1+st2))
if -st1/st2 > (1) then
DRAWHLINE(close) coloured (0, 255, 0, 10)
endif
if st2/-st1 > (1) then
DRAWHLINE(close) coloured (255, 0, 0, 10)
endif
if -st1/st2 > (10) then
DRAWHLINE(close) coloured (0, 255, 0, 10)
endif
if st2/-st1 > (10) then
DRAWHLINE(close) coloured (255, 0, 0, 10)
endif
if -st1/st2 > (20) then
DRAWHLINE(close) coloured (0, 255, 0, 20)
endif
if st2/-st1 > (20) then
DRAWHLINE(close) coloured (255, 0, 0, 20)
endif
if -st1/st2 > (30) then
DRAWHLINE(close) coloured (0, 255, 0, 30)
endif
if st2/-st1 > (30) then
DRAWHLINE(close) coloured (255, 0, 0, 30)
endif
if -st1/st2 > (40) then
DRAWHLINE(close) coloured (0, 255, 0, 40)
endif
if st2/-st1 > (40) then
DRAWHLINE(close) coloured (255, 0, 0, 40)
endif
if -st1/st2 > (50) then
DRAWHLINE(close) coloured (0, 255, 0, 50)
endif
if st2/-st1 > (50) then
DRAWHLINE(close) coloured (255, 0, 0, 50)
endif
if -st1/st2 > (60) then
DRAWHLINE(close) coloured (0, 255, 0, 60)
endif
if st2/-st1 > (60) then
DRAWHLINE(close) coloured (255, 0, 0, 60)
endif
if -st1/st2 > (70) then
DRAWHLINE(close) coloured (0, 255, 0, 70)
endif
if st2/-st1 > (70) then
DRAWHLINE(close) coloured (255, 0, 0, 70)
endif
if -st1/st2 > (80) then
DRAWHLINE(close) coloured (0, 255, 0, 80)
endif
if st2/-st1 > (80) then
DRAWHLINE(close) coloured (255, 0, 0, 80)
endif
if -st1/st2 > (90) then
DRAWHLINE(close) coloured (0, 255, 0, 90)
endif
if st2/-st1 > (90) then
DRAWHLINE(close) coloured (255, 0, 0, 90)
endif
if -st1/st2 > (100) then
DRAWHLINE(close) coloured (0, 255, 0, 100)
endif
if st2/-st1 > (100) then
DRAWHLINE(close) coloured (255, 0, 0, 100)
endif
if -st1/st2 > (110) then
DRAWHLINE(close) coloured (0, 255, 0, 110)
endif
if st2/-st1 > (110) then
DRAWHLINE(close) coloured (255, 0, 0, 110)
endif
if -st1/st2 > (120) then
DRAWHLINE(close) coloured (0, 255, 0, 120)
endif
if st2/-st1 > (120) then
DRAWHLINE(close) coloured (255, 0, 0, 120)
endif
if -st1/st2 > (130) then
DRAWHLINE(close) coloured (0, 255, 0, 130)
endif
if st2/-st1 > (130) then
DRAWHLINE(close) coloured (255, 0, 0, 130)
endif
if -st1/st2 > (140) then
DRAWHLINE(close) coloured (0, 255, 0, 140)
endif
if st2/-st1 > (140) then
DRAWHLINE(close) coloured (255, 0, 0, 140)
endif
if -st1/st2 > (150) then
DRAWHLINE(close) coloured (0, 255, 0, 150)
endif
if st2/-st1 > (150) then
DRAWHLINE(close) coloured (255, 0, 0, 150)
endif
if -st1/st2 > (160) then
DRAWHLINE(close) coloured (0, 255, 0, 160)
endif
if st2/-st1 > (160) then
DRAWHLINE(close) coloured (255, 0, 0, 160)
endif
if -st1/st2 > (170) then
DRAWHLINE(close) coloured (0, 255, 0, 170)
endif
if st2/-st1 > (170) then
DRAWHLINE(close) coloured (255, 0, 0, 170)
endif
if -st1/st2 > (180) then
DRAWHLINE(close) coloured (0, 255, 0, 180)
endif
if st2/-st1 > (180) then
DRAWHLINE(close) coloured (255, 0, 0, 180)
endif
if -st1/st2 > (190) then
DRAWHLINE(close) coloured (0, 255, 0, 190)
endif
if st2/-st1 > (190) then
DRAWHLINE(close) coloured (255, 0, 0, 190)
endif
if -st1/st2 > (200) then
DRAWHLINE(close) coloured (0, 255, 0, 200)
endif
if st2/-st1 > (200) then
DRAWHLINE(close) coloured (255, 0, 0, 200)
endif
if st3 > (0) then
DRAWHLINE(close) coloured (255, 255, 255, 22)
endif
if st3 < (0) then
DRAWHLINE(close) coloured (255, 255, 255, 22)
endif
return
