Remote event logger [GUI]

game.Players.LocalPlayer:WaitForChild('PlayerGui')
-- Objects

local RemoteGui = Instance.new("ScreenGui")
local Frame = Instance.new("Frame")
local Log = Instance.new("ScrollingFrame")
local Log_2 = Instance.new("TextLabel")
local TopHeader = Instance.new("Frame")
local TextLabel = Instance.new("TextLabel")
local Frame_2 = Instance.new("Frame")
local Frame_3 = Instance.new("Frame")
local Donate = Instance.new("TextButton")
local Frame_4 = Instance.new("Frame")
local FireClient = Instance.new("TextButton")
local Frame_5 = Instance.new("Frame")
local ClearOutput = Instance.new("TextButton")
local Frame_6 = Instance.new("Frame")
local Tutorial = Instance.new("TextButton")
local Events = Instance.new("Frame")
local ArgsText = Instance.new("TextBox")
local RunArgs = Instance.new("TextButton")
local ArgsText_2 = Instance.new("TextBox")
local CloseEvents = Instance.new("TextButton")
local CloseMainFrame = Instance.new("TextButton")
local create_sound = Instance.new("Sound")
local erase_Sound = Instance.new("Sound")

-- Properties

RemoteGui.Name = "RemoteGui"
RemoteGui.Parent = game.Players.LocalPlayer.PlayerGui

Frame.Parent = RemoteGui
Frame.Active = true
Frame.BackgroundColor3 = Color3.new(0.666667, 0.333333, 0)
Frame.BorderColor3 = Color3.new(1, 1, 1)
Frame.Draggable = true
Frame.Position = UDim2.new(0, 212, 0, 178)
Frame.Size = UDim2.new(0, 430, 0, 421)

Log.Name = "Log"
Log.Parent = Frame
Log.BackgroundColor3 = Color3.new(0.658824, 0.329412, 0)
Log.BorderColor3 = Color3.new(0.333333, 1, 1)
Log.BorderSizePixel = 0
Log.Position = UDim2.new(0, 0, 0, 29)
Log.Size = UDim2.new(0, 428, 0, 315)
Log.CanvasSize = UDim2.new(0, 0, 315, 0)
Log.ScrollBarThickness = 5

Log_2.Name = "Log"
Log_2.Parent = Log
Log_2.BackgroundColor3 = Color3.new(0.192157, 0.192157, 0.192157)
Log_2.BorderColor3 = Color3.new(0, 0.666667, 0)
Log_2.Position = UDim2.new(0, 10, 0, 5)
Log_2.Size = UDim2.new(0, 404, 0, 26)
Log_2.Font = Enum.Font.SourceSansLight
Log_2.FontSize = Enum.FontSize.Size14
Log_2.Text = "  Start of Remote Event log"
Log_2.TextColor3 = Color3.new(1, 1, 1)
Log_2.TextScaled = true
Log_2.TextSize = 14
Log_2.TextWrapped = true
Log_2.TextXAlignment = Enum.TextXAlignment.Left
Log_2.TextYAlignment = Enum.TextYAlignment.Top

TopHeader.Name = "TopHeader"
TopHeader.Parent = Frame
TopHeader.BackgroundColor3 = Color3.new(0.54902, 0.54902, 0.54902)
TopHeader.BorderColor3 = Color3.new(1, 1, 1)
TopHeader.Size = UDim2.new(0, 430, 0, 29)

TextLabel.Parent = TopHeader
TextLabel.BackgroundColor3 = Color3.new(1, 1, 1)
TextLabel.BackgroundTransparency = 1
TextLabel.BorderSizePixel = 0
TextLabel.Size = UDim2.new(0, 398, 0, 29)
TextLabel.Font = Enum.Font.SourceSansLight
TextLabel.FontSize = Enum.FontSize.Size24
TextLabel.Text = "   Remote Events logger by fantasygamery"
TextLabel.TextColor3 = Color3.new(1, 1, 1)
TextLabel.TextSize = 20
TextLabel.TextXAlignment = Enum.TextXAlignment.Left

Frame_2.Parent = Frame
Frame_2.BackgroundColor3 = Color3.new(0.529412, 0.529412, 0.529412)
Frame_2.BorderColor3 = Color3.new(1, 1, 1)
Frame_2.Position = UDim2.new(0, 0, 0, 345)
Frame_2.Size = UDim2.new(0, 430, 0, 76)

Frame_3.Parent = Frame_2
Frame_3.BackgroundColor3 = Color3.new(0.309804, 0.309804, 0.309804)
Frame_3.BorderColor3 = Color3.new(1, 1, 1)
Frame_3.BorderSizePixel = 0
Frame_3.Position = UDim2.new(0, 155, 0, 5)
Frame_3.Size = UDim2.new(0, 100, 0, 27)

