local Players = game:GetService("Players")

local player = Players.LocalPlayer
local button = script.Parent

local function update()
	-- อัปเดตข้อความปุ่ม
	if player.AutoJumpEnabled then
		button.Text = "การกระโดดอัตโนมัติเปิดอยู่"
	else
		button.Text = "การกระโดดอัตโนมัติปิดอยู่"
	end
	-- สะท้อนคุณสมบัติในตัวละครของผู้เล่น หากพวกเขามี
	if player.Character then
		local human = player.Character:FindFirstChild("Humanoid")
		if human then
			human.AutoJumpEnabled = player.AutoJumpEnabled
		end
	end
end

local function onActivated()
	-- สลับการกระโดดอัตโนมัติ
	player.AutoJumpEnabled = not player.AutoJumpEnabled
	-- อัปเดตทุกอย่างอื่น
	update()
end

button.Activated:Connect(onActivated)
update()

local Players = game:GetService("Players")

local player = Players.LocalPlayer

player.CameraMode = Enum.CameraMode.LockFirstPerson

local Players = game:GetService("Players")
local player = Players.LocalPlayer

local character = player.Character
if not character or character.Parent == nil then
	character = player.CharacterAdded:Wait()
end

local Players = game:GetService("Players")

local player = Players.LocalPlayer

local screenGui = Instance.new("ScreenGui")
screenGui.Parent = player:WaitForChild("PlayerGui")

local function onPlayerAdded(newPlayer)
	if newPlayer.FollowUserId == player.UserId then
		local textLabel = Instance.new("TextLabel")
		textLabel.Parent = screenGui
		textLabel.Text = "คุณถูกติดตามเข้าสู่เกมนี้โดย " .. newPlayer.Name .. "!"
		task.delay(3, function()
			if textLabel then
				textLabel:Destroy()
			end
		end)
	end
end

Players.PlayerAdded:Connect(onPlayerAdded)

local Players = game:GetService("Players")

local player = Players.LocalPlayer

if player.HasRobloxSubscription then
	-- มอบเนื้อหาหรือสิทธิพิเศษเฉพาะสมาชิก
end

local Players = game:GetService("Players")

Players.PlayerAdded:Connect(function(player)
	local partyId = player.PartyId

	if partyId ~= "" then
		print("ผู้เล่นอยู่ในปาร์ตี้ที่มี ID: " .. partyId)
	else
		print("ผู้เล่นไม่ได้อยู่ในปาร์ตี้")
	end

	player:GetPropertyChangedSignal("PartyId"):Connect(function()
		if player.PartyId ~= "" then
			print("ผู้เล่นเข้าร่วมปาร์ตี้ที่มี ID: " .. player.PartyId)
		else
			print("ผู้เล่นออกจากปาร์ตี้")
		end
	end)
end)

local Players = game:GetService("Players")

local function addSpawn(spawnLocation)
	-- ฟังการสัมผัสจุดเกิด
	spawnLocation.Touched:Connect(function(hit)
		local character = hit:FindFirstAncestorOfClass("Model")
		if character then
			local player = Players:GetPlayerFromCharacter(character)
			if player and player.RespawnLocation ~= spawnLocation then
				local humanoid = character:FindFirstChildOfClass("Humanoid")
				-- ตรวจสอบให้แน่ใจว่าตัวละครยังไม่ตาย
				if humanoid and humanoid:GetState() ~= Enum.HumanoidStateType.Dead then
					print("ตั้งค่าจุดเกิด")
					player.RespawnLocation = spawnLocation
				end
			end
		end
	end)
end

local firstSpawn

-- มองหาจุดเกิดใน workspace
for _, descendant in pairs(workspace:GetDescendants()) do
	if descendant:IsA("SpawnLocation") then
		if descendant.Name == "FirstSpawn" then
			firstSpawn = descendant
		end
		addSpawn(descendant)
	end
end

local function playerAdded(player)
	player.RespawnLocation = firstSpawn
end

-- ฟังผู้เล่นใหม่
Players.PlayerAdded:Connect(playerAdded)

-- ผ่านผู้เล่นที่มีอยู่
for _, player in pairs(Players:GetPlayers()) do
	playerAdded(player)
end

local Players = game:GetService("Players")

Players.PlayerAdded:Connect(function(player)
    local user = player.User
    print("รหัสผู้ใช้โดเมน:", user.Id)
    print("ประเภทโดเมน:", user.DomainType)
    print("รหัสโดเมน:", user.DomainId)
end)

