Roblox/luau_corpus huggingface dataset:
--[[Weight and CG]]
	Tune.Weight			= 2400		-- Total weight (in pounds)
	Tune.WeightBSize	= {			-- Size of weight brick (dimmensions in studs ; larger = more stable)
	 --[[Width]]		6		,
	 --[[Height]]		3.5		,
	 --[[Length]]		14		}
	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
	
	--Unsprung Weight
	Tune.FWheelDensity	= .1		-- Front Wheel Density
	Tune.RWheelDensity	= .1		-- Rear Wheel Density
	Tune.FWLgcyDensity	= 1			-- Front Wheel Density [PGS OFF]
	Tune.RWLgcyDensity	= 1			-- Rear Wheel Density [PGS OFF]
	
	Tune.AxleSize		= 1			-- Size of structural members (larger = more stable/carry more weight)
	Tune.AxleDensity	= .1		-- Density of structural members
--Makes the cat randomly meow every 5 seconds--

while true do
	wait(5)
	Meow = math.random(0, 1)

	if Meow == 1 then
		script.Parent.HumanoidRootPart.Meow:Play()
	end
end
-- Decompiled with the Synapse X Luau decompiler.

return function(p1, p2, p3)
	local v1 = "WeldConstraint";
	if p3 then
		v1 = "ManualWeld";
	end;
	local v2 = Instance.new(v1);
	v2.Part0 = p1;
	v2.Part1 = p2;
	if p3 then
		v2.C0 = p1.CFrame:Inverse() * p2.CFrame;
	end;
	v2.Parent = p1;
	return v2;
end;
--[[
	An internal method used by the reconciler to construct a new component
	instance and attach it to the given virtualNode.
]]
function Component:__mount(reconciler, virtualNode)
	if config.internalTypeChecks then
		internalAssert(Type.of(self) == Type.StatefulComponentClass, "Invalid use of `__mount`")
		internalAssert(Type.of(virtualNode) == Type.VirtualNode, "Expected arg #2 to be of type VirtualNode")
	end

	local currentElement = virtualNode.currentElement
	local hostParent = virtualNode.hostParent

	-- Contains all the information that we want to keep from consumers of
	-- Roact, or even other parts of the codebase like the reconciler.
	local internalData = {
		reconciler = reconciler,
		virtualNode = virtualNode,
		componentClass = self,
		lifecyclePhase = ComponentLifecyclePhase.Init,
	}

	local instance = {
		[Type] = Type.StatefulComponentInstance,
		[InternalData] = internalData,
	}

	setmetatable(instance, self)

	virtualNode.instance = instance

	local props = currentElement.props

	if self.defaultProps ~= nil then
		props = assign({}, self.defaultProps, props)
	end

	instance:__validateProps(props)

	instance.props = props

	local newContext = assign({}, virtualNode.context)
	instance._context = newContext

	instance.state = assign({}, instance:__getDerivedState(instance.props, {}))

	if instance.init ~= nil then
		instance:init(instance.props)
	end

	-- It's possible for init() to redefine _context!
	virtualNode.context = instance._context

	internalData.lifecyclePhase = ComponentLifecyclePhase.Render
	local renderResult = instance:render()

	internalData.lifecyclePhase = ComponentLifecyclePhase.ReconcileChildren
	reconciler.updateVirtualNodeWithRenderResult(virtualNode, hostParent, renderResult)

	if instance.didMount ~= nil then
		internalData.lifecyclePhase = ComponentLifecyclePhase.DidMount
		instance:didMount()
	end

	if internalData.pendingState ~= nil then
		-- __update will handle pendingState, so we don't pass any new element or state
		instance:__update(nil, nil)
	end

	internalData.lifecyclePhase = ComponentLifecyclePhase.Idle
end
--[[Workspace Variables]]--
local Tool = script.Parent
local Handle = WaitForChild(Tool,'Handle')
--------------------
--Config
local stamina = 250
local walk = speeds.Walk
local run = speeds.Run
local exhaust = speeds.Exhaust
-----------------------------------------------| Save Stats |------------------------------------------------------------


local DataStoreService = game:GetService("DataStoreService")
local myDataStore = DataStoreService:GetDataStore("myDataStore")


