Egalware/DataBeam
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

DataBeam :

Browse Source 
- aumentata lunghezza minima barre da progetto a 2500 mm
- migliorata gestione sega a catena con PF1250
- aggiunto script per filling automatico barre.
This commit is contained in:
DarioS
2021-04-30 19:44:13 +02:00
parent 68944b1bd5
commit babab61e3b
3 changed files with 264 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files
LuaLibs/ProcessLapJoint.lua
+23
View File
@@ -2196,6 +2196,13 @@ local function MakeByChainOrSaw( Proc, nPhase, nRawId, nPartId, nFacInd,
return false, sErr
end
EgtSetMachiningParam( MCH_MP.BLOCKEDAXIS, EgtIf( BD.C_SIMM, 'A=0', 'A=90'))
if BD.C_SIMM then
if vtN:getY() > 0 then
EgtSetMachiningParam( MCH_MP.INITANGS, 'C=180')
else
EgtSetMachiningParam( MCH_MP.INITANGS, 'C=-180')
end
end
if not EgtApplyMachining( true, false) then
local _, sErr = EgtGetLastMachMgrError()
EgtSetOperationMode( nMchFId, false)
@@ -2270,6 +2277,14 @@ local function MakeByChainOrSaw( Proc, nPhase, nRawId, nPartId, nFacInd,
return false, sErr
end
EgtSetMachiningParam( MCH_MP.BLOCKEDAXIS, EgtIf( BD.C_SIMM, 'A=0', 'A=90'))
if BD.C_SIMM then
local vtN = EgtSurfTmFacetNormVersor( Proc.Id, nLundIdFace, GDB_ID.ROOT)
if vtN:getY() > 0 then
EgtSetMachiningParam( MCH_MP.INITANGS, 'C=180')
else
EgtSetMachiningParam( MCH_MP.INITANGS, 'C=-180')
end
end
if not EgtApplyMachining( true, false) then
local _, sErr = EgtGetLastMachMgrError()
EgtSetOperationMode( nMchFId, false)
@@ -3145,6 +3160,14 @@ local function MakeMoreFaces( Proc, nPhase, nRawId, nPartId, dOvmHead, bSinglePa
return false, sErr
end
EgtSetMachiningParam( MCH_MP.BLOCKEDAXIS, EgtIf( BD.C_SIMM, 'A=0', 'A=90'))
if BD.C_SIMM then
local vtN = EgtSurfTmFacetNormVersor( Proc.Id, nLundIdFace, GDB_ID.ROOT)
if vtN:getY() > 0 then
EgtSetMachiningParam( MCH_MP.INITANGS, 'C=180')
else
EgtSetMachiningParam( MCH_MP.INITANGS, 'C=-180')
end
end
if not EgtApplyMachining( true, false) then
local _, sErr = EgtGetLastMachMgrError()
EgtSetOperationMode( nMchFId, false)