Achse A6 Drehen

Mach mal noch ein BAS(#INITMOV) vor deine erste Bewegung.

Hallo

DECL INT pAktuell

DECL AXIS pA6Achse
INT

BAS(#INIMOV)
PTP $POS_ACT

xpAktuell=$pos_act
xpAktuell.Z=670
pA6Achse.A6=270.0

PTP pA6Achse
PTP xpAktuell

PTP HOME Vel=100% Default
END

Hallo,
wie Loipe schon richtig verbessert hat muss du erst per "[size=2][font=Verdana, Arial, Helvetica, sans-serif]PTP $POS_ACT" deine SAK fahren.[/font][/size]
[font=Verdana, Arial, Helvetica, sans-serif][size=2]In deinem Fall kann man das sehr simpel halten...SAK->in Z Richtung -> Achse 6 drehen[/size][/font]

PTP $POS_ACT
lin {z 670}
ptp {a6 -270}

[size=2][font=Verdana, Arial, Helvetica, sans-serif]oder alternativ [/font][/size][font=Verdana, Arial, Helvetica, sans-serif][size=2]lin_rel {z 100} um relativ in Z Richtung zu Fahren.[/size][/font]
[font=Verdana, Arial, Helvetica, sans-serif][size=2]Gruß[/size][/font]
[font=Verdana, Arial, Helvetica, sans-serif][size=2]Tilman[/size][/font]

An dieser Stelle sei mir vielleicht noch mal die Erinnerung daran erlaubt, dass durch PTP $POS_ACT auch die SAK-Fahrt ohne jede Bewegung stattfindet. Wenn man dazu neigt, im T2-Betrieb Programme zu testen (oder wenn es aufgrund des Prozesses nötig ist), dann kann die erste "echte" Bewegung schmerzhaft überraschend kommen, denn sie liegt nur einen Knopfdruck weit weg.
(x) ja, ich passe auf.
(x) Nach 10 Stunden in der Zelle auch noch.

Grüße,
Michael

dann machst lässt du dieses im SPS.sub mitlaufen

DEF sak_t2( )
  IF $Move_BCO AND $T2 AND ($OV_PRO > 10) THEN
    $FLAG[500]=TRUE
  ENDIF
  IF Not $Move_BCO AND $Flag[500] THEN
    $OV_PRO=10
    $FLAG[500]=FALSE
  ENDIF
END

wenn Bewegung SAK fahrt und T2 und Overide größer 10
schaltet er nach ereichen von SAK zurück auf 10%

Goiiile Idee, danke!

Grüße,
Michael