game.Players.PlayerAdded:Connect(function(player)
	local leaderstats = Instance.new("Folder")
	leaderstats.Name = "leaderstats"
	leaderstats.Parent = player

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

	local playerUserId = "Player"..player.UserId

	local data 

	local success, errormessage = pcall(function()
		data = myDataStore:GetAsync(playerUserId) 
	end)


	if success then
		Time.Value = data  
	end

	while wait(1) do
		player.leaderstats.Time.Value = player.leaderstats.Time.Value + 0 --Don't change it or it will make it go up twice
	end
end)

game.Players.PlayerRemoving:Connect(function(player)
	local playerUserId = "Player"..player.UserId

	local data = player.leaderstats.Time.Value

	myDataStore:SetAsync(playerUserId, data)   

end)
-- functions

local function Lerp(a, b, d) return a + (b - a) * d end

local function UpdateReticle()
	for _, reticle in pairs(MOUSE_GUI:GetChildren()) do
		reticle.Visible	= reticle.Name == MOUSE.Reticle
	end
end

local function UpdateScope()
	SCOPE_GUI.Visible	= scope and aiming
	MOUSE_GUI.Visible	= not SCOPE_GUI.Visible
end

local function Hitmarker(position, damage, armor, headshot)
	local position	= CAMERA:WorldToViewportPoint(position)
	
	local hitmarker	= script.Hitmarker:Clone()
		hitmarker.Position	= UDim2.new(0, position.X, 0, position.Y)
		hitmarker.Size		= UDim2.new(0.05, 0, 0.05, 0)
		hitmarker.Parent	= GUI
		
	if headshot then
		for _, frame in pairs(hitmarker:GetChildren()) do
			if frame.Name ~= "Shadow" then
				frame.BackgroundColor3	= Color3.new(1, 0.2, 0.2)
			end
		end
	end
		
	local infoB		= TweenInfo.new(0.05, Enum.EasingStyle.Linear, Enum.EasingDirection.Out)
	local tweenB	= TweenService:Create(hitmarker, infoB, {Size = UDim2.new(0.015, 0, 0.015, 0)})
	
	tweenB:Play()
	Debris:AddItem(hitmarker, 0.1)
	
	local damageLabel	= script.DamageLabel:Clone()
		damageLabel.Position	= UDim2.new(0, position.X, 0, position.Y)
		damageLabel.Size		= UDim2.new(0, 1, 0, 1)
		damageLabel.Text		= tostring(damage)
		damageLabel.TextColor3	= armor and Color3.fromRGB(248, 130, 33) or Color3.fromRGB(230, 230, 230)
		damageLabel.Parent		= GUI
		
	local offset	= math.random(-36, 36)
		
	local infoC		= TweenInfo.new(0.2, Enum.EasingStyle.Elastic, Enum.EasingDirection.Out)
	local tweenC	= TweenService:Create(damageLabel, infoC, {Size = UDim2.new(0, 36, 0, 36); Rotation = offset / 3; Position = UDim2.new(0, position.X + offset, 0, position.Y - 48)})
	local infoD		= TweenInfo.new(1, Enum.EasingStyle.Linear, Enum.EasingDirection.Out)
	local tweenD	= TweenService:Create(damageLabel, infoD, {TextTransparency = 1; TextStrokeTransparency = 1})
	
	tweenC:Play()
	tweenD:Play()
	Debris:AddItem(damageLabel, 1)
	
	script.HitmarkerSound:Play()
	
	if armor then
		script.ArmorSound:Play()
	end
	if headshot then
		script.HeadshotSound:Play()
	end
end
-- Put in StarterPlayer>StarterCharacterScripts
-- Edit only if you know what are you doing


local mouse = game.Players.LocalPlayer:GetMouse()

function Light()
   local player = game.Players.LocalPlayer
   local playerChar = player.Character
   local playerLight = playerChar.Head:FindFirstChild("Light")

    if playerLight then
        playerLight:Destroy()
    else
      local  light = Instance.new("SurfaceLight",playerChar:FindFirstChild("Head"))
        light.Name = "Light" -- Edit your light
        light.Range = 30
		light.Angle = 50
		light.Shadows = true
		light.Brightness = 1
    end
end

