Primilitive GUI (Updated UI)

-- Objects

local haxs = Instance.new("ScreenGui")
local Title = Instance.new("Frame")
local TitleText = Instance.new("TextLabel")
local Open = Instance.new("TextButton")
local Head = Instance.new("Frame")
local Overhead = Instance.new("Frame")
local Oil = Instance.new("TextButton")
local Gunpowder = Instance.new("TextButton")
local Crystal = Instance.new("TextButton")
local Obsidian = Instance.new("TextButton")
local Electronics = Instance.new("TextButton")
local IronIngot = Instance.new("TextButton")
local Ink = Instance.new("TextButton")
local Polymer = Instance.new("TextButton")
local Coal = Instance.new("TextButton")
local Cloth = Instance.new("TextButton")
local CopperIngot = Instance.new("TextButton")
local MainFrame = Instance.new("Frame")
local Stone = Instance.new("TextButton")
local Wood = Instance.new("TextButton")
local Foliage = Instance.new("TextButton")
local Fiber = Instance.new("TextButton")
local Iron = Instance.new("TextButton")
local Gold = Instance.new("TextButton")
local Close = Instance.new("TextButton")
local Credit = Instance.new("TextLabel")

-- Properties

haxs.Name = "haxs"
haxs.Parent = game.Players.LocalPlayer.PlayerGui

Title.Name = "Title"
Title.Parent = haxs
Title.BackgroundColor3 = Color3.new(0,0,0)
Title.BackgroundTransparency = 0.5
Title.BorderColor3 = Color3.new(0, 0, 0)
Title.BorderSizePixel = 0
Title.Position = UDim2.new(0, 0, 0.8, 0)
Title.Size = UDim2.new(0, 150, 0, 30)

TitleText.Name = "TitleText"
TitleText.Parent = Title
TitleText.BackgroundColor3 = Color3.new(255, 255, 255)
TitleText.BackgroundTransparency = 1
TitleText.Position = UDim2.new(0, 0, 0, 0)
TitleText.Size = UDim2.new(0, 150, 0, 30)
TitleText.Font = Enum.Font.Bodoni
TitleText.Text = "Primitive Gui"
TitleText.TextStrokeTransparency = 1
TitleText.TextColor3 = Color3.new(255, 255, 255)
TitleText.TextSize = 25

Open.Name = "Open"
Open.Parent = haxs
Open.BackgroundColor3 = Color3.new(0, 0, 0)
Open.BorderColor3 = Color3.new(0, 0, 0)
Open.BackgroundTransparency = 0.5
Open.BorderSizePixel = 0
Open.Position = UDim2.new(0, 0, 0.87, 0)
Open.Size = UDim2.new(0, 150, 0, 30)
Open.Visible = false
Open.Font = Enum.Font.Bodoni
Open.Text = "Open GUI"
Open.TextColor3 = Color3.new(255, 255, 255)
Open.TextSize = 25

Head.Name = "Head"
Head.Parent = haxs
Head.Active = true
Head.BackgroundColor3 = Color3.new(0, 0, 0)
Head.BackgroundTransparency = 0.5
Head.BorderSizePixel = 0
Head.Position = UDim2.new(0.5, -225, 0.5, -150)
Head.Selectable = true
Head.Size = UDim2.new(0, 452, 0, 29)

Overhead.Name = "Overhead"
Overhead.Parent = Head
Overhead.BorderSizePixel = 0
Overhead.BackgroundColor3 = Color3.new(1, 1, 1)
Overhead.Position = UDim2.new(0.00043797493, 0, 1.00482917, 0)
Overhead.Size = UDim2.new(0, 452, 0, 3)

Oil.Name = "Oil"
Oil.Parent = MainFrame
Oil.BackgroundTransparency = 0.5
Oil.BackgroundColor3 = Color3.new(0, 0, 0)
Oil.Position = UDim2.new(0.516, 0, 0.75, 0)
Oil.Size = UDim2.new(0, 200, 0, 20)
Oil.Font = Enum.Font.SourceSansLight
Oil.Text = "Unlimited Oil"
Oil.TextColor3 = Color3.new(255, 255, 255)
Oil.TextSize = 20

