How come my money give command wont work. What's happening?

Asked by

4 years ago

Edited 4 years ago

--//Description\--

I have 2 scripts. One called AdminHandler and another called Controller. I know Controller sends the data I need to send but the admin handler won't run the command. Whats happen?

--//AdminHander\--

001local admins = {
002---UserNames
003    ["vincentthecat1"] = 1;
004    ["Havok_Ninja"] = 2;
005    ["EatSomeSand123"] = 3;
006    [""] = 4;
007---UserId's
008    [150334552] = 1;
009    [21010010] = 2;
010    [896303435] = 3;
011 
012}
013 
014local manualBans = {
015---UserNames
016    ["AntiHaxRemover"] = 1;
017    ["ROBLOX_GM"] = 2;  
018---UserId's
019    [1097804958] = 1;
020    [112646950] = 2;
021}
022 
023---MoneyAdd Command
024game.ReplicatedStorage.AdminEvents.AddMoneyEvent.OnServerEvent:Connect(function(player, victim, amount) ---Won't work.
025    if admins[player.Name or player.UserId] then
026 
027        local foundGive = game.Players:FindFirstChild(victim)
028        local give = script.AddAmount.Value
029 
030        if foundGive then
031            give = amount
032            foundGive.leaderstats.Cash.Value = foundGive.leaderstats.Cash.Value +give
033        end
034    end
035end)    
036 
037---ChatTag
038game.Players.PlayerAdded:Connect(function(player)
039    if admins[player.Name or player.UserId] then
040        local tags = {
041            {
042                TagText = "?????????",
043                TagColor = Color3.fromRGB(107, 50, 124)
044            }
045        }
046        local ChatService = require(game:GetService("ServerScriptService"):WaitForChild("ChatServiceRunner").ChatService)
047        local speaker = nil
048        while speaker == nil do
049            speaker = ChatService:GetSpeaker(player.Name)
050            if speaker ~= nil then break end
051            wait(0.01)
052        end
053        speaker:SetExtraData("Tags",tags)
054        speaker:SetExtraData("ChatColor",Color3.fromRGB(161, 94, 13))
055    end
056end)
057 
058---AutomaticBans
059game.Players.PlayerAdded:Connect(function(player)
060    if manualBans[player.Name or player.UserId] then
061        player:Kick("You are automaticly banned as you have a history of exploting.")
062    end
063end)
064 
065game.Players.PlayerAdded:Connect(function(player)
066    if admins[player.Name or player.UserId] then
067        local clone = script["AdminPanel"]:Clone()
068        clone.Parent = player.PlayerGui
069    end
070end)
071 
072---ServerBan Command
073game.ReplicatedStorage.AdminEvents.ServerBanEvent.OnServerEvent:Connect(function(player1, victim1, reason1)
074    if admins[player1.Name or player1.UserId] then
075 
076        local found = game.Players:FindFirstChild(victim1)
077        local foundClone = script.victimName:Clone()
078 
079        if found then
080            foundClone.Parent = game.Workspace.ServerBans
081            foundClone.Name = found.Name
082            foundClone.Value = found.UserId
083            found:Kick("You have been banned by ".. player1.Name.. " for " ..reason1 ..".")
084            game.ReplicatedStorage.AdminEvents.PlayerServerBannedEvent:FireAllClients(victim1)
085        end
086        game.Players.PlayerAdded:Connect(function(player)
087            if game.Workspace.ServerBans:FindFirstChild(player.Name) then
088                player:Kick("You are banned from this server.")
089                game.ReplicatedStorage.AdminEvents.PlayerServerBannedEvent:FireAllClients(victim1)
090            end
091        end)
092    end
093end)        
094 
095---Kick Command
096game.ReplicatedStorage.AdminEvents.ServerKickEvent.OnServerEvent:Connect(function(player2, victim2, reason2)
097    if admins[player2.Name or player2.UserId] then
098 
099        local foundKick = game.Players:FindFirstChild(victim2)
100 
101        if foundKick then
102            foundKick:Kick("You have been kicked by ".. player2.Name.. " for " ..reason2 ..".")
103            game.ReplicatedStorage.AdminEvents.PlayerKickedEvent:FireAllClients(victim2)
104        end
105    end
106end)
107 
108---GlobalBan Command
109game.ReplicatedStorage.AdminEvents.GlobalBanEvent.OnServerEvent:Connect(function(player3, victim3, reason3)
110    if admins[player3.Name or player3.UserId] then
111 
112        local foundGlobal = game.Players:FindFirstChild(victim3)
113 
114        if foundGlobal then
115            foundGlobal.GlobalBan.Value = true
116            foundGlobal:Kick("You have been banned by ".. player3.Name .." You have been banned from the game, due to our moderators finding you unfit to play.")
117            game.ReplicatedStorage.AdminEvents.PlayerGlobalBannedEvent:FireAllClients(victim3)
118        end
119        game.Players.PlayerAdded:Connect(function(player)
120            if player.GlobalBans.Value == true then
121                player:Kick("You have been banned from the game, due to our moderators finding you unfit to play.")
122                game.ReplicatedStorage.AdminEvents.PlayerGlobalBannedEvent:FireAllClients(victim3)
123            end
124        end)    
125 
126---Age kicking
127        local minimumAge = 25
128        game.Players.PlayerAdded:Connect(function(player)
129            if(player.AccountAge < minimumAge) then
130                player:Kick("Your account must be at least "..tostring(minimumAge).." days old to play this game!")
131            end
132        end)
133    end
134end)
135 
136---PlayerJoined
137game.Players.PlayerAdded:Connect(function(player)
138    game.ReplicatedStorage.AdminEvents.PlayerJoin:FireAllClients(player.Name)
139end)
 View all 139 lines...

