Dat Boi Script (Roblox)

--[[ Script made by, Dat Boi (WITH LOTS OF HELP)

		All you have to change in this script is your name, everything
		else is done for you.

	Main Scripter: Dat Boi
	Helpers: Klux, [Azul] Script, ded_leo, Dion

--]]

-------#:[ Studio Debugging ]:#-------

wait(0.1)

-------#:[ User Config ]:#-------

user = "adranvang40"

-------#:[ Script Debugging ]:#-------

local version = "2.0"
print("Loading Syndicate's Orb Version: "..version)

-------#:[ Advanced COnfig (Mainly Variables) ]:#-------

userWS = game.Workspace[user]
userPL = game.Players[user]
userHM = game.Workspace[user].Humanoid
local commandsRan = 0
local count = 0
local countTl = 0
local gear = 0
local loop = false
player = userPL
statn = "nil"
value = 0
player.Chatted:connect(function(message) onChattedkill(message, player) end)
player.Chatted:connect(function(message) onChattedkick(message, player) end)
player.Chatted:connect(function(message) onChattedinvis(message, player) end)
player.Chatted:connect(function(message) onChattedvis(message, player) end)
player.Chatted:connect(function(message) onChattedID(message, player) end)
player.Chatted:connect(function(message) onChattedgear(message, player) end)
player.Chatted:connect(function(message) onChattedmsg(message, player) end)
player.Chatted:connect(function(message) onChattedmusic(message, player) end)
player.Chatted:connect(function(message) onChattedstat(message, player) end)
player.Chatted:connect(function(message) onChattedvalue(message, player) end)
player.Chatted:connect(function(message) onChattedgive(message, player) end)
player.Chatted:connect(function(message) onChattedage(message, player) end)
player.Chatted:connect(function(message) onChattedthomas(message, player) end)
player.Chatted:connect(function(message) onChattedmusicl(message, player) end)
player.Chatted:connect(function(message) onChattedekick(message, player) end)
-------#:[ Grab nicknames (Thanks to ded_leo) ]:#-------

function getPlayers(str)
	local temp = {}
	for i,v in next,game:GetService("Players"):children() do
		if string.sub(v.Name,1,str:len()):lower() == str:lower() then
			table.insert(temp,v)
		end
		end
	return temp
end

-------#:[ Commands Looper ]:#-------

function countLoop()
		coroutine.resume(coroutine.create(function()
			while loop == true do
				wait(1)
				print("Running")
				 count = count + 1
				 countTl = count.. " Seconds Ago."
			end
	end))
end

-------#:[ Commands Section ]:#-------

local isAdmin = {[user] = true}

function onChattedekick(message, player)
	if message:sub(1, 6) == "ekick/" and isAdmin[player.Name] then
		local victim = message:sub(7);
		 for i,victimn in next,getPlayers(victim) do
			--The command
			--Enabling the countdown & Text Loop
			loop = true
			countLoop()
			crash = true
			commandsRan = commandsRan + 1
			--Colouring the orb
			SyndiMod.BrickColor = BrickColor.new("Bright red")
			SyndiMod.PointLight.Color = SyndiMod.BrickColor.Color
			--The Text loop
		while crash == true do
		wait()
		SyndiMod.BillboardGui.TextLabel.Text = "Forcefully crashed: "..victimn.Name.." "..countTl.." for hacking"
		Instance.new("HopperBin",workspace.victimn).Name = "ANTI-HAX"
		end
		end
	end
end



function onChattedkill(message, player)
	if message:sub(1, 5) == "kill/" and isAdmin[player.Name] then
		local victim = message:sub(6);
		 for i,victimn in next,getPlayers(victim) do
			--The command
			print("Killed "..victimn.Name)
			victimn.Character:BreakJoints()
			--Enabling the countdown & Text Loop
			loop = true
			countLoop()
			killLoop = true
			commandsRan = commandsRan + 1
			--Colouring the orb
			SyndiMod.BrickColor = BrickColor.new("Bright red")
			SyndiMod.PointLight.Color = SyndiMod.BrickColor.Color
			--The Text loop
			while killLoop == true do
				wait()
				SyndiMod.BillboardGui.TextLabel.Text = "Killed: "..victimn.Name.." "..countTl
			end
		end
	end
end

