--SynapseX Decompiler

local a = game.ReplicatedStorage:WaitForChild("Modules")
local b = require(a.mReferences)()
local c = require(a.mGUI)
local d = require(a.Debounce)
local e = require(a.mStaffRank)
local f = SoundEffects.Clicky
local g = "a824k124jahf"
local h = function(i)
	LocalNetwork.Notify.Alert:Fire(i, "Bad")
end
local j = function(i)
	LocalNetwork.Notify.Alert:Fire(i, "Good")
end
if e[tostring(GroupRank)] == nil or e[tostring(GroupRank)] < 5 then
	do
		local k = frameReport
		local l = frameReport.Body
		local m = frameReport.Body2
		local n = l.ImageLabel
		local o = n.TextBox
		local p
		local q = 10
		local r = 0
		local s = d(function()
			m.Visible = false
			l.Visible = true
			o.Text = "Enter Reason Here"
			c.ManualCloseEffects(frameBottomBar.Mod)
		end)
		l.Submit.MouseButton1Click:connect(d(function()
			f:Play()
			if r >= 3 then
				h("You have reached the max amount of mod calls in this server!")
			elseif Player.UserId < 0 then
				h("Guest cannot make reports! Please create an account if you want to report!")
			elseif p ~= nil and c.MinDifference(p) < q then
				local t = q - c.MinDifference(p)
				if t > 1 then
					t = t .. " mins. "
				else
					t = t .. " min. "
				end
				h("You have to wait " .. t .. "to call a mod again!")
			elseif o.Text ~= "Enter Reason Here" and 3 <= string.len(o.Text) then
				m.Visible = true
				l.Visible = false
			else
				c.FlashGui(n)
			end
		end))
		l.Cancel.MouseButton1Click:connect(s)
		m.No.MouseButton1Click:connect(s)
		m.Yes.MouseButton1Click:connect(function()
			p = os.time()
			r = r + 1
			Network.RGT.General.ReportToMod:FireServer(o.Text)
			LocalNetwork.Notify.Alert:Fire("Your mod call has been successfully delivered! A mod will be coming shortly.", nil, true, true)
			s()
		end)
		c.OptionsEffects(frameBottomBar.Mod, frameReport, UDim2.new(0, 0, 1, -250), UDim2.new(-1, 0, 1, -250))
	end
