Ricopiare percorso da manipolo.

Sezione dedicata a Mach3
Rispondi
gioreva
Junior
Junior
Messaggi: 58
Iscritto il: martedì 25 ottobre 2016, 14:57

Re: Ricopiare percorso da manipolo.

Messaggio da gioreva » martedì 2 febbraio 2021, 20:36

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
Junior
Junior
Messaggi: 58
Iscritto il: martedì 25 ottobre 2016, 14:57

Re: Ricopiare percorso da manipolo.

Messaggio da gioreva » martedì 2 febbraio 2021, 20:47

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
Junior
Junior
Messaggi: 58
Iscritto il: martedì 25 ottobre 2016, 14:57

Re: Ricopiare percorso da manipolo.

Messaggio da gioreva » mercoledì 3 febbraio 2021, 17:49

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()

Rispondi

Torna a “Mach3”