Script server code

local DataStoreService = game:GetService("DataStoreService")
local CodeDataStore = DataStoreService:GetDataStore("codedata1")

local code = {
    ["1KFollowers"] = 200,
    ["Dev"] = 999999999
}

game:GetService("Players").PlayerAdded:Connect(function(plr)
    local leaderstats = Instance.new("Folder", plr)
    leaderstats.Name = "leaderstats"

    local Cash = Instance.new("IntValue", stats)
    Cash.Name = "Cash"
    Cash.Value = 0

    local CodeFolder = Instance.new("Folder", plr)
    CodeFolder.Name = "Codes"

    local DataSaved = CodeDataStore:GetAsync(plr.UserId)
    for i, v in next, code do
        local Code = Instance.new("BoolValue", CodeFolder)
        Code.Name = i
        Code.Value = DataSaved and DataSaved[i] or false
    end
end)

game.Players.PlayerRemoving:Connect(function(plr)
    local DataToSave = {}
    if plr:FindFirstChild("Codes") then
        for i, v in next, plr.Codes:GetChildren() do
            if v:IsA("BoolValue") then
                DataToSave[v.Name] = v.Value
            end
        end
    end
    CodeDataStore:SetAsync(plr.UserId, dataToSave)
end)

local ReplicatedStorage = game:GetService("ReplicatedStorage")

ReplicatedStorage.RedeemCode.OnServerEvent:Connect(function(plr, RedeemedCode)
    if plr and RedeemedCode and plr:FindFirstChild("Codes") and plr.Codes:FindFirstChild(RedeemedCode) and not plr.Codes[RedeemedCode].Value then
        local Rewards = code[RedeemedCode]
        plr.Codes[RedeemedCode].Value = true
        plr.leaderstats.Cash.Value = plr.leaderstats.Cash.Value + Rewards
    end
end)