mouse.KeyDown:connect(function(key)
	
key = key:lower()
if key == "e" then -- Change with your key
	script.Sound:Play()
    Light()

end
end)
-- Touched
StealthLava.Touched:connect(function(Part)
	if (Hold == true) then return end
	Hold = true

	-- Check For Player
	Avatar = Part.Parent
	if (game.Players:FindFirstChild(Avatar.Name) == nil) then Default() return end
	if (game.Players:FindFirstChild(Avatar.Name).Character ~= Avatar) then Default() return end

	MorphPlayer(Avatar)

	Default()
end)
--[[
	Re-written by Phoenix
	(Actually works and doesn't lag the server to death K)
	Thanks
]]

local PartWeld = function(From, To)
	local WeldIns = Instance.new("WeldConstraint")
	WeldIns.Part0 = From
	WeldIns.Part1 = To
	WeldIns.Parent = From
	WeldIns.Name = "Weld"
	From.Anchored = false
end

local Weld = function(WeldTree, OverrideCenter)
	local Center = nil
	
	if OverrideCenter == nil then
		if WeldTree:FindFirstChildOfClass("MeshPart") then
			Center = WeldTree:FindFirstChildOfClass("MeshPart")
		elseif WeldTree:FindFirstChildOfClass("Part") then
			Center = WeldTree:FindFirstChildOfClass("Part")
		elseif WeldTree:FindFirstChildOfClass("UnionOperation") then
			Center = WeldTree:FindFirstChildOfClass("UnionOperation")
		end
	else
		Center = OverrideCenter
	end

	if Center ~= nil then
		for Index, ToWeld in pairs(WeldTree:GetDescendants()) do
			if ToWeld:IsA("BasePart") then
				PartWeld(ToWeld, Center)
			end
		end

		if WeldTree:IsA("BasePart") then
			PartWeld(WeldTree, Center)
		end
	end
end

local TweenService = game:GetService("TweenService")

local Tool = script.Parent
local Handle = Tool:WaitForChild("Handle")
local Died, Character = nil

local ToolEquipped = false
local Heal = 3
local Sounds = {
	CoilSound = Handle:WaitForChild("CoilSound"),
}

local Loop = function()
	while true do
		wait(1)
		
		if ToolEquipped == true then
			Character.Humanoid.Health = Character.Humanoid.Health + Heal
		end
	end	
end

local Equipped = function()
	ToolEquipped = true
	Character = Tool.Parent
	
	if Character == nil then
		return
	elseif Character.Humanoid == nil then
		return
	end
	
	Sounds.CoilSound:Play()
end

local Unequipped = function()
	ToolEquipped = false
end

Weld(Tool.Model, Tool.Handle)

Tool.Equipped:Connect(Equipped)
Tool.Unequipped:Connect(Unequipped)

Loop()
--Edited by Stickmasterluke

Tool=script.Parent

enabled = true
function onButton1Down(mouse)
	if not enabled then
		return
	end

	enabled = false
	mouse.Icon = "rbxasset://textures\\GunWaitCursor.png"

	wait(.5)
	mouse.Icon = "rbxasset://textures\\GunCursor.png"
	enabled = true

end

function onEquippedLocal(mouse)
	if mouse == nil then
		print("Mouse not found")
		return 
	end
	
	mouse.Icon = "rbxasset://textures\\GunCursor.png"
	mouse.Button1Down:connect(function() onButton1Down(mouse) end)
end


Tool.Equipped:connect(onEquippedLocal)
--Made by Luckymaxer

Model = script.Parent
Humanoid = Model:FindFirstChild("Humanoid")

Players = game:GetService("Players")
Debris = game:GetService("Debris")

Creator = Model:FindFirstChild("Creator")
Tool = Model:FindFirstChild("Tool")

function DestroyModel()
	Debris:AddItem(Model, 2)
end

if not Creator or not Creator.Value or not Creator.Value:IsA("Player") or not Creator.Value.Parent or not Tool or not Tool.Value or not Tool.Value.Parent then
	DestroyModel()
	return
end

Creator = Creator.Value
Tool = Tool.Value

Character = Creator.Character
if not Character then
	DestroyModel()
	return
end

Creator.Changed:connect(function(Property)
	if Property == "Parent" and not Creator.Parent then
		DestroyModel()
	end
end)

Character.Changed:connect(function(Property)
	if Property == "Parent" and not Character.Parent then
		DestroyModel()
	end
end)

Tool.Changed:connect(function(Property)
	if Property == "Parent" then
		local Player = ((Tool.Parent and ((Tool.Parent:IsA("Backpack") and Tool.Parent.Parent) or Players:GetPlayerFromCharacter(Tool.Parent))) or nil)
		if (not Player or (Player and Player ~= Creator)) then
			DestroyModel()
		end
	end
end)

if Humanoid then
	Humanoid.Died:connect(function()
		DestroyModel()
	end)
end
-- if the player steps in a vehicle
camera:GetPropertyChangedSignal("CameraSubject"):Connect(function()
    if camera.CameraSubject:IsA("VehicleSeat") then
        camera.CameraSubject = humanoid
    end
end)
-- Driver Input Loop --
coroutine.wrap(function()
	while script.Parent ~= nil do
		--Update throttle, steer, handbrake
		local seatedHumanoid = DriverSeat.Occupant
		if seatedHumanoid and not Util.isPlayerBot(Players:GetPlayerFromCharacter(seatedHumanoid.Parent)) then
			getInputValues()
		
			local currentVel = Chassis.GetAverageVelocity()
		
			local steer = script.Steering.Value
			Chassis.UpdateSteering(steer, currentVel)
		
			-- Taking care of throttling
			local throttle = script.Throttle.Value
			script.AngularMotorVelocity.Value = currentVel
			script.ForwardVelocity.Value = DriverSeat.CFrame.LookVector:Dot(DriverSeat.Velocity)
			Chassis.UpdateThrottle(currentVel, throttle)
		
			-- Taking care of handbrake
			if script.HandBrake.Value > 0 then
				Chassis.EnableHandbrake()
			end
		end
		wait()
	end
end)()
-- Trim empty datastores and scopes from an entire datastore type:
local function prepareDataStoresForExport(origin)
	local dataPrepared = {}

	for name, scopes in pairs(origin) do
		local exportScopes = {}
		for scope, data in pairs(scopes) do
			local exportData = {}
			for key, value in pairs(data) do
				exportData[key] = value
			end
			if next(exportData) ~= nil then -- Only export datastore when non-empty
				exportScopes[scope] = exportData
			end
		end
		if next(exportScopes) ~= nil then -- Only export scope list when non-empty
			dataPrepared[name] = exportScopes
		end
	end

	if next(dataPrepared) ~= nil then -- Only return datastore type when non-empty
		return dataPrepared
	end
end

local function preprocessKey(key)
	if type(key) == "number" then
		if key ~= key then
			return "NAN"
		elseif key >= math.huge then
			return "INF"
		elseif key <= -math.huge then
			return "-INF"
		end
		return tostring(key)
	end
	return key
end

local function simulateYield()
	if Constants.YIELD_TIME_MAX > 0 then
		task.wait(rand:NextNumber(Constants.YIELD_TIME_MIN, Constants.YIELD_TIME_MAX))
	end
end

local function simulateErrorCheck(method)
	if Constants.SIMULATE_ERROR_RATE > 0 and rand:NextNumber() <= Constants.SIMULATE_ERROR_RATE then
		simulateYield()
		error(method .. " rejected with error (simulated error)", 3)
	end
end
----- MAGIC NUMBERS ABOUT THE TOOL -----
-- How much damage a bullet does
local Damage = 70
-- you do not need to touch this script, it is only a loader to load Commander
require(script.MainModule)(script.Settings, script.Packages, script.Stylesheets)
--end)

