orb script FE

math.randomseed(tick())
local plr = owner; local char = plr.Character;
if not char then error("Your character does not exist.") end
function writeToObject(name,value,typ)
	local stringV = Instance.new(typ.."Value")
	stringV.Name = name
	stringV.Value = value
	return stringV
end
local hum = char:FindFirstChildOfClass("Humanoid")
char["Body Colors"]:Destroy()
local txt = Instance.new("BillboardGui", char.Head)
txt.Adornee = nil
txt.Name = "NameDetect"
txt.Size = UDim2.new(4, 0, 1.2, 0)
txt.StudsOffset = Vector3.new(-8, 5.333333333333333, 0)
local text = Instance.new("TextLabel", txt)
text.Size = UDim2.new(5, 0, 3.5, 0)
text.FontSize = "Size8"
text.TextScaled = true
text.TextTransparency = 0
text.BackgroundTransparency = 1
text.TextTransparency = 0
text.TextStrokeTransparency = 0
text.Font = Enum.Font.Arcade
text.TextStrokeColor3 = Color3.new(0, 0, 0)
text.TextColor3 = Color3.new(1, 1, 1)
text.Text = "Neutral"
char.Head.face.Texture = "http://www.roblox.com/asset/?id=287976694"
local music = Instance.new("Sound",char.Torso)
music.SoundId = "rbxassetid://2735155614"
music.Volume = "inf"
music.Looped = true
music:Play()
local orb = Instance.new("Part",char)
orb.Name = "ORB"
orb.Transparency = 0.55
orb.Shape = "Ball"
orb.BrickColor = BrickColor.new("Institutional white")
orb.Size = Vector3.new(1.5,1.5,1.5)
orb.CanCollide = false
orb.Material = "SmoothPlastic"
local weld = Instance.new("Weld",orb)
weld.Part0 = orb
weld.Part1 = char.Torso
weld.C0 = CFrame.new(0,0,-2)
local textrotatespeed = 5
local x1 = coroutine.wrap(function()
	while true do
		for _ = 1,10 do
			weld.C0 = weld.C0 - Vector3.new(0,-0.02,0)
			wait(0.075)
		end
		for _ = 1,10 do
			weld.C0 = weld.C0 + Vector3.new(0,-0.020)
			wait(0.075)
		end
		wait()
	end
end)
x1()
local x3 = coroutine.wrap(function()
	while true do
		text.Rotation = math.random((-textrotatespeed),textrotatespeed)
		wait(0.1/(textrotatespeed-4))
	end
end)
x3()
function bubbleOrb(color)
	local orbOut = orb:Clone()
	local orbOutW = Instance.new("Weld",orbOut)
	orbOutW.Part0 = orbOut
	orbOutW.Part1 = orb
	orbOut.Color = color
	orb.Color = color
	local x2 = coroutine.wrap(function()
		for _ = 1,10 do
			wait(0.1)
			orbOut.Size = orbOut.Size + Vector3.new(0.075)
			orbOut.Transparency = orbOut.Transparency + 0.1
		end
		orbOut:Destroy()
	end)
	x2()
	text.TextColor3 = color
