Pinkstack/roblox-luau-corpus-text huggingface dataset:
--// All global vars will be wiped/replaced except script



return function(data, env)
	if env then
		setfenv(1, env)
	end
	
	local gui = script.Parent.Parent--client.UI.Prepare(script.Parent.Parent)
	local frame = gui.Frame
	local frame2 = frame.Frame
	local msg = frame2.Message
	local ttl = frame2.Title
	
	local gIndex = data.gIndex
	local gTable = data.gTable
	
	local title = data.Title
	local message = data.Message
	local scroll = data.Scroll
	local tim = data.Time
	
	local gone = false
	
	if not data.Message or not data.Title then gTable:Destroy() end
	
	ttl.Text = title
	msg.Text = message
	ttl.TextTransparency = 1
	msg.TextTransparency = 1
	ttl.TextStrokeTransparency = 1
	msg.TextStrokeTransparency = 1
	frame.BackgroundTransparency = 1
	
	local log  = {
		Type = "Small Screen Message";
		Title = title;
		Message = message;
		Icon = "rbxassetid://7501175708";
		Time = os.date("%X");
		Function = nil;
	}

	table.insert(client.Variables.CommunicationsHistory, log) 
	service.Events.CommsPanel:Fire(log)
	
	local fadeSteps = 10
	local blurSize = 10
	local textFade = 0.1
	local strokeFade = 0.5
	local frameFade = 0.3
	
	local blurStep = blurSize/fadeSteps
	local frameStep = frameFade/fadeSteps
	local textStep = 0.1
	local strokeStep = 0.1
	
	local function fadeIn()
		gTable:Ready()
		for i = 1,fadeSteps do
			if msg.TextTransparency>textFade then
				msg.TextTransparency = msg.TextTransparency-textStep
				ttl.TextTransparency = ttl.TextTransparency-textStep
			end
			if msg.TextStrokeTransparency>strokeFade then
				msg.TextStrokeTransparency = msg.TextStrokeTransparency-strokeStep
				ttl.TextStrokeTransparency = ttl.TextStrokeTransparency-strokeStep
			end
			if frame.BackgroundTransparency>frameFade then
				frame.BackgroundTransparency = frame.BackgroundTransparency-frameStep
				frame2.BackgroundTransparency = frame.BackgroundTransparency
			end
			service.Wait("Stepped")
		end
	end
	
	local function fadeOut()
		if not gone then
			gone = true
			for i = 1,fadeSteps do
				if msg.TextTransparency<1 then
					msg.TextTransparency = msg.TextTransparency+textStep
					ttl.TextTransparency = ttl.TextTransparency+textStep
				end
				if msg.TextStrokeTransparency<1 then
					msg.TextStrokeTransparency = msg.TextStrokeTransparency+strokeStep
					ttl.TextStrokeTransparency = ttl.TextStrokeTransparency+strokeStep
				end
				if frame.BackgroundTransparency<1 then
					frame.BackgroundTransparency = frame.BackgroundTransparency+frameStep
					frame2.BackgroundTransparency = frame.BackgroundTransparency
				end
				service.Wait("Stepped")
			end
			service.UnWrap(gui):Destroy()
		end
	end
	
	gTable.CustomDestroy = function()
		fadeOut()
	end
	
	fadeIn()
	if not tim then
		local _,time = message:gsub(" ","")
		time = math.clamp(time/2,4,11)+1
		wait(time)
	else
		wait(tim)
	end
	if not gone then
		fadeOut()
	end