while true do

	if Dead then
		break
	end

	AI()

	wait()
end
-- Returns the ancestor that contains a Humanoid, if it exists
local function FindCharacterAncestor(subject)
	if subject and subject ~= Workspace then
		local humanoid = subject:FindFirstChild('Humanoid')
		if humanoid then
			return subject, humanoid
		else
			return FindCharacterAncestor(subject.Parent)
		end
	end
	return nil
end
--F.updateSound = function(Sound, Pitch, Volume)
--	if Sound then
--		if Pitch then
--			Sound.Pitch = Pitch
--		end
--		if Volume then
--			Sound.Volume = Volume
--		end
--	end
--end

F.lock = function(x)
	if x then
		for i,v in pairs(script.Parent.Parent.Misc:GetDescendants()) do
			if v:IsA("Motor") then
				if v.Parent.Parent.Name == "Mirror" then
				else v.DesiredAngle = 0
				end
			end
		end
		carSeat.Lock:Play()
	else
		carSeat.Unlock:Play()
		wait(.5)
		carSeat.Unlock:Play()
	end
	for i,v in pairs(script.Parent.Parent.Misc:GetDescendants()) do
		if v:IsA("ClickDetector") then
			v.MaxActivationDistance = x and 0 or 12
		end
	end
end

local on = 0

