- Migliorie varie per adeguamento strategia e funzioni necessarie

This commit is contained in:
andrea.villa
2024-05-13 09:47:42 +02:00
parent d45fc8e89b
commit 59bbf159e4
9 changed files with 161 additions and 36 deletions
+7 -5
View File
@@ -17,7 +17,7 @@ local ID = require( 'Identity')
local BCS = require( 'BasicCustomerStrategies')
local FeatureData = require( 'FeatureData')
local FaceData = require( 'FaceData')
local MachiningLib = require( 'MachiningLib')
local MachLib = require( 'MachiningLib')
EgtOutLog( ' BeamExec started', 1)
@@ -562,11 +562,11 @@ local function AreDrillingsMirrored( Proc, ProcMirror, Part)
if AreOppositeVectorApprox( vtExtr, vtExtrMirror) then
-- fori lungo Y
-- per macchine tipo PF il foro principale è sul lato back, per macchine tipo PF1250 è sul lato front
if ( BD.TWO_EQUAL_HEADS and AreSameVectorApprox( vtExtr, Y_AX())) or
( BD.DOWN_HEAD and AreOppositeVectorApprox( vtExtr, Y_AX())) then
if ( BeamData.TWO_EQUAL_HEADS and AreSameVectorApprox( vtExtr, Y_AX())) or
( BeamData.DOWN_HEAD and AreOppositeVectorApprox( vtExtr, Y_AX())) then
nDouble = 2
-- fori lungo Z
elseif BD.DOWN_HEAD and AreSameVectorApprox( vtExtr, Z_AX()) then
elseif BeamData.DOWN_HEAD and AreSameVectorApprox( vtExtr, Z_AX()) then
nDouble = 3
else
return false
@@ -751,7 +751,7 @@ local function ExecPieceFeatures( vProc, Part)
local Proc = vProc[i]
if Proc.Flg ~= 0 and Proc.ChosenStrategy then
-- carico file script strategia (non serve verificare presenza del file perchè già fatto durante scelta strategia)
local StrategyScriptName = '\\Strategies\\' .. Proc.ChosenStrategy.StrategyId .. '\\' .. Proc.ChosenStrategy.StrategyId
local StrategyScriptName = Proc.ChosenStrategy.StrategyId .. '\\' .. Proc.ChosenStrategy.StrategyId
local StrategyScript = require( StrategyScriptName)
-- eseguo la strategia e si applicano le lavorazioni. Si passa la Proc e i parametri personalizzati
Proc = StrategyScript.Make( true, Proc, Part, Proc.ChosenStrategy.Parameters)
@@ -862,6 +862,8 @@ function BeamExec.ProcessFeatures()
-- ordino le features
-- OrderFeatures( vProc, Part)
-- TODO PROVVISORIO in atesa di scelta lavorazione in fase opportuna
vProc = vProcRot[1]
-- TODO da fare
-- esegue le strategie migliori che ha precedentemente scelto