SaveText.Ru

Без имени
  1. LUA = {}
  2.  
  3. function autofiles()
  4.         local autofile = {",hook.lua", ",utils.lua"}
  5.        
  6.         for i in pairs(autofile) do
  7.                 local filecreate = io.open(LUA.directory .. autofile[i], "r")
  8.                 if (filecreate == nil) then
  9.                         filecreate = io.open(LUA.directory .. autofile[i], "w")
  10.                         filecreate:write(("if (LUA["%s"] ~= nil) then return endn"):format(autofile[i]:sub(1, #autofile[i] - 4):upper()))
  11.                         filecreate:write("msg("..i..")")
  12.                         filecreate:close()
  13.                         print("autofile " .. autofile[i])
  14.                 else
  15.                         filecreate:close()
  16.                 end
  17.         end
  18. end
  19.  
  20. function autofolder(dis)
  21.         local folder = LUA.directory:gsub( ("(.*)%s"):format(dis), "%1")
  22.        
  23.         if (os.rename(folder, folder) == nil) then
  24.                 os.execute("mkdir " .. LUA.directory)
  25.                 print("folder " .. LUA.directory)
  26.         end
  27. end
  28.  
  29. local binformat = package.cpath:match("%p[\|/]?%p(%a+)")
  30.  
  31. if (binformat == "dll") then                    -- Windows
  32.         LUA.osname = "Windows"
  33.         LUA.directory = "scripts\"
  34.        
  35.         autofolder("\")
  36.         autofiles()
  37.        
  38.         local filelist = io.popen(("dir %s*.lua /b"):format(LUA.directory))
  39.        
  40.         for file in (filelist:lines()) do
  41.                 print(("©100100255Lua: Adding file '%s'"):format(file))
  42.                 dofile(LUA.directory .. file)
  43.                 LUA[file:sub(1, #file - 4):upper()] = 1
  44.         end
  45.  
  46. elseif (binformat == "so") then                 -- Linux
  47.         LUA.osname = "Linux"
  48.         LUA.directory = "scripts/"
  49.        
  50.         autofolder("/")
  51.         autofiles()
  52.        
  53.         local filelist = io.popen(("ls -1a %s*.lua"):format(LUA.directory))
  54.        
  55.         for file in (filelist:lines()) do
  56.                 file = file:match(".*/(.*%p.*)")
  57.                 print(("169100100255Lua: Adding file '%s'"):format(file))
  58.                 dofile(LUA.directory .. file)
  59.                 LUA[file:sub(1, #file - 4):upper()] = 1
  60.         end
  61. end
  62.  

Share with your friends:

Распечатать