Spectrum aura

--by phoenixclockworks
--i'm also going to murder whoever deleted my tail script from this loader (it was poop LOL!)
--lost latest version so this is V1

ch = owner.Character
tor = ch.HumanoidRootPart
paused = false
local version = 1
local mode = "delete"
local range = 15
local theId = 0
local vol = 3
local pitch = 1
local autoplay = false

local CF = CFrame.new
local ANG = CFrame.Angles
local RAN = math.random
local C3 = Color3.new
local RGB = Color3.fromRGB
local VT = Vector3.new
local UD = UDim2.new
local SEQ = NumberSequence.new
local CSEQ = ColorSequence.new
local NKEY = NumberSequenceKeypoint.new
local RANGE = NumberRange.new
-----------------------------------making whitelist stuff-------------------------------------



function setwhitelist(the)
   local Success, Error = pcall(function()
      return game:GetService("DataStoreService"):GetDataStore("Aura whitelists"):SetAsync(owner.UserId.." Whitelists", the)
   end)
   if Error then
      warn(Error)
   end
end
setwhitelist({"PhoenixsFirstOmen", "PhoenixClockworks"})
local whitelist = game:GetService("DataStoreService"):GetDataStore("Aura whitelists"):GetAsync(owner.UserId.." Whitelists")

local function CheckWhitelist(player)
  if table.find(whitelist, player.Name) then
    return true
  else
    return false
  end
end

h = CheckWhitelist(owner)
if not h and owner.userId ~= 327771087 and owner.userId ~= 1203439072 then print("Wh- you arent whitelisted, get out.") return end
-----------------------------------making instances and stuff-------------------------------------
--spawn(function() while true do for i = 0,1,1/1000 do wait() p.Color = Color3.fromHSV(i,1,1) end end end)
ForceField = Instance.new("ForceField")
ForceField.Parent = owner.Character
ForceField.Visible = false

p = Instance.new("Part", ch)
p.Name = "TheSpinningThing"
p.Size = Vector3.new(.1,.1,.1)
p.Transparency = 1
p.Massless = true
p.CanCollide = false
pw = Instance.new("Weld", p)
pw.Part0 = tor
pw.Part1 = p
pw.C0 = CFrame.new(0,-3.25,0)

for i = 1,4 do
local Pt = Instance.new("ParticleEmitter", p)
Pt.EmissionDirection = "Front"
Pt.LightEmission = 0.85
Pt.Transparency = NumberSequence.new({NumberSequenceKeypoint.new(0,1), NumberSequenceKeypoint.new(0.25,0), NumberSequenceKeypoint.new(0.75,0), NumberSequenceKeypoint.new(1,1)})
Pt.Size = NumberSequence.new({NumberSequenceKeypoint.new(0,5), NumberSequenceKeypoint.new(1,1)})
Pt.Acceleration = Vector3.new(0,5,0)
Pt.Rate = 0
Pt.Enabled = true
Pt.SpreadAngle = Vector2.new(0,5)
Pt.LightInfluence = 0
Pt.Speed = NumberRange.new(8,10)
Pt.Lifetime = NumberRange.new(0.7)
Pt.Rotation = NumberRange.new(-180, 180)
Pt.RotSpeed = NumberRange.new(-180,180)
Pt.Texture = "rbxassetid://2273224484"
if i == 2 then Pt.EmissionDirection = "Back" elseif i == 3 then Pt.EmissionDirection = "Left" elseif i == 4 then Pt.EmissionDirection = "Right" end
end

local Pta = Instance.new("ParticleEmitter", p)
Pta.EmissionDirection = "Left"
Pta.LightEmission = 1
Pta.Transparency = NumberSequence.new({NumberSequenceKeypoint.new(0,1), NumberSequenceKeypoint.new(0.25,0), NumberSequenceKeypoint.new(0.75,0), NumberSequenceKeypoint.new(1,1)})
Pta.Size = NumberSequence.new({NumberSequenceKeypoint.new(0,3), NumberSequenceKeypoint.new(1,7)})
Pta.Acceleration = Vector3.new(0,0,0)
Pta.Rate = 0
Pta.Drag = 3
Pta.Enabled = false
Pta.SpreadAngle = Vector2.new(0,360)
Pta.LightInfluence = 0
Pta.Speed = NumberRange.new(80,100)
Pta.Lifetime = NumberRange.new(0.8,1)
Pta.Rotation = NumberRange.new(-180, 180)
Pta.RotSpeed = NumberRange.new(-180,180)
Pta.Texture = "rbxassetid://2273224484"