Gunpowder.Name = "Gunpowder"
Gunpowder.Parent = MainFrame
Gunpowder.BackgroundTransparency = 0.5
Gunpowder.BackgroundColor3 = Color3.new(0, 0, 0)
Gunpowder.Position = UDim2.new(0.516, 0, 0.55, 0)
Gunpowder.Size = UDim2.new(0, 200, 0, 20)
Gunpowder.Font = Enum.Font.SourceSansLight
Gunpowder.Text = "Unlimited Gunpowder"
Gunpowder.TextColor3 = Color3.new(255, 255, 255)
Gunpowder.TextSize = 20

Crystal.Name = "Crystal"
Crystal.Parent = MainFrame
Crystal.BackgroundTransparency = 0.5
Crystal.BackgroundColor3 = Color3.new(0, 0, 0)
Crystal.Position = UDim2.new(0.03, 0, 0.45, 0)
Crystal.Size = UDim2.new(0, 200, 0, 20)
Crystal.Font = Enum.Font.SourceSansLight
Crystal.Text = "Unlimited Crystal"
Crystal.TextColor3 = Color3.new(255, 255, 255)
Crystal.TextSize = 20

Obsidian.Name = "Obsidian"
Obsidian.Parent = MainFrame
Obsidian.BackgroundTransparency = 0.5
Obsidian.BackgroundColor3 = Color3.new(0, 0, 0)
Obsidian.Position = UDim2.new(0.03, 0, 0.35, 0)
Obsidian.Size = UDim2.new(0, 200, 0, 20)
Obsidian.Font = Enum.Font.SourceSansLight
Obsidian.Text = "Unlimited Obsidian"
Obsidian.TextColor3 = Color3.new(255, 255, 255)
Obsidian.TextSize = 20

Electronics.Name = "Electronics"
Electronics.Parent = MainFrame
Electronics.BackgroundTransparency = 0.5
Electronics.BackgroundColor3 = Color3.new(0, 0, 0)
Electronics.Position = UDim2.new(0.03, 0, 0.55, 0)
Electronics.Size = UDim2.new(0, 200, 0, 20)
Electronics.Font = Enum.Font.SourceSansLight
Electronics.Text = "Unlimited Electronics"
Electronics.TextColor3 = Color3.new(255, 255, 255)
Electronics.TextSize = 20

IronIngot.Name = "IronIngot"
IronIngot.Parent = MainFrame
IronIngot.BackgroundTransparency = 0.5
IronIngot.BackgroundColor3 = Color3.new(0, 0, 0)
IronIngot.Position = UDim2.new(0.03, 0, 0.75, 0)
IronIngot.Size = UDim2.new(0, 200, 0, 20)
IronIngot.Font = Enum.Font.SourceSansLight
IronIngot.Text = "Unlimited Iron Ingot"
IronIngot.TextColor3 = Color3.new(255, 255, 255)
IronIngot.TextSize = 20

Ink.Name = "Ink"
Ink.Parent = MainFrame
Ink.BackgroundTransparency = 0.5
Ink.BackgroundColor3 = Color3.new(0, 0, 0)
Ink.Position = UDim2.new(0.03, 0, 0.65, 0)
Ink.Size = UDim2.new(0, 200, 0, 20)
Ink.Font = Enum.Font.SourceSansLight
Ink.Text = "Unlimited Ink"
Ink.TextColor3 = Color3.new(255, 255, 255)
Ink.TextSize = 20

Polymer.Name = "Polymer"
Polymer.Parent = MainFrame
Polymer.BackgroundTransparency = 0.5
Polymer.BackgroundColor3 = Color3.new(0, 0, 0)
Polymer.Position = UDim2.new(0.516, 0, 0.65, 0)
Polymer.Size = UDim2.new(0, 200, 0, 20)
Polymer.Font = Enum.Font.SourceSansLight
Polymer.Text = "Unlimited Polymers"
Polymer.TextColor3 = Color3.new(255, 255, 255)
Polymer.TextSize = 20

