Compare commits
2 Commits
| Author | SHA1 | Date | |
|---|---|---|---|
| 1bb49c8cd2 | |||
| b8f693a820 |
+11
-4
@@ -443,10 +443,11 @@ function OnMachiningStart()
|
||||
EmtModifyAxisHome( 'C2', MyParkCSawC2)
|
||||
end
|
||||
-- gestione eventuale tastatura
|
||||
local bProbing = EgtGetValInNotes( EMT.MCHUSERNOTES, 'PROBE', 'b')
|
||||
local bProbing = EgtGetValInNotes( EMT.MCHUSERNOTES, 'PROBE', 'b') or EgtGetValInNotes( EMT.MCHUSERNOTES, 'START-PROBE', 'b')
|
||||
if bProbing then
|
||||
if VerifyToolProbeCompatibility() then
|
||||
EMT.PROBE = true
|
||||
EMT.EXECPROBE = true
|
||||
end
|
||||
end
|
||||
-- gestione eventuale lavorazione in doppio
|
||||
@@ -612,10 +613,15 @@ function OnMachiningEnd()
|
||||
EMT.PREVTOOL = EMT.TOOL
|
||||
EMT.PREVHEAD = EMT.HEAD
|
||||
EMT.PREVTCPOS = EMT.TCPOS
|
||||
|
||||
-- se tastatura attiva, si disabilita la tastatura
|
||||
if EMT.PROBE then
|
||||
EmtOutput( 'G145 Z-10 EF7')
|
||||
EMT.PROBE = nil
|
||||
-- gestione eventuale tastatura
|
||||
local bStopProbing = EgtGetValInNotes( EMT.MCHUSERNOTES, 'PROBE', 'b') or EgtGetValInNotes( EMT.MCHUSERNOTES, 'END-PROBE', 'b')
|
||||
if bStopProbing then
|
||||
EmtOutput( 'G145 Z-10 EF7')
|
||||
EMT.PROBE = nil
|
||||
end
|
||||
end
|
||||
-- se taglio finale, aggiorno lunghezza barra
|
||||
if EMT.MCHCUT then
|
||||
@@ -1521,7 +1527,8 @@ function OnRapid()
|
||||
EMT.RELOAD2 = nil
|
||||
end
|
||||
-- se bisogna fare tastatura
|
||||
if EMT.PROBE then
|
||||
if EMT.EXECPROBE then
|
||||
EMT.EXECPROBE = nil
|
||||
local vtE = Vector3d( EMT.EXTR)
|
||||
local sFace
|
||||
if AreSameVectorApprox( vtE, Y_AX()) then
|
||||
|
||||
+1
-1
@@ -32,7 +32,7 @@
|
||||
require( 'EmtGenerator')
|
||||
EgtEnableDebug( false)
|
||||
|
||||
PP_VER = '2.7f1_DEV'
|
||||
PP_VER = '2.7f1_DEV2'
|
||||
PP_NVER = '2.7.6.1'
|
||||
MIN_MACH_VER = '2.5k1'
|
||||
MACH_NAME = 'Essetre-PF'
|
||||
|
||||
@@ -14,6 +14,8 @@
|
||||
4=s,VtFaceUse,0,0,0
|
||||
5=s,EdgesFaceUse,0
|
||||
6=b,PROBE,0
|
||||
7=b,START-PROBE,0
|
||||
8=b,END-PROBE,0
|
||||
|
||||
[Pocketing]
|
||||
0=l,MaxElev,0
|
||||
|
||||
Reference in New Issue
Block a user