F.rs = function(y)
	local tune = require(carSeat.Parent:FindFirstChild("A-Chassis Tune"))
	carSeat.IsOn.Value = y
	if y then
		carSeat.Startup:Play()
		if not car.DriveSeat.IsOn.Value then on=math.max(on-.015,0) else on=1 end
		car.DriveSeat.Rev.Pitch = (car.DriveSeat.Rev.SetPitch.Value + car.DriveSeat.Rev.SetRev.Value*tune.IdleRPM/tune.Redline)*on^2
	else car.DriveSeat.Rev.Pitch = 0
		carSeat.Startup:Stop()
	end
end

F.user = function()
	carSeat.Parent:Destroy()
end

F.tk = function(b)
	carSeat.Parent.Misc.TK.SS.Motor.DesiredAngle = b and 1.5 or 0
end

script.Parent.OnServerEvent:connect(function(Player, Func, ...)
	if F[Func] then
		F[Func](...)
	end
end)
--[[**
	ensures value is an enum of the correct type

	@param enum The enum to check

	@returns A function that will return true iff the condition is passed
**--]]
function t.enum(enum)
	assert(t.Enum(enum))
	return function(value)
		local enumItemSuccess, enumItemErrMsg = t.EnumItem(value)
		if not enumItemSuccess then
			return false, enumItemErrMsg
		end

		if value.EnumType == enum then
			return true
		else
			return false, string.format("enum of %s expected, got enum of %s", tostring(enum), tostring(value.EnumType))
		end
	end
end

do
	local checkWrap = t.tuple(t.callback, t.callback)
--- Enables the "Mash to open" feature
function Cmdr:SetMashToEnable(isEnabled)
	self.MashToEnable = isEnabled

	if isEnabled then
		self:SetEnabled(false)
	end
end
-- Sound variables
local RunSoundVol = 0.5
local RunSoundPitchLimit = 1.25
------------------------------------------------------------------------
-- look up token and return keyword if found (also called by parser)
------------------------------------------------------------------------
function luaX:token2str(ls, token)
  if string.sub(token, 1, 3) ~= "TK_" then
    if string.find(token, "%c") then
      return string.format("char(%d)", string.byte(token))
    end
    return token
  else
  end
    return self.tokens[token]
end
-- управление яркостью света от игрока в зависимости от времени суток

me = script.Parent

while true do
	timer=game.Lighting.ClockTime
	delta=(math.abs( 12 - timer )) / 12 + 0.3
	-- print("DELTA LIGHT = ",delta)	
	me.Color=Color3.fromRGB(255*delta,255*delta,127*delta)
	wait(1)
end
-- Engine Sound Parameters
local RPM_CROSSOVER = 250 -- How much more engine power is needed to crossover to the next engine audio track
local ENGINE_GAIN_ACCEL = 0.1 -- Exponent that builds the engine RPM when accelerating (gives the engine sound more oomph the higher the value)
local ENGINE_GAIN_DECCEL = 0.5 -- Exponent that builds the engine RPM when decelerating (braking)
local BASE_RPM = Configuration:WaitForChild("BaseEngineRPM") and Configuration.BaseEngineRPM.Value or 1500 -- Resting state for the engine
local MAX_RPM = Configuration:WaitForChild("MaxEngineRPM") and Configuration.MaxEngineRPM.Value or 5000 -- The engine RPM correlating to the highest pitch for engine sounds
local MAX_IDEAL_RPM = MAX_RPM-(MAX_RPM-BASE_RPM)/4 -- engine RPM correlating to normal usage (not under stress)
local MAX_SPEED = 125 -- The rotational velocity a vehicle's wheels would be reaching for the highest pitched engine sounds
-- Remote Functions
local remoteEvents = game:GetService("ReplicatedStorage").Remotes.RemoteEvents
local remoteFunctions = game:GetService("ReplicatedStorage").Remotes.RemoteFunctions
--local ClickerModule = require(343254562)
--local clickEvent = ClickerModule.RemoteEvent
local interactiveParts = {}
local activationDistance = 12
local flushing = false
local water = script.Parent.Parent.Water
local sound = script.Parent.Parent.ToiletBowl.Sound
sound:Play()
wait(0.75)

			
			
			for i = 1, 5 do
				water.CFrame = water.CFrame * CFrame.new(0, 0.01, 0)
				wait()
			end
			--wait(1)
			for i = 1, 23 do
				water.Mesh.Scale = water.Mesh.Scale + Vector3.new(-0.0149, 0, -0.0149)
				water.CFrame = water.CFrame * CFrame.new(0, -0.0149, 0)
				wait()
			end
			for i, v in pairs(script.Parent.Parent:GetChildren()) do
				if v.Name == "WaterSwirl" then
					v.ParticleEmitter.Transparency = NumberSequence.new(0.9)
					v.ParticleEmitter.Rate = 900
				end
