29 lines
865 B
Lua
29 lines
865 B
Lua
-- ProcessWinManual.lua by Egalware s.r.l. 2026/07/24
|
|
-- Creazione dei MachGroup del file già aperto in modalità manuale da EgtCAM5
|
|
|
|
-- Intestazioni
|
|
require( 'EgtBase')
|
|
_ENV = EgtProtectGlobal()
|
|
EgtEnableDebug( true)
|
|
|
|
local sIniFilePath = EgtGetIniFile()
|
|
local sBaseDir = EgtGetStringFromIni( 'Window', 'BaseDir', '', sIniFilePath)
|
|
|
|
-- scelta della macchinata da aprire
|
|
local sOpenDirPath = 'c:\\EgtData\\EgtWindowMaker\\Projects\\*.bwe'
|
|
sOpenFilePath = EgtFileDialog( true, sOpenDirPath, "Window Project Files (*.bwe)|*.bwe||")
|
|
if not sOpenFilePath then
|
|
return
|
|
end
|
|
|
|
_G.WIN = { BASEDIR = 'C:\\EgtData\\Window\\CAMAuto',
|
|
FILE = sOpenFilePath,
|
|
MACHINE = 'Saomad-Just3500',
|
|
FLAG = 1}
|
|
|
|
-- aggiungo le lavorazioni
|
|
local bOk, sErr = pcall( dofile, sBaseDir .. '\\CAMAuto\\' .. 'BatchProcessWin.lua')
|
|
|
|
-- salvo il file
|
|
EgtSaveFile()
|