Coal.Name = "Coal"
Coal.Parent = MainFrame
Coal.BackgroundTransparency = 0.5
Coal.BackgroundColor3 = Color3.new(0, 0, 0)
Coal.Position = UDim2.new(0.516, 0, 0.45, 0)
Coal.Size = UDim2.new(0, 200, 0, 20)
Coal.Font = Enum.Font.SourceSansLight
Coal.Text = "Unlimited Coal"
Coal.TextColor3 = Color3.new(255, 255, 255)
Coal.TextSize = 20

Cloth.Name = "Cloth"
Cloth.Parent = MainFrame
Cloth.BackgroundTransparency = 0.5
Cloth.BackgroundColor3 = Color3.new(0, 0, 0)
Cloth.Position = UDim2.new(0.516, 0, 0.35, 0)
Cloth.Size = UDim2.new(0, 200, 0, 20)
Cloth.Font = Enum.Font.SourceSansLight
Cloth.Text = "Unlimited Cloths"
Cloth.TextColor3 = Color3.new(255, 255, 255)
Cloth.TextSize = 20

Gold.Name = "Gold"
Gold.Parent = MainFrame
Gold.BackgroundTransparency = 0.5
Gold.BackgroundColor3 = Color3.new(0, 0, 0)
Gold.Position = UDim2.new(0.03, 0, 0.85, 0)
Gold.Size = UDim2.new(0, 414, 0, 20)
Gold.Font = Enum.Font.SourceSansLight
Gold.Text = "Unlimited Gold"
Gold.TextColor3 = Color3.new(255, 255, 255)
Gold.TextSize = 20

MainFrame.Name = "MainFrame"
MainFrame.Parent = Overhead
MainFrame.BackgroundTransparency = 0.4
MainFrame.BackgroundColor3 = Color3.new(0, 0, 0)
MainFrame.BorderColor3 = Color3.new(0, 0, 0)
MainFrame.BorderSizePixel = 0
MainFrame.Position = UDim2.new(0.0130805373, 0, 3.05461407, 0)
MainFrame.Size = UDim2.new(0, 440, 0, 270)

Stone.Name = "Stone"
Stone.Parent = MainFrame
Stone.BackgroundTransparency = 0.5
Stone.BackgroundColor3 = Color3.new(0, 0, 0)
Stone.Position = UDim2.new(0.03, 0, 0.05, 0)
Stone.Size = UDim2.new(0, 200, 0, 20)
Stone.Font = Enum.Font.SourceSansLight
Stone.Text = "Unlimited Stone"
Stone.TextColor3 = Color3.new(255, 255, 255)
Stone.TextSize = 20

Wood.Name = "Wood"
Wood.Parent = MainFrame
Wood.BackgroundTransparency = 0.5
Wood.BackgroundColor3 = Color3.new(0, 0, 0)
Wood.Position = UDim2.new(0.03, 0, 0.15, 0)
Wood.Size = UDim2.new(0, 200, 0, 20)
Wood.Font = Enum.Font.SourceSansLight
Wood.Text = "Unlimited Wood"
Wood.TextColor3 = Color3.new(255, 255, 255)
Wood.TextSize = 20

Foliage.Name = "Foliage"
Foliage.Parent = MainFrame
Foliage.BackgroundTransparency = 0.5
Foliage.BackgroundColor3 = Color3.new(0, 0, 0)
Foliage.Position = UDim2.new(0.516, 0, 0.15, 0)
Foliage.Size = UDim2.new(0, 200, 0, 20)
Foliage.Font = Enum.Font.SourceSansLight
Foliage.Text = "Unlimited Foliage"
Foliage.TextColor3 = Color3.new(255, 255, 255)
Foliage.TextSize = 20

Fiber.Name = "Fiber"
Fiber.Parent = MainFrame
Fiber.BackgroundTransparency = 0.5
Fiber.BackgroundColor3 = Color3.new(0, 0, 0)
Fiber.Position = UDim2.new(0.516, 0, 0.05, 0)
Fiber.Size = UDim2.new(0, 200, 0, 20)
Fiber.Font = Enum.Font.SourceSansLight
Fiber.Text = "Unlimited Fiber"
Fiber.TextColor3 = Color3.new(255, 255, 255)
Fiber.TextSize = 20

