471 lines
14 KiB
Lua
471 lines
14 KiB
Lua
settings().Network.maxDataModelSendBuffer = 1000000
|
|
settings().Network.sendRate = 1000000
|
|
|
|
_G.rawset=nil
|
|
function readonlytable(table)
|
|
return setmetatable({}, {
|
|
__index = table,
|
|
__newindex = function(table, key, value)
|
|
error("Attempt to modify read-only table")
|
|
end,
|
|
__metatable = false
|
|
});
|
|
end
|
|
|
|
function readonlytablechildren(table)
|
|
for i,v in pairs(table) do
|
|
if type(v)=="table" and table[i]~=_G._G then
|
|
readonlytablechildren(table[i])
|
|
table[i] = readonlytable(table[i])
|
|
end
|
|
if type(v)=="userdata" then
|
|
local mt = getmetatable(table[i])
|
|
if mt~=nil and mt~=false then
|
|
mt.__metatable=false
|
|
end
|
|
end
|
|
end
|
|
end
|
|
|
|
readonlytablechildren(_G)
|
|
_G._G = readonlytable(_G)
|
|
mt = getmetatable(game.Changed)
|
|
mt.__metatable=false
|
|
mt = getmetatable("curse you roblox")
|
|
mt.__metatable=false
|
|
|
|
--function made by rbxbanland
|
|
function newWaitForChild(newParent,name)
|
|
local returnable = nil
|
|
if newParent:FindFirstChild(name) then
|
|
returnable = newParent:FindFirstChild(name)
|
|
else
|
|
repeat wait() returnable = newParent:FindFirstChild(name) until returnable ~= nil
|
|
end
|
|
return returnable
|
|
end
|
|
|
|
function KickPlayer(Player,reason)
|
|
local message = Instance.new("Message")
|
|
message.Text = "You were kicked. Reason: "..reason
|
|
message.Parent = Player
|
|
wait(2)
|
|
Player:remove()
|
|
print("Player '" .. Player.Name .. "' with ID '" .. Player.userId .. "' kicked. Reason: "..reason)
|
|
end
|
|
|
|
function LoadCharacterNew(playerApp,newChar,RemoveTeapotTurret)
|
|
PlayerService = game:GetService("Players")
|
|
Player = PlayerService:GetPlayerFromCharacter(newChar)
|
|
|
|
local function kick()
|
|
KickPlayer(Player, "Modified Client")
|
|
end
|
|
|
|
if (not Player:FindFirstChild("Appearance")) then
|
|
kick()
|
|
end
|
|
|
|
if ((playerApp:GetChildren() == 0) or (playerApp:GetChildren() == nil)) then
|
|
kick()
|
|
end
|
|
|
|
local path = "rbxasset://../../../shareddata/charcustom/"
|
|
|
|
local charparts = {[1] = newWaitForChild(newChar,"Head"),[2] = newWaitForChild(newChar,"Torso"),[3] = newWaitForChild(newChar,"Left Arm"),[4] = newWaitForChild(newChar,"Right Arm"),[5] = newWaitForChild(newChar,"Left Leg"),[6] = newWaitForChild(newChar,"Right Leg")}
|
|
for _,newVal in pairs(playerApp:GetChildren()) do
|
|
local customtype = newVal.CustomizationType.Value
|
|
if (customtype == 1) then
|
|
pcall(function()
|
|
charparts[newVal.ColorIndex.Value].BrickColor = newVal.Value
|
|
end)
|
|
elseif (customtype == 2) then
|
|
pcall(function()
|
|
local newHat = game.Workspace:InsertContent(path.."hats/"..newVal.Value)
|
|
if newHat[1] then
|
|
if newHat[1].className == "Hat" then
|
|
if (RemoveTeapotTurret == true) then
|
|
if (newHat[1].Name ~= "TeapotTurret.rbxm") then
|
|
newHat[1].Parent = newChar
|
|
else
|
|
newHat[1]:remove()
|
|
end
|
|
else
|
|
newHat[1].Parent = newChar
|
|
end
|
|
else
|
|
newHat[1]:remove()
|
|
end
|
|
end
|
|
end)
|
|
elseif (customtype == 3) then
|
|
pcall(function()
|
|
local newTShirt = game.Workspace:InsertContent(path.."tshirts/"..newVal.Value)
|
|
if newTShirt[1] then
|
|
if newTShirt[1].className == "ShirtGraphic" then
|
|
newTShirt[1].Parent = newChar
|
|
else
|
|
newTShirt[1]:remove()
|
|
end
|
|
end
|
|
end)
|
|
elseif (customtype == 4) then
|
|
pcall(function()
|
|
local newHat = game.Workspace:InsertContent(path.."hats/"..newVal.Value)
|
|
if newHat[1] then
|
|
if newHat[1].className == "Hat" then
|
|
newHat[1].Parent = newChar
|
|
else
|
|
newHat[1]:remove()
|
|
end
|
|
end
|
|
end)
|
|
|
|
pcall(function()
|
|
local newItem = game.Workspace:InsertContent(path.."custom/"..newVal.Value)
|
|
if newItem[1] then
|
|
if newItem[1].className == "Decal" then
|
|
newWaitForChild(charparts[1],"face"):remove()
|
|
newItem[1].Parent = charparts[1]
|
|
newItem[1].Face = "Front"
|
|
elseif newPart[1].className == "SpecialMesh" or newPart[1].className == "CylinderMesh" or newPart[1].className == "BlockMesh" then
|
|
newWaitForChild(charparts[1],"Mesh"):remove()
|
|
newItem[1].Parent = charparts[1]
|
|
else
|
|
newItem[1].Parent = newChar
|
|
end
|
|
end
|
|
end)
|
|
end
|
|
end
|
|
end
|
|
|
|
function InitalizeClientAppearance(Player,Hat1ID,Hat2ID,Hat3ID,HeadColorID,TorsoColorID,LeftArmColorID,RightArmColorID,LeftLegColorID,RightLegColorID,TShirtID,ShirtID,PantsID,FaceID,HeadID,ItemID)
|
|
local newCharApp = Instance.new("IntValue",Player)
|
|
newCharApp.Name = "Appearance"
|
|
--BODY COLORS
|
|
for i=1,6,1 do
|
|
local BodyColor = Instance.new("BrickColorValue",newCharApp)
|
|
if (i == 1) then
|
|
if (HeadColorID ~= nil) then
|
|
BodyColor.Value = BrickColor.new(HeadColorID)
|
|
else
|
|
BodyColor.Value = BrickColor.new(1)
|
|
end
|
|
BodyColor.Name = "Head Color"
|
|
elseif (i == 2) then
|
|
if (TorsoColorID ~= nil) then
|
|
BodyColor.Value = BrickColor.new(TorsoColorID)
|
|
else
|
|
BodyColor.Value = BrickColor.new(1)
|
|
end
|
|
BodyColor.Name = "Torso Color"
|
|
elseif (i == 3) then
|
|
if (LeftArmColorID ~= nil) then
|
|
BodyColor.Value = BrickColor.new(LeftArmColorID)
|
|
else
|
|
BodyColor.Value = BrickColor.new(1)
|
|
end
|
|
BodyColor.Name = "Left Arm Color"
|
|
elseif (i == 4) then
|
|
if (RightArmColorID ~= nil) then
|
|
BodyColor.Value = BrickColor.new(RightArmColorID)
|
|
else
|
|
BodyColor.Value = BrickColor.new(1)
|
|
end
|
|
BodyColor.Name = "Right Arm Color"
|
|
elseif (i == 5) then
|
|
if (LeftLegColorID ~= nil) then
|
|
BodyColor.Value = BrickColor.new(LeftLegColorID)
|
|
else
|
|
BodyColor.Value = BrickColor.new(1)
|
|
end
|
|
BodyColor.Name = "Left Leg Color"
|
|
elseif (i == 6) then
|
|
if (RightLegColorID ~= nil) then
|
|
BodyColor.Value = BrickColor.new(RightLegColorID)
|
|
else
|
|
BodyColor.Value = BrickColor.new(1)
|
|
end
|
|
BodyColor.Name = "Right Leg Color"
|
|
end
|
|
local indexValue = Instance.new("NumberValue")
|
|
indexValue.Name = "ColorIndex"
|
|
indexValue.Parent = BodyColor
|
|
indexValue.Value = i
|
|
local typeValue = Instance.new("NumberValue")
|
|
typeValue.Name = "CustomizationType"
|
|
typeValue.Parent = BodyColor
|
|
typeValue.Value = 1
|
|
end
|
|
--HATS
|
|
for i=1,3,1 do
|
|
local newHat = Instance.new("StringValue",newCharApp)
|
|
if (i == 1) then
|
|
if (Hat1ID ~= nil) then
|
|
newHat.Value = Hat1ID
|
|
newHat.Name = "Hat 1 - "..Hat1ID
|
|
else
|
|
newHat.Value = "NoHat.rbxm"
|
|
newHat.Name = "Hat 1 - NoHat.rbxm"
|
|
end
|
|
elseif (i == 2) then
|
|
if (Hat2ID ~= nil) then
|
|
newHat.Value = Hat2ID
|
|
newHat.Name = "Hat 2 - "..Hat2ID
|
|
else
|
|
newHat.Value = "NoHat.rbxm"
|
|
newHat.Name = "Hat 2 - NoHat.rbxm"
|
|
end
|
|
elseif (i == 3) then
|
|
if (Hat3ID ~= nil) then
|
|
newHat.Value = Hat3ID
|
|
newHat.Name = "Hat 3 - "..Hat3ID
|
|
else
|
|
newHat.Value = "NoHat.rbxm"
|
|
newHat.Name = "Hat 3 - NoHat.rbxm"
|
|
end
|
|
end
|
|
local typeValue = Instance.new("NumberValue")
|
|
typeValue.Name = "CustomizationType"
|
|
typeValue.Parent = newHat
|
|
typeValue.Value = 2
|
|
end
|
|
--T-SHIRT
|
|
local newTShirt = Instance.new("StringValue",newCharApp)
|
|
if (TShirtID ~= nil) then
|
|
newTShirt.Value = TShirtID
|
|
newTShirt.Name = "T-Shirt - "..TShirtID
|
|
else
|
|
newTShirt.Value = "NoTShirt.rbxm"
|
|
newTShirt.Name = "T-Shirt - NoTShirt.rbxm"
|
|
end
|
|
local typeValue = Instance.new("NumberValue")
|
|
typeValue.Name = "CustomizationType"
|
|
typeValue.Parent = newTShirt
|
|
typeValue.Value = 3
|
|
--EXTRA
|
|
local newItem = Instance.new("StringValue",newCharApp)
|
|
if (ItemID ~= nil) then
|
|
newItem.Value = ItemID
|
|
newItem.Name = "Extra - "..ItemID
|
|
else
|
|
newItem.Value = "NoExtra.rbxm"
|
|
newItem.Name = "Extra - NoExtra.rbxm"
|
|
end
|
|
local typeValue = Instance.new("NumberValue")
|
|
typeValue.Name = "CustomizationType"
|
|
typeValue.Parent = newItem
|
|
typeValue.Value = 4
|
|
end
|
|
|
|
function LoadSecurity(playerApp,Player,ServerSecurityLocation)
|
|
local function kick()
|
|
KickPlayer(Player, "Modified Client")
|
|
end
|
|
|
|
if (not Player:FindFirstChild("Security")) then
|
|
kick()
|
|
end
|
|
|
|
if (not playerApp:FindFirstChild("ClientEXEMD5") or not playerApp:FindFirstChild("LauncherMD5") or not playerApp:FindFirstChild("ClientScriptMD5")) then
|
|
kick()
|
|
end
|
|
|
|
for _,newVal in pairs(playerApp:GetChildren()) do
|
|
if (newVal.Name == "ClientEXEMD5") then
|
|
if (newVal.Value ~= ServerSecurityLocation.Security.ClientEXEMD5.Value or newVal.Value == nil) then
|
|
kick()
|
|
break
|
|
end
|
|
end
|
|
|
|
if (newVal.Name == "LauncherMD5") then
|
|
if (newVal.Value ~= ServerSecurityLocation.Security.LauncherMD5.Value or newVal.Value == nil) then
|
|
kick()
|
|
break
|
|
end
|
|
end
|
|
|
|
if (newVal.Name == "ClientScriptMD5") then
|
|
if (newVal.Value ~= ServerSecurityLocation.Security.ClientScriptMD5.Value or newVal.Value == nil) then
|
|
kick()
|
|
break
|
|
end
|
|
end
|
|
end
|
|
end
|
|
|
|
function InitalizeSecurityValues(Location,ClientEXEMD5,LauncherMD5,ClientScriptMD5)
|
|
Location = Instance.new("IntValue", Location)
|
|
Location.Name = "Security"
|
|
|
|
local clientValue = Instance.new("StringValue", Location)
|
|
clientValue.Value = ClientEXEMD5 or ""
|
|
clientValue.Name = "ClientEXEMD5"
|
|
|
|
local launcherValue = Instance.new("StringValue", Location)
|
|
launcherValue.Value = LauncherMD5 or ""
|
|
launcherValue.Name = "LauncherMD5"
|
|
|
|
local scriptValue = Instance.new("StringValue", Location)
|
|
scriptValue.Value = ClientScriptMD5 or ""
|
|
scriptValue.Name = "ClientScriptMD5"
|
|
end
|
|
|
|
function InitalizeClientName(Location)
|
|
local newName = Instance.new("StringValue",Location)
|
|
newName.Value = "2007M"
|
|
newName.Name = "Name"
|
|
end
|
|
|
|
print("ROBLOX Client version '0.3.512.0' loaded.")
|
|
|
|
function CSServer(Port,PlayerLimit,ClientEXEMD5,LauncherMD5,ClientScriptMD5,RemoveTeapotTurret)
|
|
Server = game:GetService("NetworkServer")
|
|
RunService = game:GetService("RunService")
|
|
PlayerService = game:GetService("Players")
|
|
Server:start(Port, 20)
|
|
RunService:run()
|
|
game.Workspace:InsertContent("rbxasset://Fonts//libraries.rbxm")
|
|
PlayerService.MaxPlayers = PlayerLimit
|
|
PlayerService.PlayerAdded:connect(function(Player)
|
|
Player.Chatted:connect(function(msg)
|
|
print(Player.Name.."; "..msg)
|
|
end)
|
|
|
|
if (PlayerService.NumPlayers > PlayerService.MaxPlayers) then
|
|
KickPlayer(Player, "Too many players on server.")
|
|
else
|
|
print("Player '" .. Player.Name .. "' with ID '" .. Player.userId .. "' added")
|
|
Player:LoadCharacter()
|
|
LoadSecurity(newWaitForChild(Player,"Security"),Player,game.Lighting)
|
|
if (Player.Character ~= nil) then
|
|
LoadCharacterNew(newWaitForChild(Player,"Appearance"),Player.Character,RemoveTeapotTurret)
|
|
end
|
|
end
|
|
|
|
coroutine.resume(coroutine.create(function()
|
|
while Player ~= nil do
|
|
wait(0.1)
|
|
if (Player.Character ~= nil) then
|
|
if (Player.Character.Humanoid.Health == 0) then
|
|
wait(5)
|
|
Player:LoadCharacter()
|
|
LoadCharacterNew(newWaitForChild(Player,"Appearance"),Player.Character,RemoveTeapotTurret)
|
|
elseif (Player.Character.Parent == nil) then
|
|
wait(5)
|
|
Player:LoadCharacter()
|
|
LoadCharacterNew(newWaitForChild(Player,"Appearance"),Player.Character,RemoveTeapotTurret)
|
|
end
|
|
end
|
|
end
|
|
end))
|
|
end)
|
|
PlayerService.PlayerRemoving:connect(function(Player)
|
|
print("Player '" .. Player.Name .. "' with ID '" .. Player.userId .. "' leaving")
|
|
end)
|
|
pcall(function() game.Close:connect(function() Server:Stop() end) end)
|
|
InitalizeSecurityValues(game.Lighting,LauncherMD5,ClientEXEMD5,ClientScriptMD5)
|
|
InitalizeClientName(game.Lighting)
|
|
Server.IncommingConnection:connect(IncommingConnection)
|
|
end
|
|
|
|
function CSConnect(UserID,ServerIP,ServerPort,PlayerName,Hat1ID,Hat2ID,Hat3ID,HeadColorID,TorsoColorID,LeftArmColorID,RightArmColorID,LeftLegColorID,RightLegColorID,TShirtID,ShirtID,PantsID,FaceID,HeadID,IconType,ItemID,ClientEXEMD5,LauncherMD5,ClientScriptMD5,Ticket)
|
|
local suc, err = pcall(function()
|
|
client = game:GetService("NetworkClient")
|
|
player = game:GetService("Players"):CreateLocalPlayer(UserID)
|
|
player:SetSuperSafeChat(false)
|
|
pcall(function() player:SetUnder13(false) end)
|
|
pcall(function() player:SetAccountAge(365) end)
|
|
pcall(function() player.Name=PlayerName or "" end)
|
|
game:GetService("Visit")
|
|
InitalizeClientAppearance(player,Hat1ID,Hat2ID,Hat3ID,HeadColorID,TorsoColorID,LeftArmColorID,RightArmColorID,LeftLegColorID,RightLegColorID,TShirtID,ShirtID,PantsID,FaceID,HeadID,ItemID)
|
|
InitalizeSecurityValues(player,LauncherMD5,ClientEXEMD5,ClientScriptMD5)
|
|
end)
|
|
|
|
local function dieerror(errmsg)
|
|
game:SetMessage(errmsg)
|
|
wait(math.huge)
|
|
end
|
|
|
|
if not suc then
|
|
dieerror(err)
|
|
end
|
|
|
|
local function disconnect(peer,lostconnection)
|
|
game:SetMessage("You have lost connection to the game")
|
|
end
|
|
|
|
local function connected(url, replicator)
|
|
replicator.Disconnection:connect(disconnect)
|
|
local marker = nil
|
|
local suc, err = pcall(function()
|
|
game:SetMessageBrickCount()
|
|
marker = replicator:SendMarker()
|
|
end)
|
|
if not suc then
|
|
dieerror(err)
|
|
end
|
|
marker.Received:connect(function()
|
|
local suc, err = pcall(function()
|
|
game:ClearMessage()
|
|
end)
|
|
if not suc then
|
|
dieerror(err)
|
|
end
|
|
end)
|
|
end
|
|
|
|
local function rejected()
|
|
dieerror("Failed to connect to the Game. (Connection rejected)")
|
|
end
|
|
|
|
local function failed(peer, errcode, why)
|
|
dieerror("Failed to connect to the Game. (ID="..errcode.." ["..why.."])")
|
|
end
|
|
|
|
local suc, err = pcall(function()
|
|
game:SetMessage("Connecting to server...")
|
|
client.ConnectionAccepted:connect(connected)
|
|
client.ConnectionRejected:connect(rejected)
|
|
client.ConnectionFailed:connect(failed)
|
|
client:Connect(ServerIP,ServerPort, 0, 20)
|
|
end)
|
|
|
|
if not suc then
|
|
local x = Instance.new("Message")
|
|
x.Text = err
|
|
x.Parent = workspace
|
|
wait(math.huge)
|
|
end
|
|
end
|
|
|
|
function CSSolo(UserID,PlayerName,Hat1ID,Hat2ID,Hat3ID,HeadColorID,TorsoColorID,LeftArmColorID,RightArmColorID,LeftLegColorID,RightLegColorID,TShirtID,ShirtID,PantsID,FaceID,HeadID,IconType,ItemID)
|
|
local plr = game.Players:CreateLocalPlayer(UserID)
|
|
game:GetService("RunService"):run()
|
|
game.Workspace:InsertContent("rbxasset://Fonts//libraries.rbxm")
|
|
plr.Name = PlayerName
|
|
plr:LoadCharacter()
|
|
InitalizeClientAppearance(plr,Hat1ID,Hat2ID,Hat3ID,HeadColorID,TorsoColorID,LeftArmColorID,RightArmColorID,LeftLegColorID,RightLegColorID,TShirtID,ShirtID,PantsID,FaceID,HeadID,ItemID)
|
|
LoadCharacterNew(newWaitForChild(plr,"Appearance"),plr.Character,false)
|
|
game:GetService("Visit")
|
|
while true do
|
|
wait(0.001)
|
|
if (plr.Character ~= nil) then
|
|
if (plr.Character.Humanoid.Health == 0) then
|
|
wait(5)
|
|
plr:LoadCharacter()
|
|
LoadCharacterNew(newWaitForChild(plr,"Appearance"),plr.Character,RemoveTeapotTurret)
|
|
elseif (plr.Character.Parent == nil) then
|
|
wait(5)
|
|
plr:LoadCharacter() -- to make sure nobody is deleted.
|
|
LoadCharacterNew(newWaitForChild(plr,"Appearance"),plr.Character,RemoveTeapotTurret)
|
|
end
|
|
end
|
|
end
|
|
end
|
|
|
|
_G.CSServer=CSServer
|
|
_G.CSConnect=CSConnect
|
|
_G.CSSolo=CSSolo |