Teleport System

 ScreenGui = .()
 MainFrame = .()
 TitleBar = .()
 TitleText = .()
 Close = .()
 Minimize = .()
 Maximize = .()
 ContentFrame = .() 
 ListFrame = .()
 TeleportBtn = .()
 LoopBtn = .()
 DeselectBtn = .()
 ResizeBtn = .() 
 SpeedInput = .()
 SpeedLabel = .()
 ApplySpeed = .()
 UIListLayout = .()

ScreenGui.Name = 
ScreenGui.Parent = .CoreGui
ScreenGui.ResetOnSpawn = 

MainFrame.Name = 
MainFrame.Parent = ScreenGui
MainFrame.BackgroundColor3 = .(, , )
MainFrame.BorderSizePixel = 
MainFrame.Position = .(, -, , -)
MainFrame.Size = .(, , , )
MainFrame.Active = 
MainFrame.ClipsDescendants =  

TitleBar.Name = 
TitleBar.Parent = MainFrame
TitleBar.Size = .(, , , )
TitleBar.BackgroundColor3 = .(, , )
TitleBar.ZIndex = 

TitleText.Name = 
TitleText.Parent = TitleBar
TitleText.Size = .(, -, , )
TitleText.Position = .(, , , )
TitleText.BackgroundTransparency = 
TitleText.Text = 
TitleText.TextColor3 = .(, , )
TitleText.TextSize =  
TitleText.Font = .Font.GothamBold
TitleText.TextXAlignment = .TextXAlignment.Left
TitleText.ZIndex = 

  (name, text, pos, color)
     btn = .()
    btn.Name = name
    btn.Parent = TitleBar
    btn.Position = pos
    btn.Size = .(, , , )
    btn.Text = text
    btn.BackgroundColor3 = color
    btn.TextColor3 = .(,,)
    btn.ZIndex = 
     btn


Close = (, , .(, -, , ), .(, , ))
Maximize = (, , .(, -, , ), .(, , ))
Minimize = (, , .(, -, , ), .(, , ))

ResizeBtn.Name = 
ResizeBtn.Parent = MainFrame
ResizeBtn.AnchorPoint = .(, )
ResizeBtn.Position = .(, , , )
ResizeBtn.Size = .(, , , )
ResizeBtn.Text = 
ResizeBtn.TextSize = 
ResizeBtn.BackgroundColor3 = .(, , )
ResizeBtn.ZIndex =  

ContentFrame.Name = 
ContentFrame.Parent = MainFrame
ContentFrame.Size = .(, , , -)
ContentFrame.Position = .(, , , )
ContentFrame.BackgroundTransparency = 
ContentFrame.ScrollBarThickness = 
ContentFrame.CanvasSize = .(, , , )
ContentFrame.Active =  

ListFrame.Name = 
ListFrame.Parent = ContentFrame
ListFrame.Position = .(, , , )
ListFrame.Size = .(, -, , ) 
ListFrame.BackgroundColor3 = .(, , )
ListFrame.BorderSizePixel = 
ListFrame.CanvasSize = .(, , , )
ListFrame.ScrollBarThickness = 

UIListLayout.Parent = ListFrame
UIListLayout.Padding = .(, )

DeselectBtn.Name = 
DeselectBtn.Parent = ContentFrame
DeselectBtn.Position = .(, , , )
DeselectBtn.Size = .(, -, , ) 
DeselectBtn.BackgroundColor3 = .(, , )
DeselectBtn.Text = 
DeselectBtn.TextColor3 = .(, , )
DeselectBtn.Font = .Font.GothamBold
DeselectBtn.TextSize =  

TeleportBtn.Name = 
TeleportBtn.Parent = ContentFrame
TeleportBtn.Position = .(, , , )
TeleportBtn.Size = .(, -, , ) 
TeleportBtn.BackgroundColor3 = .(, , )
TeleportBtn.Text = 
TeleportBtn.TextColor3 = .(, , )
TeleportBtn.Font = .Font.GothamBold
TeleportBtn.TextSize = 

