Вот давненько писал:
Entity% - объект.
nx# - нормализованный x компонент вектора.
ny# - нормализованный y компонент вектора.
nz# - нормализованный z компонент вектора.
Global% - глобально\локально манипулировать объектом.
Function mAlignEntity(Entity%,nx#,ny#,nz#,Global%=0)
RotateEntity Entity,ASin(ny)-90,ATan2(nz,nx)+90,0,Global
End Function