Donate.Name = "Donate"
Donate.Parent = Frame_3
Donate.BackgroundColor3 = Color3.new(0.501961, 0.501961, 0.501961)
Donate.BorderSizePixel = 0
Donate.Size = UDim2.new(0, 100, 0, 23)
Donate.Font = Enum.Font.Highway
Donate.FontSize = Enum.FontSize.Size14
Donate.Text = "Donate"
Donate.TextColor3 = Color3.new(1, 1, 1)
Donate.TextSize = 14

Frame_4.Parent = Frame_2
Frame_4.BackgroundColor3 = Color3.new(0, 0.388235, 0)
Frame_4.BorderColor3 = Color3.new(1, 1, 1)
Frame_4.BorderSizePixel = 0
Frame_4.Position = UDim2.new(0, 19, 0, 5)
Frame_4.Size = UDim2.new(0, 100, 0, 27)

FireClient.Name = "FireClient"
FireClient.Parent = Frame_4
FireClient.BackgroundColor3 = Color3.new(0, 0.666667, 0)
FireClient.BorderSizePixel = 0
FireClient.Size = UDim2.new(0, 100, 0, 23)
FireClient.Font = Enum.Font.Highway
FireClient.FontSize = Enum.FontSize.Size14
FireClient.Text = "Fire client"
FireClient.TextColor3 = Color3.new(1, 1, 1)
FireClient.TextSize = 14

Frame_5.Parent = Frame_2
Frame_5.BackgroundColor3 = Color3.new(0.568627, 0, 0)
Frame_5.BorderColor3 = Color3.new(1, 1, 1)
Frame_5.BorderSizePixel = 0
Frame_5.Position = UDim2.new(0, 287, 0, 5)
Frame_5.Size = UDim2.new(0, 100, 0, 27)

ClearOutput.Name = "ClearOutput"
ClearOutput.Parent = Frame_5
ClearOutput.BackgroundColor3 = Color3.new(1, 0, 0)
ClearOutput.BorderSizePixel = 0
ClearOutput.Size = UDim2.new(0, 100, 0, 23)
ClearOutput.Font = Enum.Font.Highway
ClearOutput.FontSize = Enum.FontSize.Size14
ClearOutput.Text = "Clear OutPut"
ClearOutput.TextColor3 = Color3.new(1, 1, 1)
ClearOutput.TextSize = 14

Frame_6.Parent = Frame_2
Frame_6.BackgroundColor3 = Color3.new(0, 0.388235, 0)
Frame_6.BorderColor3 = Color3.new(1, 1, 1)
Frame_6.BorderSizePixel = 0
Frame_6.Position = UDim2.new(0, 19, 0, 44)
Frame_6.Size = UDim2.new(0, 100, 0, 27)

Tutorial.Name = "Tutorial"
Tutorial.Parent = Frame_6
Tutorial.BackgroundColor3 = Color3.new(0, 0.666667, 0)
Tutorial.BorderSizePixel = 0
Tutorial.Size = UDim2.new(0, 100, 0, 23)
Tutorial.Font = Enum.Font.Highway
Tutorial.FontSize = Enum.FontSize.Size12
Tutorial.Text = "Take a little tutorial"
Tutorial.TextColor3 = Color3.new(1, 1, 1)
Tutorial.TextSize = 12

Events.Name = "Events"
Events.Parent = Frame
Events.BackgroundColor3 = Color3.new(0.529412, 0.529412, 0.529412)
Events.BackgroundTransparency = 0.10000000149012
Events.BorderColor3 = Color3.new(1, 1, 1)
Events.Size = UDim2.new(0, 430, 0, 344)
Events.Visible = false

ArgsText.Name = "ArgsText"
ArgsText.Parent = Events
ArgsText.BackgroundColor3 = Color3.new(0.403922, 0.772549, 1)
ArgsText.BorderColor3 = Color3.new(1, 1, 1)
ArgsText.Position = UDim2.new(0, 115, 0, 9)
ArgsText.Size = UDim2.new(0, 200, 0, 34)
ArgsText.Font = Enum.Font.SourceSansLight
ArgsText.FontSize = Enum.FontSize.Size14
ArgsText.Text = "Argument"
ArgsText.TextColor3 = Color3.new(1, 1, 1)
ArgsText.TextScaled = true
ArgsText.TextSize = 14
ArgsText.TextWrapped = true

