Merge branch 'develop' into testPerFabio

versione precedente
- decimali in generazione portati a 3

Beam/BeamData.lua

@@ -177,11 +177,11 @@ end
 BeamData.GetBlockedAxis = GetBlockedAxis
 
 ---------------------------------------------------------------------
-local function GetChainSawInitAngs( vtN, vtO, nInd)
-   if nInd == 1 then
-      return ''
+local function GetChainSawInitAngs( vtN, vtO)
+   if vtN:getY() > 0 and vtO:getX() > 0 then
+      return 'C=0'
    else
-      return EgtIf( vtN:getY() > 0, 'C=180', 'C=-180')
+      return ''
    end
 end
 BeamData.GetChainSawInitAngs = GetChainSawInitAngs

Common_FAST.TPA.mlpe

@@ -21,7 +21,7 @@ function OnStart()
    EMT.USETO1 = false     -- abilitazione uso origine tavola
    EMT.MODAL = true       -- abilitazione emissione modale
    EMT.INCHES = false     -- unità di misura mm/inches
-   EMT.DECNUM = 5         -- numero di decimali dopo la virgola
+   EMT.DECNUM = 3         -- numero di decimali dopo la virgola
    EMT.NUM = false        -- abilitazione numerazione linee
    --EMT.Nt = 'N'           -- token per la numerazione di linea
    --EMT.LINENBR = 0        -- numero di linea
@@ -1767,9 +1767,9 @@ function CalcInterpPlane()
    local vtY = EMT.IPLGLFR:getVersY()
    local vtZ = EMT.IPLGLFR:getVersZ()
    EMT.IPLGLSTR = ' X0 Y' .. EmtLenToString( xS, EMT.DECNUM) .. ' Z0' ..
-                  ' A' .. EgtNumToString( - vtX:getY(), 6) .. ' B' .. EgtNumToString( vtX:getX(), 6) .. ' C' .. EgtNumToString( vtX:getZ(), 6) ..
-                  ' I' .. EgtNumToString( - vtY:getY(), 6) .. ' J' .. EgtNumToString( vtY:getX(), 6) .. ' K' .. EgtNumToString( vtY:getZ(), 6) ..
-                  ' P' .. EgtNumToString( - vtZ:getY(), 6) .. ' Q' .. EgtNumToString( vtZ:getX(), 6) .. ' R' .. EgtNumToString( vtZ:getZ(), 6)
+                  ' A' .. EgtNumToString( - vtX:getY(), EMT.DECNUM) .. ' B' .. EgtNumToString( vtX:getX(), EMT.DECNUM) .. ' C' .. EgtNumToString( vtX:getZ(), EMT.DECNUM) ..
+                  ' I' .. EgtNumToString( - vtY:getY(), EMT.DECNUM) .. ' J' .. EgtNumToString( vtY:getX(), EMT.DECNUM) .. ' K' .. EgtNumToString( vtY:getZ(), EMT.DECNUM) ..
+                  ' P' .. EgtNumToString( - vtZ:getY(), EMT.DECNUM) .. ' Q' .. EgtNumToString( vtZ:getX(), EMT.DECNUM) .. ' R' .. EgtNumToString( vtZ:getZ(), EMT.DECNUM)
    EMT.IPLGL = true
 end
 

Essetre-FASTrl.mlde

@@ -10,7 +10,7 @@
 require( 'EmtGenerator')
 EgtEnableDebug( false)
 
-PP_VER = '2.7b1_DEV2'
+PP_VER = '2.7b1_TEST'
 PP_NVER = '2.7.2.1'
 MIN_MACH_VER = '2.5k1'
 MACH_NAME = 'Essetre-FASTrl'