local SavedRobux = {}
local InformationDirectory = game.ReplicatedStorage.Information
local Limiteds = game.ReplicatedStorage.Limiteds
local Globals = require(game.Workspace.Globals)
local BanList = {
	"Energy1x1",
	"cubjamie",
	"Footbxll",
	"TippyCola",
	"Gertidadon",
	"GodlyScrub",
	"Nindoz",
	"e5m"
}

function Thumbs(Plr)
	if game:GetService("BadgeService"):UserHasBadge(Plr.userId, 102611803) then
		wait(3*60)
		if Plr then
			local Msg = "Hiya "..Plr.Name..", if you didn't already, can you please thumbs up the game? Thanks :) - Citrum"
			Globals.Notify(Plr,nil,Msg,10)
		end
	end
end

function GetPoints(Killer)
	Globals.AwardRobux(Killer,1000,true)
end

function Died(Player,Humanoid)
	Humanoid.ChildAdded:connect(function(Child)
		if Child.Name == "creator" then
			local Killer = Child.Value
			GetPoints(Killer)
			Globals.Notify(Player,Killer.Name," Has killed you!",4)
		end
	end)
end

function CheckForBan(Plr)
	for i = 1,#BanList do
		if string.lower(Plr.Name) == string.lower(BanList[i]) then
			return true
		end
	end
	return false
end

function Inboxer(Plr,Inbox)
	Inbox.ChildAdded:connect(function(Message)
		wait()
		wait()
		Message.Parent = Plr:WaitForChild("PlayerGui")
	end)
end

function Ban(Plr)
	script["LocalBan"]:Clone().Parent = Plr:WaitForChild("PlayerGui")
end

local interestID = 220666599
local extrarobuxGPID = 123 -- ID
local extrarobuxGP = 800000 -- amnt they get if they own it

local extraRobux = {}
extraRobux['Citrum'] = 100000000
extraRobux['WentLimited'] = 100000000 -- add more here
extraRobux['Krippen'] = 100000000
extraRobux['TazBlockjr'] = 100000000

function GiveRobux(Plr)
local GetRobux = SavedRobux[Plr.Name] or extraRobux[Plr.Name] or (game:GetService('GamePassService'):PlayerHasPass(Plr, extrarobuxID) and extraRobuxGP) or 750000
if game:GetService('GamePassService'):PlayerHasPass(Plr, interestID) and
game.ReplicatedStorage.Information[Plr.Name].Bank.Value == 1 then
game.ReplicatedStorage.Information[Plr.Name].Bank.Value = 4
end
Globals.PlayersRobux[Plr] = GetRobux
return GetRobux
end

function GetValue(ID)
	local Value = Limiteds:WaitForChild(ID).Value
	if Value == 0 then
		Value = Limiteds:findFirstChild(ID).OriginalPrice.Value
	end
	return Value
end

function AddLimValue(Val,NewLimited)
	local NewLimValue = GetValue(NewLimited.Name)
	Val.Value = Val.Value + NewLimValue
end

function RemoveLimValue(Val,RemovedLimited)
	local RemovedLimValue = GetValue(RemovedLimited.Name)
	Val.Value = Val.Value - RemovedLimValue
end

function GiveValueGui(Plr,Value,PlrColor,Limiteds)
	local ValueGui = game.ServerStorage.ValueGui:Clone()
	ValueGui.Parent = Plr.Character:WaitForChild("Head")
	local Robux = Value.Parent:WaitForChild("Robux")
	Globals.ColorPreference(ValueGui.ValueText,PlrColor,"TextColor3")
	Value.Changed:connect(function(NewValue)
		ValueGui:WaitForChild("ValueText")
		if NewValue > 999999 then
			ValueGui.ValueText.Text = (math.ceil(NewValue/1000000)).."M"
		else ValueGui.ValueText.Text = (math.ceil(NewValue/1000)).."K" end
	end)
	--[[Robux.Changed:connect(function()
		if Robux.Value ~= Globals.PlayersRobux[Plr] then
			wait()
			Robux.Value = Globals.PlayersRobux[Plr]
			table.insert(Globals.Exploiters,Plr)
			Globals.Notify(Plr,nil,"Don't exploit.",10)
		end
	end)]]
	local Val = 0
	for i,v in pairs(Limiteds:GetChildren()) do
		Val = Val + GetValue(v.Name)
	end
	if Val > 999999 then
		ValueGui.ValueText.Text = (math.ceil(Val/1000000)).."M"
	else ValueGui.ValueText.Text = (math.ceil(Val/1000)).."K" end