RunArgs.Name = "RunArgs"
RunArgs.Parent = Events
RunArgs.BackgroundColor3 = Color3.new(0.333333, 0, 0)
RunArgs.BorderColor3 = Color3.new(1, 1, 1)
RunArgs.Position = UDim2.new(0, 109, 0, 95)
RunArgs.Size = UDim2.new(0, 211, 0, 34)
RunArgs.Font = Enum.Font.SourceSansLight
RunArgs.FontSize = Enum.FontSize.Size14
RunArgs.Text = "Run Argument on Remote"
RunArgs.TextColor3 = Color3.new(1, 1, 1)
RunArgs.TextScaled = true
RunArgs.TextSize = 13
RunArgs.TextWrapped = true

ArgsText_2.Name = "ArgsText"
ArgsText_2.Parent = Events
ArgsText_2.BackgroundColor3 = Color3.new(0.333333, 0.666667, 0)
ArgsText_2.BorderColor3 = Color3.new(1, 1, 1)
ArgsText_2.Position = UDim2.new(0, 115, 0, 52)
ArgsText_2.Size = UDim2.new(0, 200, 0, 34)
ArgsText_2.Font = Enum.Font.SourceSansLight
ArgsText_2.FontSize = Enum.FontSize.Size14
ArgsText_2.Text = "Remote Name"
ArgsText_2.TextColor3 = Color3.new(1, 1, 1)
ArgsText_2.TextScaled = true
ArgsText_2.TextSize = 14
ArgsText_2.TextWrapped = true

CloseEvents.Name = "CloseEvents"
CloseEvents.Parent = Events
CloseEvents.BackgroundColor3 = Color3.new(0.666667, 0, 0)
CloseEvents.BorderColor3 = Color3.new(1, 1, 1)
CloseEvents.Position = UDim2.new(0, 370, 0, 0)
CloseEvents.Size = UDim2.new(0, 60, 0, 21)
CloseEvents.Font = Enum.Font.SourceSansLight
CloseEvents.FontSize = Enum.FontSize.Size14
CloseEvents.Text = "Close"
CloseEvents.TextColor3 = Color3.new(1, 1, 1)
CloseEvents.TextScaled = true
CloseEvents.TextSize = 14
CloseEvents.TextWrapped = true

CloseMainFrame.Name = "CloseMainFrame"
CloseMainFrame.Parent = Frame
CloseMainFrame.BackgroundColor3 = Color3.new(0.666667, 0, 0)
CloseMainFrame.BorderColor3 = Color3.new(1, 1, 1)
CloseMainFrame.Position = UDim2.new(0, 370, 0, 0)
CloseMainFrame.Size = UDim2.new(0, 60, 0, 21)
CloseMainFrame.Font = Enum.Font.SourceSansLight
CloseMainFrame.FontSize = Enum.FontSize.Size14
CloseMainFrame.Text = "Close"
CloseMainFrame.TextColor3 = Color3.new(1, 1, 1)
CloseMainFrame.TextScaled = true
CloseMainFrame.TextSize = 14
CloseMainFrame.TextWrapped = true

create_sound.Name = "Create Sound"
create_sound.Parent = RemoteGui
create_sound.SoundId = "rbxassetid://622219872"

erase_Sound.Name = "Erase Sound"
erase_Sound.SoundId = "rbxassetid://675401384"
erase_Sound.Parent = RemoteGui

local button = Donate
local product = 81115489
local player = game.Players.LocalPlayer
function donate(id, player, service)
service:PromptProductPurchase(player,id)
end

button.MouseButton1Down:connect(function()
donate(product,player,game:GetService('MarketplaceService'))
end)

local obj = {}
local parentT = {}
local events = {}
local log_number = 0
function createlog(text,pos,color,color2)
local t = Log_2:Clone()
t.Parent = Log
t.Name = "Log["..pos.."]"
t.Text = text
if color ~= nil then
t.TextColor3 = color
end

if color2 ~= nil then
t.BorderColor3 = color2
end

log_number = log_number+1
t:TweenPosition(UDim2.new(0,10,0,35*pos),"Out","Bounce",.3,true)
wait(.3)
create_sound:Play()
end

function work(s)
for _,d in pairs(s:GetChildren()) do
if d.Name ~= "DefaultChatSystemChatEvents" then
table.insert(obj, d)
work(d)
end
end
end


work(workspace)
work(game.ReplicatedStorage)
work(game.Players)
local obj2 = 0
--Messages/tips--
obj2 = obj2+1
createlog("You can check the log in the developer console too",obj2)
obj2 = obj2+1
createlog("Current compatible is RemoteEvent",obj2)
obj2 = obj2+1
createlog("Getting changelog",obj2)
obj2 = obj2+1
createlog("New UI ",obj2)
obj2 = obj2+1
createlog("Added Fire Server Button may be not working.",obj2)
-------------------------
--System MSG---
obj2 = obj2+1
createlog("Getting RemoteEvents",obj2,Color3.new(255, 255, 0))
------------------------
obj2 = obj2+1
createlog("Making buttons events",obj2,Color3.new(255, 255, 0))
--Buttons--
function openEvents()
Events.Visible = true
CloseMainFrame.Visible = false
obj2 = obj2+1
createlog("RemoteEvent executer opened",obj2)
end

