rare script lssj along with music

repeat
  wait(0.5)
until game:service("Players").LocalPlayer.Character ~= nil
local Player = game:service("Players").LocalPlayer
local ch = Player.Character
	local occ = Instance.new("BoolValue", ch)
	occ.Name = "Occupied"
	local swi = Instance.new("StringValue", ch)
	swi.Name = "switch"
	local trans = Instance.new("BoolValue", ch)
	trans.Name = "trans"
	repeat wait() until ch.Humanoid ~= nil
	ch.Humanoid.Died:connect(function()
		Player.CharacterAdded:connect(function(chz)
				local occ = Instance.new("BoolValue", chz)
				occ.Name = "Occupied"
				local swi = Instance.new("StringValue", chz)
				swi.Name = "switch"
				local trans = Instance.new("BoolValue", chz)
				trans.Name = "trans"
		end
		)
		end)
local PGui = Player:WaitForChild("PlayerGui")
local Character = Player.Character
--repeat
--  wait()
--until Character:FindFirstChild("Hair")
local Humanoid = Character:WaitForChild("Humanoid")
local Head = Character:WaitForChild("Head")
local Torso = Character:WaitForChild("Torso")
local HRP = Character:WaitForChild("HumanoidRootPart")
local RArm = Character:WaitForChild("Right Arm")
local LArm = Character:WaitForChild("Left Arm")
local RLeg = Character:WaitForChild("Right Leg")
local LLeg = Character:WaitForChild("Left Leg")
Character.Archivable = true
_Character = Character:Clone()
msgz = Instance.new("Message", PGui)
msgz.Text = "Chat \'LSSJ\' to go LSSJ, and \'off\' to turn it off!"
game.Debris:AddItem(msgz, 6.5)
local Joints = {Head = Torso.Neck, Torso = HRP.RootJoint, RArm = Torso["Right Shoulder"], LArm = Torso["Left Shoulder"], RLeg = Torso["Right Hip"], LLeg = Torso["Left Hip"]}
local Refresh = function()
  Joints.Head.C0 = CFrame.new(0, 1, 0, -1, 0, 0, 0, 0, 1, 0, 1, 0)
  Joints.Torso.C0 = CFrame.new(0, 0, 0, -1, 0, 0, 0, 0, 1, 0, 1, 0)
  Joints.RArm.C0 = CFrame.new(1, 0.5, 0, 0, 0, 1, 0, 1, 0, -1, 0, 0)
  Joints.LArm.C0 = CFrame.new(-1, 0.5, 0, 0, 0, -1, 0, 1, 0, 1, 0, 0)
  Joints.RLeg.C0 = CFrame.new(1, -1, 0, 0, 0, 1, 0, 1, 0, -1, 0, 0)
  Joints.LLeg.C0 = CFrame.new(-1, -1, 0, 0, 0, -1, 0, 1, 0, 1, 0, 0)
  Joints.Head.C1 = CFrame.new(0, -0.5, 0, -1, 0, 0, 0, 0, 1, 0, 1, 0)
  Joints.Torso.C1 = CFrame.new(0, 0, 0, -1, 0, 0, 0, 0, 1, 0, 1, 0)
  Joints.RArm.C1 = CFrame.new(-0.5, 0.5, 0, 0, 0, 1, 0, 1, 0, -1, 0, 0)
  Joints.LArm.C1 = CFrame.new(0.5, 0.5, 0, 0, 0, -1, 0, 1, 0, 1, 0, 0)
  Joints.RLeg.C1 = CFrame.new(0.5, 1, 0, 0, 0, 1, 0, 1, 0, -1, 0, 0)
  Joints.LLeg.C1 = CFrame.new(-0.5, 1, 0, 0, 0, -1, 0, 1, 0, 1, 0, 0)
end