local Players = game:GetService("Players")

local function onPlayerAdded(player)
	print(player.UserId)
end

Players.PlayerAdded:Connect(onPlayerAdded)

local Players = game:GetService("Players")
local DataStoreService = game:GetService("DataStoreService")

local goldDataStore = DataStoreService:GetDataStore("Gold")

local STARTING_GOLD = 100

local function onPlayerAdded(player)
	local playerKey = "Player_" .. player.UserId

	local leaderstats = Instance.new("IntValue")
	leaderstats.Name = "leaderstats"

	local gold = Instance.new("IntValue")
	gold.Name = "Gold"
	gold.Parent = leaderstats

	local success, result = pcall(function()
		return goldDataStore:GetAsync(playerKey) or STARTING_GOLD
	end)
	if success then
		gold.Value = result
	else
		-- ไม่สามารถดึงข้อมูลได้
		warn(result)
	end

	leaderstats.Parent = player
end

Players.PlayerAdded:Connect(onPlayerAdded)

local Players = game:GetService("Players")

local player = Players.LocalPlayer

local character = player.Character or player.CharacterAdded:Wait()

local function onChildRemoved(child)
	print(child.ClassName, "ถูกลบออกจากตัวละคร")
end

character.ChildRemoved:Connect(onChildRemoved)

player:ClearCharacterAppearance()
--> BodyColors ถูกลบออกจากตัวละคร
--> ShirtGraphic ถูกลบออกจากตัวละคร
--> Shirt ถูกลบออกจากตัวละคร
--> Pants ถูกลบออกจากตัวละคร
--> CharacterMesh ถูกลบออกจากตัวละคร
--> Hat ถูกลบออกจากตัวละคร
--> Shirt ถูกลบออกจากตัวละคร

local Players = game:GetService("Players")

for _, player in pairs(Players:GetPlayers()) do
	print(player:DistanceFromCharacter(Vector3.new(0, 0, 0)))
end

local position1 = Vector3.new(0, 0, 0)
local position2 = Vector3.new(0, 10, 0)

local distance = (position1 - position2).Magnitude

local Players = game:GetService("Players")

local player = Players.LocalPlayer
local cameraState = player:GetCameraState()

print(cameraState.CFrame)
print(cameraState.FieldOfView)
print(cameraState.ViewportSize)

local Players = game:GetService("Players")

local player = Players.LocalPlayer

local success, result = pcall(player.GetFriendsOnlineAsync, player, 10)

if success then
	for _, friend in pairs(result) do
		print(friend.UserName)
	end
else
	warn("ไม่สามารถรับผู้เล่นออนไลน์ได้: " .. result)
end

local DataStoreService = game:GetService("DataStoreService")
local Players = game:GetService("Players")

local analyticsStore = DataStoreService:GetDataStore("Analytics")

local ALLOWED_SOURCES = {
	"twitter",
	"youtube",
	"discord",
}

local function onPlayerAdded(player)
	local source = player:GetJoinData().LaunchData
	-- ตรวจสอบว่าแหล่งที่มาที่ให้มาถูกต้องหรือไม่
	if source and table.find(ALLOWED_SOURCES, source) then
		-- อัปเดตข้อมูลในร้านค้าเพื่อติดตามความนิยมของแหล่งที่มา
		local success, result = pcall(analyticsStore.IncrementAsync, analyticsStore, source)

		if success then
			print(player.Name, "เข้าร่วมจาก", source, "- รวม:", result)
		else
			warn("ไม่สามารถบันทึกแหล่งที่มาของการเข้าร่วม: " .. result)
		end
	end
end

Players.PlayerAdded:Connect(onPlayerAdded)

local Players = game:GetService("Players")

local player = Players.LocalPlayer

local DIRECT_JOIN_URL = "https://www.roblox.com/games/start?placeId=%d&launchData=%s"

local textBox = script.Parent

local function generateReferralURL(player)
	return DIRECT_JOIN_URL:format(game.PlaceId, player.UserId)
end