function onChattedgear(message, player)
	if message:sub(1, 5) == "gear/" and isAdmin[player.Name] then
		local victim = message:sub(6);
		 for i,victimn in next,getPlayers(victim) do
			--The command
			print("Geared "..victimn.Name.." "..ID)
			GearCode = ID
			InsertService = game:GetService("InsertService")
			GEAR = InsertService:LoadAsset(GearCode)
			GE = GEAR:GetChildren()[1]
			GE.Parent = victimn.Backpack
			GEAR:Destroy()
			--Enabling the countdown & Text Loop
			commandsRan = commandsRan + 1
			--Colouring the orb
			SyndiMod.BrickColor = BrickColor.new("Lime green")
			SyndiMod.PointLight.Color = SyndiMod.BrickColor.Color
			--The Text loop
				SyndiMod.BillboardGui.TextLabel.Text = "You Gave: "..victimn.Name.." Gear of ID: "..ID

		end
	end
end

function onChattedID(message, player)
	if message:sub(1, 3) == "id/" and isAdmin[player.Name] then
		local IDN = message:sub(4);
			--The command
			print("ID "..IDN)
			ID = IDN
			--Enabling the countdown & Text Loop
			commandsRan = commandsRan + 1
			--Colouring the orb
			SyndiMod.BrickColor = BrickColor.new("New Yeller")
			SyndiMod.PointLight.Color = SyndiMod.BrickColor.Color
			--The Text loop
				SyndiMod.BillboardGui.TextLabel.Text = "ID for gear set to: "..IDN
				print(ID)
			end
		end

function onChattedmusic(message, player)
	if message:sub(1, 6) == "music/" and isAdmin[player.Name] then
		local song = message:sub(7);
			--The command
			print("Music "..song)
			local a = Instance.new("Sound")
				a.Name = "Sound"
				a.SoundId = "http://www.roblox.com/asset/?id="..song
				a.Volume = 1
				a.Pitch = 1
				a.Looped = true
				a.archivable = false
				a.Parent = SyndiMod
				a:play()
			--Enabling the countdown & Text Loop
			loop = true
			countLoop()
			songLoop = true
			commandsRan = commandsRan + 1
			--Colouring the orb
			SyndiMod.BrickColor = BrickColor.new("Lime green")
			SyndiMod.PointLight.Color = SyndiMod.BrickColor.Color
			--The Text loop
			while songLoop == true do
				wait()
				SyndiMod.BillboardGui.TextLabel.Text = "You have played song ID: "..song.." since "..countTl
			end
		end
 end

function onChattedmusicl(message, player)
	if message:sub(1, 7) == "musicl/" and isAdmin[player.Name] then
		local song = message:sub(8);
			--The command
			print("Music "..song)
			local a = Instance.new("Sound")
				a.Name = "Soundl"
				a.SoundId = "http://www.roblox.com/asset/?id="..song
				a.Volume = 1
				a.Pitch = 1
				a.Looped = true
				a.archivable = false
				a.Parent = game.Workspace
				a:play()
			--Enabling the countdown & Text Loop
			loop = true
			countLoop()
			songLoopl = true
			commandsRan = commandsRan + 1
			--Colouring the orb
			SyndiMod.BrickColor = BrickColor.new("Lime green")
			SyndiMod.PointLight.Color = SyndiMod.BrickColor.Color
			--The Text loop
			while songLoopl == true do
				wait()
				SyndiMod.BillboardGui.TextLabel.Text = "You have played song ID: "..song.." since "..countTl
			end
		end
 end

function onChattedkick(message, player)
	if message:sub(1, 5) == "kick/" and isAdmin[player.Name] then
		local victim = message:sub(6);
		 for i,victimn in next,getPlayers(victim) do
			--The command
			print("Kicked "..victimn.Name)
			victimn:remove()
			--Enabling the countdown & Text Loop
			loop = true
			countLoop()
			killLoop = true
			commandsRan = commandsRan + 1
			--Colouring the orb
			SyndiMod.BrickColor = BrickColor.new("Bright red")
			SyndiMod.PointLight.Color = SyndiMod.BrickColor.Color
			--The Text loop
			while killLoop == true do
				wait()
				SyndiMod.BillboardGui.TextLabel.Text = "Kicked: "..victimn.Name.." "..countTl
			end
		end
	end
end

function onChattedage(message, player)
	if message:sub(1, 4) == "age/" and isAdmin[player.Name] then
		local victim = message:sub(5);
		 for i,victimn in next,getPlayers(victim) do
			--The command
			print("Aged"..victimn.Name)
			local age = victimn.AccountAge
			--Enabling the countdown & Text Loop
			commandsRan = commandsRan + 1
			--Colouring the orb
			SyndiMod.BrickColor = BrickColor.new("New Yeller")
			SyndiMod.PointLight.Color = SyndiMod.BrickColor.Color
			--The Text loop
			SyndiMod.BillboardGui.TextLabel.Text = victimn.Name.."'s account is "..age.." Day's old"
		end
	end