local Transformed, Occupied = false, false
local Create = assert(LoadLibrary("RbxUtility")).Create
local Part = Create("Part")({TopSurface = 0, BottomSurface = 0, formFactor = "Custom", Size = Vector3.new(1, 1, 1), Anchored = true, CanCollide = false})
local Anims = {Scrunch = function(active)
  if active then
    for i = 0, 10, 0.5 do
      wait(0.016666666666667)
      Joints.RArm.C0 = Joints.RArm.C0 * CFrame.Angles(math.rad(-30) / 10, 0, 0)
      Joints.LArm.C0 = Joints.LArm.C0 * CFrame.Angles(math.rad(-30) / 10, 0, 0)
      Joints.RLeg.C0 = Joints.RLeg.C0 * CFrame.Angles(-0.01, -0.02, 0.01)
      Joints.LLeg.C0 = Joints.LLeg.C0 * CFrame.Angles(-0.01, 0.02, 0.01)
    end
  else
    do
      for i = 0, 10, 0.5 do
        wait(0.016666666666667)
        Joints.RArm.C0 = Joints.RArm.C0 * CFrame.Angles(math.rad(-30) / 10, 0, 0):inverse()
        Joints.LArm.C0 = Joints.LArm.C0 * CFrame.Angles(math.rad(-30) / 10, 0, 0):inverse()
        Joints.RLeg.C0 = Joints.RLeg.C0 * CFrame.Angles(-0.01, -0.02, 0.01):inverse()
        Joints.LLeg.C0 = Joints.LLeg.C0 * CFrame.Angles(-0.01, 0.02, 0.01):inverse()
      end
      Refresh()
    end
  end
end
, Implode = function(active)
  if active then
    for i = 0, 10, 0.75 do
      wait(0.016666666666667)
      Joints.RArm.C0 = Joints.RArm.C0 * CFrame.Angles(-0.025, -0.055, 0.155)
      Joints.LArm.C0 = Joints.LArm.C0 * CFrame.Angles(-0.025, 0.055, -0.155)
      Joints.RLeg.C0 = Joints.RLeg.C0 * CFrame.Angles(-0.015, -0.025, -0.015)
      Joints.LLeg.C0 = Joints.LLeg.C0 * CFrame.Angles(-0.015, 0.025, -0.015)
    end
  else
    do
      for i = 0, 10, 0.75 do
        wait(0.016666666666667)
        Joints.RArm.C0 = Joints.RArm.C0 * CFrame.Angles(-0.025, -0.055, 0.155):inverse()
        Joints.LArm.C0 = Joints.LArm.C0 * CFrame.Angles(-0.025, 0.055, -0.155):inverse()
        Joints.RLeg.C0 = Joints.RLeg.C0 * CFrame.Angles(-0.015, -0.025, -0.015):inverse()
        Joints.LLeg.C0 = Joints.LLeg.C0 * CFrame.Angles(-0.015, 0.025, -0.015):inverse()
      end
    end
  end
end
}
local Flash = function(Par, Col, Duration, Delay, Async)
  pcall(function()
    Par = Par or PGui
    if not Col then
      Col = BrickColor:White().Color
      Duration = Duration or 10
      if not Delay then
        Delay = 1 / Duration
        local G = Create("ScreenGui")({Parent = Par})
        if not Col then
          local F = Create("Frame")({Parent = G, BorderSizePixel = 0, Size = UDim2.new(1.2, 0, 1.2, 0), Position = UDim2.new(), ZIndex = 10, BackgroundColor3 = Color3.new(1, 1, 1), Transparency = 0})
          local f = function()
      for i = 0, Duration, Delay do
        wait(0.016666666666667)
        F.Transparency = i / Duration
      end
      pcall(game.Destroy, G)
    end

          if Async then
            f = coroutine.wrap(f)
          end
          return f()
        end
      end
    end
  end
)
end

local Shake = function(Duration, Delay, Async, Distance)
  pcall(function()
    local Cam = workspace.CurrentCamera
    Duration = Duration or 10
    if not Delay then
      Delay = 1 / Duration
      Distance = Distance or 15
      local f = function()
      for i = 0, Duration, Delay do
        wait(0.016666666666667)
        local R = Cam.CoordinateFrame - Cam.CoordinateFrame.p
        local Scroll = Cam.CoordinateFrame.p - Cam.Focus.p.magnitude
        local NewF = CFrame.new(Cam.Focus.p) * R * CFrame.new(math.random(-Distance, Distance) / (Distance / 0.25), math.random(-Distance, Distance) / (Distance / 0.25), math.random(-Distance, Distance) / (Distance / 0.25))
        Cam.CoordinateFrame = NewF * CFrame.new(0, 0, Scroll)
      end
    end

      if Async then
        f = coroutine.wrap(f)
      end
      return f()
    end
  end
)
end