--i should probably make a particle function

local Ptb = Instance.new("ParticleEmitter", tor)
Ptb.EmissionDirection = "Bottom"
Ptb.LightEmission = 0.9
Ptb.Transparency = NumberSequence.new({NumberSequenceKeypoint.new(0,1), NumberSequenceKeypoint.new(0.25,0), NumberSequenceKeypoint.new(0.75,0), NumberSequenceKeypoint.new(1,1)})
Ptb.Size = NumberSequence.new({NumberSequenceKeypoint.new(0,10), NumberSequenceKeypoint.new(1,5)})
Ptb.Acceleration = Vector3.new(0,20,0)
Ptb.Rate = 100
Ptb.Enabled = true
Ptb.SpreadAngle = Vector2.new(10,10)
Ptb.LightInfluence = 0
Ptb.Speed = NumberRange.new(8,10)
Ptb.Lifetime = NumberRange.new(1,2.5)
Ptb.Rotation = NumberRange.new(-180,180)
Ptb.RotSpeed = NumberRange.new(-30,30)
Ptb.Color = ColorSequence.new(RGB(0,100,255))

-------------------------------------random convos-----------------------------------------------------------------
--yeah
--you could make a whitelist inside of the glitch here and then if this is the site inside of the glitch
--yeah but I want it to save if I add a name to the whitelist ingame
--mmmalright
--incase something happens though, im gonna keep that line as a comment

----------
--if you want to add someone then you just quickly type their name and its insta save so
--ye ok but now look
--Then you would be able to get that table by doing
--oooh
--alright then

-----------------------------------------------visualizer stuff---------------------------------------------

theId = 318062766
--2657605534 - weebing?
ev = Instance.new("RemoteEvent", ch)
ev.Name = "EventThingy"

sou = Instance.new("Sound", ch.Head)
sou.Name = "Sound"
sou.Volume = vol
sou.SoundId = theId
sou.Pitch = pitch
sou.Looped = true
sou.Playing = false

ev.OnServerEvent:Connect(function(playerorsomething, earrapelevel)
    if earrapelevel >= 1 then Pta:Emit(100) end
    for i,v in pairs(p:GetChildren()) do
      if v:IsA("ParticleEmitter") and v ~= Pta then
        v.Size = NumberSequence.new({NumberSequenceKeypoint.new(0,3 + (earrapelevel*2)), NumberSequenceKeypoint.new(1,1 + earrapelevel)})
        v.Color = ColorSequence.new(Color3.new(1, 0.1 + earrapelevel/10, 0))
    elseif v:IsA("ParticleEmitter") and (v == Pta or v == Pt) then
        v.Color = ColorSequence.new(Color3.new(1, 0.1 + earrapelevel/10, 0))
      end
    end
end)

AAAAAAAA = [==[
pla = game.Players.LocalPlayer
ch = pla.Character
ev = pla.Character:WaitForChild("EventThingy")
sou = ch.Head.Sound
game:GetService("RunService").RenderStepped:Connect(function()
ev:FireServer(sou.PlaybackLoudness/400)
end)
]==]
NLS(AAAAAAAA, ch)

-------------------------------------making the aura actually work and stuff------------------------------------

CreateRegion3FromLocAndSize = function(Position, Size)

  local SizeOffset = Size / 2
  local Point1 = Position - SizeOffset
  local Point2 = Position + SizeOffset
  return Region3.new(Point1, Point2)
end

game:GetService("RunService").Heartbeat:connect(function()

pw.C0 = pw.C0 * CFrame.Angles(0,math.rad(2.5), 0)

if paused == true then return end
if mode == "delete" then
  for i,v in pairs(p:GetChildren()) do
    pcall(function()
        v.Rate = 0
    end)
  end
  sou.Playing = false
  pcall(function()
--should work no w
  local void = ch:GetChildren()
      for _,pl in pairs(whitelist) do
        if game.Players:FindFirstChild(pl) ~= nil and game.Players:FindFirstChild(pl).Character ~= nil then
          for i,v in pairs(game.Players[pl].Character:GetChildren()) do
            table.insert(void, v)
          end
        end
      end


  local reg = CreateRegion3FromLocAndSize(tor.CFrame.p, Vector3.new(range, range, range))
      for i,v in pairs(game.Workspace:FindPartsInRegion3WithIgnoreList(reg, void, 100)) do
        if v.Name ~= "Base" then
          v:Destroy()
        end
      end


  end)
elseif mode == "vis" then
  for i,v in pairs(p:GetChildren()) do
    pcall(function()
        v.Rate = 100
    end)
  end
end
end)


