DataWall :
- modifiche per nailing.
This commit is contained in:
@@ -28,14 +28,16 @@ local function SetCurrMachiningAndTool( sMachName)
|
||||
end
|
||||
|
||||
---------------------------------------------------------------------
|
||||
function WMachiningLib.FindCutting( sType)
|
||||
function WMachiningLib.FindCutting( sType, dDepth)
|
||||
for i = 1, #Cuttings do
|
||||
local Cutting = Cuttings[i]
|
||||
if Cutting.On and Cutting.Type == sType and SetCurrMachiningAndTool( Cutting.Name) then
|
||||
local dSawDiam = EgtTdbGetCurrToolParam( MCH_TP.DIAM) or 0
|
||||
local dSawThick = EgtTdbGetCurrToolParam( MCH_TP.THICK) or 0
|
||||
local dSawMaxDepth = EgtTdbGetCurrToolMaxDepth() or 0
|
||||
return Cutting.Name, dSawDiam, dSawThick, dSawMaxDepth
|
||||
if not dDepth or dSawMaxDepth > dDepth - 10 * GEO.EPS_SMALL then
|
||||
return Cutting.Name, dSawDiam, dSawThick, dSawMaxDepth
|
||||
end
|
||||
end
|
||||
end
|
||||
end
|
||||
|
||||
Reference in New Issue
Block a user