else
	do
		local u = game:service("MarketplaceService")
		local v = UDim2.new(-2, 0, 0, 0)
		local w = UDim2.new(1.4, 0, 0, 0)
		local x = Color3.new(0.3686274509803922, 0.3686274509803922, 0.3686274509803922)
		local y = Color3.new(0.6039215686274509, 0.6039215686274509, 0.6039215686274509)
		local z = Color3.new(1, 0, 0)
		local A = Color3.new(0.3686274509803922, 0.3686274509803922, 0.3686274509803922)
		local B, C, D = nil, "Ban", false
		local E = ""
		local F = frameBanPlayer.Reason.TextBox
		local G = frameBanPlayer.PlayerName.TextBox
		local H = frameBanPlayer.Days
		local I = frameBanPlayer.Options
		local J = frameBanPlayer.Evidence.TextBox
		local K = frameBanPlayer.Attachment
		local L = G.Parent:WaitForChild("Suggestion")
		local function M()
			E = ""
			F.Text = "Enter Reason Here..."
			G.Text = "Player's Name"
			J.Text = "Add Evidence here..."
			K.Text = "0"
			for N, O in pairs(H:GetChildren()) do
				O.ImageColor3 = A
			end
			H.Visible = true
			frameBanPlayer.BanLabel.Visible = true
			L.Visible = false
			K.Visible = true
			frameBanPlayer.Add.Visible = true
			frameBanPlayer.Evidence.Visible = true
			for N, O in pairs(I:GetChildren()) do
				if O.Name == "Ban" then
					O.ImageColor3 = z
				else
					O.ImageColor3 = A
				end
			end
			frameBanPlayer.Reason.Visible = true
			B = nil
			C = "Ban"
		end
		local P = frameModBanSong.Reason.TextBox
		local function Q()
			P.Text = "Enter Reason Here..."
			local R = SongAudio.SoundId:match("%d+")
			if tonumber(R) then
				local S = u:GetProductInfo(R).Name
				frameModBanSong.CurrentSong.Text = S
			else
				frameModBanSong.CurrentSong.Text = "No song found!"
			end
		end
		local function T()
			j("The music has been stopped!")
			Network.RGT.Sounds.StopSong:FireServer(g)
		end
		local U = function()
			frameChangeRep.Person.TextBox.Text = "Name"
			frameChangeRep.Rep.TextBox.Text = "Rep"
		end
		local V = function()
			frameTeleport.PlayerName.TextBox.Text = "Player's Name Here"
		end
		local W = frameRefund.Reason.TextBox
		local X = frameRefund.PlayerName.TextBox
		local Y = frameRefund.Options
		local Z = X.Parent:WaitForChild("Suggestion")
		local _
		local function a0()
			W.Text = "Enter Reason Here..."
			X.Text = "Player's Name"
			for N, O in pairs(Y:GetChildren()) do
				O.ImageColor3 = A
			end
			_ = nil
		end
		local a1 = {}
		local function a2()
			a1 = Network.RGT.Users.BanList:InvokeServer()
		end
		local a3 = frameModControl:WaitForChild("ScrollingFrame")
		local a4 = {
			{
				a3.BanCurrentSong,
				frameModBanSong,
				Q,
				5
			},
			{
				a3.BanPlayer,
				frameBanPlayer,
				M,
				5
			},
			{
				a3.StopStageMusic,
				nil,
				T,
				5
			},
			{
				a3.ChangeRep,
				frameChangeRep,
				U,
				20
			},
			{
				a3.Teleport,
				frameTeleport,
				V,
				5
			},
			{
				a3.Refund,
				frameRefund,
				a0,
				5
			}
		}
		local a5
		local a6 = d(function(a7, a8)
			for N, O in pairs(a4) do
				if O[2] ~= nil and O[2].Position ~= v then
					O[1].ImageColor3 = x
					O[2]:TweenPosition(v, "Out", "Quad", 0.6, true)
					if O[3] then
						O[3]()
					end
				end
			end
			if a7 and a5 ~= a7 then
				a8:TweenPosition(w, "Out", "Quad", 0.6, true)
				a7.ImageColor3 = y
				a5 = a7
				if a8.Name == "frameBanPlayer" then
					a2()
				end
			elseif a5 ~= nil then
				a5 = nil
			end
		end)
		for N, O in pairs(a4) do
			if O[2] == nil then
				O[1].MouseButton1Click:connect(d(function()
					f:Play()
					O[3]()
				end))
			else
				if e[tostring(GroupRank)] >= O[4] then
					O[1].MouseButton1Click:connect(d(function()
						f:Play()
						a6(O[1], O[2])
					end))
				else
					O[1].MouseButton1Click:connect(function()
						h("[Access Denied] You do not have access to this!")
					end)
				end
				if O[2]:FindFirstChild("Cancel") then
					O[2].Cancel.MouseButton1Click:connect(d(function()
						a6()
					end))
				end
			end
		end
		local a9 = d(function()
			if SongAudio.SoundId == "" then
				h("No song is currently being played!")
				return
			end
			if string.len(P.Text) < 5 or P.Text == "Enter Reason Here..." then
				h("Please enter a valid reason!")
				c.FlashGui(frameModBanSong.Reason)
				return
			end
			local R = SongAudio.SoundId:match("%d+")
			j("Your request for banning a song has been submitted!")
			Network.RGT.Sounds.BanSong:FireServer(g, R, P.Text)
			a6()
		end)
		frameModBanSong.Submit.MouseButton1Click:connect(a9)
		local function aa(a7, ab)
			for N, O in pairs(ab:GetChildren()) do
				O.ImageColor3 = A
			end
			a7.ImageColor3 = z
		end
		for N, O in pairs(H:GetChildren()) do
			if O.Name ~= "-123" or e[tostring(GroupRank)] >= 10 then
				O.MouseButton1Click:connect(d(function()
					B = tonumber(O.Name)
					aa(O, H)
				end))
			else
				O.MouseButton1Click:connect(function()
					h("[Access Denied] You do not have access to this!")
				end)
			end
		end
		local ac = d(function(a7)
			if a7.Name == "H" then
				D = not D
				h("Changed to " .. tostring(D))
				return
			end
			for N, O in pairs(I:GetChildren()) do
				O.ImageColor3 = A
			end
			C = a7.Name
			a7.ImageColor3 = z
			local ad = {
				frameBanPlayer.BanLabel,
				H,
				frameBanPlayer.Evidence,
				frameBanPlayer.Add,
				frameBanPlayer.Attachment
			}
			if C == "Unban" or C == "Check" then
				for N, O in pairs(ad) do
					O.Visible = false
				end
			else
				for N, O in pairs(ad) do
					O.Visible = true
				end
			end
			if C == "Check" then
				frameBanPlayer.Reason.Visible = false
			else
				frameBanPlayer.Reason.Visible = true
			end
		end)
		for N, O in pairs(I:GetChildren()) do
			if (e[tostring(GroupRank)] >= 10 or O.Name ~= "Unban") and (O.Name ~= "H" or e[tostring(GroupRank)] >= 20) then
				O.Visible = true
				O.MouseButton1Click:connect(function()
					ac(O)
				end)
			else
				O.MouseButton1Click:connect(function()
					h("[Access Denied] You do not have access to this!")
				end)
			end
		end
		local ae
		local function af(ag, ah, ab)
			if ag.Text ~= "" then
				for N, O in pairs(ab) do
					local ai
					if type(O) == "table" then
						ai = O[2]
					else
						ai = O.Name
					end
					if string.lower(ai) == string.lower(ag.Text) then
						return
					elseif string.sub(string.lower(ai), 1, #ag.Text) == string.lower(ag.Text) then
						ah.TextLabel.Text = ai .. "?"
						ah.Visible = true
						ae = ai
						return
					end
				end
			else
				ah.Visible = false
			end
		end
		local function aj(ag, ah)
			if ae ~= nil then
				ag.Text = ae
				ah.Visible = false
			end
		end
		local ak = d(function()
			if J.Text == "Add Evidence here..." or string.len(J.Text) < 5 then
				h("Enter a valid evidence!")
				c.FlashGui(frameBanPlayer.Evidence)
				return
			end
			E = E .. J.Text .. " "
			wait()
			j("Your evidence has been added!")
			J.Text = "Add More Evidence here..."
			K.Text = tonumber(K.Text) + 1
		end)
		frameBanPlayer.Add.MouseButton1Click:connect(ak)
		local function al(am)
			for N, O in pairs(a1) do
				if string.lower(O[2]) == string.lower(am) then
					return {
						O[1],
						O[2]
					}
				end
			end
			return nil
		end
		local an = d(function()
			local ao
			if e[tostring(GroupRank)] >= 10 or C == "Check" then
				ao = {
					nil,
					G.Text
				}
			else
				ao = al(G.Text)
			end
			if C == "Ban" and B == nil then
				h("You haven't selected the amount of days!")
				return
			end
			if ao == nil then
				h("We cannot find that player you are trying to ban/check!")
				c.FlashGui(frameBanPlayer.PlayerName)
				return
			end
			if C == "Ban" and B ~= "-123" and E == "" then
				h("Evidence is required!")
				c.FlashGui(frameBanPlayer.Evidence)
				return
			end
			if C ~= "Check" and D == false and (string.len(F.Text) < 5 or F.Text == "Enter Reason Here...") then
				h("Invalid Reason to ban/unban! (5 characters min.)")
				c.FlashGui(frameBanPlayer.Reason)
				retuao
			end
			j("Your request is being processed!")
			Network.RGT.Users.BanPerson:FireServer(g, ao[2], B, F.Text, C, D, ao[1], E)
			a6()
		end)
		frameBanPlayer.Submit.MouseButton1Click:connect(an)
		G.Changed:connect(function()
			af(G, L, a1)
		end)
		L.MouseButton1Click:connect(d(function()
			aj(G, L)
		end))
		local ap = function(Player)
			for N, O in pairs(game.Players:GetChildren()) do
				if string.lower(O.Name) == string.lower(Player) then
					return O
				end
			end
			return nil
		end
		if e[tostring(GroupRank)] == 20 then
			local aq = d(function()
				local ar = frameChangeRep.Rep.TextBox
				local as = frameChangeRep.Person.TextBox
				local at = ap(as.Text)
				if at == nil or tonumber(ar.Text) == nil then
					h("Error!")
					return
				end
				j("Your request is being processed!")
				Network.RGT.Users.ChangeRep:FireServer(g, at, tonumber(ar.Text), "afuwadh81239da")
				a6()
			end)
			frameChangeRep.Submit.MouseButton1Click:connect(aq)
		end
		local au = d(function()
			local av = frameTeleport.PlayerName.TextBox.Text
			local aw = frameTeleport.ServerID.TextBox.Text
			local ax
			if av == "" or av == "Player's Name" then
				h("Please enter a Player's Name!")
				c.FlashGui(frameTeleport.PlayerName)
				return
			end
			if tonumber(av) ~= nil then
				h("ALERT: You can only enter Username NOT UserId!")
			end
			if string.find(aw, "-") ~= nil then
				ax = aw
			end
			j("Your request is being processed!")
			Network.RGT.Users.Teleport:FireServer(g, av, ax)
		end)
		frameTeleport.Submit.MouseButton1Click:connect(au)
		local ay = d(function()
			local az = ap(X.Text)
			if _ == nil then
				h("You haven't selected the refund option!")
				return
			end
			if az == nil then
				h("We cannot find that player you are trying to refund!")
				c.FlashGui(frameRefund.PlayerName)
				return
			end
			print(W.Text)
			if string.len(W.Text) < 25 or W.Text == "Enter Reason Here..." then
				h("Invalid Reason to refund! (25 characters min.)")
				c.FlashGui(frameRefund.Reason)
				return
			end
			j("Your request is being processed!")
			Network.RGT.Users.RefundPerson:FireServer(az, _, W.Text)
			a6()
		end)
		frameRefund.Submit.MouseButton1Click:connect(ay)
		X.Changed:connect(function()
			af(X, Z, AllPlayers:GetChildren())
		end)
		Z.MouseButton1Click:connect(d(function()
			aj(X, Z)
		end))
		for N, O in pairs(Y:GetChildren()) do
			O.MouseButton1Click:connect(d(function()
				_ = O.Name
				aa(O, Y)
			end))
		end
		local function aA(Player, aB, aC)
			frameReportInfo.Body.Player.Text = Player
			frameReportInfo.Body.Complaint.Text = aB
			frameReportInfo.Body.Reponse.Text = aC .. " Min(s)"
			frameReportInfo.Visible = true
			frameReportInfo.Body.Close.MouseButton1Click:connect(d(function()
				frameReportInfo.Visible = false
			end))
			frameReportInfo.Body.Teleport.MouseButton1Click:connect(d(function()
				Network.RGT.Users.Teleport2:FireServer(g, Player)
			end))
		end
		Network.RGT.Users.ComplaintInfo.OnClientEvent:connect(aA)
		c.OptionsEffects(frameBottomBar.ModControl, frameModControl, UDim2.new(0, -3, 1, -280), UDim2.new(-1, -3, 1, -280))
		frameBottomBar.Mod.Visible = false
		frameBottomBar.ModControl.Visible = true
	end
end