end

function GetPreferences(Plr,Info)
	local DataStore = game:GetService("DataStoreService"):GetDataStore("DataStore")
	local Preferences = Info["Preferences"]
	if DataStore:GetAsync("PreferenceSorting"..Plr.Name) then
		Preferences.Sorting.Value = DataStore:GetAsync("PreferenceSorting"..Plr.Name)
	end
	Preferences.Sorting.Changed:connect(function(SortingValue)
		DataStore:SetAsync("PreferenceSorting"..Plr.Name, Preferences.Sorting.Value)
	end)
	if DataStore:GetAsync("PreferenceButton"..Plr.Name) then
		Preferences.ButtonStyle.Value = DataStore:GetAsync("PreferenceButton"..Plr.Name)
	end
	Preferences.ButtonStyle.Changed:connect(function(ButtonValue)
		DataStore:SetAsync("PreferenceButton"..Plr.Name, Preferences.ButtonStyle.Value)
	end)
	if DataStore:GetAsync("PreferenceBackground"..Plr.Name) then
		Preferences.BackgroundStyle.Value = DataStore:GetAsync("PreferenceBackground"..Plr.Name)
	end
	Preferences.BackgroundStyle.Changed:connect(function(BackgroundValue)
		DataStore:SetAsync("PreferenceBackground"..Plr.Name, Preferences.BackgroundStyle.Value)
	end)
	GiveValueGui(Plr,Info["Value"],Info["Preferences"].Color,Info["Limiteds"])
end

function GiveStats(Plr)
	if not InformationDirectory:findFirstChild(Plr.Name) then
		local Info = game.ServerStorage:findFirstChild("Name"):Clone()
		Info.Name = Plr.Name
		Info.Parent = InformationDirectory
		Info.Robux.Value = GiveRobux(Plr)
		local InfoValue = Info:WaitForChild("Value")
		Info.Limiteds.ChildAdded:connect(function(NewLimited)
			AddLimValue(InfoValue,NewLimited)
		end)
		Info.Limiteds.ChildRemoved:connect(function(RemovedLimited)
			RemoveLimValue(InfoValue,RemovedLimited)
		end)
		GetPreferences(Plr,Info)
		Inboxer(Plr,Info["Inbox"])
	else
		local Info = Globals.GetInfo(Plr)
		GiveValueGui(Plr,Info["Value"],Info["Preferences"].Color,Info["Limiteds"])
	end
end


game.Players.PlayerAdded:connect(function(Plr)
	Plr.CharacterAdded:wait()
	if not CheckForBan(Plr) then
		coroutine.resume(coroutine.create(function()
			Thumbs(Plr)
		end))
		GiveStats(Plr)
		Died(Plr,Plr.Character.Humanoid)
	else
		Ban(Plr)
		return
	end
	Plr.CharacterAdded:connect(function(Char)
		local PlrInfo = Globals.GetInfo(Plr)
		GiveValueGui(Plr,PlrInfo["Value"],PlrInfo["Preferences"].Color,PlrInfo["Limiteds"])
		Died(Plr,Char.Humanoid)
	end)
end)

game.Players.PlayerRemoving:connect(function(NilPlr)
	local NilPlrInfo = Globals.GetInfo(NilPlr)
	if NilPlrInfo then
		wait(5*60)
		if not game.Players:findFirstChild(NilPlr.Name) then
			for i,v in pairs(NilPlrInfo.Limiteds:GetChildren()) do
				local SellPrice = GetValue(v.Name)
				Globals.SellItem(v.Name,v.Value,SellPrice,NilPlr)
			end
			SavedRobux[NilPlr.Name] = NilPlrInfo.Robux.Value
			NilPlrInfo.Parent = Globals.Bin
		end
	end
end)