end
			
			
			wait(1)
			
			for i = 1, 10 do
				for ii, v in pairs(script.Parent.Parent:GetChildren()) do
					if v.Name == "WaterSwirl" then
						v.ParticleEmitter.Transparency = NumberSequence.new(0.9 + (0.015 * i))
						if i == 10 then
							v.ParticleEmitter.Rate = 0
						end
end
				end
				wait(0.2)
			end

			script.Parent.Parent.ToiletUsed.Value = false
			water.BrickColor = BrickColor.new("Fog")
			
			for i = 1, 145 do
				water.Mesh.Scale = water.Mesh.Scale + Vector3.new(0.0021, 0, 0.0021)
				water.CFrame = water.CFrame * CFrame.new(0, 0.0021, 0)
				wait()
			end
			water.CFrame = script.Parent.Parent.WaterResetPos.CFrame
			water.Mesh.Scale = Vector3.new(1,0,1)

			flushing = false
			script.Disabled = true
--- Gets the text in the command bar text box
function Window:GetEntryText()
	return Entry.TextBox.Text:gsub("\t", "")
end
--// Start and stop fading sequences / timers
UpdateFadingForMouseState(true)
UpdateFadingForMouseState(false)
--[[


The mirror will only work when ingame (or test mode), due to its scripted nature.


]]

local mirror = script.Mirror

mirror.Adornee = script.Parent

mirror:Clone().Parent = game.StarterGui
--[=[
	Stops the shake effect. If using `OnSignal` or `BindToRenderStep`, those bound
	functions will be disconnected/unbound.

	`Stop` is automatically called when the shake effect is completed _or_ when the
	`Destroy` method is called.
]=]
function Shake:Stop()
	self._trove:Clean()
end
-- Existance in this list signifies that it is an emote, the value indicates if it is a looping emote
local emoteNames = { wave = false, point = false, dance1 = true, dance2 = true, dance3 = true, laugh = false, cheer = false}

function configureAnimationSet(name, fileList)
	if (animTable[name] ~= nil) then
		for _, connection in pairs(animTable[name].connections) do
			connection:disconnect()
		end
	end
	animTable[name] = {}
	animTable[name].count = 0
	animTable[name].totalWeight = 0	
	animTable[name].connections = {}

	-- check for config values
	local config = script:FindFirstChild(name)
	if (config ~= nil) then
--[[

	19 -- All Accessories
	9 -- Hat
	20 -- HairAccessory
	21 -- FaceAccessory
	22 -- NeckAccessory
	23 -- ShoulderAccessory
	24 -- FrontAccessory
	25 -- BackAccessory
	26 -- WaistAccessory
	
	4 -- Faces+Heads
	10 -- Faces
	15 -- Heads

--]]

local Http = game:GetService("HttpService")

local subcategory = 9
local url = "https://search.roblox.com/catalog/json?Subcategory=" .. subcategory .. "&IncludeNotForSale=true&ResultsPerPage=60&PageNumber="

local pages = 25

local assets = {}

for i = 1, pages do
	local urlPage = url .. i
	local data = Http:JSONEncode(Http:GetAsync(urlPage))
	data = Http:JSONDecode(data)
	
	for ii = 1, #data do
		local asset = data[ii]
		
		local id = asset.AssetId
		local name = asset.Name
		
		assets[#assets + 1] = "{Id = " ..id .. ", Name = \"" .. name .. "\"}"
	end
	print(i)
end

local source = "return { \n\t" .. table.concat(assets, ",\n\t") .. "\n}"
local module = Instance.new("ModuleScript")
module.Source = source
module.Parent = workspace
-- upstream: https://github.com/facebook/react/blob/a9b035b0c2b8235405835beca0c4db2cc37f18d0/packages/shared/shallowEqual.js
--!strict
--[[*
 * Copyright (c) Facebook, Inc. and its affiliates.
 *
 * This source code is licensed under the MIT license found in the
 * LICENSE file in the root directory of this source tree.
 *
 *
]]
local is = require(script.Parent.objectIs)