May 14th, 2019
Feeder 3 5 – create edit and publish rss feeds. Sound studio 4 8 0 download free. WideOrbit AFR Mobile is a native iOS app that allows users to control WO Automation for Radio from anywhere, allowing for immediate action based on programming's ever-changing needs. Developer's Description By 3delite Duplicate Audio Finder (64-Bit) is a utility for scanning your computer and finding duplicate copies of your audio files.
Never
Not a member of Pastebin yet?Sign Up, it unlocks many cool features!
- local MPS = game:GetService('MarketplaceService')
- local Print = printconsole or printoutput or print
- if getgenv().AudioSnatcher then
- Print('ACHERUS's Audio Snatcher already exists!')
- end
- Print('ACHERUS's Audio Snatcher made by Rahmeri (ACHERUS#7781) @bork gang.')
- local Copystring = setclipboard or toclipboard or Synapse and Synapse.CopyString or Clipboard and Clipboard.set or nil
- Print('ACHERUS's Audio Snatcher - Clipboard Copying is not available.')
- Print('ACHERUS's Audio Snatcher - Clipboard Copying is available.')
- local IDsOnly = true --// Setting this to false will disable ID logging.
- local HashesOnly = true --// Setting this to false will disable hash logging.
- local LogSelf = true --// Setting this to false will ignore your sounds completely.
- local LogRecent = false --// Setting this to true will make it so the logger won't log anything played by the same player more than once until they play a different audio.
- local IsActive = true --// Setting this to false will by default disable the logger.
- local HookedAudios = {}
- getgenv().Blacklisted = { -- Throw in the audio IDs/Hashes you don't want to snatch.
- 1352366478,
- 28166555,
- 154965929,
- 204139415,
- 328964620,
- 861978247,
- 311319322,
- 335069960,
- 344936319,
- 78496487,
- 328964589,
- 362709353,
- 229409838,
- 10722059,
- 'rbxasset://sounds/uuhhh.mp3',
- 'rbxasset://sounds/action_jump.mp3',
- 'rbxasset://sounds/impact_water.mp3',
- 'rbxasset://sounds/action_footsteps_plastic.mp3',
- getgenv().SpecialTools = { -- Enabling this will make it so it will only search for sounds inside a specific Instance with a name written down below.
- Instances = {
- 'Boombox',
- }
- local List = {}
- if V then
- table.insert(List, '{n SoundId: ' . V[1] . 'n Player: ' . V[2] . 'n Name: ' . V[3] . 'n}')
- end
- if #List > 0 then
- end
- end
- getgenv().AudioSnatcher = Instance.new('ScreenGui')
- Copy.Name = 'Copy'
- Copy.Position = UDim2.new(.04, 0, .84)
- Copy.Style = Enum.ButtonStyle.RobloxRoundDefaultButton
- Copy.TextColor3 = Color3.fromRGB(255, 255, 255)
- Copy.Text = 'Copy Audios'
- Copy.Font = Enum.Font.SourceSansBold
- local Hashes = Instance.new('TextButton')
- Hashes.Size = UDim2.new(.13, 0, .07, 0)
- Hashes.Style = (not HashesOnly and Enum.ButtonStyle.RobloxRoundButton) or Enum.ButtonStyle.RobloxRoundDefaultButton
- Hashes.TextColor3 = Color3.fromRGB(255, 255, 255)
- Hashes.Text = 'Hashes'
- Hashes.Font = Enum.Font.SourceSansBold
- local IDs = Instance.new('TextButton')
- IDs.Size = UDim2.new(.13, 0, .07, 0)
- IDs.Style = (not IDsOnly and Enum.ButtonStyle.RobloxRoundButton) or Enum.ButtonStyle.RobloxRoundDefaultButton
- IDs.TextColor3 = Color3.fromRGB(255, 255, 255)
- IDs.Text = 'ID'
- IDs.Font = Enum.Font.SourceSansBold
- local Self = Instance.new('TextButton')
- Self.Size = UDim2.new(.13, 0, .07, 0)
- Self.Style = (not LogSelf and Enum.ButtonStyle.RobloxRoundButton) or Enum.ButtonStyle.RobloxRoundDefaultButton
- Self.TextColor3 = Color3.fromRGB(255, 255, 255)
- Self.Text = 'Log Self'
- Self.Font = Enum.Font.SourceSansBold
- local Recent = Instance.new('TextButton')
- Recent.Size = UDim2.new(.13, 0, .07, 0)
- Recent.Style = (not LogRecent and Enum.ButtonStyle.RobloxRoundButton) or Enum.ButtonStyle.RobloxRoundDefaultButton
- Recent.TextColor3 = Color3.fromRGB(255, 255, 255)
- Recent.Text = 'Log Recent'
- Recent.Font = Enum.Font.SourceSansBold
- local Active = Instance.new('TextButton')
- Active.Size = UDim2.new(.13, 0, .07, 0)
- Active.Style = (not IsActive and Enum.ButtonStyle.RobloxRoundButton) or Enum.ButtonStyle.RobloxRoundDefaultButton
- Active.TextColor3 = Color3.fromRGB(255, 255, 255)
- Active.Text = 'Active'
- Active.Font = Enum.Font.SourceSansBold
- Copy.Parent = AudioSnatcher
- IDs.Parent = AudioSnatcher
- Recent.Parent = AudioSnatcher
- HashesOnly = not HashesOnly
- Hashes.Style = (not HashesOnly and Enum.ButtonStyle.RobloxRoundButton) or Enum.ButtonStyle.RobloxRoundDefaultButton
- IDsOnly = not IDsOnly
- IDs.Style = (not IDsOnly and Enum.ButtonStyle.RobloxRoundButton) or Enum.ButtonStyle.RobloxRoundDefaultButton
- LogSelf = not LogSelf
- Self.Style = (not LogSelf and Enum.ButtonStyle.RobloxRoundButton) or Enum.ButtonStyle.RobloxRoundDefaultButton
- LogRecent = not LogRecent
- Recent.Style = (not LogRecent and Enum.ButtonStyle.RobloxRoundButton) or Enum.ButtonStyle.RobloxRoundDefaultButton
- IsActive = not IsActive
- Active.Style = (not IsActive and Enum.ButtonStyle.RobloxRoundButton) or Enum.ButtonStyle.RobloxRoundDefaultButton
- local Status = pcall(function()
- end)
- if Status then
- Print('ACHERUS's Audio Snatcher - Successfully copied list.')
- if not Copystring then
- Print('ACHERUS's Audio Snatcher - Clipboard Copying is not available.')
- Print('ACHERUS's Audio Snatcher - Failed to copy list.')
- end
- local Info
- local Id = string.match(Sound.SoundId, 'rbxasset://sounds.+') or string.match(Sound.SoundId, '&hash=.+') or string.match(Sound.SoundId, '&0hash=.+') or string.match(Sound.SoundId, '%d+')
- local IsHash = false
- if Id and (string.sub(Id, 1, 6) '&hash=' or string.sub(Id, 1, 7) '&0hash=') then
- Id = string.sub(Id, (string.sub(Id, 1, 6) '&hash=' and 7) or (string.sub(Id, 1, 7) '&0hash=' and 8), string.len(Id))
- end
- local Continue = true
- if Id tostring(V) then
- break
- end
- if Continue and (LogRecent or (not LogRecent and ((MostRecentAudio[Plr] and MostRecentAudio[Plr] ~= Id) or not MostRecentAudio[Plr]))) then
- pcall(function()
- Product = MPS:GetProductInfo(tonumber(Id), Enum.InfoType.Asset)
- if IsHash or (Product and Product.AssetTypeId 3) then
- Info = (Product and Product.Name) or (IsHash and 'Hashed Audio') or nil
- MostRecentAudio[Plr] = (Product and Id) or (IsHash and Id) or nil
- end
- if not HookedAudios[Sound] then
- Sound:GetPropertyChangedSignal('SoundId'):Connect(function()
- if not IsActive or (not LogSelf and Plr Players.LocalPlayer) then
- end
- local Info
- local Id = string.match(Sound.SoundId, 'rbxasset://sounds.+') or string.match(Sound.SoundId, '&hash=.+') or string.match(Sound.SoundId, '%d+')
- local IsHash = false
- if string.sub(Id, 1, 6) '&hash=' or string.sub(Id, 1, 7) '&0hash=' then
- Id = string.sub(Id, (string.sub(Id, 1, 6) '&hash=' and 7) or (string.sub(Id, 1, 7) '&0hash=' and 8), string.len(Id))
- end
- local Continue = true
- if Id tostring(V) then
- break
- end
- local Product
- if Continue and (LogRecent or (not LogRecent and ((MostRecentAudio[Plr] and MostRecentAudio[Plr] ~= Id) or not MostRecentAudio[Plr]))) then
- Product = MPS:GetProductInfo(tonumber(Id), Enum.InfoType.Asset)
- if IsHash or (Product and Product.AssetTypeId 3) then
- Info = (Product and Product.Name) or (IsHash and Id) or nil
- MostRecentAudio[Plr] = (Product and Id) or (IsHash and Id) or nil
- end
- if Info then
- HookedAudios[Sound] = {Id, Plr.Name, (Info or 'Error fetching Name')}
- Print('SoundId was changed.nSoundId: ' . Id . 'nPlayer: ' . Plr.Name . 'nAncestry: ' . Sound:GetFullName() . 'nName: ' . (Info or 'Error fetching Name'))
- end)
- if IsActive and Info and not HookedAudios[Sound] and (LogSelf or (not LogSelf and Plr ~= Players.LocalPlayer)) and ((IsHash and not IDsOnly and HashesOnly) or (not IsHash and not HashesOnly and IDsOnly) or (HashesOnly and IDsOnly)) then
- HookedAudios[Sound] = {Id, Plr.Name, (Info or 'Error fetching Name')}
- Print((IsHash and 'Snatched Audio (HASH)' or 'Snatched Audio') . 'nSoundId: ' . (Id or 'Error fetching Id') . 'nPlayer: ' . Plr.Name . 'nAncestry: ' . Sound:GetFullName() . 'nName: ' . (Info or 'Error fetching Name'))
- end
- local function AddPlayer(Plr)
- delay(.3, function()
- for I, V in next, Char:GetDescendants() do
- if V:IsA('Sound') and not V:FindFirstChild('CharacterSoundEvent') then
- end
- else
- local Object = Char:FindFirstChild(V)
- for J, K in next, Object:GetDescendants() do
- if K:IsA('Sound') and not K:FindFirstChild('CharacterSoundEvent') then
- end
- end
- end
- Char.DescendantAdded:Connect(function(NewObject)
- if NewObject:IsA('Sound') and not NewObject:FindFirstChild('CharacterSoundEvent') then
- pcall(HookAudio, NewObject, Plr)
- for I, V in next, SpecialTools.Instances do
- if Object and NewObject:IsDescendantOf(Object) then
- end
- end
- end)
- Char.DescendantRemoving:Connect(function(Object)
- HookedAudios[Object] = nil
- end)
- AddCharacter(Plr.Character or Plr.CharacterAdded:Wait())
- Plr.CharacterAdded:Connect(AddCharacter)
- AddPlayer(V)
RAW Paste Data