ArcTan2

Функция вычисляет ArcTan2(Y/X) и возвращает значение угла в радианах с учетом квадранта в диапазоне от -Pi до Pi. Значения X и Y не должны выходить за пределы диапазона (-264...264), а также значение Х не должно быть равным 0. Наименование "aTan2" - более раннее название функции в прошлых версиях, оставлено для совместимости.

Синтаксис
ArcTan2(Y: Extended; X: Extended): Extended или aTan2(Y: Extended; X: Extended): Extended
Входные параметры
Имя параметра	Тип параметра	Описание
Y	Extended	Вещественное число (диапазон -264...264)
X	Extended	Вещественное число (диапазон -264...264) (не должно быть равно 0)
Выходные параметры
Тип параметра		Описание
Extended		Значение угла в радианах с учетом квадранта в диапазоне от -Pi до Pi

Пример вызова:

Var
    res, X, Y: Extended;

Begin
    X := 17;
    Y := 37;
    res := ArcTan2(Y, X);
    WriteValue('Virtual channel 99', res);
end.