cluaupp 1.3.0 → 1.4.0

package/templates/game/libs/Cmdr/_impl/BuiltInCommands/Admin/teleport.luau

@@ -1,30 +0,0 @@
-const ReplicatedStorage = game:GetService("ReplicatedStorage")
-
-const BuiltInGuards = ReplicatedStorage.CmdrClient.Shared.BuiltInGuards
-const HasCharacter = require(BuiltInGuards.HasCharacter) :: (number?) -> (any) -> string?
-
-return {
-	Name = "teleport",
-	Aliases = { "tp" },
-	Description = "Teleports a player or set of players to one target.",
-	Group = "DefaultAdmin",
-	AutoExec = {
-		'alias "bring|Brings a player or set of players to you." teleport $1{players|players|The players to bring.} ${me}',
-		'alias "to|Teleports you to another player or location." teleport ${me} $1{player @ positionVector3|Destination|The player or location to teleport to.}',
-	},
-	Args = {
-		{
-			Type = "players",
-			Name = "From",
-			Description = "The players to teleport.",
-		},
-		{
-			Type = "player @ positionVector3",
-			Name = "Destination",
-			Description = "The target player or coordinates to teleport to.",
-		},
-	},
-	Guards = {
-		HasCharacter(2),
-	},
-}

package/templates/game/libs/Cmdr/_impl/BuiltInCommands/Admin/teleportServer.luau

@@ -1,26 +0,0 @@
-return function(_, fromPlayers: { Player }, destination: Player | Vector3): string
-	const cFrame = if typeof(destination) == "Instance"
-		then (destination.Character :: Model):GetPivot()
-		else CFrame.new(destination)
-
-	for _, player: Player in ipairs(fromPlayers) do
-		const character = player.Character
-		const humanoid = character and character:FindFirstChildWhichIsA("Humanoid")
-		if not humanoid then
-			continue
-		end
-
-		task.spawn(function()
-			if humanoid.SeatPart then
-				humanoid.Sit = false
-				humanoid:GetPropertyChangedSignal("SeatPart"):Wait()
-			end
-
-			if character:IsDescendantOf(workspace) then
-				character:PivotTo(cFrame)
-			end
-		end)
-	end
-
-	return `Teleported {#fromPlayers} players.`
-end

package/templates/game/libs/Cmdr/_impl/BuiltInCommands/Admin/unban.luau

@@ -1,26 +0,0 @@
-const ReplicatedStorage = game:GetService("ReplicatedStorage")
-
-const BuiltInGuards = ReplicatedStorage.CmdrClient.Shared.BuiltInGuards
-const MaxArrayLength = require(BuiltInGuards.MaxArrayLength) :: (number, number) -> (any) -> string?
-
-return {
-	Name = "unban",
-	Description = "Unbans a player or set of players.",
-	Group = "DefaultAdmin",
-	Args = {
-		{
-			Type = "playerIds",
-			Name = "Players",
-			Description = "The players to unban (max 50).",
-		},
-		{
-			Type = "boolean",
-			Name = "Apply to universe",
-			Description = "Remove the ban across all places in this experience.",
-			Default = true,
-		},
-	},
-	Guards = {
-		MaxArrayLength(1, 50),
-	},
-}

package/templates/game/libs/Cmdr/_impl/BuiltInCommands/Admin/unbanServer.luau

@@ -1,10 +0,0 @@
-const Players = game:GetService("Players")
-
-return function(_, playerIds: { number }, applyToUniverse: boolean): string
-	const success, errorMessage = pcall(Players.UnbanAsync, Players, {
-		UserIds = playerIds,
-		ApplyToUniverse = applyToUniverse,
-	})
-
-	return if success then `Unbanned {#playerIds} players.` else `UnbanAsync failed: {errorMessage}`
-end

package/templates/game/libs/Cmdr/_impl/BuiltInCommands/Debug/blink.luau

