Phone System Glitching?

NOTE: THIS IS VERY LONG! I HOPE YOU HAVE THE TIME TO READ THIS!

I am making a Town and City game that is like no other. I thought of an idea and thought of a phone system where you can text other players. Sadly, it seems to glitch. I use LocalScripts to allow them to access a Folder in ReplicatedStorage called Numbers. Inside that folder are NumberValues that are named the player's name and the value's value is the number that the player has picked. However, when you set the number it always stays as 0. No matter what. It changes it in the ServerScript so it's not because I'm using a localscript. Also, when I tried changing the value manually in the server test mode all that happened was when you received a text it said "New Text from: 0. Select your phone to read it." It won't change the player's phone number at all! I've tried putting the values inside ReplicatedStorage and inside a folder instead of a model, but that doesn't do anything either! Any help?

There are many scripts used in this system. Main Script inside the PhoneGui:

wait(1)
local Player = script.Parent.Parent.Parent
local Number = game.Workspace.Numbers:FindFirstChild(Player.Name)
local Gui = script.Parent
local frame = Instance.new("Frame")
frame.Position = UDim2.new(1, 0, 0.75, 0)
frame.Size = UDim2.new(1, 0, 0.25, 0)
frame.Style = "DropShadow"
local label = Instance.new("TextLabel", frame)
label.Size = UDim2.new(1, 0, 1, 0)
label.TextColor3 = Color3.new(1, 1, 1)
label.TextStrokeTransparency = 0
label.BackgroundTransparency = 1
label.TextScaled = true
label.TextWrapped = true
num = game.Workspace.Numbers:FindFirstChild(Player.Name)

if Number.Value == 0 then
	Gui.NoNum.Visible = true
end

num.ChildAdded:connect(function(child)
	local noti = frame:Clone()
	for i,v in pairs(script.Parent.NotificationFrame:GetChildren()) do
		v:TweenPosition(UDim2.new(0, 0, v.Position.X.Scale-0.25, 0), Enum.EasingDirection.Out, Enum.EasingStyle.Linear, 0.3)
	end
	noti.Parent = script.Parent.NotificationFrame
	noti.TextLabel.Text = "You have received a text from "..child.Name..". Select your phone to read it."
	noti:TweenPosition(UDim2.new(0, 0, 0.75, 0), Enum.EasingDirection.Out, Enum.EasingStyle.Linear, 0.5)
end)

script that opens the TextFrame LOCAL:

local mouse = game.Players.LocalPlayer:GetMouse()
local Gui = script.Parent

mouse.KeyDown:connect(function(key)
	if key == "q" then
		if Gui.TextFrame.Visible then
			Gui.TextFrame.Visible = false
		else
			Gui.TextFrame.Visible = true
		end
	end
end)

script inside the send button inside the TextFrame:

num = game.Workspace.Numbers:FindFirstChild(script.Parent.Parent.Parent.Parent.Parent.Name)

script.Parent.MouseButton1Down:connect(function()
	script.Parent.Text = "Sending..."
	wait(0.5)
	local sendnum
	for i,v in pairs(game.Workspace.Numbers:GetChildren()) do
		if v.Value == tonumber(script.Parent.Parent.Number.Text) then
			sendnum = v
			break
		else
			sendnum = false
		end
	end
	if sendnum == false then
		script.Parent.Text = "ERROR: Number is invalid!"
	elseif sendnum ~= false then
		local text = Instance.new("StringValue", sendnum)
		text.Name = num.Value
		text.Value = script.Parent.Parent.Message.Text
		script.Parent.Text = "Sent!"
		script.Parent.Parent.Message.Text = "Enter Message Here"
	end
end)

Main script inside the ReadFrame:

Player = script.Parent.Parent.Parent.Parent
num = game.Workspace.Numbers:FindFirstChild(Player.Name)
local m = Instance.new("TextButton")
m.Size = UDim2.new(1, 0, 0, 45)
m.TextColor3 = Color3.new(1, 1, 1)
m.TextStrokeTransparency = 0
m.TextScaled = true
m.TextWrapped = true

script.Parent.Changed:connect(function(prop)
	if prop == "Visible" then
		if script.Parent.Visible == true then
			for i,v in pairs(script.Parent:GetChildren()) do
				if v:IsA("TextButton") then
					if v.Name ~= "From" then
						if v.Name ~= "Message" then
							v:Destroy()
						end
					end
				end
			end
		end
		local row = 0
		for i,v in pairs(num:GetChildren()) do
			local text = m:Clone()
			text.Parent = script.Parent
			text.Name = v.Name
			text.Text = "Click to read message from: "..v.Name
			text.Position = UDim2.new(0, 0, 0, 45*row)
			text.ZIndex = 3
			text.Style = Enum.ButtonStyle.RobloxRoundDropdownButton
			text.MouseButton1Down:connect(function()
				script.Parent.From.Visible = true
				script.Parent.Message.Visible = true
				script.Parent.From.Text = v.Name
				script.Parent.Message.Text = v.Value
				text:Destroy()
				v:Destroy()
			end)
			row = row+1
		end
	end
end)

script inside the message button:

script.Parent.MouseButton1Down:connect(function()
	script.Parent.Visible = false
	script.Parent.Parent.From.Visible = false
end)

Script inside the NoNum Frame's Enter Button

script.Parent.MouseButton1Down:connect(function()
	local num = script.Parent.Text
	script.Parent.Text = "Checking Availability..."
	script.Parent.BackgroundColor3 = Color3.new(0, 0, 1)
	wait(0.5)
	local Taken
	for i,v in pairs(game.Workspace.Numbers:GetChildren()) do
		if v.Value == num then
			Taken = true
			break
		end
	end
	if Taken then
		script.Parent.Text = "That number is already taken!"
		script.Parent.BackgroundColor3 = Color3.new(1, 0, 0)
		wait(2)
		script.Parent.Text = "Enter"
		script.Parent.BackgroundColor3 = Color3.new(0, 1, 0)
	end
	if not Taken then
		game.Workspace.Numbers[script.Parent.Parent.Parent.Parent.Parent.Name].Value = num
		script.Parent.Text = "Number has been set!"
		script.Parent.BackgroundColor3 = Color3.new(0, 1, 0)
		wait(2)
		script.Parent.Parent.Visible = false
	end
end)

LocalScript inside the Phone:

wait(1)
local Player = game.Players.LocalPlayer
local Number = game.Workspace.Numbers:FindFirstChild(Player.Name)
local Tool = script.Parent
local Character = Player.Character
local GlobalMouse = Player:GetMouse()
local Gui = Player.PlayerGui:FindFirstChild("PhoneGui")

Tool.Equipped:connect(function(mouse)
	mouse.Button1Down:connect(function()
		if not Gui.ReadFrame.Visible then
			Gui.ReadFrame.Visible = true
		else
			Gui.ReadFrame.Visible = false
		end
	end)
end)

If you need to see the whole thing I can uncopylock the place containing it.