In this script, how could I make the uniform changing process automatic?

Asked by

8 years ago

Hello, I've recently got into scripting, and have started dissecting free model scripts to try and learn as much as I can. I would like to know what part of this script is responsible for the player having to press a button to equip the uniform, and what parts I'd need to remove to make the player equip the uniform on spawn.

The group, pants and shirt IDs are all stored as IntValues, and the script works thus far:

01print("Loaded Uniform Script.")
02 
03repeat wait() until game.Players.LocalPlayer
04local Player = game.Players.LocalPlayer
05local Character = Player.Character
06 
07--Settings
08local ScreenGui = script.Parent
09local UniformButton = ScreenGui:WaitForChild("UniformButton")
10 
11local Settings = script.Parent:WaitForChild("Settings")
12local CertainTeam = Settings:WaitForChild("CertainTeam")
13local CertainTeamColour = CertainTeam:WaitForChild("TeamColor")
14 
15local UniformRanks = Settings:WaitForChild("UniformRanks")
16local GroupId = Settings:WaitForChild("GroupId")
17 
18local Ranks = {}
19 
20--Functions
21function GetSettings()
22    if CertainTeam.Value then
23        if Player.TeamColor ~= CertainTeamColour.Value then
24            ScreenGui:Destroy()
25        end
26    end
27 
28    for i, v in pairs(UniformRanks:GetChildren()) do
29        if v:IsA("NumberValue") or v:IsA("IntValue") then
30            if string.find(v.Name, "Rank") then --Checks it's called "Rank"
31                table.insert(Ranks, string.sub(v.Name, 1, 5))
32            end
33        end
34    end
35end
36 
37GetSettings()
38local HighestRank = 0
39 
40UniformButton.MouseButton1Down:connect(function()
41    if Player:IsInGroup(GroupId.Value) then
42        if table.getn(Ranks) ~= 0 then --Checks that the table isn't empty.
43            for i, v in pairs(Ranks) do
44                local PlayerRank = Player:GetRankInGroup(GroupId.Value)
45                local Rank = UniformRanks:FindFirstChild(v)
46 
47                if PlayerRank >= Rank.Value then
48                    if PlayerRank > HighestRank then
49                        --Gets the highest ranked uniform a player can wear.
50                        HighestRank = Rank.Value
51                    end
52                end
53            end
54 
55            if HighestRank ~= 0 then
56                local Uniform = {}
57                for i, v in pairs(UniformRanks:GetChildren()) do
58                    if v.Value == HighestRank then
59                        Uniform.Shirt = "http://www.roblox.com/asset/?id=" ..v:FindFirstChild("ShirtId").Value
60                        Uniform.Pants = "http://www.roblox.com/asset/?id=" ..v:FindFirstChild("PantsId").Value
61                    end
62                end
63 
64                --Removes Shirt/Pants if they are wearing any.
65                for i, Object in next, Character:GetChildren() do
66                    if Object:IsA("Shirt") or Object:IsA("Pants") then
67                        Object:Destroy()
68                    end
69                end
70 
71                local Shirt = Instance.new("Shirt", Character)
72                local Pants = Instance.new("Pants", Character)
73                Shirt.ShirtTemplate = Uniform.Shirt
74                Pants.PantsTemplate = Uniform.Pants
75            --else
76                --print(Player.Name, "tried to wear some uniform, but the ranks are too high for them!")
77            end
78        end
79    end
80end)
 View all 80 lines...

In this script, how could I make the uniform changing process automatic?

1 answer

Answer this question