Universal Script 📌
449 Views
106 Executions

Current Coordinates with Teleport CREDITS TO Tapn

Universal Script 📌
InfiniteSunnySideup
InfiniteSunnySideup100K executions
11 months ago
Get an executor
Please login to perform these actions:

Does it work?

No reports yet

No reports yet. Tried it? Be the first to say.

Also noticed:

Description

Credits : Tapn (on rscript)

View Raw
local S, P, U2, C3, CF = setmetatable({}, {__index = function(_,k) return game:GetService(k) end}), game:GetService("Players").LocalPlayer, UDim2.new, Color3.fromRGB, CFrame.new

local Col = {Bg=C3(10,10,10), Side=C3(15,15,15), Item=C3(22,22,22), Txt=C3(240,240,240), Dim=C3(120,120,120), Acc=C3(255,255,255)}

pcall(function() S.CoreGui.Sayso:Destroy() end)



local function New(Class, Props)

    local Inst = Instance.new(Class)

    for K, V in next, Props do

        if K == "On" then for E, F in next, V do Inst[E]:Connect(F) end

        elseif K == "Ch" then for _, C in next, V do C.Parent = Inst end

        elseif K ~= "P" then Inst[K] = V end

    end

    if Props.P then Inst.Parent = Props.P end

    return Inst

end



local Gui = New("ScreenGui", {Name="Sayso", ResetOnSpawn=false, P=S.CoreGui})

local Main = New("Frame", {Size=U2(0,500,0,350), Position=U2(0.5,-250,0.5,-175), BackgroundColor3=Col.Bg, BorderColor3=C3(45,45,45), ClipsDescendants=true, P=Gui})



local Drag = {On={InputBegan=function(i) 

    if i.UserInputType==Enum.UserInputType.MouseButton1 then 

        local s, p, u = i.Position, Main.Position, S.UserInputService

        local c1, c2

        c1 = u.InputChanged:Connect(function(v) if v.UserInputType==Enum.UserInputType.MouseMovement then local d=v.Position-s; S.TweenService:Create(Main, TweenInfo.new(0.05), {Position=U2(p.X.Scale,p.X.Offset+d.X,p.Y.Scale,p.Y.Offset+d.Y)}):Play() end end)

        c2 = u.InputEnded:Connect(function(v) if v.UserInputType==Enum.UserInputType.MouseButton1 then c1:Disconnect(); c2:Disconnect() end end)

    end 

end}}

New("Frame", {Size=U2(1,0,0,40), BackgroundTransparency=1, P=Main, On=Drag.On}) 



local Sidebar = New("Frame", {Size=U2(0,120,1,0), BackgroundColor3=Col.Side, BorderSizePixel=0, P=Main, Ch={

    New("TextLabel", {Text="Adolf", Size=U2(1,0,0,50), BackgroundTransparency=1, TextColor3=Col.Acc, Font=17, TextSize=22})

}})

local TabBox = New("Frame", {Size=U2(1,0,1,-50), Position=U2(0,0,0,50), BackgroundTransparency=1, P=Sidebar, Ch={New("UIListLayout", {})}})

local PageBox = New("Frame", {Size=U2(1,-130,1,-10), Position=U2(0,130,0,10), BackgroundTransparency=1, P=Main})



local function AddTab(N, Vis)

    local Pg = New("Frame", {Size=U2(1,0,1,0), BackgroundTransparency=1, Visible=Vis, P=PageBox})

    New("TextButton", {Text=N, Size=U2(1,0,0,40), BackgroundColor3=Vis and Col.Item or Col.Side, TextColor3=Vis and Col.Acc or Col.Dim, Font=16, TextSize=13, BorderSizePixel=0, P=TabBox, On={MouseButton1Click=function(b)

        for _,v in next, PageBox:GetChildren() do v.Visible = (v==Pg) end

        for _,v in next, TabBox:GetChildren() do if v:IsA("TextButton") then v.TextColor3, v.BackgroundColor3 = Col.Dim, Col.Side end end

        b.TextColor3, b.BackgroundColor3 = Col.Acc, Col.Item



Comments

0
Log in to join the conversation. Login
No comments yet. Be the first!