ChangeHistoryService

local ChangeHistoryService = game:GetService("ChangeHistoryService")
local Selection = game:GetService("Selection")

local toolbar = plugin:CreateToolbar("Example Plugin")
local button = toolbar:CreateButton("Neon it up", "", "")

button.Click:Connect(function()
	local parts = {}
	for _, part in pairs(Selection:Get()) do
		if part:IsA("BasePart") then
			parts[#parts + 1] = part
		end
	end

	if #parts < 1 then
		-- Nothing to do.
		return
	end

	local recording = ChangeHistoryService:TryBeginRecording("Set selection to neon")
	if not recording then
		-- Handle error here. This indidcates that your plugin began a previous
		-- recording and never completed it. You may only have one recording
		-- per plugin active at a time.
		return
	end

	for _, part in pairs(parts) do
		part.Material = Enum.Material.Neon
	end

	ChangeHistoryService:FinishRecording(recording, Enum.FinishRecordingOperation.Commit)
end)

local ChangeHistoryService = game:GetService("ChangeHistoryService")
local Selection = game:GetService("Selection")

local toolbar = plugin:CreateToolbar("Example Plugin")
local button = toolbar:CreateButton("Neon it up", "", "")

button.Click:Connect(function()
	local parts = {}
	for _, part in pairs(Selection:Get()) do
		if part:IsA("BasePart") then
			parts[#parts + 1] = part
		end
	end

	if #parts > 0 then
		-- Wezwanie SetWaypoint przed pracą nie spowoduje żadnych problemów, jednak
		-- jest zbędny, potrzebny jest tylko połączenie po wykonaniu pracy.
		--ChangeHistoryService: SetWaypoint("Ustawienie wyboru na neon")

		for _, part in pairs(parts) do
			part.Material = Enum.Material.Neon
		end

		-- Wezwij SetWaypoint po zakończeniu pracy
		ChangeHistoryService:SetWaypoint("Set selection to neon")
	else
		-- Nie ma co robić. Nie musisz wzywać SetWaypoint w przypadku, gdy
		-- akcja nie skończyła się żadnymi zmianami w doświadczeniu.
	end
end)

local ChangeHistoryService = game:GetService("ChangeHistoryService")
local Selection = game:GetService("Selection")

local toolbar = plugin:CreateToolbar("Example Plugin")
local button = toolbar:CreateButton("Neon it up", "", "")

button.Click:Connect(function()
	local parts = {}
	for _, part in pairs(Selection:Get()) do
		if part:IsA("BasePart") then
			parts[#parts + 1] = part
		end
	end

	if #parts < 1 then
		-- Nothing to do.
		return
	end

	local recording = ChangeHistoryService:TryBeginRecording("Set selection to neon")
	if not recording then
		-- Handle error here. This indidcates that your plugin began a previous
		-- recording and never completed it. You may only have one recording
		-- per plugin active at a time.
		return
	end

	for _, part in pairs(parts) do
		part.Material = Enum.Material.Neon
	end

	ChangeHistoryService:FinishRecording(recording, Enum.FinishRecordingOperation.Commit)
end)