local Sound = function(Prnt, Id, Pit, Vol)
  pcall(function()
    local cp = game:service("ContentProvider")
    if type(Id) == "number" then
      cp:Preload("rbxassetid://" .. Id)
      Id = "rbxassetid://" .. Id
    else
      if type(Id) == "string" then
        cp:Preload(Id)
        Id = Id
      end
    end
    local S = Create("Sound")({Parent = Prnt or workspace, SoundId = Id, Volume = Vol or 1, Pitch = Pit or 1})
    S:Play()
    S:Stop()
    S:Play()
    game:service("Debris"):AddItem(S, 0.9)
  end
)
end

local Chat = function(Source, Txt, Col)
  if not Source then
    Source = Head
  end
  local c = game:service("Chat")
  if not Col then
    c:Chat(Source, Txt, math.random(0, 2))
  end
end

Transform = function(active)
  if active and not Occupied and not Transformed then
    Occupied = true
    Humanoid.WalkSpeed = 0
    local cp = game:service("ContentProvider")
    Hair = {}
    mp = Part:clone()
    mp.Parent = Head
    mp.CFrame = Head.CFrame
    mp.Name = "Main"
    mp.Transparency = 1
    mp.Anchored = false
    local w = Create("Weld")({Parent = mp, Part0 = mp, Part1 = Head, C0 = CFrame.new()})
    cp:Preload("rbxassetid://9982590", "rbxassetid://3270017", "rbxassetid://13425802", "rbxassetid://98444143", "rbxassetid://98444243")
    for i = 1, 6 do
      local h = Part:clone()
      h.CFrame = Head.CFrame
      h.Parent = mp
      h.Transparency = 1
      h.Size = Vector3.new(0.2, 0.2, 0.2)
      h.Anchored = false
      h:BreakJoints()
      local w = Create("Weld")({Parent = h, Part0 = h, Part1 = Head, C0 = CFrame.new()})
      local m = Create("SpecialMesh")({Parent = h, VertexColor = Vector3.new(0, 1, 0), MeshType = "FileMesh", MeshId = "rbxassetid://74868480", TextureId = "rbxassetid://98444243", Scale = Vector3.new(1.1, 1.25, 1.1)})
      if i > 1 then
        m.Scale = Vector3.new(1.125, 1.3, 1.125)
        m.MeshId = "rbxassetid://98444143"
      end
      table.insert(Hair, h)
    end
    Hair[1].Weld.C0 = CFrame.new(0, -0.1, 0) * CFrame.Angles(-0.15, -0.2, 0)
    Hair[2].Weld.C0 = CFrame.new(0, -0.75, -0.3) * CFrame.Angles(0.3, 0, 0)
    Hair[3].Weld.C0 = CFrame.new(0, -0.6, -0.2) * CFrame.Angles(1.25, math.rad(180), 0)
    Hair[4].Weld.C0 = CFrame.new(0.1, -0.6, -0.4) * CFrame.Angles(0.35, -0.2, -0.35)
    Hair[5].Weld.C0 = CFrame.new(-0.1, -0.6, -0.4) * CFrame.Angles(0.35, 0.2, 0.35)
    Hair[4].Mesh.Scale = Vector3.new(0.7, 0.95, 1)
    Hair[6].Weld.C0 = CFrame.new(0, -1, -0.4)
    Hair[5].Mesh.Scale = Hair[4].Mesh.Scale
    Hair[6].Mesh.Scale = Hair[4].Mesh.Scale
    Sound(Head, 98333808, 1, 0.85)
    Sound(Head, 2248511, 0.25, 0.55)
    wait(0.2)
    Chat(nil, "YOU MESSED UP WITH THE WRONG PERSON!", "Blue")
    SSF = Create("Fire")({Parent = HRP, Color = Color3.new(0, 1, 0), Heat = 10, SecondaryColor = Color3.new(0, 1, 0), Size = 7})
    Anims.Scrunch(true)
    for i = 1, 5 do
      Shake(25, 0.5, 5)
      Flash(nil, BrickColor.new("Lime green").Color, 10, 0.25, true)
      Sound(Head, 2101137, 0.5, 0.8)
      Sound(Head, 3264793, 0.55, 0.9)
      local h = Part:clone()
      h.CFrame = Torso.CFrame
      h.Parent = Torso
      h.Transparency = 1
      h.Size = Vector3.new(1, 1, 1)
      h.Anchored = false
      h.BrickColor = BrickColor.new("Lime green")
      h.Material = "Neon"
      h:BreakJoints()
      local w = Create("Weld")({Parent = h, Part0 = h, Part1 = HRP, C0 = CFrame.new(0, 2.5, 0)})
      local m = Create("SpecialMesh")({Parent = h, MeshType = "FileMesh", MeshId = "http://www.roblox.com/asset/?id=20329976", Scale = Vector3.new(8, 3, 8)})
      local org = w.C0
      for _i = 1, 15 do
        h.Transparency = _i / 15
        w.C0 = org * CFrame.new(math.random() - 0.5, math.random() - 0.5, math.random() - 0.5) * CFrame.Angles(0, _i / 3, 0)
        wait(0.033333333333333)
      end
      h:Destroy()
    end
    coroutine.resume(coroutine.create(function()
    for i = 1, 2 do
      local h = Part:clone()
      h.CFrame = Torso.CFrame
      h.Parent = Torso
      h.Transparency = 1
      h.Size = Vector3.new(1, 1, 1)
      h.Anchored = false
      h.BrickColor = BrickColor.new("Lime green")
      h.Material = "Neon"
      h:BreakJoints()
      local w = Create("Weld")({Parent = h, Part0 = h, Part1 = HRP, C0 = CFrame.new() * CFrame.Angles(math.rad(90), 0, 0)})
      local m = Create("SpecialMesh")({Parent = h, MeshType = "FileMesh", MeshId = "rbxassetid://3270017", Scale = Vector3.new(1, 1, 1)})
      local org = w.C0
      for _i = 1, 37.5 do
        wait(0.055555555555556)
        w.C0 = org * CFrame.new(math.random() - 0.5, 0, math.random() - 0.5)
        m.Scale = Vector3.new(_i * 1.5, _i * 1.5, _i * 1.5) * 3
        h.Transparency = _i / 75
      end
      h:Destroy()
    end
    wait(1)
  end
))
    Shake(25, 0.5, 5)
    Flash(nil, BrickColor.new("Lime green").Color, 10, 1, true)
    Sound(Head, 2101137, 0.5, 0.8)
    Sound(Head, 3264793, 0.55, 0.9)
    local h = Part:clone()
    h.CFrame = Torso.CFrame
    h.Parent = Torso
    h.Transparency = 1
    h.Size = Vector3.new(1, 1, 1)
    h.Anchored = false
    h.BrickColor = BrickColor.new("Lime green")
    h.Material = "Neon"
    h:BreakJoints()
    local w = Create("Weld")({Parent = h, Part0 = h, Part1 = HRP, C0 = CFrame.new(0, 2.5, 0)})
    local m = Create("SpecialMesh")({Parent = h, MeshType = "FileMesh", MeshId = "http://www.roblox.com/asset/?id=20329976", Scale = Vector3.new(2, 2, 2)})
    local h2 = h:Clone()
    h2.Parent = Torso
    h2:breakJoints()
    local w2 = Create("Weld")({Parent = h2, Part0 = h2, Part1 = HRP, C0 = CFrame.new(0, 0, 0)})
    local m2 = Create("SpecialMesh")({Parent = h2, MeshType = "Sphere", Scale = Vector3.new(2, 2, 2)})
    local org = w.C0
    do
      do
        local org2 = w2.C0
        for _i = 1, 75 do
          ran = math.random() - 0.5
          h.Transparency = _i / 75
          if _i % 15 == 0 then
            Shake(25, 0.5, 5)
            Flash(nil, BrickColor.new("Lime green").Color, 10, 0.25, true)
          end
          w.C0 = org * CFrame.new(ran, 0, ran2) * CFrame.Angles(0, _i / 3, 0)
          m.Scale = m.Scale + Vector3.new(0.6, 0.5, 0.6) * 1.5
          m2.Scale = m2.Scale + Vector3.new(1, 1, 1) * 1.5
          h2.Transparency = _i / 75
          w2.C0 = org2 * CFrame.new(ran, 0, ran2) * CFrame.Angles(0, _i / 6, 0)
          wait(0.055555555555556)
        end
        h:Destroy()
        h2:Destroy()
        Chat(nil, "PREPARE TO FEEL A WHOLE NEW SPECTRUM OF.. PAIN!", "Red")
        for _,v in pairs(Hair) do
          if v.Name == "Hair" then
            v.Transparency = 1
          end
        end
        coroutine.resume(coroutine.create(function()
    for _ = 1, 6 do
      for i = 1, 0, -0.07 do
        wait(0.03030303030303)
        Hair[_].Transparency = i
        Hair[_].Mesh.Scale = Hair[_].Mesh.Scale + Vector3.new(0, 0.015, 0)
        Hair[_].Weld.C0 = Hair[_].Weld.C0 * CFrame.new(0, 0, -0.0025)
      end
    end
    for _,v in pairs(Hair) do
      v.Transparency = 0
    end
  end
))
        Flash(nil, BrickColor.new("Lime green").Color, 10, 0.25, true)
        Anims.Scrunch(false)
        Anims.Implode(true)
        SSF.Heat = 20
        SSF.Size = 10
        Sound(Head, 98333808, 1, 0.85)
        Sound(Head, 2248511, 0.65, 0.65)
        Chat(nil, "MWAHAHAHAHAHA!")
        Anims.Implode(false)
        Humanoid.WalkSpeed = 16
        Transformed = true
        Occupied = false
        if not active and not Occupied and Transformed then
          Occupied = true
          Anims.Scrunch(true)
          Humanoid.WalkSpeed = 0
          Sound(Head, 2248511, 0.75, 0.6)
          Sound(Head, 2691586, 0.7, 0.4)
          Sound(Head, 2785493, 0.55, 0.9)
          Sound(Head, 2785493, 0.7, 0.7)
          Shake(15, 0.5, 20)
          Flash(nil, Color3.new(1, 1, 1), 7, 0.1, true)
          coroutine.resume(coroutine.create(function()
    wait(2)
    for i = 1, 0, -0.05 do
      wait(0.016666666666667)
      for _,v in pairs(Hair) do
        if v.Name == "Hair" then
          v.Transparency = i
        end
      end
    end
    for _,v in pairs(Hair) do
      if v.Name == "Hair" then
        v.Transparency = 0
      end
    end
  end
))
          for i = 0, 1, 0.01 do
            wait(0.016666666666667)
            for _,v in next do
              v.Transparency = i
            end
          end
          Sound(Head, 2800815, 0.85, 1)
          Sound(Head, 2800815, 0.55, 0.8)
          Sound(Head, 2691586, 0.45, 0.3)
          pcall(game.Destroy, SSF)
          pcall(game.Destroy, mp)
          Hair = {}
          Chat(nil, "Your skills have been proved, you failed.", "Blue")
          Anims.Scrunch(false)
          Humanoid.WalkSpeed = 16
          Transformed = false
          Occupied = false
        end
      end
    end
  end
end

Player.Chatted:connect(function(Msg)
  if Character.trans.Value == false and Character.Occupied.Value == false then
    if Msg:lower() == "lssj" and Character.switch.Value == "" then
      Character.switch.Value = "lssj"
      Character.trans.Value = true
      Transform(true)
      Humanoid.MaxHealth = Humanoid.MaxHealth + tonumber("25")
      wait(1)
      Humanoid.Health = Humanoid.Health + tonumber("25")
      Character.trans.Value = false
    else
      if Msg:lower() == "off" and Character.switch.Value == "lssj" then
        Character.trans.Value = true
        Transform(false)
        Humanoid.Health = Humanoid.Health - tonumber("25")
        wait(1)
        Humanoid.MaxHealth = Humanoid.MaxHealth - tonumber("25")
        Character.trans.Value = false
        Character.switch.Value = ""
      end
    end
  end
end
)
--Made by commag

local s = Instance.new("Sound")

s.Name = "Sound"
s.SoundId = "http://www.roblox.com/asset/?id=253250112"
s.Volume = 2
s.Looped = false
s.archivable = false

s.Parent = game.Workspace

wait(3)

s:play()