2011
VB and the development of wizards / Re: manual tool change
« on: February 22, 2018, 04:03:43 AM »
your code contains some Kind of height correction.
even it is very crowdy.
-copy your code into vbscripter window (Operator --> VB Script Editor)
-use the green >|| button to step throught code
-watch z-axis dro
even it is very crowdy.
Code: [Select]
zdif = zorig - (znew) ' controllo se l'utensile è più corto o piu lungo
code "G53 G0 Z" & zzero-(zdif) ' riporto Z al valore zero pezzo con la differenza utensile
While IsMoving()
Wend
Call SetDro (2,0) ' porto contatore Z a zero
code "G0 Z" & zpos ' riporto Z al valore di partenza (inizio programma)
While IsMoving()
Wend
-copy your code into vbscripter window (Operator --> VB Script Editor)
-use the green >|| button to step throught code
-watch z-axis dro