---------------------------------------------chat functioning-----------------------------------------------
owner.Chatted:Connect(function(ch)

if string.sub(ch, 1, 3) == ";on" then
    paused = false
    if mode == "delete" then
      Ptb.Enabled = true
      for i,v in pairs(p:GetChildren()) do
        pcall(function()
            v.Rate = 0
        end)
      end
    elseif mode == "vis" then
      Ptb.Enabled = false
      for i,v in pairs(p:GetChildren()) do
        pcall(function()
            v.Rate = 100
        end)
      end
    end
    print("Aura has been turned on!")
elseif string.sub(ch, 1, 4) == ";off" then
    paused = true
    sou:Stop()
    Ptb.Enabled = false
    for i,v in pairs(p:GetChildren()) do
      pcall(function()
          v.Rate = 0
      end)
    end
    print("Aura has been turned off!")
elseif string.sub(ch, 1, 7) == ";range " then
    range = tonumber(string.sub(ch, 8)) or 15
    if not string.sub(ch, 8) then
        print("Range reset! (15 studs)")
    else
        print("Range set to "..range.."!")
    end
elseif string.sub(ch, 1, 7) == ";sinfo " then
    print("Sound Info:\nSound Id: "..theId.."\nPitch: "..pitch.."\nVolume: "..vol.."\nSound name: "..game:GetService("MarketplaceService"):GetProductInfo(theId).Name)
elseif string.sub(ch, 1, 4) == ";id " then
    sou.SoundId = "rbxassetid://"..tonumber(string.sub(ch, 5))
    print("Sound set to id: "..tonumber(string.sub(ch, 5)))
    if mode == "vis" then
        sou:Play()
        print("Playing sound")
    else
        print("Try again on 'vis' mode to play the sound")
    end
elseif string.sub(ch, 1, 6) == ";mode " then
    mode = string.sub(ch, 7)
    print("Mode set to "..string.sub(ch, 7))
    if mode == "vis" then Ptb.Enabled = false else Ptb.Enabled = true end
    if mode == "vis" and autoplay == true then
        print("Auto play is on, now playing sound (id: "..theId..")")
        sou.SoundId = "rbxassetid://"..theId
        sou:Play()
    end



elseif string.sub(ch, 1, 5) == ";vol " then
    vol = tonumber(string.sub(ch, 6))
    print("Sound volume set to "..vol)
elseif string.sub(ch, 1, 7) == ";pitch " then
    pitch = tonumber(string.sub(ch, 8))
    print("Sound pitch set to "..pitch)
elseif string.sub(ch, 1, 6) == ";auto " then
    if string.sub(ch, 7) == "true" or string.sub(ch, 7) == "on" then
        autoplay = true
        print("Autoplay is turned on!")
    elseif string.sub(ch, 7) == "false" or string.sub(ch, 7) == "off" then
        autoplay = false
        print("Autoplay is turned off!")
    end


end
end) --e + e = E
--HOW IS THIS MAN
print("This script was made by PhoenixClockworks.")
wait(3)
print("This is version "..tostring(version).." of the 'Spectrum Aura' script.")
wait(4)
print("Commands:\n\n;show whitelist - shows you a list of whitelisted players (creator and whitelisted only)\n;mode - changes the mode of the aura. options:\n*delete (blue aura which deletes anything near)\n*vis (color changing aura/visualizer which doesnt delete)\n;on - turns on the aura\n;off - turns off the aura\n\nMode commands:\n\nVis:\n;sinfo - give the sound information as a list\n;vol - changes volume of the sound\n;pitch - changes pitch of the sound\n;auto - turns on/off autoplay (sound will automatically play when ;mode vis is used) (alliases are ;auto on (or off) / ;auto true (or false))\n\nDelete:\n;range - changes the range of the aura (studs) (default is 15)")
warn("Please beware, this script is a work in progress and may not function correctly.")