3dPrinting 2.7d1 :

- modifiche per nuova modalità di stampa dei primi layers nel caso a spirale.
This commit is contained in:
SaraP
2025-04-22 15:10:18 +02:00
parent 000bd0091f
commit bcaf1c56a4
6 changed files with 138 additions and 35 deletions
+18 -4
View File
@@ -53,6 +53,8 @@ function RunMachParamFromSWCalc.Exec()
local sMachIni = EgtGetCurrMachineDir() .. '\\' .. EgtGetCurrMachineName() .. '.ini'
local dSMin = tonumber( EgtGetStringFromIni( SEC_3DPRINTING, KEY_SPEED_MIN, 0, sMachIni))
local dSMax = tonumber( EgtGetStringFromIni( SEC_3DPRINTING, KEY_SPEED_MAX, 50000, sMachIni))
-- recupero Feed massima dalla macchina
local dFLimit = tonumber( EgtGetStringFromIni( SEC_3DPRINTING, KEY_FEED_MAX, 10000, sMachIni))
-- massa materiale utilizzato
local dPrintMass = 0
-- massimo indice di layer calcolato
@@ -219,10 +221,22 @@ function RunMachParamFromSWCalc.Exec()
local CurrWidth = LengthCrvList[nWidthIndex]
local CurrFeed = EgtIf( CurrWidth.Width > 0, dLayerFeed * dStrandMean / CurrWidth.Width, dLayerFeed)
for nCurveIdIndex = 1, #CurrWidth.IdList do
EgtSetInfo( CurrWidth.IdList[nCurveIdIndex], KEY_FEED, CurrFeed)
end
if CurrFeed > dFeedMax then
dFeedMax = CurrFeed
local dNewFeed = CurrFeed
-- verifico se coefficiente moltiplicativo per feed
local dCoeff = EgtGetInfo( CurrWidth.IdList[nCurveIdIndex], KEY_FEED_COEFF, 'd')
if dCoeff then
dNewFeed = dCoeff * CurrFeed
if dNewFeed > dFLimit then
local dNewSpeed = dSpeed * dFLimit / dNewFeed
dNewSpeed = EgtClamp( dNewSpeed, dSMin, dSMax)
dNewFeed = dFLimit
EgtSetInfo( CurrWidth.IdList[nCurveIdIndex], KEY_SPEED, dNewSpeed)
end
end
EgtSetInfo( CurrWidth.IdList[nCurveIdIndex], KEY_FEED, dNewFeed)
if dNewFeed > dFeedMax then
dFeedMax = dNewFeed
end
end
end
-- scrivo info speed in group toolpath