Rita stödraster med script

Vi fick en fråga idag om hur man kan få stödraster eller referenslinjer i analysområde A tex. Det går att göra exempelvis så här:

relative_strength:=Rsi(4)
medelvärde:=Mov(relative_strength,5,s)

i60(
Draw(0,2,dwda)
Draw(-50,3,dwda)
Draw(50,4,dwda)
Draw(-100,5,dwda)
Draw(100,6,dwda)
Draw(10,7,dwsaF)
Draw(medelvärde,8,rda)
)


Sciptet ritar grå linje vid värden -100, -50, 0, 50 samt 100.
Dessutom ritas korta tidmarkeringar varje timme och en kurva som svänger mellan -100 och 100 (vår egen RSI-tolkning).