How would I make this be able to save Color3 values as well?

Asked by
5 years ago
01local DSService = game:GetService('DataStoreService'):GetDataStore('DBSRClosedTestv9')
02game.Players.PlayerAdded:connect(function(p)
03    wait(game.Lighting.TimeToLoad.Value)
04    -- Define variables
05    local stats = game.ServerStorage.PlayerData:Clone()
06    stats.Parent = p
07    stats.Level.Value = 1
08    stats.StrengthValue.Value = 0
09    stats.speedValue.Value = 1
10    stats.maxKi.Value = 100
11    stats.MaxStaminaValue.Value = 100
12    stats.kiDamage.Value = 0
13    stats.kiControl.Value = 0
14    stats.kiValue.Value = 100
15    stats.AgilityValue.Value = 0
16    stats.PowerLevel.Value = 100
17    stats.currentHealth.Value = 100
18    stats.defenseValue.Value = 0
19    stats.attributePoints.Value = 0
20    stats.exp.Value = 0
21    stats.Zeni.Value = 0
22    stats.Hair.Value = 0
23    stats.BodyHeight.Value = 1
24    stats.BodyWidth.Value = 1
25    print("Done")
26    --stats.mouth.Value = 1
27    stats.Face.Value = 1
28    local uniquekey = 'id-'..p.userId
29    local names = {}
30    for i, v in pairs(p.PlayerData:GetChildren()) do
31        table.insert(names, v.Name)
32    end
33 
34    -- GetAsync
35    local GetSaved = DSService:GetAsync(uniquekey)
36    if GetSaved then
37        for i, v in pairs(p.PlayerData:GetChildren()) do
38            v.Value = GetSaved[i]
39        end
40 
41        for i=1, #GetSaved do
42                print(i .. ": " .. names[i] .. " = " .. tostring(GetSaved[i]))
43        end
44    else
45        local NumbersForSaving = {}
46            for i, v in pairs(p.PlayerData:GetChildren()) do
47                table.insert(NumbersForSaving, v.Value)
48            end
49        DSService:SetAsync(uniquekey, NumbersForSaving)
50    end
51end)
52 
53game.Players.PlayerRemoving:connect(function(p)
54    local uniquekey = 'id-'..p.userId
55    local Savetable = {}
56        for i, v in pairs(p.PlayerData:GetChildren()) do
57            table.insert(Savetable, v.Value)
58        end
59 
60    DSService:SetAsync(uniquekey, Savetable)            
61end)
 View all 61 lines...
How would I make this be able to save Color3 values as well?

1 answer

Answer this question
