Stege automatisch setzen als "Ausschnitt mit 3 Freiheitsgraden"

Mit der Routine PVB414 kann eine Stanzstrecke mit Stegen automatisch erzeugt werden. Das funktioniert sowohl mit Standardwerkzeugen (rechteckig) als auch mit speziellen Werkzeugen wie Trapez.

C XS,YS : Startpunkt der Linie

C XE,YE : Endpunkt der Linie

C   IDN : Identnummer des Normwerkzeugs

C   IDW : Identnummer des Microstegwerkzeugs

C   IRL : Seite der Bearbeitung (-1=links, 1=rechts)

C   IAW : Anzahl der Stege in der Mitte der Linie

C   WEB : Stegbreite in der Mitte der Linie

C   OVS : Überstand am Anfang der Linie

C   OVE : Überstand am Ende der Linie

C   CDS : Abstand zum Steg am Enfang der Linie

C   CDE : Abstand zum Steg am Ende der Linie

      CALL PVB414 (XS,YS,XE,YE,IDN,IDW,IRL,

     *IAW,WEB,OVS,OVE,CDS,CDE,IC,IRET)

HINWEIS! Die Variablen "IDN" und "IDW" sind vom Typ String und müssen daher im Programmkopf deklariert werden.

      CHARACTER*80 IDN

      CHARACTER*80 IDW

HINWEIS! Wenn auf einer Strecke nur 1 Steg gesetzt werden soll, muss der Wert für "Abstand am Anfang" auf das entsprechende Maß für die Mitte gesetzt werden. Die Routine setzt einen einzelnen Steg nicht automatisch mittig.