c116-4 komplett deutsch.pdf

iselautomation KG
isel-CNC-Betriebssystem 5.x
Interpolationsparameter D
D muss übergeben werden, da die Prozessorkarte aufgrund ihrer Speicherkapazität nicht
in der Lage ist, diesen Parameter zu berechnen.
Zur Berechnung können Sie folgenden Programmausschnitt heranziehen.
function Summe(xx:real):real;
begin
if(xx>0) then
Summe:=xx*(xx+1)
else
Summe:= -xx*(xx-1)
end;
function formel:real;
begin
if (Kreisrichtung=Gegenuhrzeigersinn) then
Formel:= (Rx*Ry*Radius+Rx*Ry*Summe(Radius-1.0)
-Rx*Summe(Xs+(Rx-Ry)/2.0)+Ry*Summe(Ys+(Rx+Ry)/2.0))/2;
else
{Richtung = Uhrzeigersinn}
Formel:= (-Rx*Ry*Radius-Rx*Ry*Summe(Radius-1.0)
- Rx*Summe(Xs+(Rx+Ry)/2.0) + Ry*Summe(Ys+(Ry-Rx)/2))/2;
end;
D:=Formel;
Der berechnete Parameter muss als gerundet und als ganzzahliger Wert übergeben
werden.
31