@@ -1,35 +0,0 @@
-const ReplicatedStorage = game:GetService("ReplicatedStorage")
-
-const BuiltInGuards = ReplicatedStorage.CmdrClient.Shared.BuiltInGuards
-const HasCharacter = require(BuiltInGuards.HasCharacter) :: (number?) -> (any) -> string?
-
-return {
-	Name = "blink",
-	Aliases = { "b" },
-	Description = "Teleports you to where your mouse is hovering.",
-	Group = "DefaultDebug",
-	Args = {},
-	Guards = {
-		HasCharacter(),
-	},
-
-	ClientRun = function(context: any): string
-		-- We implement this here because player position is owned by the client.
-		-- No reason to bother the server for this!
-
-		const mouse = context.Executor:GetMouse() :: Mouse
-		const character = context.Executor.Character :: Model
-
-		const raycastParams = RaycastParams.new()
-		raycastParams.FilterType = Enum.RaycastFilterType.Exclude
-		raycastParams.FilterDescendantsInstances = { character }
-		raycastParams.IgnoreWater = true
-		raycastParams.RespectCanCollide = true
-
-		const raycastResult = workspace:Raycast(mouse.UnitRay.Origin, mouse.UnitRay.Direction * 1000, raycastParams)
-		const targetPosition = if raycastResult then raycastResult.Position else mouse.Hit.Position
-		character:MoveTo(targetPosition)
-
-		return "Blinked!"
-	end,
-}

package/templates/game/libs/Cmdr/_impl/BuiltInCommands/Debug/fetch.luau

@@ -1,12 +0,0 @@
-return {
-	Name = "fetch",
-	Description = "Fetch a value from the Internet.",
-	Group = "DefaultDebug",
-	Args = {
-		{
-			Type = "url",
-			Name = "URL",
-			Description = "The URL to fetch.",
-		},
-	},
-}

package/templates/game/libs/Cmdr/_impl/BuiltInCommands/Debug/fetchServer.luau

@@ -1,7 +0,0 @@
-const HttpService = game:GetService("HttpService")
-
-return function(_, url: string): string
-	const success, response = pcall(HttpService.GetAsync, HttpService, url)
-
-	return if success then response else `Failed to fetch URL: {response}`
-end

package/templates/game/libs/Cmdr/_impl/BuiltInCommands/Debug/getPlayerPlaceInstance.luau

@@ -1,20 +0,0 @@
-return {
-	Name = "get-player-place-instance",
-	Description = "Returns the target player's Place ID and the JobId separated by a space. Returns 0 if the player is offline or something else goes wrong.",
-	Group = "DefaultDebug",
-	Args = {
-		{
-			Type = "playerId",
-			Name = "Player",
-			Description = "Get the place instance of this player.",
-		},
-		function(context: any)
-			return {
-				Type = context.Cmdr.Util.MakeEnumType("PlaceInstance Format", { "PlaceIdJobId", "PlaceId", "JobId" }),
-				Name = "Format",
-				Description = "What data to return. PlaceIdJobId returns both separated by a space.",
-				Default = "PlaceIdJobId",
-			}
-		end,
-	},
-}

package/templates/game/libs/Cmdr/_impl/BuiltInCommands/Debug/getPlayerPlaceInstanceServer.luau