Iron.Name = "Iron"
Iron.Parent = MainFrame
Iron.BackgroundTransparency = 0.5
Iron.BackgroundColor3 = Color3.new(0, 0, 0)
Iron.Position = UDim2.new(0.03, 0, 0.25, 0)
Iron.Size = UDim2.new(0, 200, 0, 20)
Iron.Font = Enum.Font.SourceSansLight
Iron.Text = "Unlimited Iron"
Iron.TextColor3 = Color3.new(255, 255, 255)
Iron.TextSize = 20

CopperIngot.Name = "CopperIngot"
CopperIngot.Parent = MainFrame
CopperIngot.BackgroundTransparency = 0.5
CopperIngot.BackgroundColor3 = Color3.new(0, 0, 0)
CopperIngot.Position = UDim2.new(0.516, 0, 0.25, 0)
CopperIngot.Size = UDim2.new(0, 200, 0, 20)
CopperIngot.Font = Enum.Font.SourceSansLight
CopperIngot.Text = "Unlimited Copper Ingot"
CopperIngot.TextColor3 = Color3.new(255, 255, 255)
CopperIngot.TextSize = 20

Close.Name = "Close"
Close.Parent = MainFrame
Close.BackgroundColor3 = Color3.new(0, 0, 0)
Close.Position = UDim2.new(0, 0, 0.95, 0)
Close.BorderSizePixel = 0
Close.Size = UDim2.new(0, 440, 0, 23)
Close.Font = Enum.Font.SourceSansLight
Close.Text = "CLOSE"
Close.TextColor3 = Color3.new(255, 255, 255)
Close.TextSize = 20

Credit.Name = "Credit"
Credit.Parent = Head
Credit.BackgroundColor3 = Color3.new(255, 255, 255)
Credit.BackgroundTransparency = 1
Credit.BorderSizePixel = 1
Credit.Position = UDim2.new(0.269911498, 0, 0, 0)
Credit.Size = UDim2.new(0, 219, 0, 29)
Credit.Font = Enum.Font.SourceSansLight
Credit.Text = "Made by : Manveet (Mark#7477)"
Credit.TextColor3 = Color3.new(255, 255, 255)
Credit.TextSize = 20

Wood.MouseButton1Down:connect(function()
    local A_1 = "Materials"
    local A_2 = "Wood"
    local A_3 = 9999
    local plr = game.Players.LocalPlayer.Character
    local Event = plr.ItemHandler.Server.Drop
    Event:FireServer(A_1, A_2, A_3)
end)

Stone.MouseButton1Down:connect(function()
    local A_1 = "Materials"
    local A_2 = "Stone"
    local A_3 = 9999
    local plr = game.Players.LocalPlayer.Character
    local Event = plr.ItemHandler.Server.Drop
    Event:FireServer(A_1, A_2, A_3)
end)

Fiber.MouseButton1Down:connect(function()
    local A_1 = "Materials"
    local A_2 = "Fiber"
    local A_3 = 9999
    local plr = game.Players.LocalPlayer.Character
    local Event = plr.ItemHandler.Server.Drop
    Event:FireServer(A_1, A_2, A_3)
end)

Foliage.MouseButton1Down:connect(function()
    local A_1 = "Materials"
    local A_2 = "Foliage"
    local A_3 = 9999
    local plr = game.Players.LocalPlayer.Character
    local Event = plr.ItemHandler.Server.Drop
    Event:FireServer(A_1, A_2, A_3)
end)

Iron.MouseButton1Down:connect(function()
    local A_1 = "Materials"
    local A_2 = "Iron"
    local A_3 = 9999
    local plr = game.Players.LocalPlayer.Character
    local Event = plr.ItemHandler.Server.Drop
    Event:FireServer(A_1, A_2, A_3)
end)

CopperIngot.MouseButton1Down:connect(function()
    local A_1 = "Materials"
    local A_2 = "Copper Ingot"
    local A_3 = 9999
    local plr = game.Players.LocalPlayer.Character
    local Event = plr.ItemHandler.Server.Drop
    Event:FireServer(A_1, A_2, A_3)
end)