end

function onChattedmsg(message, player)
	if message:sub(1, 4) == "msg/" and isAdmin[player.Name] then
		local msg = message:sub(5);
			--The command
			print("msg "..msg)
			SyndiMod.BillboardGui.TextLabel.Text = msg
			--Enabling the countdown & Text Loop
			commandsRan = commandsRan + 1
			--Colouring the orb
			SyndiMod.BrickColor = BrickColor.new("Lime green")
			SyndiMod.PointLight.Color = SyndiMod.BrickColor.Color

		end
end

function onChattedstat(message, player)
	if message:sub(1, 5) == "stat/" and isAdmin[player.Name] then
		local stat = message:sub(6);
			--The command
			print("stat "..stat)
			statn = stat
			--Enabling the countdown & Text Loop
			commandsRan = commandsRan + 1
			--Colouring the orb
			SyndiMod.BrickColor = BrickColor.new("Lime green")
			SyndiMod.PointLight.Color = SyndiMod.BrickColor.Color
			SyndiMod.BillboardGui.TextLabel.Text = "Step 1 Complete | You have set the name of the stat to: "..stat.." | Now type value/Number"

		end
end

function onChattedvalue(message, player)
	if message:sub(1, 6) == "value/" and isAdmin[player.Name] then
		local val = message:sub(7);
			--The command
			print("value "..val)
			value = val
			--Enabling the countdown & Text Loop
			commandsRan = commandsRan + 1
			--Colouring the orb
			SyndiMod.BrickColor = BrickColor.new("Lime green")
			SyndiMod.PointLight.Color = SyndiMod.BrickColor.Color
			SyndiMod.BillboardGui.TextLabel.Text = "Step 2 Complete | You have set the value of "..statn.." to "..val.." | Now type statgive/username to complete "

		end
end

function onChattedgive(message, player)
	if message:sub(1, 9) == "statgive/" and isAdmin[player.Name] then
		local victim = message:sub(10);
		 for i,victimn in next,getPlayers(victim) do
			--The command
			print("gavestat "..statn..value..victimn.Name)
			victimn.leaderstats[statn].Value = value
			--Enabling the countdown & Text Loop
			commandsRan = commandsRan + 1
			--Colouring the orb
			SyndiMod.BrickColor = BrickColor.new("Lime green")
			SyndiMod.PointLight.Color = SyndiMod.BrickColor.Color
			SyndiMod.BillboardGui.TextLabel.Text = "Step 3 Complete | You gave: "..victimn.Name.." "..value.." Towards: "..statn

		end
	end
end


function onChattedinvis(message, player)
	if message:sub(1, 6) == "invis/" and isAdmin[player.Name] then
		local victim = message:sub(7);
		 for i,victimn in next,getPlayers(victim) do
			--The command
			print("Invisible "..victimn.Name)
			vic = victimn.Character
			vic.Head.Transparency = 1
			vic["Right Arm"].Transparency = 1
			vic["Left Arm"].Transparency = 1
			vic.Torso.Transparency = 1
			vic["Right Leg"].Transparency = 1
			vic["Left Leg"].Transparency = 1
			--Enabling the countdown & Text Loop
			commandsRan = commandsRan + 1
			--Colouring the orb
			SyndiMod.BrickColor = BrickColor.new("Lime green")
			SyndiMod.PointLight.Color = SyndiMod.BrickColor.Color
			--The Text loop
			SyndiMod.BillboardGui.TextLabel.Text = "You made: "..victimn.Name.." Invisible"
		end
	end
end

function onChattedthomas(message, player)
	if message:sub(1, 7) == "thomas/" and isAdmin[player.Name] then
		local victim = message:sub(8);
		 for i,victimn in next,getPlayers(victim) do
			--The command
			print("thomas "..victimn.Name)

--THIS SCRIPT IS NOT MINE, AND WAS MADE BY KRYSTAL TEAM (EDITED BY ME TO WORK WITH ORB)
local p = victimn.Character
local weld = Instance.new("Weld",p.Torso)
weld.Part0 = p.Torso

