ControlC Pastebin - The easiest way to host your text

Paste content

Up to 100 KB of text. BBCode formatting is supported.
Title - optional
Content
aa = game:GetObjects(\"rbxassetid://01997056190\")[1]\r\naa.Parent = game.CoreGui\r\nwait(0.2)\r\nGUI = aa.PopupFrame.PopupFrame\r\npos = 0\r\n\r\nignore = {\r\n	\"rbxasset://sounds/action_get_up.mp3\",\r\n	\"rbxasset://sounds/uuhhh.mp3\",\r\n	\"rbxasset://sounds/action_falling.mp3\",\r\n	\"rbxasset://sounds/action_jump.mp3\",\r\n	\"rbxasset://sounds/action_jump_land.mp3\",\r\n	\"rbxasset://sounds/impact_water.mp3\",\r\n	\"rbxasset://sounds/action_swim.mp3\",\r\n	\"rbxasset://sounds/action_footsteps_plastic.mp3\"\r\n}\r\n\r\nGUI.Close.MouseButton1Click:connect(function()\r\n	GUI:TweenSize(UDim2.new(0, 360, 0, 0),\"Out\",\"Quad\",0.5,true) wait(0.6)\r\n	GUI.Parent:TweenSize(UDim2.new(0, 0, 0, 20),\"Out\",\"Quad\",0.5,true) wait(0.6)\r\n	aa:Destroy()\r\nend)\r\n\r\nlocal min = false\r\nGUI.Minimize.MouseButton1Click:connect(function()\r\n	if min == false then\r\n		GUI:TweenSize(UDim2.new(0, 360, 0, 20),\"Out\",\"Quad\",0.5,true) min = true\r\n	else\r\n		GUI:TweenSize(UDim2.new(0, 360, 0, 260),\"Out\",\"Quad\",0.5,true) min = false\r\n	end\r\nend)\r\n\r\nfunction printTable(tbl)\r\n	if type(tbl) ~= 'table' then return nil end\r\n	local depthCount = -15\r\n\r\n	local function run(val, inPrefix)\r\n		depthCount = depthCount + 15\r\n		-- if inPrefix then print(string.rep(' ', depthCount) .. '{') end\r\n		for i,v in pairs(val) do\r\n			if type(v) == 'table' then\r\n				-- print(string.rep(' ', depthCount) .. ' [' .. tostring(i) .. '] = {')\r\n				GUI.Store.Text = GUI.Store.Text..'\n'..string.rep(' ', depthCount) .. ' [' .. tostring(i) .. '] = {'\r\n				run(v, false)\r\n				wait()\r\n			else\r\n				-- print(string.rep(' ', depthCount) .. ' [' .. tostring(i) .. '] = ' .. tostring(v))\r\n				GUI.Store.Text = GUI.Store.Text..'\n'..string.rep(' ', depthCount) .. ' [' .. tostring(i) .. '] = ' .. tostring(v)\r\n				wait()\r\n			end\r\n		end\r\n		-- print(string.rep(' ', depthCount) .. '}')\r\n		depthCount = depthCount - 15\r\n	end\r\n	run(tbl, true)\r\nend\r\n\r\nfunction refreshlist()\r\n	pos = 0\r\n	GUI.Logs.CanvasSize = UDim2.new(0,0,0,0)\r\n	for i,v in pairs(GUI.Logs:GetChildren()) do\r\n		v.Position = UDim2.new(0,0,0, pos)\r\n		GUI.Logs.CanvasSize = UDim2.new(0,0,0, pos+20)\r\n		pos = pos+20\r\n	end\r\nend\r\n\r\nfunction FindTable(Table, Name)\r\n	for i,v in pairs(Table) do\r\n		if v == Name then\r\n			return true\r\n		end end\r\n	return false\r\nend\r\n\r\nfunction writefileExploit()\r\n	if writefile then\r\n		return true\r\n	end\r\nend\r\n\r\nwriteaudio = {}\r\nrunning = false\r\nGUI.SS.MouseButton1Click:connect(function()\r\n	if writefileExploit() then\r\n		if running == false then\r\n			GUI.Load.Visible = true running = true\r\n			GUI.Load:TweenSize(UDim2.new(0, 360, 0, 20),\"Out\",\"Quad\",0.5,true) wait(0.3)\r\n			for _, child in pairs(GUI.Logs:GetChildren()) do\r\n				if child:FindFirstChild('ImageButton') then local bttn = child:FindFirstChild('ImageButton')\r\n					if bttn.BackgroundTransparency == 0 then\r\n						writeaudio[#writeaudio + 1] = {NAME = child.NAME.Value, ID = child.ID.Value}\r\n					end\r\n				end\r\n			end\r\n			GUI.Store.Visible = true\r\n			printTable(writeaudio)\r\n			wait(0.2)\r\n			local filename = 0\r\n			local function write()\r\n				local file\r\n				pcall(function() file = readfile(\"Audios\"..filename..\".txt\") end)\r\n				if file then\r\n					filename = filename+1\r\n					write()\r\n				else\r\n					local text = tostring(GUI.Store.Text)\r\n					text = text:gsub('\n', '\r\n')\r\n					writefile(\"Audios\"..filename..\".txt\", text)\r\n				end\r\n			end\r\n			write()\r\n			for rep = 1,10 do\r\n			GUI.Load.BackgroundTransparency = GUI.Load.BackgroundTransparency + 0.1\r\n			wait(0.05)\r\n			end\r\n			GUI.Load.Visible = false\r\n			GUI.Load.BackgroundTransparency = 0\r\n			GUI.Load.Size = UDim2.new(0, 0, 0, 20)\r\n			running = false\r\n			GUI.Store.Visible = false\r\n			GUI.Store.Text = ''\r\n			writeaudio = {}\r\n			game:FindService('StarterGui'):SetCore('SendNotification', {\r\n				Title = 'Audio Logger',\r\n				Text = 'Saved audios\n(Audios'..filename..'.txt)',\r\n				Icon = 'http://www.roblox.com/asset/?id=176572847',\r\n				Duration = 5,\r\n			})\r\n		end\r\n	else\r\n		game:FindService('StarterGui'):SetCore('SendNotification', {\r\n			Title = 'Audio Logger',\r\n			Text = 'Exploit cannot writefile :(',\r\n			Icon = 'http://www.roblox.com/asset/?id=176572847',\r\n			Duration = 5,\r\n		})\r\n	end\r\nend)\r\n\r\nGUI.SA.MouseButton1Click:connect(function()\r\n	if writefileExploit() then\r\n		if running == false then\r\n			GUI.Load.Visible = true running = true\r\n			GUI.Load:TweenSize(UDim2.new(0, 360, 0, 20),\"Out\",\"Quad\",0.5,true) wait(0.3)\r\n			for _, child in pairs(GUI.Logs:GetChildren()) do\r\n				writeaudio[#writeaudio + 1] = {NAME = child.NAME.Value, ID = child.ID.Value}\r\n			end\r\n			GUI.Store.Visible = true\r\n			printTable(writeaudio)\r\n			wait(0.2)\r\n			local filename = 0\r\n			local function write()\r\n				local file\r\n				pcall(function() file = readfile(\"Audios\"..filename..\".txt\") end)\r\n				if file then\r\n					filename = filename+1\r\n					write()\r\n				else\r\n					local text = tostring(GUI.Store.Text)\r\n					text = text:gsub('\n', '\r\n')\r\n					writefile(\"Audios\"..filename..\".txt\", text)\r\n				end\r\n			end\r\n			write()\r\n			for rep = 1,10 do\r\n				GUI.Load.BackgroundTransparency = GUI.Load.BackgroundTransparency + 0.1\r\n				wait(0.05)\r\n			end\r\n			GUI.Load.Visible = false\r\n			GUI.Load.BackgroundTransparency = 0\r\n			GUI.Load.Size = UDim2.new(0, 0, 0, 20)\r\n			running = false\r\n			GUI.Store.Visible = false\r\n			GUI.Store.Text = ''\r\n			writeaudio = {}\r\n			game:FindService('StarterGui'):SetCore('SendNotification', {\r\n				Title = 'Audio Logger',\r\n				Text = 'Saved audios\n(Audios'..filename..'.txt)',\r\n				Icon = 'http://www.roblox.com/asset/?id=176572847',\r\n				Duration = 5,\r\n			})\r\n		end\r\n	else\r\n		game:FindService('StarterGui'):SetCore('SendNotification', {\r\n			Title = 'Audio Logger',\r\n			Text = 'Exploit cannot writefile :(',\r\n			Icon = 'http://www.roblox.com/asset/?id=176572847',\r\n			Duration = 5,\r\n		})\r\n	end\r\nend)\r\n\r\nselectedaudio = nil\r\nfunction getaudio(place)\r\n	if running == false then\r\n		GUI.Load.Visible = true running = true\r\n		GUI.Load:TweenSize(UDim2.new(0, 360, 0, 20),\"Out\",\"Quad\",0.5,true) wait(0.3)\r\n		for _, child in pairs(place:GetDescendants()) do\r\n			spawn(function()\r\n				if child:IsA(\"Sound\") and not GUI.Logs:FindFirstChild(child.SoundId) and not FindTable(ignore,child.SoundId) then\r\n					local id = string.match(child.SoundId, \"rbxasset://sounds.+\") or string.match(child.SoundId, \"&hash=.+\") or string.match(child.SoundId, \"%d+\")\r\n					if id ~= nil then		\r\n						local newsound = GUI.Audio:Clone()\r\n						if string.sub(id, 1, 6) == \"&hash=\" or string.sub(id, 1, 7) == \"&0hash=\" then\r\n							id = string.sub(id, (string.sub(id, 1, 6) == \"&hash=\" and 7) or (string.sub(id, 1, 7) == \"&0hash=\" and 8), string.len(id))\r\n							newsound.ImageButton.Image = 'rbxassetid://1453863294'\r\n						end\r\n						newsound.Parent = GUI.Logs\r\n						newsound.Name = child.SoundId\r\n						newsound.Visible = true\r\n						newsound.Position = UDim2.new(0,0,0, pos)\r\n						GUI.Logs.CanvasSize = UDim2.new(0,0,0, pos+20)\r\n						pos = pos+20\r\n						local function findname()\r\n							Asset = game:GetService(\"MarketplaceService\"):GetProductInfo(id)\r\n						end\r\n						local audioname = 'error'\r\n						local success, message = pcall(findname)\r\n						if success then\r\n    						newsound.TextLabel.Text = Asset.Name\r\n							audioname = Asset.Name\r\n						else\r\n							newsound.TextLabel.Text = child.Name\r\n							audioname = child.Name\r\n						end\r\n						local data = Instance.new('StringValue') data.Parent = newsound data.Value = child.SoundId data.Name = 'ID'\r\n						local data2 = Instance.new('StringValue') data2.Parent = newsound data2.Value = audioname data2.Name = 'NAME'\r\n						local soundselected = false\r\n						newsound.ImageButton.MouseButton1Click:Connect(function()\r\n							if GUI.Info.Visible ~= true then\r\n								if soundselected == false then soundselected = true\r\n									newsound.ImageButton.BackgroundTransparency = 0\r\n								else soundselected = false\r\n									newsound.ImageButton.BackgroundTransparency = 1\r\n								end\r\n							end\r\n						end)\r\n						newsound.Click.MouseButton1Click:Connect(function()\r\n							if GUI.Info.Visible ~= true then\r\n								GUI.Info.TextLabel.Text = \"Name: \" ..audioname.. \"\n\nID: \" .. child.SoundId .. \"\n\nWorkspace Name: \" .. child.Name\r\n								selectedaudio = child.SoundId\r\n								GUI.Info.Visible = true\r\n							end\r\n						end)\r\n					end\r\n				end\r\n			end)\r\n		end\r\n	end\r\n	for rep = 1,10 do\r\n		GUI.Load.BackgroundTransparency = GUI.Load.BackgroundTransparency + 0.1\r\n		wait(0.05)\r\n	end\r\n	GUI.Load.Visible = false\r\n	GUI.Load.BackgroundTransparency = 0\r\n	GUI.Load.Size = UDim2.new(0, 0, 0, 20)\r\n	running = false\r\nend\r\n\r\nGUI.All.MouseButton1Click:connect(function() getaudio(game)end)\r\nGUI.Workspace.MouseButton1Click:connect(function() getaudio(workspace)end)\r\nGUI.Lighting.MouseButton1Click:connect(function() getaudio(game:GetService('Lighting'))end)\r\nGUI.SoundS.MouseButton1Click:connect(function() getaudio(game:GetService('SoundService'))end)\r\nGUI.Clr.MouseButton1Click:connect(function()\r\n	for _, child in pairs(GUI.Logs:GetChildren()) do\r\n		if child:FindFirstChild('ImageButton') then local bttn = child:FindFirstChild('ImageButton')\r\n			if bttn.BackgroundTransparency == 1 then\r\n				bttn.Parent:Destroy()\r\n				refreshlist()\r\n			end\r\n		end\r\n	end\r\nend)\r\nGUI.ClrS.MouseButton1Click:connect(function()\r\n	for _, child in pairs(GUI.Logs:GetChildren()) do\r\n		if child:FindFirstChild('ImageButton') then local bttn = child:FindFirstChild('ImageButton')\r\n			if bttn.BackgroundTransparency == 0 then\r\n				bttn.Parent:Destroy()\r\n				refreshlist()\r\n			end\r\n		end\r\n	end\r\nend)\r\nautoscan = false\r\nGUI.AutoScan.MouseButton1Click:connect(function()\r\n	if autoscan == false then autoscan = true\r\n		GUI.AutoScan.BackgroundTransparency = 0.5\r\n		game:FindService('StarterGui'):SetCore('SendNotification', {\r\n			Title = 'Audio Logger',\r\n			Text = 'Auto Scan ENABLED',\r\n			Icon = 'http://www.roblox.com/asset/?id=176572847',\r\n			Duration = 5,\r\n		})\r\n	else autoscan = false\r\n		GUI.AutoScan.BackgroundTransparency = 0\r\n		game:FindService('StarterGui'):SetCore('SendNotification', {\r\n			Title = 'Audio Logger',\r\n			Text = 'Auto Scan DISABLED',\r\n			Icon = 'http://www.roblox.com/asset/?id=176572847',\r\n			Duration = 5,\r\n		})\r\n	end\r\nend)\r\n\r\ngame.DescendantAdded:connect(function(added)\r\n	wait()\r\n	if autoscan == true and added:IsA('Sound') and not GUI.Logs:FindFirstChild(added.SoundId) and not FindTable(ignore,added.SoundId) then\r\n		local id = string.match(added.SoundId, \"rbxasset://sounds.+\") or string.match(added.SoundId, \"&hash=.+\") or string.match(added.SoundId, \"%d+\")\r\n		if id ~= nil then		\r\n			local newsound = GUI.Audio:Clone()\r\n				if string.sub(id, 1, 6) == \"&hash=\" or string.sub(id, 1, 7) == \"&0hash=\" then\r\n					id = string.sub(id, (string.sub(id, 1, 6) == \"&hash=\" and 7) or (string.sub(id, 1, 7) == \"&0hash=\" and 8), string.len(id))\r\n					newsound.ImageButton.Image = 'rbxassetid://1453863294'\r\n				end\r\n				local scrolldown = false\r\n				newsound.Parent = GUI.Logs\r\n				newsound.Name = added.SoundId\r\n				newsound.Visible = true\r\n				newsound.Position = UDim2.new(0,0,0, pos)\r\n				if GUI.Logs.CanvasPosition.Y == GUI.Logs.CanvasSize.Y.Offset - 230 then\r\n					scrolldown = true\r\n				end\r\n				GUI.Logs.CanvasSize = UDim2.new(0,0,0, pos+20)\r\n				pos = pos+20\r\n				local function findname()\r\n					Asset = game:GetService(\"MarketplaceService\"):GetProductInfo(id)\r\n				end\r\n				local audioname = 'error'\r\n				local success, message = pcall(findname)\r\n				if success then\r\n    				newsound.TextLabel.Text = Asset.Name\r\n					audioname = Asset.Name\r\n				else \r\n					newsound.TextLabel.Text = added.Name\r\n					audioname = added.Name\r\n				end\r\n				local data = Instance.new('StringValue') data.Parent = newsound data.Value = added.SoundId data.Name = 'ID'\r\n				local data2 = Instance.new('StringValue') data2.Parent = newsound data2.Value = audioname data2.Name = 'NAME'\r\n				local soundselected = false\r\n				newsound.ImageButton.MouseButton1Click:Connect(function()\r\n					if GUI.Info.Visible ~= true then\r\n						if soundselected == false then soundselected = true\r\n							newsound.ImageButton.BackgroundTransparency = 0\r\n						else soundselected = false\r\n							newsound.ImageButton.BackgroundTransparency = 1\r\n						end\r\n					end\r\n				end)\r\n				newsound.Click.MouseButton1Click:Connect(function()\r\n					if GUI.Info.Visible ~= true then\r\n						GUI.Info.TextLabel.Text = \"Name: \" ..audioname.. \"\n\nID: \" .. added.SoundId .. \"\n\nWorkspace Name: \" .. added.Name\r\n						selectedaudio = added.SoundId\r\n						GUI.Info.Visible = true\r\n					end\r\n				end)\r\n				--230'\r\n			if scrolldown == true then\r\n				GUI.Logs.CanvasPosition = Vector2.new(0, 9999999999999999999999999999999999999999999, 0, 0)\r\n			end\r\n		end\r\n	end\r\nend)\r\n\r\nGUI.Info.Copy.MouseButton1Click:Connect(function()\r\n	if pcall(function() Synapse:Copy(selectedaudio) end) then	\r\n	else\r\n		local clip = setclipboard or Clipboard.set\r\n		clip(selectedaudio)\r\n	end\r\n	game:FindService('StarterGui'):SetCore('SendNotification', {\r\n		Title = 'Audio Logger',\r\n		Text = 'Copied to clipboard',\r\n		Icon = 'http://www.roblox.com/asset/?id=176572847',\r\n		Duration = 5,\r\n	})\r\nend)\r\n\r\nGUI.Info.Close.MouseButton1Click:Connect(function()\r\n	GUI.Info.Visible = false\r\n	for _, sound in pairs(game:GetService('Players').LocalPlayer.PlayerGui:GetChildren()) do\r\n		if sound.Name == 'SampleSound' then\r\n			sound:Destroy()\r\n		end\r\n	end\r\n	GUI.Info.Listen.Text = 'Listen'\r\nend)\r\n\r\nGUI.Info.Listen.MouseButton1Click:Connect(function()\r\n	if GUI.Info.Listen.Text == 'Listen' then\r\n		local samplesound = Instance.new('Sound') samplesound.Parent = game:GetService('Players').LocalPlayer.PlayerGui\r\n		samplesound.Looped = true samplesound.SoundId = selectedaudio samplesound:Play() samplesound.Name = 'SampleSound'\r\n		samplesound.Volume = 5\r\n		GUI.Info.Listen.Text = 'Stop'\r\n	else\r\n		for _, sound in pairs(game:GetService('Players').LocalPlayer.PlayerGui:GetChildren()) do\r\n			if sound.Name == 'SampleSound' then\r\n				sound:Destroy()\r\n			end\r\n		end\r\n		GUI.Info.Listen.Text = 'Listen'\r\n	end\r\nend)\r\n\r\nfunction drag(gui)\r\n	spawn(function()\r\n		local UserInputService = game:GetService(\"UserInputService\")\r\n		local dragging\r\n		local dragInput\r\n		local dragStart\r\n		local startPos\r\n		local function update(input)\r\n			local delta = input.Position - dragStart\r\n			gui:TweenPosition(UDim2.new(startPos.X.Scale, startPos.X.Offset + delta.X, startPos.Y.Scale, startPos.Y.Offset + delta.Y), \"InOut\", \"Quart\", 0.04, true, nil) \r\n		end\r\n		gui.InputBegan:Connect(function(input)\r\n			if input.UserInputType == Enum.UserInputType.MouseButton1 or input.UserInputType == Enum.UserInputType.Touch then\r\n			dragging = true\r\n			dragStart = input.Position\r\n			startPos = gui.Position\r\n		input.Changed:Connect(function()\r\n            if input.UserInputState == Enum.UserInputState.End then\r\n                dragging = false\r\n            end\r\n        end)\r\n    end\r\nend)\r\ngui.InputChanged:Connect(function(input)\r\n    if input.UserInputType == Enum.UserInputType.MouseMovement or input.UserInputType == Enum.UserInputType.Touch then\r\n        dragInput = input\r\n    end\r\nend)\r\nUserInputService.InputChanged:Connect(function(input)\r\n    if input == dragInput and dragging then\r\n        update(input)\r\n    end\r\nend)\r\nend)\r\nend\r\ndrag(aa.PopupFrame)
Password
Anyone with the link will still need this password to view.
Self Destruct