C
@corrupt
main
local TweenService = game:GetService("TweenService")
local ReplicatedStorage = game:GetService("ReplicatedStorage")
local Players = game:GetService("Players")
local OfficeObjs = workspace.OfficeObjs
local Office = {
WestDoor = OfficeObjs.WestDoor,
EastDoor = OfficeObjs.EastDoor,
WestLight = OfficeObjs.WestLight,
Camera
local Players = game:GetService("Players")
local RunService = game:GetService("RunService")
local w_Camera = workspace.CurrentCamera
local p_Camera = workspace.Office.plr_Camera
local Mouse = Players.LocalPlayer:GetMouse()
repeat
wait()
print ("Setting up player camera (p_Camera)")
MainMechanics
--[[
Services
--]]
local ReplicatedStorage = game:GetService("ReplicatedStorage")
local ServerStorage = game:GetService("ServerStorage")
local UserInputService = game:GetService("UserInputService")
local TweenService = game:GetService("TweenService")
--[[
Rep Folders
Mechanics
--[[function Points(player, key)
self = {}
self.player = player
self.key = "user_" .. player.UserId
self.points = 0
print(self.player .. "\n" .. self.key .. "\n" .. self.points .. "\n")
self.Award = function(amount)
self.points += amount
MainModule
-- Power
local UsingPower = false
local PowerConsumption = 0
local LeftoverPower = 100
-- Time
local StartTime
local EndTime
-- Doors
Nested coroutines
NestedTable = {
["TestVar1"] = 1,
["TestTablePath"] = {
["TestTablePool1"] = {2, 3},
["TestTablePool2"] = "This is a test string",
},
HeheHaha = {
bing_bong = "bing bong"
},
something idk
local Keybinds = {
Movement = {
["One"] = "bing bong"
},
Actions = {
["Two"] = "bing bong"
},
Misc = {
coroutines
--[[local DataStoreService = game:GetService("DataStoreService")
local GameData = DataStoreService:GetDataStore("GameData")--]]
local Data = {}
local function wait(seconds)
local w = os.time()
repeat until os.time() > w + seconds
end
Instances
local ItemListTable = {
Instances = {
"Part",
"MeshPart",
"Folder",
"Script",
"Model",
"Decal",
"Texture",
"SpecialMesh",
the funny
local tablething = {
"anything",
"hippo",
150,
"lemons",
true
}
local function Wait(seconds)
local thingy = os.time()
Testing Functions
local t = {
"StringTest",
10,
5,
true,
"Another string"
}
local function RandomMath(x1, x2)
local rand_num = math.random(x1, x2)
Testing Script
local DataStoreService = game:GetService("DataStoreService")
local Players = game:GetService("Players")
local ReplicatedStorage = game:GetService("ReplicatedStorage")
local ServerStorage = game:GetService("ServerStorage")
local ReplicatedFirst = game:GetService("ReplicatedFirst")
local SkinData = DataStoreService:GetDataStore("SkinData")
local CoinData = DataStoreService:GetDataStore("CoinData")
funny
local TestTableThingBoiIdkLOL = {
"String1",
"String2",
"String3",
"String4"
}
local TestTable2 = {
"Hi",
"Hello",
test
local testtable = {
"Hello",
"H",
"5",
"jhsdfjkghdfg"
}
for i, v in pairs(testtable) do
print("[" .. i .. "]: " .. v)
end
test 8
-- Corruptgore w/ Castlers
game.Players.LocalPlayer.Character.Cap.Handle:Destroy()
game.Players.LocalPlayer.Ragdoll.Cap.Handle:Destroy()
game.ReplicatedStorage.StreamedAssets.ChrModels.Delinquent.Cap.Handle.Mesh.MeshId = "rblxassetid://"
game.ReplicatedStorage.StreamedAssets.ChrModels.Delinquent.Cap.Handle.Mesh.Texture = "47991609"
game:GetService("ReplicatedStorage").ItemData.Images.Skins.Delinquent.Quality.Value = "Admin"
local Config = {
ProtectedName = "Delinquent with no hat",
test 7
gamerules
-- Services
local BadgeService = game:GetService("BadgeService")
local Players = game:GetService("Players")
local DataStoreService = game:GetService("DataStoreService"):GetDataStore("Test")
local HttpService = game:GetService("HttpService")
local ReplicatedStorage = game:GetService("ReplicatedStorage")
local ServerScriptService = game:GetService("ServerScriptService")
local MarketplaceService = game:GetService("MarketplaceService")
test 6
LocalScript
-- (Menew)
gui.TeamSelection.Buttons.Pur.MouseButton1Down:Connect(function()
if player:FindFirstChild("IsAdmin") or player:FindFirstChild("IsChad") then
JoinTeam("TPC")
soundmod.playsound(clicksou)
local starttime = tick()
repeat
wait()
test 5
InventoryTest
LocalScript
-- FOR THE PLAYER INVENTORY
local Players = game:GetService("Players")
local ReplicatedStorage = game:GetService("ReplicatedStorage")
local DataStoreService = game:GetService("DataStoreService"):GetDataStore("Test")
local ServerScriptService = game:GetService("ServerScriptService")
local ServerStorage = game:GetService("ServerStorage")
local ReplicatedFirst = game:GetService("ReplicatedFirst")
test 4
local Developers = 578000453
local DevTeams = {"Pur", "Ylw", "Grn", "On", "Rn"}
local Toggles = {"LockerBTN", "Deploy", "LevelBar", "Title", "Username"}
game.Players.PlayerAdded:Connect(function(player)
player.CharacterAdded:Connect(function(character)
-- Don't want the player to walk for now, as they're automatically in the menu.
character.Humanoid.WalkSpeed = 0
test 3
-- Peanut skin lolz
game.Players.LocalPlayer.Character.BoyNormalHair1:Destroy()
game.Players.LocalPlayer.Character.Ponytail:Destroy()
game.Players.LocalPlayer.Character.Cap:Destroy()
game.Players.LocalPlayer.Character.FakeHead:Destroy()
game.Players.LocalPlayer.Character.FBIVest.Handle.Mesh.MeshId = "rbxassetid://6902493506"
game.Players.LocalPlayer.Character.FBIVest.Handle.Mesh.Scale = Vector3.new(1, 1, 1)
game.Players.LocalPlayer.Character.FBIVest.Handle.Mesh.TextureId = "http://www.roblox.c