SpeedLabel.Name = 
SpeedLabel.Parent = ContentFrame
SpeedLabel.Position = .(, , , )
SpeedLabel.Size = .(, -, , )
SpeedLabel.BackgroundTransparency = 
SpeedLabel.Text = 
SpeedLabel.TextColor3 = .(, , )
SpeedLabel.Font = .Font.GothamBold
SpeedLabel.TextSize =  

SpeedInput.Name = 
SpeedInput.Parent = ContentFrame
SpeedInput.Position = .(, , , )
SpeedInput.Size = .(, -, , ) 
SpeedInput.BackgroundColor3 = .(, , )
SpeedInput.Text = 
SpeedInput.TextColor3 = .(, , )
SpeedInput.Font = .Font.GothamBold
SpeedInput.TextSize =  

ApplySpeed.Name = 
ApplySpeed.Parent = ContentFrame
ApplySpeed.Position = .(, , , )
ApplySpeed.Size = .(, -, , ) 
ApplySpeed.BackgroundColor3 = .(, , )
ApplySpeed.Text = 
ApplySpeed.TextColor3 = .(, , )
ApplySpeed.Font = .Font.GothamBold
ApplySpeed.TextSize = 

LoopBtn.Name = 
LoopBtn.Parent = ContentFrame
LoopBtn.Position = .(, , , )
LoopBtn.Size = .(, -, , ) 
LoopBtn.BackgroundColor3 = .(, , )
LoopBtn.Text = 
LoopBtn.TextColor3 = .(, , )
LoopBtn.Font = .Font.GothamBold
LoopBtn.TextSize = 

 selectedTarget = 
 loopActive = 
 tpWaitTime = 
 isFull, isMin, resizing, dragging = , , , 
 dragStart, startPos, oldSize, oldPos = , , MainFrame.Size, MainFrame.Position

(()
	 .() 
		 hue = () %  / 
		 color = .(hue, , )
		TitleText.TextColor3 = color
		MainFrame.BorderColor3 = color
		TeleportBtn.TextColor3 = color
		 loopActive  LoopBtn.TextColor3 = color  LoopBtn.TextColor3 = .(,,) 
	
)

  (gui)
    gui.InputBegan:((input)
         (input.UserInputType == .UserInputType.MouseButton1  input.UserInputType == .UserInputType.Touch)   isFull 
             resizing   
            dragging = 
            dragStart = input.Position
            startPos = MainFrame.Position
            input.Changed:(()
                 input.UserInputState == .UserInputState.End  dragging =  
            )
        
    )


(MainFrame)
(TitleBar)
(ContentFrame)

:().InputChanged:((input)
     dragging  (input.UserInputType == .UserInputType.MouseMovement  input.UserInputType == .UserInputType.Touch) 
         delta = input.Position - dragStart
        MainFrame.Position = .(startPos.X.Scale, startPos.X.Offset + delta.X, startPos.Y.Scale, startPos.Y.Offset + delta.Y)
        oldPos = MainFrame.Position
    
)

ResizeBtn.InputBegan:((input)
     (input.UserInputType == .UserInputType.MouseButton1  input.UserInputType == .UserInputType.Touch)   isFull   isMin 
        resizing = 
        dragging = 
    
)

:().InputEnded:((input)
     input.UserInputType == .UserInputType.MouseButton1  input.UserInputType == .UserInputType.Touch  resizing =  
)

:().RenderStepped:(()
     resizing   isFull   isMin 
         mousePos = :():()
         nX = .(mousePos.X - MainFrame.AbsolutePosition.X, , )
         nY = .(mousePos.Y - MainFrame.AbsolutePosition.Y, , )
        MainFrame.Size = .(, nX, , nY)
        oldSize = MainFrame.Size
    
)