@@ -1,28 +0,0 @@
-const TeleportService = game:GetService("TeleportService")
-
-return function(_, playerId: number, format: string): string
-	format = format or "PlaceIdJobId"
-
-	const success, _, errorText, placeId, jobId =
-		pcall(TeleportService.GetPlayerPlaceInstanceAsync, TeleportService, playerId)
-
-	if not success or not placeId or not jobId or (errorText and #errorText > 0) then
-		if format == "PlaceIdJobId" then
-			return "0 -"
-		elseif format == "PlaceId" then
-			return "0"
-		elseif format == "JobId" then
-			return "-"
-		end
-	end
-
-	if format == "PlaceIdJobId" then
-		return `{placeId} {jobId}`
-	elseif format == "PlaceId" then
-		return tostring(placeId)
-	elseif format == "JobId" then
-		return tostring(jobId)
-	end
-
-	return "Something went very wrong!"
-end

package/templates/game/libs/Cmdr/_impl/BuiltInCommands/Debug/position.luau

@@ -1,30 +0,0 @@
-const Players = game:GetService("Players")
-const ReplicatedStorage = game:GetService("ReplicatedStorage")
-
-const BuiltInGuards = ReplicatedStorage.CmdrClient.Shared.BuiltInGuards
-const HasCharacter = require(BuiltInGuards.HasCharacter) :: (number?) -> (any) -> string?
-
-return {
-	Name = "position",
-	Aliases = { "pos" },
-	Description = "Returns the Vector3 position of you or another player.",
-	Group = "DefaultDebug",
-	Args = {
-		{
-			Type = "player",
-			Name = "Player",
-			Description = "The player to report the position of. Omit for your own position.",
-			Default = Players.LocalPlayer,
-		},
-	},
-	Guards = {
-		HasCharacter(1),
-	},
-
-	ClientRun = function(_, player: Player): string
-		const character = player.Character :: Model
-		const rootPart = character:FindFirstChild("HumanoidRootPart") :: BasePart
-
-		return tostring(rootPart.Position):gsub("%s", "")
-	end,
-}

package/templates/game/libs/Cmdr/_impl/BuiltInCommands/Debug/thru.luau

@@ -1,50 +0,0 @@
-const ReplicatedStorage = game:GetService("ReplicatedStorage")
-
-const BuiltInGuards = ReplicatedStorage.CmdrClient.Shared.BuiltInGuards
-const HasCharacter = require(BuiltInGuards.HasCharacter) :: (number?) -> (any) -> string?
-
-return {
-	Name = "thru",
-	Aliases = { "t", "through" },
-	Description = "Teleports you through whatever your mouse is hovering over, placing you equidistantly from the wall.",
-	Group = "DefaultDebug",
-	Args = {
-		{
-			Type = "number",
-			Name = "Extra distance",
-			Description = "Go through the wall an additional X studs.",
-			Default = 0,
-		},
-	},
-	Guards = {
-		HasCharacter(),
-	},
-
-	ClientRun = function(context: any, extra: number): string
-		-- We implement this here because player position is owned by the client.
-		-- No reason to bother the server for this!
-
-		const mouse = context.Executor:GetMouse() :: Mouse
-		const character = context.Executor.Character :: Model
-		const rootPart = character:FindFirstChild("HumanoidRootPart") :: BasePart
-
-		const raycastParams = RaycastParams.new()
-		raycastParams.FilterType = Enum.RaycastFilterType.Exclude
-		raycastParams.FilterDescendantsInstances = { character }
-		raycastParams.IgnoreWater = true
-		raycastParams.RespectCanCollide = true
-
-		const raycastResult = workspace:Raycast(mouse.UnitRay.Origin, mouse.UnitRay.Direction * 1000, raycastParams)
-		if raycastResult then
-			const pos = rootPart.Position
-			const diff = (raycastResult.Position - pos)
-			const unitDirection = if diff.Magnitude > 0 then diff.Unit else Vector3.new()
-
-			character:MoveTo((diff * 2) + (unitDirection * extra) + pos)
-			return "Thru the wall!"
-		else
-			character:MoveTo(mouse.Hit.Position)
-			return "Blinked (No wall found)!"
-		end
-	end,
-}

package/templates/game/libs/Cmdr/_impl/BuiltInCommands/Debug/uptime.luau

@@ -1,6 +0,0 @@
-return {
-	Name = "uptime",
-	Description = "Returns the amount of time the server has been running.",
-	Group = "DefaultDebug",
-	Args = {},
-}

package/templates/game/libs/Cmdr/_impl/BuiltInCommands/Debug/uptimeServer.luau

@@ -1,12 +0,0 @@
-const startTime = os.time()
-
-return function(): string
-	const uptime = os.time() - startTime
-
-	const days = uptime // 86400
-	const hours = uptime // 3600 % 24
-	const minutes = uptime // 60 % 60
-	const seconds = uptime % 60
-
-	return `{days}d {hours}h {minutes}m {seconds}s`
-end

package/templates/game/libs/Cmdr/_impl/BuiltInCommands/Debug/version.luau

@@ -1,12 +0,0 @@
-const VERSION = "v1.13.0"
-
-return {
-	Name = "version",
-	Description = "Shows the current version of Cmdr.",
-	Group = "DefaultDebug",
-	Args = {},
-
-	ClientRun = function(): string
-		return `Cmdr Version {VERSION}`
-	end,
-}

package/templates/game/libs/Cmdr/_impl/BuiltInCommands/Utility/alias.luau

@@ -1,22 +0,0 @@
-return {
-	Name = "alias",
-	Description = "Creates a new, single command out of a command and given arguments.",
-	Group = "DefaultUtil",
-	Args = {
-		{
-			Type = "string",
-			Name = "Alias name",
-			Description = "The key or input type you'd like to bind the command to.",
-		},
-		{
-			Type = "string",
-			Name = "Command string",
-			Description = 'The command text you want to run. Separate multiple commands with "&&". Accept arguments with $1, $2, $3, etc.',
-		},
-	},
-
-	ClientRun = function(context: any, name: string, commandString: string): string
-		context.Cmdr.Registry:RegisterCommandObject(context.Cmdr.Util.MakeAliasCommand(name, commandString), true)
-		return `Created alias {name}.`
-	end,
-}

package/templates/game/libs/Cmdr/_impl/BuiltInCommands/Utility/bind.luau

@@ -1,104 +0,0 @@
-const Players = game:GetService("Players")
-const TextChatService = game:GetService("TextChatService")
-const UserInputService = game:GetService("UserInputService")
-
-local hasHelperRan = false
-
-const function runBindHelper(Cmdr)
-	Players.PlayerRemoving:Connect(function(Player)
-		const binds = Cmdr.Registry:GetStore("CMDR_Binds")
-		if binds[Player] then
-			binds[Player] = nil
-		end
-	end)
-
-	TextChatService.MessageReceived:Connect(function(message: TextChatMessage)
-		const senderId = message.TextSource and message.TextSource.UserId
-		const player = senderId and Players:GetPlayerByUserId(senderId)
-		if not player then
-			return
-		end
-
-		const binds = Cmdr.Registry:GetStore("CMDR_Binds")
-		if binds[player] then
-			binds[player](message)
-		end
-	end)
-
-	hasHelperRan = true
-end
-
-return {
-	Name = "bind",
-	Description = "Binds a command string to a key or mouse input.",
-	Group = "DefaultUtil",
-	Args = {
-		{
-			Type = "userInput @ player",
-			Name = "Input",
-			Description = "The key or input type you'd like to bind the command to.",
-		},
-		{
-			Type = "command",
-			Name = "Command",
-			Description = "The command you want to run on this input.",
-		},
-		{
-			Type = "string",
-			Name = "Arguments",
-			Description = "The arguments for the command.",
-			Default = "",
-		},
-	},
-
-	ClientRun = function(
-		context: any,
-		bind: Enum.UserInputType | Enum.KeyCode | Player,
-		command: string,
-		arguments: string
-	): string
-		if not hasHelperRan then
-			runBindHelper(context.Cmdr)
-		end
-
-		const binds = context:GetStore("CMDR_Binds")
-		if binds[bind] then
-			if typeof(binds[bind]) == "RBXScriptConnection" then
-				binds[bind]:Disconnect()
-			end
-
-			binds[bind] = nil
-		end
-
-		command = `{command} {arguments}`
-
-		const bindType = context:GetArgument(1).Type.Name
-		if bindType == "userInput" then
-			binds[bind] = UserInputService.InputBegan:Connect(function(input, gameProcessed)
-				if gameProcessed then
-					return
-				end
-
-				if input.UserInputType == bind or input.KeyCode == bind then
-					context:Reply(
-						context.Dispatcher:EvaluateAndRun(
-							context.Cmdr.Util.RunEmbeddedCommands(context.Dispatcher, command)
-						)
-					)
-				end
-			end)
-		elseif bindType == "player" then
-			binds[bind] = function(message: TextChatMessage)
-				const args = { message.Text }
-				const chatCommand = context.Cmdr.Util.RunEmbeddedCommands(
-					context.Dispatcher,
-					context.Cmdr.Util.SubstituteArgs(command, args)
-				)
-				const result = context.Dispatcher:EvaluateAndRun(chatCommand)
-				context:Reply(`{bind.Name} $ {chatCommand} : {result}`, Color3.fromRGB(244, 92, 66))
-			end
-		end
-
-		return "Bound command to input."
-	end,
-}

package/templates/game/libs/Cmdr/_impl/BuiltInCommands/Utility/clear.luau

@@ -1,20 +0,0 @@
-return {
-	Name = "clear",
-	Description = "Clear all lines above the entry line of the Cmdr window.",
-	Group = "DefaultUtil",
-	Args = {},
-	ClientRun = function(context: any): string
-		const entryFrame = context.Cmdr.Gui:WaitForChild("Frame", 2)
-		if not entryFrame then
-			return "Failed to clear: Frame not found."
-		end
-
-		for _, child in pairs(entryFrame:GetChildren()) do
-			if child.Name == "Line" and child:IsA("TextBox") then
-				child:Destroy()
-			end
-		end
-
-		return ""
-	end,
-}

package/templates/game/libs/Cmdr/_impl/BuiltInCommands/Utility/convertTimestamp.luau

@@ -1,18 +0,0 @@
-return {
-	Name = "convertTimestamp",
-	Aliases = { "date" },
-	Description = "Convert a timestamp to a human-readable format.",
-	Group = "DefaultUtil",
-	Args = {
-		{
-			Type = "number",
-			Name = "timestamp",
-			Description = "A numerical representation of a specific moment in time.",
-			Optional = true,
-		},
-	},
-	ClientRun = function(_, timestamp: number): string
-		timestamp = timestamp or os.time()
-		return `{os.date("%x", timestamp)} {os.date("%X", timestamp)}`
-	end,
-}

package/templates/game/libs/Cmdr/_impl/BuiltInCommands/Utility/echo.luau

@@ -1,17 +0,0 @@
-return {
-	Name = "echo",
-	Aliases = { "=" },
-	Description = "Echoes your text back to you.",
-	Group = "DefaultUtil",
-	Args = {
-		{
-			Type = "string",
-			Name = "Text",
-			Description = "The text to echo.",
-		},
-	},
-
-	ClientRun = function(_, text: string): string
-		return text
-	end,
-}

package/templates/game/libs/Cmdr/_impl/BuiltInCommands/Utility/edit.luau

@@ -1,75 +0,0 @@
-const Players = game:GetService("Players")
-
-const TEXT_BOX_PROPERTIES = {
-	AnchorPoint = Vector2.new(0.5, 0.5),
-	BackgroundColor3 = Color3.fromRGB(17, 17, 17),
-	BackgroundTransparency = 0.05,
-	BorderColor3 = Color3.fromRGB(17, 17, 17),
-	BorderSizePixel = 20,
-	ClearTextOnFocus = false,
-	MultiLine = true,
-	Position = UDim2.fromScale(0.5, 0.5),
-	Size = UDim2.fromScale(0.5, 0.4),
-	Font = Enum.Font.Code,
-	TextColor3 = Color3.fromRGB(241, 241, 241),
-	TextWrapped = true,
-	TextSize = 18,
-	TextXAlignment = "Left",
-	TextYAlignment = "Top",
-	AutoLocalize = false,
-	PlaceholderText = "Right click to exit",
-}
-
-local lock
-
-return {
-	Name = "edit",
-	Description = "Edit text in a TextBox.",
-	Group = "DefaultUtil",
-	Args = {
-		{
-			Type = "string",
-			Name = "Input text",
-			Description = "The text you wish to edit.",
-			Default = "",
-		},
-		{
-			Type = "string",
-			Name = "Delimiter",
-			Description = "The character that separates each line.",
-			Default = ",",
-		},
-	},
-
-	ClientRun = function(context: any, text: string, delimeter: string): string
-		lock = lock or context.Cmdr.Util.Mutex()
-
-		const unlock = lock()
-		context:Reply("Right-click on the text area to exit.", Color3.fromRGB(158, 158, 158))
-
-		const screenGui = Instance.new("ScreenGui")
-		screenGui.Name = "CmdrEditBox"
-		screenGui.ResetOnSpawn = false
-
-		const textBox = Instance.new("TextBox")
-		for key, value in pairs(TEXT_BOX_PROPERTIES) do
-			textBox[key] = value
-		end
-
-		textBox.Text = text:gsub(delimeter, "\n")
-		textBox.Parent = screenGui
-
-		screenGui.Parent = Players.LocalPlayer:WaitForChild("PlayerGui")
-
-		const thread = coroutine.running()
-		textBox.InputBegan:Connect(function(input)
-			if input.UserInputType == Enum.UserInputType.MouseButton2 then
-				coroutine.resume(thread, textBox.Text:gsub("\n", delimeter))
-				screenGui:Destroy()
-				unlock()
-			end
-		end)
-
-		return coroutine.yield()
-	end,
-}

package/templates/game/libs/Cmdr/_impl/BuiltInCommands/Utility/exit.luau

@@ -1,11 +0,0 @@
-return {
-	Name = "exit",
-	Aliases = { "escape" },
-	Description = "Exits the Cmdr window.",
-	Group = "DefaultUtil",
-	Args = {},
-	ClientRun = function(context: any): string
-		context.Cmdr:Hide()
-		return ""
-	end,
-}

package/templates/game/libs/Cmdr/_impl/BuiltInCommands/Utility/history.luau

@@ -1,27 +0,0 @@
-return {
-	Name = "history",
-	AutoExec = {
-		'alias "!|Displays previous command from history." run ${history $1{number|Line Number}}',
-		'alias "^|Runs the previous command, replacing all occurrences of A with B." run ${run replace ${history -1} $1{string|A} $2{string|B}}',
-		'alias "!!|Reruns the last command." ! -1',
-	},
-	Description = "Displays previous commands from history.",
-	Group = "DefaultUtil",
-	Args = {
-		{
-			Type = "integer",
-			Name = "Line Number",
-			Description = "Command line number (can be negative to go from end)",
-		},
-	},
-
-	ClientRun = function(context: any, line: number): string
-		const history = context.Dispatcher:GetHistory()
-
-		if line <= 0 then
-			line = #history + line
-		end
-
-		return history[line] or ""
-	end,
-}

package/templates/game/libs/Cmdr/_impl/BuiltInCommands/Utility/hover.luau

@@ -1,21 +0,0 @@
-const Players = game:GetService("Players")
-
-const Player = Players.LocalPlayer
-
-return {
-	Name = "hover",
-	Description = "Returns the name of the player you are hovering over.",
-	Group = "DefaultUtil",
-	Args = {},
-
-	ClientRun = function(): string
-		const mouse = Player:GetMouse()
-		const target = mouse.Target
-		if not target then
-			return ""
-		end
-
-		const targetPlayer = Players:GetPlayerFromCharacter(target:FindFirstAncestorOfClass("Model"))
-		return if targetPlayer then `{targetPlayer.DisplayName} @({targetPlayer.Name})` else ""
-	end,
-}

package/templates/game/libs/Cmdr/_impl/BuiltInCommands/Utility/jsonArrayDecode.luau

@@ -1,25 +0,0 @@
-return {
-	Name = "json-array-decode",
-	Description = "Decodes a JSON Array into a comma-separated list.",
-	Group = "DefaultUtil",
-	Args = {
-		{
-			Type = "json",
-			Name = "JSON",
-			Description = "The JSON array.",
-		},
-	},
-
-	ClientRun = function(_, value: any): string
-		if type(value) ~= "table" then
-			return tostring(value)
-		end
-
-		const stringValues = {}
-		for index, item in ipairs(value) do
-			stringValues[index] = tostring(item)
-		end
-
-		return table.concat(stringValues, ",")
-	end,
-}