Координаты XCEN, YСЕN – определяются с помощью процедуры PERS, входная информация для которой готовится следующим образом: обращением к процедуре VECT определяется направление косинусов линейных элементов, образующих 1-ю вершину контура, задаются номера №1 = №2 = 1 и расстояния d1, d2, равные величине радиуса, скругляющего данную вершину (с учетом типа вершины).
В качестве значений d1 и d2 в процедуру PERS засылается значение RxSIGN(SINFI).
Оператор-функция, с помощью которой находится ХСЕN и YCEN имеет вид:
XCEN(I) = PER(X(I), ACOS1(I), ACOS2(I), R(I)D2(I), SINFI(I))
YCEN(I) = PER(Y(I), BCOS1(I), BCOS2(I), R(I)D1(I), SINFI(I))
Знак R(I) – положителен, если SINFI > 0;
R(I) – отрицателен, если SINFI < 0.
Координаты концов дуги определяются по формулам:
X1 = XCEN – R(I) •BCOS1
Y1 = YCEN + R(I) •ACOS1
X2 = XCEN – R(I) •BCOS2
Y2 = YCEN + R(I) •ACOS2
Оператор функция имеет вид:
XKDUG(A, B, C) = A – B • C
YKDUG(A, B, C) = A + B • C
Вызов операторов:
XKD1 = XKDUG(XCEN, R, BCOS1)
YKD1 = YKDUG(YCEN, R, ACOS1)
XKD2 = XKDUG(XCEN, R, BCOS2)
YKD2 = YKDUG(YCEN, R, ACOS2)
