|
|
|
@@ -81,7 +81,8 @@
|
|
|
|
|
-- 2023/10/03 In MakePocket aggiunto messaggio in caso si rovini il pezzo successivo.
|
|
|
|
|
-- 2023/10/25 In LapJoint 2 facce longitudinali faccio di lama solo se taglio completamente. Altrimenti fresa.
|
|
|
|
|
-- 2023/10/27 In Lapjoint 2 facce con angolo > 90 deg, se forzata fresa, si svuota la faccia principale e si lavora poi la faccia inclinata.
|
|
|
|
|
-- 2023/11/03 In MakeStaircaseStep aggiunta lavorazione smussi opzionale.
|
|
|
|
|
-- 2023/11/03 Aggiunta MakeStaircaseStep per lavorazione con fresa + lama di gradini scala. Smusso opzionale.
|
|
|
|
|
-- 2023/11/06 In MakeStaircaseStep gestito ritorno.
|
|
|
|
|
|
|
|
|
|
-- Tabella per definizione modulo
|
|
|
|
|
local ProcessLapJoint = {}
|
|
|
|
@@ -5671,6 +5672,7 @@ end
|
|
|
|
|
|
|
|
|
|
---------------------------------------------------------------------
|
|
|
|
|
local function MakeStaircaseStep( Proc, nRawId, b3Raw, nPartId)
|
|
|
|
|
local sWarn
|
|
|
|
|
-- box della trave
|
|
|
|
|
local b3Solid = EgtGetBBoxGlob( EgtGetFirstNameInGroup( nPartId, 'Box') or GDB_ID.NULL, GDB_BB.STANDARD)
|
|
|
|
|
if not b3Solid then
|
|
|
|
@@ -5760,6 +5762,10 @@ local function MakeStaircaseStep( Proc, nRawId, b3Raw, nPartId)
|
|
|
|
|
local _, _, _, vtOrtho, _, nSurfInt = BL.GetTunnelDimension( Proc, nPartId)
|
|
|
|
|
local nOk, sErr = MakeChamfer( Proc, true, nAddGrpId, vtOrtho, b3Solid, nSurfInt, dDepthCham)
|
|
|
|
|
if nOk < 0 then return false, sErr end
|
|
|
|
|
if sErr then
|
|
|
|
|
if not sWarn then sWarn = '' end
|
|
|
|
|
sWarn = EgtIf( #sWarn > 0, sWarn .. '\n' .. sErr, sErr)
|
|
|
|
|
end
|
|
|
|
|
end
|
|
|
|
|
|
|
|
|
|
-- fresatura della pedata per fare spazio alla lama
|
|
|
|
@@ -5859,6 +5865,8 @@ local function MakeStaircaseStep( Proc, nRawId, b3Raw, nPartId)
|
|
|
|
|
if not bOkSawRiser then return false, sErr end
|
|
|
|
|
end
|
|
|
|
|
|
|
|
|
|
return true, sWarn
|
|
|
|
|
|
|
|
|
|
end
|
|
|
|
|
|
|
|
|
|
---------------------------------------------------------------------
|
|
|
|
|