local function highlightAll()
	if -- หลีกเลี่ยงการอัปเดตคุณสมบัติซ้ำ
		textBox:IsFocused() and not (textBox.SelectionStart == 1 and textBox.CursorPosition == #textBox.Text + 1)
	then
		textBox.SelectionStart = 1
		textBox.CursorPosition = #textBox.Text + 1
	end
end

textBox.Focused:Connect(highlightAll)
textBox:GetPropertyChangedSignal("SelectionStart"):Connect(highlightAll)
textBox:GetPropertyChangedSignal("CursorPosition"):Connect(highlightAll)

textBox.TextEditable = false
textBox.ClearTextOnFocus = false

textBox.Text = generateReferralURL(player)

local HttpService = game:GetService("HttpService")

local DATA_CHARACTER_LIMIT = 200

local function encodeTableAsLaunchData(data)
	-- แปลงตารางเป็นสตริง
	local jsonEncodedData = HttpService:JSONEncode(data)

	if #jsonEncodedData <= DATA_CHARACTER_LIMIT then
		-- หนีอักขระที่อาจไม่ถูกต้อง เช่น ช่องว่าง
		local urlEncodedData = HttpService:UrlEncode(jsonEncodedData)
		return true, urlEncodedData
	else
		-- รายงานข้อผิดพลาดเกี่ยวกับขีดจำกัดอักขระ
		return false, ("ตารางที่เข้ารหัสเกินขีดจำกัดอักขระ %d"):format(DATA_CHARACTER_LIMIT)
	end
end

local sampleData = {
	joinMessage = "สวัสดี!",
	urlCreationDate = os.time(),
	magicNumbers = {
		534,
		1337,
		746733573,
	},
}

local success, encodedData = encodeTableAsLaunchData(sampleData)

if success then
	print(encodedData)
else
	warn("ล้มเหลวในการเข้ารหัสข้อมูลการเริ่มต้น: " .. encodedData)
end

local HttpService = game:GetService("HttpService")
local Players = game:GetService("Players")

local function onPlayerAdded(player)
	local launchData = player:GetJoinData().LaunchData
	if launchData then
		-- พยายามถอดรหัสข้อมูล
		local success, result = pcall(HttpService.JSONDecode, HttpService, launchData)
		if success then
			print(player.Name, "เข้าร่วมด้วยข้อมูล:", result)
		else
			-- นี่อาจเกิดจากผู้ใช้ทำให้ URL เสียหาย
			warn("ไม่สามารถถอดรหัสข้อมูลการเปิดตัวได้:" .. result)
		end
	end
end

Players.PlayerAdded:Connect(onPlayerAdded)

local Players = game:GetService("Players")

local approvedPlaceIds = { 1 } -- ใส่ PlaceIds ที่ได้รับการอนุมัติที่นี่

local function isPlaceIdApproved(placeId)
	for _, id in pairs(approvedPlaceIds) do
		if id == placeId then
			return true
		end
	end
	return false
end

local function onPlayerAdded(player)
	local joinData = player:GetJoinData()

	-- ตรวจสอบว่าข้อมูลนี้ถูกส่งโดยสถานที่ที่ได้รับการอนุมัติ
	if isPlaceIdApproved(joinData.SourcePlaceId) then
		local teleportData = joinData.TeleportData
		if teleportData then
			local currentLevel = teleportData.currentLevel
			print(player.Name .. " อยู่ที่ระดับ " .. currentLevel)
		end
	end
end

Players.PlayerAdded:Connect(onPlayerAdded)

local Players = game:GetService("Players")

local function onPlayerAdded(player)
	local loaded = player:HasAppearanceLoaded()
	print(loaded)

	while not loaded do
		loaded = player:HasAppearanceLoaded()
		print(loaded)
		task.wait()
	end
end

Players.PlayerAdded:Connect(onPlayerAdded)

local Players = game:GetService("Players")

local function onPlayerAdded(player)
	print(player:IsVerified())
end

for _, player in pairs(Players:GetPlayers()) do
	onPlayerAdded(player)
end
Players.PlayerAdded:Connect(onPlayerAdded)

local Players = game:GetService("Players")

local RESPAWN_DELAY = 5

Players.CharacterAutoLoads = false

local function onPlayerAdded(player)
	local function onCharacterAdded(character)
		local humanoid = character:WaitForChild("Humanoid")

		local function onDied()
			task.wait(RESPAWN_DELAY)
			player:LoadCharacterAsync()
		end

		humanoid.Died:Connect(onDied)
	end

	player.CharacterAdded:Connect(onCharacterAdded)

	player:LoadCharacterAsync()
end

Players.PlayerAdded:Connect(onPlayerAdded)