function closeEvents()
Events.Visible = false
CloseMainFrame.Visible = true
obj2 = obj2+1
createlog("RemoteEvent executer closed",obj2)
end

function closeMainFrame()
Frame.Visible = false
end

function run(arg,event)
createlog("  Running "..event.." with arguments "..arg,obj2)
for i=1,#obj do
if obj[i].Name:lower() == event:lower() then
obj[i]:FireClient(game.Players.LocalPlayer, arg)
end
end
end

function clearOutput()
erase_Sound:Play()
wait(.5)
for i=1,log_number do
Log["Log["..log_number.."]"]:TweenSize(UDim2.new(0,404,0,0), "Out","Linear",.3,true)
Log["Log["..log_number.."]"].Text = ""
wait(.3)
Log["Log["..log_number.."]"]:Destroy()
log_number = log_number-1
end
log_number = 0
obj2 = 0
erase_Sound:Stop()
end

function tutorial()
obj2 = obj2+1
createlog("Fire client is for run a RemoteEvent",obj2,Color3.new(255, 255, 0))
obj2 = obj2+1
createlog("Donate is for if you want to donate just 2 robux",obj2,Color3.new(255, 255, 0))
obj2 = obj2+1
createlog("Clear output is to clear the log on the output",obj2,Color3.new(255, 255, 0))
end

FireClient.MouseButton1Down:connect(openEvents)

CloseEvents.MouseButton1Down:Connect(closeEvents)

CloseMainFrame.MouseButton1Down:Connect(closeMainFrame)

ClearOutput.MouseButton1Down:Connect(clearOutput)

RunArgs.MouseButton1Down:connect(function()
run(ArgsText.Text, ArgsText_2.Text)
end)

Tutorial.MouseButton1Down:Connect(tutorial)

--EndOfButtons--

obj2 = obj2+1
createlog("Buttons events made ",obj2,Color3.new(255, 255, 0))

for i=1,#obj do
if obj[i].ClassName == "RemoteEvent" then
obj2 = obj2+1
createlog(obj[i].Name,obj2)

--[[warn("")
warn("Remote name: "..obj[i].Name)
warn("RemoteClass: "..obj[i].ClassName)
warn("")
]]
if obj[i].ClassName == "RemoteEvent" then
obj[i].OnClientEvent:Connect(function(...)
local args3 = {...}
obj2 = obj2+1
createlog("RemoteEvent Called",obj2,Color3.new(170, 255, 0))
obj2 = obj2+1
warn("Remote name: "..obj[i].Name)
createlog("Remote name: "..obj[i].Name,obj2)
warn("args: "..(...))
obj2 = obj2+1
createlog("args: "..(...),obj2)
warn("Getting path...")
obj2 = obj2+1
createlog("Giving path... ",obj2)
if pcall(function() if obj[i].Parent.Parent.Parent.Parent.Parent.Name then end end) then
	table.insert(parentT, obj[i].Parent.Parent.Parent.Parent.Parent.Name)
end
if pcall(function()if obj[i].Parent.Parent.Parent.Parent.Name then end end) then
	table.insert(parentT, obj[i].Parent.Parent.Parent.Parent.Name)
end
if pcall(function()if obj[i].Parent.Parent.Parent.Name then end end) then
	table.insert(parentT, obj[i].Parent.Parent.Parent.Name)
end
if pcall(function() if obj[i].Parent.Parent.Name then end end) then
	table.insert(parentT, obj[i].Parent.Parent.Name)
end
if pcall(function() if obj[i].Parent.Name then end end)  then
	table.insert(parentT, obj[i].Parent.Name)
end

if pcall(function() if obj[i].Name then end end)  then
	table.insert(parentT, obj[i].Name)
end

for i=1,#parentT do
warn(i,". Path: >"..parentT[i].."<")
obj2 = obj2+1
createlog(i..". Path: >"..parentT[i].."<",obj2,Color3.new(math.random(),math.random(),math.random()))
end
parentT = {}
end)
end
elseif obj[i].ClassName == "RemoteEvent" then
obj2 = obj2+1
createlog(obj[i].Name,obj2)

end
end
obj2 = obj2+1
createlog("GUI Should work good",obj2,Color3.new(85, 255, 255),Color3.new(255, 255, 255))