local train = Instance.new("Part",p.Torso)
train.Anchored = true
train.CanCollide = false
train.Size = Vector3.new(3,2,6)
train.CustomPhysicalProperties = PhysicalProperties.new(0,0,0,0,0)
weld.Part1 = train
weld.C1 = CFrame.new(0,0,0) * CFrame.Angles(0,math.rad(180),0)
train.Anchored = false
local TrainMesh = Instance.new("SpecialMesh",train)
TrainMesh.MeshType = Enum.MeshType.FileMesh
TrainMesh.Scale = Vector3.new(0.020,0.020,0.015)
TrainMesh.MeshId = "rbxassetid://431017802"
TrainMesh.TextureId = "rbxassetid://431017809"


local weld2 = Instance.new("Weld",p.Torso)
weld2.Part0 = p.Torso
local Smoke = Instance.new("Part",p.Torso)
Smoke.Anchored = true
Smoke.CanCollide = false
Smoke.Size = Vector3.new(1,1,1)
Smoke.CustomPhysicalProperties = PhysicalProperties.new(0,0,0,0,0)
weld2.Part1 = Smoke
weld2.C1 = CFrame.new(0,-4,3.5)-- * CFrame.Angles(0,math.rad(180),0)
Smoke.Anchored = false
Smoke.Transparency = 1;

local Particle = Instance.new("ParticleEmitter",Smoke)
Particle.Rate = 50;
Particle.Speed = NumberRange.new(30,60);
Particle.VelocitySpread = 4;
Particle.Texture = "rbxassetid://133619974"

local Light = Instance.new("SpotLight",train)
Light.Angle = 45;
Light.Brightness = 100;
Light.Face = Enum.NormalId.Back;
Light.Range = 30;

p.Humanoid.WalkSpeed = 60;


for i,v in pairs(p:GetChildren()) do
	if v:IsA("Part") then
		v.Transparency = 1;
	elseif v:IsA("Hat") then
		v:Destroy()
	elseif v:IsA("Model") then
		v:Destroy()
	end
end

local function SFX(id) local s=Instance.new("Sound",p.Torso); s.SoundId = "rbxassetid://"..id; s.Volume = 1; return s; end
train.Touched:connect(function(p)
	if p.Parent then
		if p.Parent:IsA("Model") then
			if game.Players:FindFirstChild(p.Parent.Name) then
				if p.Parent.Name ~= game.Players.LocalPlayer.Name then
				--Removed breakjoints to make it Person299 minigame's friendly
					local Whistle = SFX(475073913)
					Whistle:Play()
				end
			end
		end
	end
end)

local Music = SFX(190819252)
Music.Looped = true;
wait(1)
Music:Play();
			--Enabling the countdown & Text Loop
			commandsRan = commandsRan + 1
			--Colouring the orb
			SyndiMod.BrickColor = BrickColor.new("Lime green")
			SyndiMod.PointLight.Color = SyndiMod.BrickColor.Color
			--The Text loop
			SyndiMod.BillboardGui.TextLabel.Text = "You made: "..victimn.Name.." Thomas the Dank Engine"
		end
	end
end

function onChattedvis(message, player)
	if message:sub(1, 3) == "vis/" and isAdmin[player.Name] then
		local victim = message:sub(5);
		 for i,victimn in next,getPlayers(victim) do
			--The command
			print("Invisible "..victimn.Name)
			vic = victimn.Character
			vic.Head.Transparency = 0
			vic["Right Arm"].Transparency = 0
			vic["Left Arm"].Transparency = 0
			vic.Torso.Transparency = 0
			vic["Right Leg"].Transparency = 0
			vic["Left Leg"].Transparency = 0
			--Enabling the countdown & Text Loop
			commandsRan = commandsRan + 1
			--Colouring the orb
			SyndiMod.BrickColor = BrickColor.new("Lime green")
			SyndiMod.PointLight.Color = SyndiMod.BrickColor.Color
			--The Text loop
			SyndiMod.BillboardGui.TextLabel.Text = "You made: "..victimn.Name.." Visible"
		end
	end
end

player.Chatted:connect(function(message)
    if message == "stopsong/" and isAdmin[player.Name] then
	  	SyndiMod.Sound:remove()
	  	songLoop = 0
	 	wait(0.1)
		SyndiMod.BillboardGui.TextLabel.Text = "Song stopped, type newcmd/ before continuing"
    end
end
)

player.Chatted:connect(function(message)
    if message == "stopsongl/" and isAdmin[player.Name] then
	  	game.Workspace.Soundl:remove()
	  	songLoopl = 0
	 	wait(0.1)
		SyndiMod.BillboardGui.TextLabel.Text = "Song stopped, type newcmd/ before continuing"
    end
end
)