--//AdminHander\--

01local gui = script.Parent
02local frameOutLine = gui.AdminPanelOutline
03local adminFrame = frameOutLine.AdminPanel
04local moderationframe = adminFrame.ModerationFrame
05local UserBoard = frameOutLine.UserBoard.UserNames
06local moneyFrame = frameOutLine.MoneyFrameOutline
07local moneyPanel = moneyFrame.MoneyFrame
08local inputAmount = moneyPanel.MainFrame.InputAmount
09local moneyConfirm = moneyPanel.MainFrame.MoneyConfirm
10local moneyFrameOpen = frameOutLine.MoneyFrameOpen
11local moneyFrameClose = moneyFrame.MoneyFrameClose
12 
13local flag = false
14local flag2 = true
15 
16game.ReplicatedStorage.AdminEvents.PlayerJoin.OnClientEvent:Connect(function(playerName)
17 
18    local clone = script.TextButton:Clone()
19 
20    local UIS = game:GetService("UserInputService")
21    local GuiService = game:GetService("GuiService")
22 
23    clone.Name = playerName
24    clone.Text = playerName .. " ?????"
25    clone.PlayerValue.Value = playerName
26 
27    if UIS.TouchEnabled and not UIS.KeyboardEnabled and not UIS.MouseEnabled
28        and not UIS.GamepadEnabled and not GuiService:IsTenFootInterface() then
29        clone.Text = playerName .. " ????"
30    end
31 
32    clone.Parent = UserBoard --a scrollingGui
33end)
34 
35inputAmount:GetPropertyChangedSignal("Text"):Connect(function()
36    if inputAmount.Text == "" then
37        inputAmount.Text = 0
38    end
39    inputAmount.Text = inputAmount.Text:gsub('%D+', '');
40    inputAmount.Text = inputAmount.Text:sub(1,7)
41    print("Limited Input.")
42end)
43 
44function keyPressed(input)
45    if input.KeyCode == Enum.KeyCode.L then
46        if flag then
47            flag = false
48            frameOutLine.Visible = true
49            print("Closed.")
50        else
51            flag = true
52            frameOutLine.Visible = false
53            print("Opened.")
54        end
55    end
56end
57 
58moneyFrameOpen.MouseButton1Down:Connect(function()
59    if flag2 then
60        flag2 = false
61        moneyFrame.Visible = true
62        moneyFrameOpen.Visible = false
63        print("Opened.")
64    end
65end)
66 
67moneyFrameClose.MouseButton1Down:Connect(function()
68    if flag2 == false then
69        flag2 = true
70        moneyFrame.Visible = false
71        moneyFrameOpen.Visible = true
72        print("Closed.")
73    end
74end)
75 
76game:GetService("UserInputService").InputBegan:Connect(keyPressed)
77---MoneyEvent
78moneyConfirm.MouseButton1Down:Connect(function()
79    game.ReplicatedStorage.AdminEvents.AddMoneyEvent:FireServer(moderationframe.InputPlayerName.Text, inputAmount.Text)
80    print("Data sent.")
81end)
82---BanEvents
83moderationframe.ServerBanButton.MouseButton1Down:Connect(function()
84    game.ReplicatedStorage.AdminEvents.ServerBanEvent:FireServer(moderationframe.InputPlayerName.Text, moderationframe.InputBanKickReason.Text)
85    print("Data sent.")
86end)
87---KickEvents
88moderationframe.KickButton.MouseButton1Down:Connect(function()
89    game.ReplicatedStorage.AdminEvents.ServerKickEvent:FireServer(moderationframe.InputPlayerName.Text, moderationframe.InputBanKickReason.Text)
90    print("Data sent.")
91end)
92---GlobalBanEvents
93moderationframe.GlobalBanButton.MouseButton1Down:Connect(function()
94    game.ReplicatedStorage.AdminEvents.GlobalBanEvent:FireServer(moderationframe.InputPlayerName.Text, moderationframe.InputBanKickReason.Text)
95    print("Data sent.")
96end)
 View all 96 lines...

Never seen anything like this before nicemorew 26 — 4y

How come my money give command wont work. What's happening?

Answer this question