anger form a lssj2 edit

wait(1)
first = false
ChatS = game:GetService("Chat")
Debris = game:GetService("Debris")
ContentP = game:GetService("ContentProvider")
Settings = {Health = 180, WS = 16}
Link = "rbxassetid://"
Player = game:GetService("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)
Char = Player.Character
PGui = Player.PlayerGui
msgz = Instance.new("Message", PGui)
msgz.Text = "Chat \'anger\' to go anger, and \'off\' to turn it off!"
game.Debris:AddItem(msgz, 6.5)
Humanoid = Char:WaitForChild("Humanoid")
Torso = Char:WaitForChild("Torso")
Head = Char:WaitForChild("Head")
HRP = Char:WaitForChild("HumanoidRootPart")
RArm = Char:WaitForChild("Right Arm")
LArm = Char:WaitForChild("Left Arm")
RLeg = Char:WaitForChild("Right Leg")
LLeg = Char:WaitForChild("Left Leg")
Switch = Char:WaitForChild("switch")
Limbs = {Head = Torso.Neck, Torso = HRP.RootJoint, RArm = Torso["Right Shoulder"], LArm = Torso["Left Shoulder"], RLeg = Torso["Right Hip"], LLeg = Torso["Left Hip"]}
Sounds = {
Boom = {Id = 2101148, Pitch = 0.9}
,
Boom2 = {Id = 2767090, Pitch = 0.65}
,
Swoosh = {Id = 12222095, Pitch = 0.5}
,
Charge = {Id = 2692844, Pitch = 1}
,
NoCharge = {Id = 2785493, Pitch = 0.2}
,
Elec = {Id = 2800815, Pitch = 0.9}
,
KiExpl = {Id = 2974249, Pitch = 0.65}
,
KiExpl2 = {Id = 2974000, Pitch = 0.65}
}
for _,t in pairs(Sounds) do
  ContentP:Preload(Link .. t.Id)
end
AngryMessages = {"you noob", "RAAAAAH!", "YOU..", "NO MERCY!", "GRHH", "Whats happening to me!!?", "HEHEHE..!", "BWUAHAHAHA..!", "PREPARE TO DIE!"}
Colors = {"Red", "Red", "Red"}
Refresh = function()
  Reset = {CFrame.new(0, 1, 0, -1, 0, 0, 0, 0, 1, 0, 1, 0), CFrame.new(0, 0, 0, -1, 0, 0, 0, 0, 1, 0, 1, 0), CFrame.new(1, 0.5, 0, 0, 0, 1, 0, 1, 0, -1, 0, 0), CFrame.new(-1, 0.5, 0, 0, 0, -1, 0, 1, 0, 1, 0, 0), CFrame.new(1, -1, 0, 0, 0, 1, 0, 1, 0, -1, 0, 0), CFrame.new(-1, -1, 0, 0, 0, -1, 0, 1, 0, 1, 0, 0)}
  for i = 1, #Limbs do
    Limbs[i].C0 = Reset[i]
  end
end

NewChat = function(Where, Str, Col)
  ChatS:Chat(Where, Str, Col)
end

CSound = function(Nam, Id, Pit, Dur, Par)
  S = Instance.new("Sound", Par)
  S.Name = Nam
  S.Pitch = Pit
  S:Pause()
  S.SoundId = Link .. Id
  ContentP:Preload(Link .. Id)
  Debris:AddItem(S, Time)
  S:Play()
  coroutine.wrap(function()
    wait(Dur)
    pcall(game.Destroy, S)
  end
)()
end

local OriginShirt = nil
pcall(function()
  for _,t in pairs(Char:getChildren()) do
    do
      if t.ClassName == "Shirt" then
        do
          pcall(function()
    OriginShirt = tostring(t.ShirtTemplate)
  end
)
          -- DECOMPILER ERROR at PC14: LeaveBlock: unexpected jumping out IF_THEN_STMT

          -- DECOMPILER ERROR at PC14: LeaveBlock: unexpected jumping out IF_STMT

        end
      end
    end
  end
end
)
for _,q in pairs(Char:getChildren()) do
  if q.ClassName == "ShirtGraphic" then
    q:Destroy()
  end
end
for _,a in pairs(Torso:getChildren()) do
  if a.ClassName == "Decal" then
    a:Destroy()
  end
end
OriginHealth = Humanoid.Health
OriginWS = Humanoid.WalkSpeed
local HairChange = false
local Aura = false
local Transformed = false
local Transforming = false
Anims = {["DONT LOOK AT ME!"] = function()
  if not Transformed then
    NewChat(Head, AngryMessages[math.random(1, #AngryMessages)], Colors[math.random(1, #Colors)])
  else
    NewChat(Head, "HMPH", Colors[math.random(1, #Colors)])
  end
  for i = 1, 10 do
    wait()
    Limbs.Torso.C0 = Limbs.Torso.C0 * CFrame.Angles(0.01, 0, 0)
    Limbs.Head.C0 = Limbs.Head.C0 * CFrame.Angles(0.05, 0, 0)
    Limbs.RArm.C0 = Limbs.RArm.C0 * CFrame.Angles(-0.1, 0.07, 0.25)
    Limbs.LArm.C0 = Limbs.LArm.C0 * CFrame.Angles(-0.1, -0.07, -0.25)
    Limbs.RLeg.C0 = Limbs.RLeg.C0 * CFrame.Angles(-0.01, 0.01, 0.01)
    Limbs.LLeg.C0 = Limbs.LLeg.C0 * CFrame.Angles(-0.01, -0.01, 0.02)
  end
end
, ["Dont look at me cool down"] = function()
  if Transformed then
    NewChat(Head, "Pathetic!", Colors[math.random(1, #Colors)])
  end
  for i = 1, 10 do
    wait()
    Limbs.Torso.C0 = Limbs.Torso.C0 * CFrame.Angles(0.01, 0, 0):inverse()
    Limbs.Head.C0 = Limbs.Head.C0 * CFrame.Angles(0.05, 0, 0):inverse()
    Limbs.RArm.C0 = Limbs.RArm.C0 * CFrame.Angles(-0.1, 0.07, 0.25):inverse()
    Limbs.LArm.C0 = Limbs.LArm.C0 * CFrame.Angles(-0.1, -0.07, -0.25):inverse()
    Limbs.RLeg.C0 = Limbs.RLeg.C0 * CFrame.Angles(-0.01, 0.01, 0.01):inverse()
    Limbs.LLeg.C0 = Limbs.LLeg.C0 * CFrame.Angles(-0.01, -0.01, 0.02):inverse()
  end
  Refresh()
end
, ["KAKAKARROT CAKEEE!"] = function()
  ClosestPlayer = nil
  for _,v in pairs(Workspace:getChildren()) do
    if v:IsA("Model") and v ~= Char and v:findFirstChild("Torso") then
      CTorso = v:FindFirstChild("Torso")
      if (Torso.CFrame.p - CTorso.CFrame.p).magnitude < 35 then
        ClosestPlayer = tostring(CTorso.Parent.Name)
        break
      end
    end
    ClosestPlayer = tostring(AngryMessages[math.random(1, #AngryMessages)])
  end
  do
    if not Transformed then
      NewChat(Head, string.upper(ClosestPlayer) .. "!!!", Colors[math.random(1, #Colors)])
      ClosestPlayer = nil
    end
    for i = 1, 5 do
      wait()
      Limbs.Torso.C0 = Limbs.Torso.C0 * CFrame.Angles(-0.01, 0, 0)
      Limbs.Head.C0 = Limbs.Head.C0 * CFrame.Angles(-0.1, 0, 0)
      Limbs.RArm.C0 = Limbs.RArm.C0 * CFrame.Angles(-0.2, -0.04, -0.02)
      Limbs.LArm.C0 = Limbs.LArm.C0 * CFrame.Angles(-0.2, 0.04, 0.02)
      Limbs.RLeg.C0 = Limbs.RLeg.C0 * CFrame.Angles(-0.02, -0.05, 0)
      Limbs.LLeg.C0 = Limbs.LLeg.C0 * CFrame.Angles(-0.02, 0.05, 0.025) * CFrame.new(0.05, 0, 0)
    end
  end
end
, ["Kakakarrot cake cooldown"] = function()
  if not Transformed then
    NewChat(Head, AngryMessages[math.random(1, #AngryMessages)], Colors[math.random(1, #Colors)])
  end
  for i = 1, 5 do
    wait()
    Limbs.Torso.C0 = Limbs.Torso.C0 * CFrame.Angles(-0.01, 0, 0):inverse()
    Limbs.Head.C0 = Limbs.Head.C0 * CFrame.Angles(-0.1, 0, 0):inverse()
    Limbs.RArm.C0 = Limbs.RArm.C0 * CFrame.Angles(-0.2, -0.04, -0.02):inverse()
    Limbs.LArm.C0 = Limbs.LArm.C0 * CFrame.Angles(-0.2, 0.04, 0.02):inverse()
    Limbs.RLeg.C0 = Limbs.RLeg.C0 * CFrame.Angles(-0.02, -0.05, 0):inverse()
    Limbs.LLeg.C0 = Limbs.LLeg.C0 * CFrame.Angles(-0.02, 0.05, 0.025):inverse() * CFrame.new(-0.05, 0, 0)
  end
  Refresh()
end
}
Muscles = function()
  for _,t in pairs(Char:getChildren()) do
    if t.ClassName == "Shirt" then
      t:Destroy()
    end
  end
  HRP.BrickColor = Torso.BrickColor
  HRP.Transparency = 0
  R = HRP:findFirstChild("Mesh")
  if not R then
    R = Instance.new("SpecialMesh", HRP)
    R.MeshType = "FileMesh"
    R.MeshId = "rbxasset://fonts/torso.mesh"
    R.Scale = Vector3.new(1.01, 1.01, 1.01)
  end
  NewP = function()
    P = Instance.new("Part")
    P.Material = "Neon"
    P.formFactor = "Custom"
    P.TopSurface = 0
    P.BottomSurface = 0
    P.Anchored = false
    P.CanCollide = false
    P:BreakJoints()
    M = Instance.new("SpecialMesh", P)
    M.MeshType = "FileMesh"
    M.MeshId = "rbxasset://fonts/torso.mesh"
    W = Instance.new("Motor6D", P)
    W.Part0 = P
  end

  MakeAbs = function(Where)
    NewP()
    P.Parent = Where
    P.Name = "Muscle"
    P.BrickColor = Where.BrickColor
    P.Material = "Neon"
    P.Transparency = Where.Transparency
    P.Reflectance = Where.Reflectance
    P.Size = Vector3.new(0.5, 0.7, 0.5)
    M.Scale = Vector3.new(0.45, 0.35, 0.2)
    W.Part1 = Where
    W.C0 = CFrame.new(-0.47, -0.45, 0.5)
    NewP()
    P.Parent = Where
    P.Name = "Muscle"
    P.BrickColor = Where.BrickColor
    P.Material = "Neon"
    P.Transparency = Where.Transparency
    P.Reflectance = Where.Reflectance
    P.Size = Vector3.new(0.5, 0.7, 0.5)
    M.Scale = Vector3.new(0.45, 0.35, 0.2)
    W.Part1 = Where
    W.C0 = CFrame.new(0.47, -0.45, 0.5)
    NewP()
    P.Parent = Where
    P.Name = "Muscle"
    P.BrickColor = Where.BrickColor
    P.Material = "Neon"
    P.Transparency = Where.Transparency
    P.Reflectance = Where.Reflectance
    P.Size = Vector3.new(0.5, 0.7, 0.5)
    M.Scale = Vector3.new(0.25, 0.25, 0.2)
    W.Part1 = Where
    W.C0 = CFrame.new(0.25, 0.15, 0.45)
    NewP()
    P.Parent = Where
    P.Name = "Muscle"
    P.BrickColor = Where.BrickColor
    P.Material = "Neon"
    P.Transparency = Where.Transparency
    P.Reflectance = Where.Reflectance
    P.Size = Vector3.new(0.5, 0.7, 0.5)
    M.Scale = Vector3.new(0.25, 0.25, 0.2)
    W.Part1 = Where
    W.C0 = CFrame.new(0.25, 0.68, 0.45)
    NewP()
    P.Parent = Where
    P.Name = "Muscle"
    P.BrickColor = Where.BrickColor
    P.Material = "Neon"
    P.Transparency = Where.Transparency
    P.Reflectance = Where.Reflectance
    P.Size = Vector3.new(0.5, 0.7, 0.5)
    M.Scale = Vector3.new(0.25, 0.25, 0.2)
    W.Part1 = Where
    W.C0 = CFrame.new(-0.25, 0.15, 0.45)
    NewP()
    P.Parent = Where
    P.Name = "Muscle"
    P.BrickColor = Where.BrickColor
    P.Material = "Neon"
    P.Transparency = Where.Transparency
    P.Reflectance = Where.Reflectance
    P.Size = Vector3.new(0.5, 0.7, 0.5)
    M.Scale = Vector3.new(0.25, 0.25, 0.2)
    W.Part1 = Where
    W.C0 = CFrame.new(-0.25, 0.68, 0.45)
  end

  MakeMuscle = function(Where)
    NewP()
    P.Parent = Where
    P.BrickColor = P.Parent.BrickColor
    P.Material = "Neon"
    P.Transparency = P.Parent.Transparency
    P.Reflectance = P.Parent.Reflectance
    P.Size = Vector3.new(0.65, 0.7, 0.2)
    P.Name = "Muscle"
    M.Scale = Vector3.new(0.38, 0.45, 0.15)
    W.Part1 = Where
    W.C0 = CFrame.new(0, -0.4, 0.5)
    NewP()
    P.Parent = Where
    P.BrickColor = P.Parent.BrickColor
    P.Material = "Neon"
    P.Transparency = P.Parent.Transparency
    P.Reflectance = P.Parent.Reflectance
    P.Size = Vector3.new(0.65, 0.7, 0.2)
    P.Name = "Muscle"
    M.Scale = Vector3.new(0.38, 0.55, 0.2)
    W.Part1 = Where
    if Where == RArm then
      W.C0 = CFrame.new(0, -0.35, 0.5) * CFrame.Angles(0, 1.55, 0)
    else
      if Where == LArm then
        W.C0 = CFrame.new(0, -0.35, -0.5) * CFrame.Angles(0, 1.55, 0)
      end
    end
    NewP()
    P.Parent = Where
    P.BrickColor = P.Parent.BrickColor
    P.Material = "Neon"
    P.Transparency = P.Parent.Transparency
    P.Reflectance = P.Parent.Reflectance
    P.Size = Vector3.new(0.65, 0.7, 0.2)
    P.Name = "Muscle"
    M.Scale = Vector3.new(0.38, 0.35, 0.2)
    W.Part1 = Where
    W.C0 = CFrame.new(0, -0.55, 0.5) * CFrame.Angles(0, 3.1, 0)
  end

  MakeAbs(Torso)
  MakeMuscle(RArm)
  MakeMuscle(LArm)
end

SHair = function()
  for _,c in pairs(Char:getChildren()) do
    do
      if c.ClassName == "Hat" or c.Name == "Hair" then
        do
          pcall(function()
    c.Handle.Transparency = 1
  end
)
          pcall(function()
    c.Transparency = 1
  end
)
          -- DECOMPILER ERROR at PC20: LeaveBlock: unexpected jumping out IF_THEN_STMT

          -- DECOMPILER ERROR at PC20: LeaveBlock: unexpected jumping out IF_STMT

        end
      end
    end
  end
  NewP = function()
    P = Instance.new("Part")
    P.Material = "Neon"
    P.formFactor = "Custom"
    P.TopSurface = 0
    P.BottomSurface = 0
    P.Anchored = false
    P.CanCollide = false
    P:BreakJoints()
    M = Instance.new("SpecialMesh", P)
    M.MeshType = "FileMesh"
    M.MeshId = ""
    M.TextureId = Link .. 98444243
    W = Instance.new("Motor6D", P)
    W.Part0 = P
  end

  NewP()
  Ml = Head:findFirstChild("LSSJ Hair")
  if Ml then
    Ml:Destroy()
  end
  Mt = Instance.new("Model", Head)
  Mt.Name = "LSSJ Hair"
  P.Name = "Main"
  P.Parent = Mt
  P.Size = Vector3.new(1, 1, 1)
  P.Transparency = 1
  M:Destroy()
  W.Part1 = Head
  NewP()
  P.Parent = Mt.Main
  P.Name = "NHair"
  M.MeshId = Link .. 98444143
  M.Scale = Vector3.new(1.1, 1.4, 1.1)
  W.Part1 = Mt.Main
  W.C0 = CFrame.new(0, -0.75, -0.2) * CFrame.Angles(0.1, 0, 0)
  NewP()
  P.Parent = Mt.Main
  P.Name = "NHair"
  M.MeshId = Link .. 98444143
  M.Scale = Vector3.new(1.1, 1.4, 1.1)
  W.Part1 = Mt.Main
  W.C0 = CFrame.new(0, -0.75, -0.2) * CFrame.Angles(-0.45, 0, -0.2)
  NewP()
  P.Parent = Mt.Main
  P.Name = "NHair"
  M.MeshId = Link .. 98444143
  M.Scale = Vector3.new(1.1, 1.4, 1.1)
  W.Part1 = Mt.Main
  W.C0 = CFrame.new(0, -0.75, -0.2) * CFrame.Angles(-0.55, 0, 0.2)
  NewP()
  P.Parent = Mt.Main
  P.Transparency = 1
  P.Name = "SideHair"
  M.MeshId = Link .. 98444143
  M.Scale = Vector3.new(0.8, 0, 0.8)
  W.Part1 = Mt.Main
  W.C0 = CFrame.new(0, -0.75, -0.4) * CFrame.Angles(-0.2, 0, 1.5)
  NewP()
  P.Parent = Mt.Main
  P.Transparency = 1
  P.Name = "SideHair"
  M.MeshId = Link .. 98444143
  M.Scale = Vector3.new(0.8, 0, 0.8)
  W.Part1 = Mt.Main
  W.C0 = CFrame.new(0, -0.75, -0.4) * CFrame.Angles(-0.2, 0, -1.5)
  NewP()
  P.Parent = Mt.Main
  P.Transparency = 1
  P.Name = "SideHair"
  M.MeshId = Link .. 98444143
  M.Scale = Vector3.new(1, 0.15, 1)
  W.Part1 = Mt.Main
  W.C0 = CFrame.new(0, -0.75, -0.35) * CFrame.Angles(-1.01, 0, 0)
  AnimateH = function()
    coroutine.wrap(function()
      for t = 1, 0, -0.05 do
        wait(0.08)
        for _,AllHairs in pairs(Mt.Main:GetChildren()) do
          if AllHairs.ClassName == "Part" then
            AllHairs.Mesh.VertexColor = Vector3.new(t, 1, 0)
          end
        end
      end
    end
)()
    coroutine.wrap(function()
      for i = 1, 10 do
        wait(0.1)
        for _,Hairs in pairs(Mt:GetChildren()) do
          if Hairs.Name:find("NHair") then
            Hairs.Mesh.Scale = Hairs.Mesh.Scale + Vector3.new(0, 0.03, 0)
            Hairs.Motor6D.C0 = Hairs.Motor6D.C0 * CFrame.new(0, -0.01, 0)
          end
        end
      end
    end
)()
    coroutine.wrap(function()
      for i = 20, 0, -1 do
        wait(0.06)
        for _,SHairs in pairs(Mt:GetChildren()) do
          if SHairs.Name:find("Side") then
            SHairs.Mesh.Scale = SHairs.Mesh.Scale + Vector3.new(0, 0.03, 0)
            SHairs.Transparency = i / 20
          end
        end
      end
    end
)()
  end

  if HairChange then
    AnimateH()
  end
end

AuraB = function()
  AT = Torso:findFirstChild("Aura")
  if AT then
    AT:Destroy()
  end
  AB = Instance.new("Model", Torso)
  AB.Name = "Aura"
  NewP = function()
    A = Instance.new("Part")
    A.Material = "Neon"
    A.formFactor = "Custom"
    A.TopSurface = 0
    A.BottomSurface = 0
    A.Anchored = false
    A.CanCollide = false
    A:BreakJoints()
    MW = Instance.new("SpecialMesh", A)
    MW.MeshType = "FileMesh"
    MW.MeshId = ""
    MW.TextureId = ""
    WW = Instance.new("Motor6D", A)
    WW.Part0 = A
    CSound("Charge", Sounds.Charge.Id, Sounds.Charge.Pitch, 1, Head)
    CSound("Elec", Sounds.Elec.Id, Sounds.Elec.Pitch, 1, Head)
  end

  NewAura = function(Col)
    NewP()
    A.Parent = AB
    A.BrickColor = BrickColor.new(Col)
    MW.MeshId = Link .. 20329976
    MW.Scale = Vector3.new(0.5, 0.5, 0.5)
    WW.Part1 = Torso
    WW.C0 = CFrame.new(0, 2.8, 0)
    coroutine.wrap(function()
      while wait() do
        WW.C0 = WW.C0 * CFrame.Angles(0, 0.35, 0)
      end
    end
)()
    for i = 1, 20 do
      wait()
      A.Transparency = i / 20
      MW.Scale = MW.Scale + Vector3.new(0.1, 0, 0.1)
    end
    pcall(game.Destroy, A)
  end

  repeat
    if not Transformed then
      wait()
      for i = 1, 2 do
        NewAura("Lime green")
      end
      pcall(game.Destroy, AB)
    end
  until not Aura
  repeat
    wait()
    for i = 1, 2 do
      NewAura("Lime green")
    end
    pcall(game.Destroy, AB)
  until not Aura
end

BeamExp = function()
  NewP = function()
    P = Instance.new("Part")
    P.Material = "Neon"
    P.formFactor = "Custom"
    P.TopSurface = 0
    P.BottomSurface = 0
    P.Anchored = false
    P.CanCollide = false
    P:BreakJoints()
    M = Instance.new("CylinderMesh", P)
    W = Instance.new("Motor6D", P)
    W.Part0 = P
    CSound("Boom", Sounds.Boom.Id, Sounds.Boom.Pitch, 1, Head)
    CSound("Boom2", Sounds.Boom2.Id, Sounds.Boom2.Pitch, 1, Head)
    CSound("KiExpl", Sounds.KiExpl.Id, Sounds.KiExpl.Pitch, 1, Head)
    CSound("KiExpl2", Sounds.KiExpl2.Id, Sounds.KiExpl2.Pitch, 1, Head)
    CSound("NoCharge", Sounds.NoCharge.Id, Sounds.NoCharge.Pitch, 1, Head)
  end

  B = Instance.new("Model", Char)
  B.Name = "Beams"
  NewBeam = function(Col)
    NewP()
    P.Parent = B
    P.Name = "Beam"
    P.Size = Vector3.new(1, 1, 1)
    P.BrickColor = BrickColor.new(Col)
    P.Material = "Neon"
    M.Scale = Vector3.new(1, 999999, 1)
    W.Part1 = Torso
    W.C0 = CFrame.new(0, 0, 20)
    Ex = Instance.new("Explosion", Torso)
    Ex.Position = Torso.Position
    Ex.BlastPressure = 0
    coroutine.wrap(function()
      for i = 0, 360 do
        wait()
        W.C0 = W.C0 * CFrame.Angles(0, math.rad(5), 0)
      end
    end
)()
    for i = 1, 40 do
      wait(0.03)
      M.Scale = M.Scale + Vector3.new(1.2, 0, 1.2)
      P.Transparency = i / 40
    end
    pcall(game.Destroy, P)
  end

  NewBeam("Lime green")
  pcall(game.Destroy, B)
  should = true
  for _,v in pairs(Char:GetChildren()) do
    if v:IsA("CharacterMesh") then
      should = false
    end
  end
  if should then
    Muscles()
  end
  SHair()
  F = Instance.new("Fire", Torso)
  F.Name = "Ki Fire"
  F.Color = Color3.new(0.66666666666667, 1, 0)
  F.SecondaryColor = Color3.new(0, 1, 0)
  F.Heat = 10
  F.Size = 10
  NewP()
  P.Parent = Torso
  P.Name = "Beam"
  P.Size = Vector3.new(1, 1, 1)
  P.BrickColor = BrickColor.new("Lime green")
  P.Material = "Neon"
  pcall(game.Destroy, M)
  M = Instance.new("SpecialMesh", P)
  M.MeshType = "FileMesh"
  M.MeshId = Link .. 3270017
  M.Scale = Vector3.new(1, 1, 10)
  W.Part1 = Torso
  W.C0 = CFrame.Angles(4.71, 0, 0) * CFrame.new(0, -5, 0)
  Ex = Instance.new("Explosion", Torso)
  Ex.Position = Torso.Position
  Ex.BlastPressure = 0
  for i = 1, 100 do
    wait()
    W.C0 = W.C0 * CFrame.new(0, -0.1, 0)
    M.Scale = M.Scale + Vector3.new(5, 5, 0.5)
    P.Transparency = i / 100
  end
  pcall(game.Destroy, P)
  Ex = Instance.new("Explosion", Torso)
  Ex.Position = Torso.Position
  Ex.BlastPressure = 0
  if not Transformed then
    Anims["Kakakarrot cake cooldown"]()
  end
end

Transform = function()
  if Transforming then
    return
  end
  if not Transformed and Humanoid.Health > 0 then
    Transforming = true
    Humanoid.WalkSpeed = 0
    Humanoid.MaxHealth = Humanoid.MaxHealth + tonumber("30")
    wait(0.1)
    Humanoid.Health = Humanoid.Health + tonumber("30")
    if not first then
      Anims["DONT LOOK AT ME!"]()
      AuraB()
    end
    Aura = true
    if not first then
      Anims["Dont look at me cool down"]()
    end
    Anims["KAKAKARROT CAKEEE!"]()
    SHair()
    HairChange = true
    BeamExp()
    Humanoid.WalkSpeed = Settings.WS
    HairChange = false
    Aura = false
    Transforming = false
    Transformed = true
    first = true
    Refresh()
  end
end

Un_Transform = function()
  if Transforming then
    return
  end
  if Transformed and Humanoid.Health > 0 then
    Transforming = true
    Humanoid.WalkSpeed = 0
    Anims["DONT LOOK AT ME!"]()
    AuraB()
    Aura = true
    NewP = function()
    P = Instance.new("Part")
    P.Material = "Neon"
    P.formFactor = "Custom"
    P.TopSurface = 0
    P.BottomSurface = 0
    P.Anchored = false
    P.CanCollide = false
    P:BreakJoints()
    M = Instance.new("CylinderMesh", P)
    W = Instance.new("Motor6D", P)
    W.Part0 = P
    CSound("Boom", Sounds.Boom.Id, Sounds.Boom.Pitch, 1, Head)
    CSound("Boom2", Sounds.Boom2.Id, Sounds.Boom2.Pitch, 1, Head)
    CSound("KiExpl2", Sounds.KiExpl2.Id, Sounds.KiExpl2.Pitch, 1, Head)
    CSound("NoCharge", Sounds.NoCharge.Id, Sounds.NoCharge.Pitch, 1, Head)
  end

    coroutine.wrap(function()
    for i = 1, 10 do
      wait()
      for _,larm in pairs(LArm:GetChildren()) do
        if larm.Name:find("Musc") then
          larm.Transparency = i / 10
        end
      end
    end
  end
)()
    coroutine.wrap(function()
    for i = 1, 10 do
      wait()
      for _,abs in pairs(Torso:getChildren()) do
        if abs.Name:find("Musc") then
          abs.Transparency = i / 10
        end
      end
    end
    for _,abs in pairs(Torso:getChildren()) do
      if abs.Name:find("Musc") then
        abs:Destroy()
      end
    end
  end
)()
    coroutine.wrap(function()
    for i = 1, 10 do
      wait()
      for _,rarm in pairs(RArm:getChildren()) do
        if rarm.Name:find("Musc") then
          rarm.Transparency = i / 10
        end
      end
    end
    for _,arms in pairs(RArm:getChildren()) do
      if arms.Name:find("Musc") then
        arms:Destroy()
      end
    end
  end
)()
    coroutine.wrap(function()
    Hair = Head:findFirstChild("LSSJ Hair")
    if Hair then
      for t = 1, 0, -0.05 do
        wait(0.08)
        for _,hairs in pairs(Hair.Main:GetChildren()) do
          if hairs.ClassName == "Part" and hairs:findFirstChild("Mesh", true) then
            hairs.Mesh.VertexColor = hairs.Mesh.VertexColor + Vector3.new(t, 0, 0)
          end
        end
      end
    end
  end
)()
    coroutine.wrap(function()
    Hair = Head:findFirstChild("LSSJ Hair")
    if Hair then
      for i = 1, 20 do
        wait(0.06)
        for _,SHairs in pairs(Hair:GetChildren()) do
          if SHairs.Name:find("Side") then
            SHairs.Mesh.Scale = SHairs.Mesh.Scale - Vector3.new(0, 0.03, 0)
            SHairs.Transparency = i / 20
          end
        end
      end
    end
  end
)()
    coroutine.wrap(function()
    Hair = Head:findFirstChild("LSSJ Hair")
    if Hair then
      for i = 1, 10 do
        do
          wait(0.1)
          for _,Hairs in pairs(Hair:GetChildren()) do
            if Hairs.Name:find("NHair") then
              Hairs.Mesh.Scale = Hairs.Mesh.Scale - Vector3.new(0.06, 0.06, 0.06)
              Hairs.Transparency = i / 10
              Hairs.Motor6D.C0 = Hairs.Motor6D.C0 * CFrame.new(0, 0.01, 0)
            end
          end
        end
      end
      for _,c in pairs(Char:getChildren()) do
        if c.ClassName == "Hat" or c.Name == "Hair" then
          pcall(function()
      c.Handle.Transparency = 0
    end
)
          pcall(function()
      c.Transparency = 0
    end
)
        end
      end
    end
  end
)()
    for _,f in pairs(Torso:getChildren()) do
      if f.ClassName == "Fire" then
        pcall(game.Destroy, f)
      end
    end
    if OriginShirt ~= nil then
      HRP.Transparency = 1
      S = Instance.new("Shirt", Char)
      S.ShirtTemplate = OriginShirt
    end
    NewP()
    P.Parent = Torso
    P.Name = "Beam"
    P.Size = Vector3.new(1, 1, 1)
    P.BrickColor = BrickColor.new("Lime green")
    P.Material = "Neon"
    pcall(game.Destroy, M)
    M = Instance.new("SpecialMesh", P)
    M.MeshType = "FileMesh"
    M.MeshId = Link .. 3270017
    M.Scale = Vector3.new(100, 100, 50)
    W.Part1 = Torso
    W.C0 = CFrame.Angles(4.71, 0, 0) * CFrame.new(0, -12, 0)
    Ex = Instance.new("Explosion", Torso)
    Ex.Position = Torso.Position
    Ex.BlastPressure = 0
    for i = 1, 100 do
      wait()
      W.C0 = W.C0 * CFrame.new(0, 0.1, 0)
      M.Scale = M.Scale - Vector3.new(i / 100, i / 100, 0.5)
      P.Transparency = i / 100
    end
    pcall(game.Destroy, P)
    Ex = Instance.new("Explosion", Torso)
    Ex.Position = Torso.Position
    Ex.BlastPressure = 0
    if Head:findFirstChild("LSSJ Hair", true) then
      pcall(game.Destroy, Head["LSSJ Hair"])
    end
    Anims["Dont look at me cool down"]()
    Humanoid.Health = Humanoid.Health - tonumber("30")
    wait(0.1)
    Humanoid.MaxHealth = Humanoid.MaxHealth - tonumber("30")
    Humanoid.WalkSpeed = OriginWS
    Aura = false
    Transforming = false
    Transformed = false
    Refresh()
  end
end

Player.Chatted:connect(function(Msg)
  if Char.trans.Value == false and Char.Occupied.Value == false then
    if Msg:lower() == "anger" and Switch.Value == "" then
      Switch.Value = "anger"
      Char.trans.Value = true
      Transform()
      Char.trans.Value = false
    else
      if Msg:lower() == "off" and Switch.Value == "anger" then
        Char.trans.Value = true
        Un_Transform()
        Char.trans.Value = false
        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()