Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- -- 27/2/2020: AUTOHOTKEY RULES!!! --
- EVERYTHING = {
- }
- EVERYTHING_FOLDER = Instance.new("Folder")
- EVERYTHING_FOLDER.Name = "EVERYTHING"
- EVERYTHING_FOLDER.Parent = workspace
- function scan2(tab)
- for i,p in pairs(tab) do
- local part = Instance.new(p[1])
- part.Name = p[2]
- part.Color = p[3]
- part.Material = p[4]
- part.Reflectance = p[5]
- part.Transparency = p[6]
- part.Anchored = p[7]
- part.CanCollide = p[8]
- if part:IsA("Part") then
- part.Shape = p[9]
- part.Size = p[10]
- part.CFrame = p[11]
- elseif part:IsA("MeshPart") then
- --part.MeshId = p[9] -- no script access ?
- part.TextureID = p[10]
- part.Size = p[11]
- part.CFrame = p[12]
- end
- local mparts = {}
- for i,mp in pairs(p.CH) do
- local isa = mp[1]
- local mpart = nil
- if isa == "BlockMesh" or isa == "CylinderMesh" or isa == "SpecialMesh" then
- mpart = Instance.new(mp[1])
- mpart.Name = mp[2]
- mpart.Scale = mp[3]
- mpart.VertexColor = mp[4]
- if mpart:IsA("SpecialMesh") then
- mpart.MeshType = mp[5]
- mpart.MeshId = mp[6]
- mpart.TextureId = mp[7]
- end
- elseif isa == "Decal" or isa == "Texture" then
- mpart = Instance.new(mp[1])
- mpart.Name = mp[2]
- mpart.Texture = mp[3]
- mpart.Transparency = mp[4]
- mpart.Face = mp[5]
- if mpart:IsA("Texture") then
- mpart.StudsPerTileU = mp[6]
- mpart.StudsPerTileV = mp[7]
- end
- elseif isa == "SurfaceGui" or isa == "BillboardGui" then
- mpart = Instance.new(mp[1])
- mpart.Name = mp[2]
- mpart.AlwaysOnTop = mp[3]
- if mpart:IsA("BillboardGui") then
- mpart.Size = mp[4]
- mpart.SizeOffset = mp[5]
- mpart.StudsOffset = mp[6]
- elseif mpart:IsA("SurfaceGui") then
- mpart.Face = mp[4]
- end
- elseif isa == "PointLight" then
- mpart = Instance.new(mp[1])
- mpart.Name = mp[2]
- mpart.Brightness = mp[3]
- mpart.Color = mp[4]
- mpart.Range = mp[6]
- elseif isa == "SpotLight" or isa == "SurfaceLight" then
- mpart = Instance.new(mp[1])
- mpart.Name = mp[2]
- mpart.Brightness = mp[3]
- mpart.Color = mp[4]
- mpart.Range = mp[5]
- mpart.Angle = mp[6]
- mpart.Face = mp[7]
- elseif isa == "Fire" or isa == "Sparkles" or isa == "Smoke" then
- mpart = Instance.new(mp[1])
- mpart.Name = mp[2]
- mpart.Color = mp[3]
- if mpart:IsA("Fire") then
- mpart.SecondaryColor = mp[4]
- mpart.Size = mp[5]
- mpart.Heat = mp[6]
- elseif mpart:IsA("Smoke") then
- mpart.Opacity = mp[4]
- mpart.Size = mp[5]
- mpart.RiseVelocity = mp[6]
- end
- end
- if mpart then
- table.insert(mparts, mpart)
- end
- end
- for i,mpart in pairs(mparts) do
- mpart.Parent = part
- end
- part.Parent = EVERYTHING_FOLDER
- end
- end
- scan2(EVERYTHING, EVERYTHING_FOLDER)
- game.ChangeHistoryService:SetWaypoint("AUTOHOTKEY RULES")
Add Comment
Please, Sign In to add comment