ApplySpeed.MouseButton1Click:(()
     val = (SpeedInput.Text)
     val  tpWaitTime = .(val, ) SpeedInput.Text = (tpWaitTime)
     tpWaitTime =  SpeedInput.Text =  
)

  (obj)
      obj    
     obj:() 
         obj.Character  obj.Character:() 
             obj.Character.HumanoidRootPart
        
     obj:()  obj:() 
         obj.HumanoidRootPart
    
     


  ()
     myChar = .Players.LocalPlayer.Character
     myChar  myChar:()  selectedTarget 
         targetRoot = (selectedTarget)
         targetRoot 
            myChar.HumanoidRootPart.CFrame = targetRoot.CFrame
        
    


  ()
	 _, child  (ListFrame:())   child:()  child:()  
	
      (obj, dispName, userName, prefix)
		 btn = .()
		btn.Size = .(, -, , ) 
		btn.BackgroundColor3 = .(, , )
		btn.BorderSizePixel = 
		btn.Text = 
		btn.Parent = ListFrame
        
         displayLabel = .()
        displayLabel.Size = .(, -, , )
        displayLabel.Position = .(, , , )
        displayLabel.BackgroundTransparency = 
        displayLabel.Text = prefix ..  .. dispName
        displayLabel.TextColor3 = .(, , )
        displayLabel.Font = .Font.GothamBold
        displayLabel.TextSize =  
        displayLabel.TextXAlignment = .TextXAlignment.Left
        displayLabel.Parent = btn

         userLabel = .()
        userLabel.Size = .(, -, , )
        userLabel.Position = .(, , , )
        userLabel.BackgroundTransparency = 
        userLabel.Text =  .. userName
        userLabel.TextColor3 = .(, , )
        userLabel.Font = .Font.Gotham
        userLabel.TextSize =  
        userLabel.TextXAlignment = .TextXAlignment.Left
        userLabel.Parent = btn

		btn.MouseButton1Click:(()
			 _, b  (ListFrame:())   b:()  b.BackgroundColor3 = .(, , )  
			btn.BackgroundColor3 = .(, , )
			selectedTarget = obj
		)
	
    
	 _, p  (.Players:())  
         p ~= .Players.LocalPlayer  (p, p.DisplayName, p.Name, )  
    
    
	 _, v  (:()) 
		 v:()   .Players:(v.Parent)  v.Parent:() 
             isBot = v.Parent:()  v.Parent:() 
             prefix = isBot    
			(v.Parent, v.Parent.Name, v.Parent.Name:(), prefix)
		
	
	ListFrame.CanvasSize = .(, , , UIListLayout.AbsoluteContentSize.Y)


LoopBtn.MouseButton1Click:(()
	loopActive =  loopActive
	LoopBtn.Text =  .. (loopActive    )
     loopActive 
        (()
             loopActive  
                () 
                .(tpWaitTime) 
            
        )
    
)

DeselectBtn.MouseButton1Click:(()
	selectedTarget = 
	 _, b  (ListFrame:())   b:()  b.BackgroundColor3 = .(, , )  
)

TeleportBtn.MouseButton1Click:(doTeleport)
Close.MouseButton1Click:(() ScreenGui:() )

Minimize.MouseButton1Click:(()
	  isMin 
		isMin = 
		ContentFrame.Visible = 
		ResizeBtn.Visible = 
		MainFrame:(.(, MainFrame.Size.X.Offset, , ), , , , )
	
		isMin = 
		ContentFrame.Visible = 
		ResizeBtn.Visible = 
		MainFrame:(isFull  .(, , , )  oldSize, , , , )
	
)

Maximize.MouseButton1Click:(()
	  isFull 
		isFull = 
		oldSize = MainFrame.Size
		oldPos = MainFrame.Position
		MainFrame:(.(, , , ), , , , )
		MainFrame:(.(, , , ), , , , )
	
		isFull = 
		MainFrame:(oldPos, , , , )
		MainFrame:(oldSize, , , , )
	
)

()