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:close()
  12.                         print("autofile " .. autofile[i])
  13.                 else
  14.                         filecreate:close()
  15.                 end
  16.         end
  17. end
  18.  
  19. function autofolder(dis)
  20.         local folder = LUA.directory:gsub( ("(.*)%s"):format(dis), "%1")
  21.        
  22.         if (os.rename(folder, folder) == nil) then
  23.                 os.execute("mkdir " .. LUA.directory)
  24.                 print("folder " .. LUA.directory)
  25.         end
  26. end
  27.  
  28. local binformat = package.cpath:match("%p[\|/]?%p(%a+)")
  29.  
  30. if (binformat == "dll") then                    -- Windows
  31.         LUA.osname = "Windows"
  32.         LUA.directory = "scripts\"
  33.        
  34.         autofolder("\")
  35.         autofiles()
  36.        
  37.         local filelist = io.popen(("dir %s*.lua /b"):format(LUA.directory))
  38.        
  39.         for file in (filelist:lines()) do
  40.                 print(("169100100255Lua: Adding file '%s'"):format(file))
  41.                 dofile(LUA.directory .. file)
  42.                 LUA[file:sub(1, #file - 4):upper()] = 1
  43.         end
  44.  
  45. elseif (binformat == "so") then                 -- Linux
  46.         LUA.osname = "Linux"
  47.         LUA.directory = "scripts/"
  48.        
  49.         autofolder("/")
  50.         autofiles()
  51.        
  52.         local filelist = io.popen(("ls -1a %s*.lua"):format(LUA.directory))
  53.        
  54.         for file in (filelist:lines()) do
  55.                 file = file:match(".*/(.*%p.*)")
  56.                 print(("169100100255Lua: Adding file '%s'"):format(file))
  57.                 dofile(LUA.directory .. file)
  58.                 LUA[file:sub(1, #file - 4):upper()] = 1
  59.         end
  60. end
  61.  

Share with your friends:

Распечатать