Kind of like the "point object" function? If so, this may work:
+ Code Snippetfunction PointObjectY(obj,x#,y#,z#)
oax#=object angle x(obj)
oaz#=object angle z(obj)
point object obj,x#,y#,z#
xrotate object obj, oax#
zrotate object obj, oaz#
endfunction
I hope that helps.

Cheers,
-naota