Hallo zusammen
Habe jetzt endlich Zeit gefunden den Funktionsgenerator mal zu testen.
Komme aber nicht weiter.
Auch mit dem nachfolgenden ganz primitiven Programm bekomme ich immer den gleichen Fehler: >>> 1580 Techfunktion $TECH[1].FCT unzulässig <<<
Kann mir vielleicht einer sagen was ich falsch mache bzw. was fehlt ?
DECL TECH OSCI1 ; Variablen vom Typ TECH deklarieren
CENTER = $NULLFRAME
CENTER.X = 220
CENTER.Y = 384
S_POINT = $NULLFRAME
S_POINT.X = 160
S_POINT.Y = 293
OSCI1.MODE = #CYCLE ; Kartesisches Pendeln ist eine zyklische Funktion.
OSCI1.FCTCTRL.SCALE_IN = 2 ; Wellenlänge der Pendelschwingung ist 2mm.
OSCI1.FCTCTRL.OFFSET_IN = 0 ; Auslenkungs Beginn ist CP Bahnbeginn.
OSCI1.FCTCTRL.SCALE_OUT = 3 ; Amplitude des Pendelns ist 3mm.
OSCI1.FCTCTRL.OFFSET_OUT = 0 ; Schwerpunkt der Pendelschwingung ist auf der Bahn: Bei Amplitude = 0 wird die ungependelte Bahn gefahren.
OSCI1.CLASS = #PATH ; Argument der Pendel Figur ist die Bogenlänge, d.h. SCALE_IN die Wellenlänge.
OSCI1.FCTCTRL.GEOREF = #Z ; Richtung der Pendel Auslenkung in Z Richtung im TTS
OSCI1.FCT.ORDER = 1 ; Pendel Figur durch Polygonzug aus den Werte Paaren der Funktions Tabelle erzeugen.
CUTPOS = CENTER
CUTPOS.Z = 0
LIN CUTPOS
halt
CUTPOS = S_POINT
CUTPOS.Z = 0
$TECH[1] = OSCI1 ; ab dem nächsten CP Satz wird gependelt.
LIN CUTPOS C_DIS
Servus Roland