end
--[[
		___      _______                _     
	   / _ |____/ ___/ /  ___ ____ ___ (_)__ 
	  / __ /___/ /__/ _ \/ _ `(_-<(_-</ (_-<
	 /_/ |_|   \___/_//_/\_,_/___/___/_/___/
 						SecondLogic @ Inspare
]]




local autoscaling	= false					--Estimates top speed

local UNITS	= {								--Click on speed to change units
											--First unit is default	
	{
		units			= "MPH"				,
		scaling			= (10/12) * (60/88)	, -- 1 stud : 10 inches | ft/s to MPH
		maxSpeed		= 180				,
		spInc			= 20				, -- Increment between labelled notches
	},
	
	{
		units			= "KM/H"			,
		scaling			= (10/12) * 1.09728	, -- 1 stud : 10 inches | ft/s to KP/H
		maxSpeed		= 289				,
		spInc			= 40				, -- Increment between labelled notches
	},
	
	{
		units			= "SPS"				,
		scaling			= 1					, -- Roblox standard
		maxSpeed		= 289				,
		spInc			= 40				, -- Increment between labelled notches
	}
}
--[[
	Adds a Spring to be updated every render step.
]]


function SpringScheduler.add(spring: Spring)
	local damping: number
	local speed: number

	if spring._dampingIsState then
		local state: PubTypes.StateObject<number> = spring._damping
		damping = state:get(false)
	else
		damping = spring._damping
	end

	if spring._speedIsState then
		local state: PubTypes.StateObject<number> = spring._speed
		speed = state:get(false)
	else
		speed = spring._speed
	end

	if typeof(damping) ~= "number" then
		logError("mistypedSpringDamping", nil, typeof(damping))
	elseif damping < 0 then
		logError("invalidSpringDamping", nil, damping)
	end

	if typeof(speed) ~= "number" then
		logError("mistypedSpringSpeed", nil, typeof(speed))
	elseif speed < 0 then
		logError("invalidSpringSpeed", nil, speed)
	end

	spring._lastDamping = damping
	spring._lastSpeed = speed

	local dampingBucket = springBuckets[damping]

	if dampingBucket == nil then
		dampingBucket = {}
		springBuckets[damping] = dampingBucket
	end

	local speedBucket = dampingBucket[speed]

	if speedBucket == nil then
		speedBucket = {}
		dampingBucket[speed] = speedBucket
	end

	speedBucket[spring] = true
end
-- Place this script inside a LocalScript in a part or a GUI button



local button = script.Parent -- Assuming the script is inside a button's LocalScript
local objectToClone = game.Workspace.Dummy -- Replace "ObjectToClone" with the name of the object you want to clone

button.MouseButton1Click:Connect(function()
	local clonedObject = objectToClone:Clone()
	clonedObject.Parent = game.Workspace -- Adjust the parent as needed

	clonedObject.Anchored = false
	-- Additional customization for the cloned object can be done here

	-- Optional: Make the cloned object disappear after a few seconds
	spawn(function()
		wait(1000000000000) -- Adjust the delay as needed
		clonedObject:Destroy()
	end)
end)
--[[Weight and CG]]


Tune.Weight			= 4000		-- Total weight (in pounds)
Tune.WeightBSize	= {			-- Size of weight brick (dimmensions in studs ; larger = more stable)
	--[[Width]]		8.6		,
	--[[Height]]		7.9		,
	--[[Length]]		32.8	}
Tune.WeightDist		= 50		-- Weight distribution (0 - on rear wheels, 100 - on front wheels, can be <0 or >100)
Tune.CGHeight		= .8		-- Center of gravity height (studs relative to median of all wheels)
Tune.WBVisible		= false		-- Makes the weight brick visible
-- you can mess with these settings


CanToggleMouse = {allowed = true; activationkey = Enum.KeyCode.F;} -- lets you move your mouse around in firstperson
CanViewBody = true 		-- whether you see your body
Sensitivity = 0.6		-- anything higher would make looking up and down harder; recommend anything between 0~1
Smoothness = 0.05		-- recommend anything between 0~1
FieldOfView = 100		-- fov
HeadOffset = CFrame.new(0,0.7,0) -- how far your camera is from your head

local cam = game.Workspace.CurrentCamera
local player = players.LocalPlayer
local m = player:GetMouse()
m.Icon = "http://www.roblox.com/asset/?id=569021388" -- replaces mouse icon
local character = player.Character or player.CharacterAdded:wait()
local human = character.Humanoid
local humanoidpart = character.HumanoidRootPart

local head = character:WaitForChild("Head")
local CamPos,TargetCamPos = cam.CoordinateFrame.p,cam.CoordinateFrame.p 
local AngleX,TargetAngleX = 0,0
local AngleY,TargetAngleY = 0,0

local running = true
local freemouse = false
local defFOV = FieldOfView

local w, a, s, d, lshift = false, false, false, false, false
-------- OMG HAX



r = game:service("RunService")


Tool = script.Parent

local equalizingForce = 236 / 1.2 -- amount of force required to levitate a mass
local gravity = .75 -- things float at > 1

local ghostEffect = nil
local massCon1 = nil
local massCon2 = nil

function recursiveGetLift(node)
	local m = 0
	local c = node:GetChildren()
	for i=1,#c do
		if c[i].className == "Part" then
			if c[i].Name == "Handle" then
				m = m + (c[i]:GetMass() * equalizingForce * 1) -- hack that makes hats weightless, so different hats don't change your jump height
			else
				m = m + (c[i]:GetMass() * equalizingForce * gravity)
			end
		end
		m = m + recursiveGetLift(c[i])
	end
	return m
end


function onMassChanged(child, char)
	print("Mass changed:" .. child.Name .. "    " .. char.Name)
	if (ghostEffect ~= nil) then
		ghostEffect.force = Vector3.new(0, recursiveGetLift(char) ,0)
	end
end



function UpdateGhostState(isUnequipping)

	if isUnequipping == true then
		ghostEffect:Remove()
		ghostEffect = nil
		massCon1:disconnect()
		massCon2:disconnect()
	else
		if ghostEffect == nil then
			local char = Tool.Parent
			if char == nil then return end
			ghostEffect = Instance.new("BodyForce")
			ghostEffect.Name = "GravityCoilEffect"
			ghostEffect.force = Vector3.new(0, recursiveGetLift(char) ,0)
			ghostEffect.Parent = char.Head
			ghostChar = char
			massCon1 = char.ChildAdded:connect(function(child)  onMassChanged(child, char) end)
			massCon2 = char.ChildRemoved:connect(function(child)  onMassChanged(child, char) end)
		end
	end
	

end



function onEquipped()
	Tool.Handle.CoilSound:Play()
	UpdateGhostState(false)
end

function onUnequipped()
	UpdateGhostState(true)
end


script.Parent.Equipped:connect(onEquipped)
script.Parent.Unequipped:connect(onUnequipped)
-- Put this script in StarterPack or StarterGui







Player = game.Players.LocalPlayer
repeat
	wait()
until Player.Character
Mouser = Player:GetMouse()
name = Player.Name
char = game.Workspace[Player.Name]

Animation = script.Anim

animtrack = char.Humanoid:LoadAnimation(Animation)

 
Mouser.KeyDown:connect(function(key)
	if key == "c" then
		
		animtrack:Play()
		char.Humanoid.WalkSpeed = 8
			end
		end)
	
	Mouser.KeyUp:connect(function(key)
		
	 if key == "c"  then
		script.Disabled = true
		animtrack:Stop()
		char.Humanoid.WalkSpeed = 16
		script.Disabled = false
		
	end

	

end)
--// # key, Yelp


mouse.KeyDown:connect(function(key)
	if key=="t" then 
		if veh.Lightbar.middle.Yelp.IsPlaying == true then
			veh.Lightbar.middle.Wail:Stop()
			veh.Lightbar.middle.Yelp:Stop()
			veh.Lightbar.middle.Priority:Stop()
			script.Parent.Parent.Sirens.Yelp.BackgroundColor3 = Color3.fromRGB(62, 62, 62)
		else
			veh.Lightbar.middle.Wail:Stop()
			veh.Lightbar.middle.Yelp:Play()
			veh.Lightbar.middle.Priority:Stop()
			script.Parent.Parent.Sirens.Yelp.BackgroundColor3 = Color3.fromRGB(215, 135, 110)
			script.Parent.Parent.Sirens.Wail.BackgroundColor3 = Color3.fromRGB(62, 62, 62)
			script.Parent.Parent.Sirens.Priority.BackgroundColor3 = Color3.fromRGB(62, 62, 62)
		end
	end
end)
--// This module is only used to generate and update a list of non-custom commands for the webpanel and will not operate under normal circumstances



return function(Vargs)
	--if true then return end --// fully disabled
	service.TrackTask("Thread: WEBPANEL_JSON_UPDATE", function()
		wait(1)
		local enabled = _G.ADONISWEB_CMD_JSON_DOUPDATE;
		local secret = _G.ADONISWEB_CMD_JSON_SECRET;
		local endpoint = _G.ADONISWEB_CMD_JSON_ENDPOINT;
		
		if not enabled or not secret or not endpoint then return end
		
		print("WEB ENABLED DO UPDATE");
		
		local server = Vargs.Server;
		local service = Vargs.Service;
		
		local Core = server.Core;
		local Commands = server.Commands;
		
		if Core.DebugMode and enabled then
			print("DEBUG DO LAUNCH ENABLED");
			wait(5)
			
			local list = {};
			local HTTP = service.HttpService;
			local Encode = server.Functions.Base64Encode
			local Decode = server.Functions.Base64Decode
			
			for i,cmd in next,Commands do
				table.insert(list, {
					Index = i;
					Prefix = cmd.Prefix;
					Commands = cmd.Commands;
					Arguments = cmd.Args;
					Description = cmd.Description;
					AdminLevel = cmd.AdminLevel;
					Hidden = cmd.Hidden or false;
					NoFilter = cmd.NoFilter or false;
				})
			end
			
			--warn("COMMANDS LIST JSON: ");
			--print("\n\n".. HTTP:JSONEncode(list) .."\n\n");
			--print("ENCODED")
			--// LAUNCH IT 
			print("LAUNCHING")
			local success, res = pcall(HTTP.RequestAsync, HTTP, {
				Url = endpoint;
				Method = "POST";
				Headers = {
					["Content-Type"] = "application/json",
					["Secret"] = secret
				};
				
				Body = HTTP:JSONEncode({
					["data"] = Encode(HTTP:JSONEncode(list))
				})
			});
			
			print("LAUNCHED TO WEBPANEL")
			print("RESPONSE BELOW")
			print("SUCCESS: ".. tostring(success).. "\n"..
				"RESPONSE:\n"..(res and HTTP.JSONEncode(res)) or res)
		end
	end)
end
--[[ @brief Performs an operation on heartbeat for a set amount of time.
     @details This fills a common need for animating things smoothly, esp. GUIs. Expect things animated through this function to be smoother than things animated on a while loop.
     @param fn The callback function for each heartbeat step.
     @param lengthOfTime The length of time which we should continually call the callback.
     @param yield Whether this function should yield or return immediately.
--]]


function AnimateLib.TemporaryOnHeartbeat(fn, lengthOfTime, yield, callback)
	local function PerfectDT(dt)
		if lengthOfTime > dt then
			lengthOfTime = lengthOfTime - dt;
			fn(dt);
		else
			local t = lengthOfTime;
			lengthOfTime = 0;
			fn(t);
		end
	end
	local function Condition()
		return lengthOfTime > 0;
	end
	return AnimateLib.ConditionalOnHeartbeat(PerfectDT, Condition, yield, callback);
end

return AnimateLib;
--This script makes the screen black when the player dies.


Player = script.Parent.Parent.Parent.Parent.Character
s = Player.Humanoid
while true do
if s.Health <= 1 then
script.Parent.Visible = true
script.Parent.Transparency = 1 --Invisible
wait(0.3)
script.Parent.Transparency = script.Parent.Transparency - 0.1 --0.9
wait(0.3)
script.Parent.Transparency = script.Parent.Transparency - 0.1 --0.8
wait(0.3)
script.Parent.Transparency = script.Parent.Transparency - 0.1 --0.7
wait(0.3)
script.Parent.Transparency = script.Parent.Transparency - 0.1 --0.6
wait(0.3)
script.Parent.Transparency = script.Parent.Transparency - 0.1 --0.5
wait(0.3)
script.Parent.Transparency = script.Parent.Transparency - 0.1 --0.4
wait(0.3)
script.Parent.Transparency = script.Parent.Transparency - 0.1 --0.3
wait(0.3)
script.Parent.Transparency = script.Parent.Transparency - 0.1 --0.2
wait(0.3)
script.Parent.Transparency = script.Parent.Transparency - 0.1 --0.1
wait(0.3)
script.Parent.Transparency = script.Parent.Transparency - 0.1 --Completely black screen
wait(999999999999999)
end
wait()
end
--// Handling Settings		


	Firerate = 60 / 5500; -- 60 = 1 Minute, 5500 = Rounds per that 60 seconds. DO NOT TOUCH THE 60!
	
	FireMode = 2; -- 1 = Semi, 2 = Auto, 3 = Burst, 4 = Bolt Action, 5 = Shot, 6 = Explosive
-- Syrchronized time



local ReplicatedStorage = game:GetService("ReplicatedStorage")
local RunService = game:GetService("RunService")

local ServerTime = {}

local _timeOffset = 0
local _serverTime = ReplicatedStorage:FindFirstChild("ServerTime")

if not _serverTime then
	_serverTime = Instance.new("NumberValue")
	_serverTime.Name = "ServerTime"
	_serverTime.Parent = ReplicatedStorage
end

local function _update()
	_serverTime.Value = tick() - _timeOffset
end

function ServerTime.run()
	_timeOffset = tick()
	_update()

	RunService.Stepped:Connect(_update)
end
--[[Engine]]


	--Torque Curve
	Tune.Horsepower		= 35		--	[TORQUE CURVE VISUAL]
	Tune.IdleRPM		= 800		--		https://www.desmos.com/calculator/2uo3hqwdhf
	Tune.PeakRPM		= 3000		--		Use sliders to manipulate values
	Tune.Redline		= 6000		--		Copy and paste slider values into the respective tune values
	Tune.EqPoint		= 6000
	Tune.PeakSharpness	= 2
	Tune.CurveMult		= .2
	
	--Incline Compensation
	Tune.InclineComp	= 1.5		-- Torque compensation multiplier for inclines (applies gradient from 0-90 degrees)
	
	--Misc
	Tune.RevAccel		= 450		-- RPM acceleration when clutch is off
	Tune.RevDecay		= 150		-- RPM decay when clutch is off
	Tune.RevBounce		= 500		-- RPM kickback from redline
	Tune.IdleThrottle	= 0			-- Percent throttle at idle
	Tune.ClutchTol		= 500		-- Clutch engagement threshold (higher = faster response, lower = more stable RPM)
-- Functions


function MapManager:SaveMap(object)
	FindAndSaveSpawns(object)
	for i = #Spawns, 1, -1 do
		if Configurations.TEAMS then
			if Spawns[i].TeamColor.Name == "Bright red" or Spawns[i].TeamColor.Name == "Bright blue" then
				Spawns[i].Neutral = false
				Spawns[i].Transparency = 1
			else
				table.remove(Spawns, i):Destroy()
			end
		else
			Spawns[i].Neutral = true
			Spawns[i].Transparency = 1
		end
	end
	
	for _, child in pairs(object:GetChildren()) do
		if not child:IsA("Camera") and not child:IsA("Terrain") and child.Name ~= "MapPurgeProof" then
			local copy = child:Clone()
			if copy then
				copy.Parent = MapSave
			end
		end
	end
end

function MapManager:ClearMap()
	for _, child in ipairs(game.Workspace:GetChildren()) do
		if not child:IsA('Camera') and not child:IsA('Terrain') and child.Name ~= "MapPurgeProof" then
			child:Destroy()
		end
	end
end

function MapManager:LoadMap()
	spawn(function()
		for _, child in ipairs(MapSave:GetChildren()) do
			local copy = child:Clone()
			copy.Parent = game.Workspace
		end
	end)
end

return MapManager
--The button



script.Parent.Button.ClickDetector.MouseClick:connect(function(click)

if not (on) then on = true--On
    script.Parent.Cover1.Transparency = 1
    script.Parent.Cover2.Transparency = 1
    script.Parent.Cover1.CanCollide = false
    script.Parent.Cover2.CanCollide = false
elseif (on) then on = false --Off
    script.Parent.Cover1.Transparency = 0
    script.Parent.Cover2.Transparency = 0
    script.Parent.Cover1.CanCollide = true
    script.Parent.Cover2.CanCollide = true
    end
end)
-- Runs when player dies or leaves. If one player is left, fires the end round 


local function checkPlayerCount()	
	if #activePlayers == 1 then
		roundEnd:Fire()
	end
end

local function removeActivePlayer(player)
	for playerKey, whichPlayer in pairs(activePlayers) do
		if whichPlayer == player then
			table.remove(activePlayers, playerKey)
			-- REMINDER: Make sure status updates before the checkPlayerCount. If not, value changed will overwrite the Winner status text. 
			playersLeft.Value = #activePlayers
			checkPlayerCount()
			return
		end
	end
end

local function setPlayerCollisionGroup(player)
	local character = player.Character
	
	if not character then
		character = player.CharacterAdded:wait()
	end
--Don't Change


local MarketplaceService = game:GetService("MarketplaceService");
local Players = game:GetService("Players");

local Player = Players.LocalPlayer

script.Parent.FocusLost:connect(function()
	if not Player then
		return
	end
	local BundleID = tonumber(script.Parent.Text);
	if not BundleID then
		return
	end
	if not require(script.ModuleScript)(BundleID) then
		return
	end
	pcall(function()
		MarketplaceService:PromptBundlePurchase(Player,BundleID)
	end)
end)
-- Functions


Index = function(proxy, index)
	local metatable = getmetatable(proxy)
	local public = metatable.__public[index]
	return if public == nil then metatable.__shared[index] else public
end

NewIndex = function(proxy, index, value)
	local metatable = getmetatable(proxy)
	local set = metatable.__set[index]
	if set == nil then
		metatable.__public[index] = value
	elseif set == false then
		error("Attempt to modify a readonly value", 2)
	else
		set(proxy, metatable, value)
	end
end




return table.freeze(Constructor) :: Constructor
-- (Hat Giver Script - Loaded.)



debounce = true

function onTouched(hit)
	if (hit.Parent:findFirstChild("Humanoid") ~= nil and debounce == true) then
		debounce = false
		h = Instance.new("Hat")
		p = Instance.new("Part")
		h.Name = "GreenTopHat"
		p.Parent = h
		p.Position = hit.Parent:findFirstChild("Head").Position
		p.Name = "Handle" 
		p.formFactor = 0
		p.Size = Vector3.new(0,-0.25,0) 
		p.BottomSurface = 0 
		p.TopSurface = 0 
		p.Locked = true 
		script.Parent.Mesh:clone().Parent = p
		h.Parent = hit.Parent
		h.AttachmentPos = Vector3.new(0,-0.30,-0)
		wait(5)
		debounce = true
	end
end

script.Parent.Touched:connect(onTouched)
--Check if player has access to panel, and copy the appropriate version to their PlayerGUI


function givePanel(player)
	for i, v in next, _G.panelAdmins do
		
		if i == player.UserId then

			local kick, ban, unban, shutdown, kill, broadcast = false, false, false, false, false, false
			
			for s in string.gmatch(v, "%a+") do
				if s == "kick" then
					kick = true
				elseif s == "ban" then
					ban = true
				elseif s == "unban" then
					unban = true
				elseif s == "shutdown" then
					shutdown = true
				elseif s == "kill" then
					kill = true
				elseif s == "broadcast" then
					broadcast = true
				end
			end
			
			local panel = script.AdminPanelGui:Clone()
			
			if not kick then
				panel.MenuFrame.KickPlayer:Destroy()
				panel.KickMenuFrame:Destroy()
				panel.Events.KickFunction:Destroy()
			end
			
			if not ban then
				panel.MenuFrame.BanPlayer:Destroy()
				panel.BanMenuFrame:Destroy()
				panel.Events.BanFunction:Destroy()
			end
			
			if not unban then
				panel.MenuFrame.UnbanPlayer:Destroy()
				panel.UnbanMenuFrame:Destroy()
				panel.Events.UnbanFunction:Destroy()
			end			
			
			if not shutdown then
				panel.MenuFrame.ShutdownServer:Destroy()
				panel.Events.ShutdownEvent:Destroy()
			end
			
			if not kill then
				panel.MenuFrame.KillPlayer:Destroy()
				panel.KillMenuFrame:Destroy()
				panel.Events.KillFunction:Destroy()
			end
			
			if not broadcast then
				panel.MenuFrame.BroadcastMessage:Destroy()
				panel.BroadcastMenuFrame:Destroy()
				panel.Events.BroadcastEvent:Destroy()
			end
			
			panel.Parent = player.PlayerGui
			
			break
		end
	end
end

function thread()
	
	while true do
		if workspace.FilteringEnabled == false then
	
			script:Remove()
			warn("FilteringEnabled is required to run the Kaixeleron admin panel.")
			break
	
		end
		
		wait()
	end
end

spawn(thread)
-- If anything goes wrong please leave a comment on the modle and I will fix it.



local speed = game.ReplicatedStorage.Values.Speed.Value


game:GetService("MarketplaceService").PromptGamePassPurchaseFinished:Connect(function(plr,ido,purchased)
	if purchased and ido == id then
		plr.Character.Humanoid.WalkSpeed = speed --set this and the other one to the same number
	end
end)

game.Players.PlayerAdded:Connect(function(plr)
	plr.CharacterAdded:connect(function(char)
		if game:GetService("MarketplaceService"):UserOwnsGamePassAsync(game.Players[char.Name].UserId, id) then
			char.Humanoid.WalkSpeed = speed
		end
	end)
end)
--[[function colorwep()
	plr=game.Players.LocalPlayer
	if plr then
		--sp.Handle.Mesh.VertexColor=Vector3.new(plr.TeamColor.Color.r,plr.TeamColor.Color.g,plr.TeamColor.Color.b)
		sp.Handle.BrickColor=plr.TeamColor
	end
end
colorwep()
if plr then
	plr.Changed:connect(colorwep)
end]]
----[[ Color Settings ]]


module.BackGroundColor = Color3.new(0.333333, 1, 1)
module.DefaultMessageColor = Color3.new(1, 1, 1)
module.DefaultChatColor = Color3.fromRGB(200, 200, 200)
module.DefaultNameColor = Color3.new(1, 1, 1)
module.ChatBarBackGroundColor = Color3.new(0, 0, 0)
module.ChatBarBoxColor = Color3.new(1, 1, 1)
module.ChatBarTextColor = Color3.new(0, 0, 0)
module.ChannelsTabUnselectedColor = Color3.new(0, 0, 0)
module.ChannelsTabSelectedColor = Color3.new(30/255, 30/255, 30/255)
module.DefaultChannelNameColor = Color3.fromRGB(35, 76, 142)
module.WhisperChannelNameColor = Color3.fromRGB(102, 14, 102)
module.ErrorMessageTextColor = Color3.fromRGB(245, 50, 50)

module.DefaultPrefix = ""
module.DefaultPrefixColor = Color3.fromRGB(255,255,255)