local Stats = game.Players.LocalPlayer:WaitForChild("Stats")
local Enabled = Stats:WaitForChild("Open")
local Beli = Stats:WaitForChild("Beli")
local Dialog = game.ReplicatedStorage.Buying.Dialog

script.Parent.MouseEnter:Connect(function()
	script.Parent:TweenPosition(UDim2.new(0.178, 0,0.565, 0),"Out","Back",.2,true)
end)

script.Parent.MouseLeave:Connect(function()
	script.Parent:TweenPosition(UDim2.new(0.164, 0,0.565, 0),"Out","Back",.2,true)
end)

script.Parent.MouseButton1Click:connect(function()
if Enabled.Value == true then
Enabled.Value = false
script.Parent.Visible = false
script.Parent.Parent.No.Visible = false
script.Parent.Parent.Text.Text = "g"
script.Uh:Play()
wait(0.05)
script.Parent.Parent.Text.Text = "gr"
script.Uh:Play()
wait(0.05)
script.Parent.Parent.Text.Text = "gre"
script.Uh:Play()
wait(0.05)
script.Parent.Parent.Text.Text = "grea"
script.Uh:Play()
wait(0.05)
script.Parent.Parent.Text.Text = "great"
script.Uh:Play()
wait(1)
script.Parent.Parent.Text.Text = "great i"
script.Uh:Play()
wait(0.05)
script.Parent.Parent.Text.Text = "great i j"
script.Uh:Play()
wait(0.05)
script.Parent.Parent.Text.Text = "great i ju"
script.Uh:Play()
wait(0.05)
script.Parent.Parent.Text.Text = "great i jus"
script.Uh:Play()
wait(0.05)
script.Parent.Parent.Text.Text = "great i just"
script.Uh:Play()
wait(0.05)
script.Parent.Parent.Text.Text = "great i just *b"
script.Uh:Play()
wait(0.05)
script.Parent.Parent.Text.Text = "great i just *be"
script.Uh:Play()
wait(0.05)
script.Parent.Parent.Text.Text = "great i just *bef"
script.Uh:Play()
wait(0.05)
script.Parent.Parent.Text.Text = "great i just *befr"
script.Uh:Play()
wait(0.05)
script.Parent.Parent.Text.Text = "great i just *befri"
script.Uh:Play()
wait(0.05)
script.Uh:Play()
script.Parent.Parent.Text.Text = "great i just *befrie"
wait(0.05)
script.Uh:Play()
script.Parent.Parent.Text.Text = "great i just *befrien"
wait(0.05)
script.Uh:Play()
script.Parent.Parent.Text.Text = "great i just *befriend"
wait(0.05)
script.Uh:Play()
script.Parent.Parent.Text.Text = "great i just *befriende"
wait(0.05)
script.Uh:Play()
script.Parent.Parent.Text.Text = "great i just *befriended*"
wait(0.3)
script.Uh:Play()
script.Parent.Parent.Text.Text = "great i just *befriended* y"
wait(0.05)
script.Uh:Play()
script.Parent.Parent.Text.Text = "great i just *befriended* yo"
wait(0.05)
script.Uh:Play()
script.Parent.Parent.Text.Text = "great i just *befriended* you"
wait(0.05)
script.Uh:Play()
script.Parent.Parent.Text.Text = "great i just *befriended* your"
wait(0.05)
script.Uh:Play()
script.Parent.Parent.Text.Text = "great i just *befriended* your m"
wait(0.05)
script.Uh:Play()
script.Parent.Parent.Text.Text = "great i just *befriended* your mo"
wait(0.05)
script.Uh:Play()
script.Parent.Parent.Text.Text = "great i just *befriended* your mom"
wait(0.05)
script.Uh:Play()
script.Parent.Parent.Text.Text = "great i just *befriended* your mom t"
wait(0.05)
script.Uh:Play()
script.Parent.Parent.Text.Text = "great i just *befriended* your mom to"
wait(0.05)
script.Uh:Play()
script.Parent.Parent.Text.Text = "great i just *befriended* your mom tod"
wait(0.05)
script.Uh:Play()
script.Parent.Parent.Text.Text = "great i just *befriended* your mom toda"
wait(0.05)
script.Uh:Play()
script.Parent.Parent.Text.Text = "great i just *befriended* your mom today"
wait(0.05)
script.Uh:Play()
script.Parent.Parent.Text.Text = "great i just *befriended* your mom today."
wait(2)
script.Parent.Parent:TweenPosition(UDim2.new(0.503, -370,1.099, 2500),"Out","Back",5,true)
wait(0.5)
Dialog:FireServer()
game.workspace["One Piece SoundBot"]:Resume()
game.Players.LocalPlayer.Backpack.Other.Sans.Sans:Stop()
wait(2)
script.Parent.Parent:TweenPosition(UDim2.new(0.459, 0,0.134, 0),"Out","Back",5,true)
script.Parent.Parent.Parent:Remove()
end
end)