Advertisement
Guest User

People Manager

a guest
Jan 9th, 2025
28
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lua 1.63 KB | Source Code | 0 0
  1. local Teleporter = script.Parent
  2.  
  3. local enterPart = Teleporter.Enter
  4. local enterPos  = Teleporter.EnterPosition
  5. local exitPart  = Teleporter.Exit
  6. local exitPos   = Teleporter.ExitPosition
  7.  
  8. local currentPlayers = Teleporter.CurrentPlayers
  9. local PlaceID = 81956029110985
  10.  
  11. enterPart.BillboardGui.Players.Text = "" .. #currentPlayers:GetChildren() .. "/".. 30 ..""
  12.  
  13. local function CreatePlayer(playerName)
  14.     for _, player in pairs(currentPlayers:GetChildren()) do
  15.         if player:IsA("StringValue") and player.Value == playerName then
  16.             return false
  17.         end
  18.     end
  19.  
  20.     local player = Instance.new("StringValue")
  21.     player.Name = "Player"
  22.     player.Value = playerName
  23.     player.Parent = currentPlayers
  24. end
  25.  
  26. local function AddCurrent(player)
  27.     if player and player:IsA("Player") then
  28.         CreatePlayer(player.Name)
  29.         player.Character.HumanoidRootPart.CFrame = enterPos.CFrame
  30.     end
  31. end
  32.  
  33. local function RemoveCurrent(player)
  34.     for _, child in pairs(currentPlayers:GetChildren()) do
  35.         if child:IsA("StringValue") and child.Value == player.Name then
  36.             player.Character.HumanoidRootPart.CFrame = exitPos.CFrame
  37.             child:Destroy()
  38.             break
  39.         end
  40.     end
  41. end
  42.  
  43. enterPart.Touched:Connect(function(hit)
  44.     local player = game.Players:GetPlayerFromCharacter(hit.Parent)
  45.     if player then
  46.         AddCurrent(player)
  47.         enterPart.BillboardGui.Players.Text = "" .. #currentPlayers:GetChildren() .. "/".. 30 ..""
  48.     end
  49. end)
  50.  
  51. exitPart.Touched:Connect(function(hit)
  52.     local player = game.Players:GetPlayerFromCharacter(hit.Parent)
  53.     if player then
  54.         RemoveCurrent(player)
  55.         enterPart.BillboardGui.Players.Text = "" .. #currentPlayers:GetChildren() .. "/".. 30 ..""
  56.     end
  57. end)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement