PSAR = SAR[x,y,z]
 
IF close crosses under PSAR then
a= PSAR

endif

If close crosses over PSAR then
b = PSAR
endif
if close<PSAR then
p = b-(a-b)
endif



return a , b, p[d]  coloured(111,111,111)

//return p[d] coloured (0,0,0)
//return a coloured(23,345,76,0)