-Open_Close
-----------------------
---สร้างโดย The epic
local StatButton = script.Parent
local Stat = script.Parent.Parent.Stat
local Open = false

StatButton.Text.MouseButton1Click:Connect(function()
 if Open == false then
  Stat.StatText.Visible = true
  Open = true
 elseif Open == true then
  Stat.StatText.Visible = false
  Open = false
 end
end)
---สร้างโดย The epic
-----------------------

--SetupForPlayer
-----------------------
---สร้างโดย The epic
game.Players.PlayerAdded:Connect(function(player)
 local Folder = Instance.new("Folder",player)
 Folder.Name = "Stat"

 local Beli = Instance.new("IntValue",Folder)
 Beli.Name = "Beli"
 Beli.Value = 100

 local Bounty = Instance.new("IntValue",Folder)
 Bounty.Name = "Bounty"
 Bounty.Value = 0

 local Strength = Instance.new("IntValue",Folder)
 Strength.Name = "Strength"
 Strength.Value = 0

 local Sword = Instance.new("IntValue",Folder)
 Sword.Name = "Sword"
 Sword.Value = 0

 local Range = Instance.new("IntValue",Folder)
 Range.Name = "Range"
 Range.Value = 0

 local DevilFruit = Instance.new("IntValue",Folder)
 DevilFruit.Name = "DevilFruit"
 DevilFruit.Value = 0
 print("Setup Done")
end)
---สร้างโดย The epic
----------------------

--ShowStat
----------------------
---สร้างโดย The epic
local Player = game.Players.LocalPlayer
local StatText = script.Parent.StatText
script.Parent.StatText.Visible = false
while wait(0.1) do
 local beli = Player.Stat.Beli.Value
 local bounty = Player.Stat.Bounty.Value
 local strength = Player.Stat.Strength.Value
 local sword = Player.Stat.Sword.Value
 local range = Player.Stat.Range.Value
 local devilfruit = Player.Stat.DevilFruit.Value
 Player.Stat.Beli.Value = beli + 1
 Player.Stat.Bounty.Value = bounty + 1
 Player.Stat.Strength.Value = strength + 1
 Player.Stat.Sword.Value = sword + 1
 Player.Stat.Range.Value = range + 1
 Player.Stat.DevilFruit.Value = devilfruit + 1
 print("Stat Changed")
 StatText.Beli.BeliNum.Text = tostring(beli)
 StatText.Bounty.BountyNum.Text = tostring(bounty)
 StatText.Strength.StrengthNum.Text = tostring(strength)
 StatText.Sword.SwordNum.Text = tostring(sword)
 StatText.Range.RangeNum.Text = tostring(range)
 StatText.DevilFruit.DevilFruitNum.Text = tostring(devilfruit)
 print("Stat Show")
end