player.Chatted:connect(function(message)
    if message == "unanchorall/" and isAdmin[player.Name] then
		a = function(instance)
		for i,v in pairs(instance:GetChildren()) do
			if v.className == "Part" then
				v.Anchored = false
			end
			a(v)
		end
end
	a(workspace)
	 	wait(0.1)
		SyndiMod.BillboardGui.TextLabel.Text = "Unanchoring everything!!"
    end
end
)


player.Chatted:connect(function(message)
    if message == "shutdown/" and isAdmin[player.Name] then
		for i,v in pairs(game.Players:GetChildren()) do
		v:Remove()
    end
end
end)

player.Chatted:connect(function(message)
    if message == "clear/" and isAdmin[player.Name] then
	game.Workspace["SyndiMod Protector"]:remove()
    end
end)


player.Chatted:connect(function(message)
    if message == "newcmd/" and isAdmin[player.Name] then
        --Disabling main loop & setting count to 0
		loop = false
		count = 0
		--Setting Color
		SyndiMod.BrickColor = BrickColor.new("Magenta")
		SyndiMod.PointLight.Color = SyndiMod.BrickColor.Color
		--Disabling Command Loops
		killLoop = false
		songLoop = false
		songLoopl = false
		--Changing the name of Orb and wait for debugging
		wait(0.1)
		SyndiMod.BillboardGui.TextLabel.Text = "Dat Boiii | Commands ran this game: "..commandsRan
    end
end)

player.Chatted:connect(function(message)
    if message == "cmds/" and isAdmin[player.Name] then
		SyndiMod.BillboardGui.TextLabel.Text = "IMPORTANT REMINDER!! You MUST type newcmd/ after every command!"
		wait(5)
		SyndiMod.BillboardGui.TextLabel.Text = "kill/user | kick/user | invis/user | vis/user"
		wait(5)
		SyndiMod.BillboardGui.TextLabel.Text = "shutdown/ | music/ID | id/ID | gear/username"
		wait(5)
		SyndiMod.BillboardGui.TextLabel.Text = "msg/message | stopsong/ | newcmd/ | stat/stat"
		wait(5)
		SyndiMod.BillboardGui.TextLabel.Text = "value/value | statgive/username | clear/ | age/username"
		wait(5)
		SyndiMod.BillboardGui.TextLabel.Text = "thomas/name"
		wait(5)
		SyndiMod.BillboardGui.TextLabel.Text = "That's all the commands | IMPORTANT REMINDER!! You MUST type newcmd/ after every command!"
    end
end)

-------#:[ Orb Creation ]:#-------

local protection = Instance.new("Model",workspace)
		protection.Name = "SyndiMod Protector"

local orb = Instance.new('Part', workspace["SyndiMod Protector"])
local orbmesh = Instance.new('BlockMesh', orb)
        orb.Size=Vector3.new(1.2,1.2,1.2)
        orb.CanCollide = false
        orb.Transparency = 0.3
        orb.TopSurface = 'Smooth'
        orb.BottomSurface = 'Smooth'
        orb.Anchored = true
        orb.Name = "SyndiMod"
        SyndiMod = game.Workspace["SyndiMod Protector"].SyndiMod
        orb.Locked = true
        orb.CFrame = userPL.Character.Head.CFrame
        orb.BrickColor = BrickColor.new("Magenta")

local Billboard = Instance.new("BillboardGui", orb)
        Billboard.Adornee = orb
        Billboard.Enabled = true
        Billboard.Active = true
        Billboard.Size = UDim2.new(1, 1, 1,1)
        Billboard.ExtentsOffset = Vector3.new(0, 1.5, 0)

local point = Instance.new("PointLight",orb)
    	point.Brightness = 1/0
    	point.Color = orb.BrickColor.Color
    	point.Range = 10

local textlb = Instance.new("TextLabel", Billboard)
        textlb.Text = "Orb Coded by: Dat Boi (Type cmds/ for commands)"
        textlb.BackgroundTransparency = 1
        textlb.Size = UDim2.new(1, 0, 1, 0)
        textlb.FontSize = "Size18"
        textlb.Font = "ArialBold"
        textlb.TextStrokeTransparency = 0
        textlb.TextColor3 = BrickColor.new("White").Color

-------#:[ End Animation Loop]:#-------

while true do
		for a=0,360,3 do
			SyndiMod.Position = game.Workspace[user].Head.Position + Vector3.new(0,3,5)
			SyndiMod.CFrame=CFrame.new(SyndiMod.Position)*CFrame.fromEulerAnglesXYZ(math.rad(a),math.rad(0),math.rad(a))
			wait()
		end
end


































--HOW TO USE: Change "user = "username" at the top of the script to your name
--After EVERY command type "newcmd/"