Ink.MouseButton1Down:connect(function()
    local A_1 = "Materials"
    local A_2 = "Ink"
    local A_3 = 9999
    local plr = game.Players.LocalPlayer.Character
    local Event = plr.ItemHandler.Server.Drop
    Event:FireServer(A_1, A_2, A_3)
end)

Cloth.MouseButton1Down:connect(function()
    local A_1 = "Materials"
    local A_2 = "Cloth"
    local A_3 = 9999
    local plr = game.Players.LocalPlayer.Character
    local Event = plr.ItemHandler.Server.Drop
    Event:FireServer(A_1, A_2, A_3)
end)

IronIngot.MouseButton1Down:connect(function()
    local A_1 = "Materials"
    local A_2 = "Iron Ingot"
    local A_3 = 9999
    local plr = game.Players.LocalPlayer.Character
    local Event = plr.ItemHandler.Server.Drop
    Event:FireServer(A_1, A_2, A_3)
end)

Coal.MouseButton1Down:connect(function()
    local A_1 = "Materials"
    local A_2 = "Coal"
    local A_3 = 9999
    local plr = game.Players.LocalPlayer.Character
    local Event = plr.ItemHandler.Server.Drop
    Event:FireServer(A_1, A_2, A_3)
end)

Polymer.MouseButton1Down:connect(function()
    local A_1 = "Materials"
    local A_2 = "Polymer"
    local A_3 = 9999
    local plr = game.Players.LocalPlayer.Character
    local Event = plr.ItemHandler.Server.Drop
    Event:FireServer(A_1, A_2, A_3)
end)

Gold.MouseButton1Down:connect(function()
    local A_1 = "Materials"
    local A_2 = "Gold"
    local A_3 = 9999
    local plr = game.Players.LocalPlayer.Character
    local Event = plr.ItemHandler.Server.Drop
    Event:FireServer(A_1, A_2, A_3)
end)

Obsidian.MouseButton1Down:connect(function()
    local A_1 = "Materials"
    local A_2 = "Obsidian"
    local A_3 = 9999
    local plr = game.Players.LocalPlayer.Character
    local Event = plr.ItemHandler.Server.Drop
    Event:FireServer(A_1, A_2, A_3)
end)

Oil.MouseButton1Down:connect(function()
    local A_1 = "Materials"
    local A_2 = "Oil"
    local A_3 = 9999
    local plr = game.Players.LocalPlayer.Character
    local Event = plr.ItemHandler.Server.Drop
    Event:FireServer(A_1, A_2, A_3)
end)

Electronics.MouseButton1Down:connect(function()
    local A_1 = "Materials"
    local A_2 = "Electronics"
    local A_3 = 9999
    local plr = game.Players.LocalPlayer.Character
    local Event = plr.ItemHandler.Server.Drop
    Event:FireServer(A_1, A_2, A_3)
end)

Gunpowder.MouseButton1Down:connect(function()
    local A_1 = "Materials"
    local A_2 = "Gunpowder"
    local A_3 = 9999
    local plr = game.Players.LocalPlayer.Character
    local Event = plr.ItemHandler.Server.Drop
    Event:FireServer(A_1, A_2, A_3)
end)

Crystal.MouseButton1Down:connect(function()
    local A_1 = "Materials"
    local A_2 = "Crystal"
    local A_3 = 9999
    local plr = game.Players.LocalPlayer.Character
    local Event = plr.ItemHandler.Server.Drop
    Event:FireServer(A_1, A_2, A_3)
end)

Close.MouseButton1Down:connect(function()
    wait(.5)
    Head:TweenPosition(UDim2.new(Head.Position) + UDim2.new(Head.Position.X,3,0))
    wait(1)
    Head.Position = UDim2.new(0.5,-225,0.5,-150)
    Head.Visible = false
    Open.Visible = true
end)

Open.MouseButton1Down:connect(function()
    Open.Visible = false
    Head.Visible = true
end)

spawn(function()
    while wait() do
        Overhead.BackgroundColor3 = Color3.fromHSV(tick() * 55 % 255/255, 1, 1)
    end
end)

Head.Draggable = true