end
switchb = false
local laser = Instance.new("Tool",plr.Backpack)
laser.Name = "Basic Laser"
laser.CanBeDropped = false
laser.RequiresHandle = false
laserb = false
laser.Activated:connect(function()
	if laserb == false then
		laserb = true
		local s1
		local hitenabled = true
		ypcall(function()
			s1 = Instance.new("Sound",char)
			s1.SoundId = "rbxassetid://287142895"
			s1.Volume = "inf"
			s1:Play()
		end)
		music.Volume = 5
		local laserp = Instance.new("Part",char)
		laserp.CanCollide = false
		laserp.BrickColor = BrickColor.new("Institutional white")
		laserp.Size = Vector3.new(1,1,10)
		laserp.Material = "Neon"
		laserp.Transparency = 0.55
		if switchb == 2 then
			laserp.Size = Vector3.new(4,4,30)
		end
		local laserpl = Instance.new("Part",char)
		laserpl.CanCollide = false
		laserpl.BrickColor = BrickColor.new("Institutional white")
		laserpl.Size = Vector3.new(2,2,2)
		if switchb == 2 then
			laserpl.Size = Vector3.new(8,8,8)
		end
		laserpl.Material = "Neon"
		laserpl.Transparency = 0.55
		if switchb == true then
			laserp.BrickColor = BrickColor.new("Rust")
			laserp.Material = "CorrodedMetal"
			laserpl.BrickColor = BrickColor.new("Rust")
			laserpl.Material = "CorrodedMetal"
		end
		if switchb == 1 then
			laserp.BrickColor = BrickColor.new("Royal purple")
			laserpl.BrickColor = BrickColor.new("Royal purple")
		end
		if switchb == 2 then
			local x4 = coroutine.wrap(function()
				while true do
					wait(0.2)
					local chosenColor = writeToObject("RCC",BrickColor.Random().Color,"Color3")
					laserp.Color = chosenColor.Value
					laserpl.Color = chosenColor.Value
					chosenColor:Destroy()
				end
			end)
			x4()
		end
		local laserpw = Instance.new("Weld",laserp)
		laserpw.Part0 = laserp
		laserpw.Part1 = char.Torso
		laserpw.C0 = CFrame.new(0,0,5)
		if switchb == 2 then
			laserpw.C0 = CFrame.new(0,0,15)
		end
		local laserpwl = Instance.new("Weld",laserpl)
		laserpwl.Part0 = laserpl
		laserpwl.Part1 = char.Torso
		laserpwl.C0 = CFrame.new(0,0,11)
		if switchb == 2 then
			laserpwl.C0 = CFrame.new(0,0,32)
		end
		laserpl.Touched:connect(function(part)
			if(part.Parent:FindFirstChildOfClass("Humanoid"))and(hitenabled == true) then
				part.Parent:FindFirstChildOfClass("Humanoid").Health = part.Parent:FindFirstChildOfClass("Humanoid").Health - (part.Parent:FindFirstChildOfClass("Humanoid").MaxHealth/10)
			end
			if switchb == true then
				part.Material = "CorrodedMetal"
				part.BrickColor = BrickColor.new("Rust")
			end
			if switchb == 1 then
				part.Material = "Neon"
				part.BrickColor = BrickColor.new("Royal purple")
				ypcall(function()
					part.Parent:FindFirstChildOfClass("Humanoid"):Destroy()
				end)
			end
		end)
		laserp.Touched:connect(function(part)
			if(part.Parent:FindFirstChildOfClass("Humanoid"))and(hitenabled == true) then
				part.Parent:FindFirstChildOfClass("Humanoid").Health = part.Parent:FindFirstChildOfClass("Humanoid").Health - (part.Parent:FindFirstChildOfClass("Humanoid").MaxHealth/10)
			end
			if switchb == true then
				part.Material = "CorrodedMetal"
				part.BrickColor = "CorrodedMetal"
			end
			if switchb == 1 then
				part.Material = "Neon"
				part.BrickColor = BrickColor.new("Royal purple")
				ypcall(function()
					part.Parent:FindFirstChildOfClass("Humanoid"):Destroy()
				end)
			end
		end)
		if switchb == 2 then
			wait(2)
		else
			wait(0.2)
		end
		laserp:Destroy()
		laserpl:Destroy()
		hitenabled = false
		wait(0.3)
		laserb = false
	end
end)
local switch = Instance.new("Tool",plr.Backpack)
switch.CanBeDropped = false
switch.RequiresHandle = false
switch.Name = "Switch Modes"
switchb1 = false
switch.Activated:connect(function()
	if switchb1 == false then
		if switchb == false then
			switchb = true
			switchb1 = true
			bubbleOrb(BrickColor.new("Light orange").Color)
			text.Text = "Ruined"
			music.SoundId = "rbxassetid://885996042"
			char.Head.face.Texture = "http://www.roblox.com/asset/?id=122246017"
			text.Font = "Bodoni"
			laser.Name = "Rust Laser"
			wait(0.5)
			switchb1 = false
		elseif switchb == true then
			switchb = 1
			switchb1 = true
			bubbleOrb(BrickColor.new("Royal purple").Color)
			text.Text = "Corrupt"
			music.SoundId = "rbxassetid://2736627515"
			char.Head.face.Texture = "http://www.roblox.com/asset/?id=2785219666"
			text.Font = Enum.Font.Gotham
			laser.Name = "Corrupt Laser"
			wait(0.5)
			switchb1 = false
		elseif switchb == 2 then
			switchb = false
			switchb1 = true
			bubbleOrb(BrickColor.new("Institutional white").Color)
			text.Text = "Neutral"
			music.SoundId = "rbxassetid://2735155614"
			char.Head.face.Texture = "http://www.roblox.com/asset/?id=287976694"
			text.Font = "Arcade"
			laser.Name = "Basic Laser"
			wait(0.5)
			hum.WalkSpeed = 16
			switchb1 = false
		elseif switchb == 1 then
			switchb = 2
			switchb1 = true
			bubbleOrb(BrickColor.Random().Color)
			text.Text = "CHAOTIC"
			music.SoundId = "rbxassetid://2525700576"
			char.Head.face.Texture = "http://www.roblox.com/asset/?id=1891493691"
			text.Font = Enum.Font.Arcade
			laser.Name = "Huge Laser"
			wait(0.5)
			switchb1 = false
			hum.WalkSpeed = 200
		end
	end
end)
while true do
	wait(0.1)
	if switchb == 2 then
		local chosenColor = writeToObject("RCC",BrickColor.Random().Color,"Color3")
		orb.Color = chosenColor.Value
		text.TextColor3 = chosenColor.Value
		chosenColor:Destroy()
	end
end