Ricopiare percorso da manipolo.

[gioreva]

Io faccio il percorso a mano e poi devo replicarlo in automatico.

Sto studiando le macro ma non capisco come scrivere un file.
Ci sono Teach File e Dig File
Ma non capisco cosa sono.

[gioreva]

Forse ci riesco.


‘ Create a new Teach File in Mach3\Gcode
MyTeachFile = “TeachMe.nc”
Err = OpenTeachFile(MyTeachFile)
If Err <> 0 Then
‘ Teach file created successfully
‘ Write some G Code to it
Code “G00 X0 Y0”
Code “G02 X0 Y0 I-1 J0 F40”
‘ Close the Teach file
CloseTeachFile()
‘ Now load the teach file for execution
LoadTeachFile()
Else
‘ OpenTeachFile failed
Message “Unable to open Teach File”
End If

[gioreva]

Per chi gli servisse, questa macro aggiunge al file le quote dei tre assi.

TeachFile = "Copy.tap"
Dim Er As Integer
Er = AppendTeachFile(TeachFile)
If Er = 0 Then
MsgBox("Unable To Append: " & TeachFile)
Else
Code("G1X" & GetOemDRO(800) & "Y" & GetOemDRO(801) & "Z" & GetOemDRO(802))
End If
CloseTeachFile()