test 3

--fixed by Scenius
  plr = game.Players.LocalPlayer
  repeat
    wait(0.4)
  until plr.Character
  chr = plr.Character
  human = chr:FindFirstChild("Humanoid")
  mouse = plr:GetMouse()
  selected = false
  equipd = false
  tors = chr.Torso
  rarm = chr["Right Arm"]
  larm = chr["Left Arm"]
  rleg = chr["Right Leg"]
  lleg = chr["Left Leg"]
  hrp = chr.HumanoidRootPart
  head = chr.Head
  anim = human.Animator
  activu = false
  Heartbeat = Instance.new("BindableEvent")
  Heartbeat.Name = "Heartbeat"
  Heartbeat.Parent = script
  frame = 0.03333333333333333
  tf = 0
  game:GetService("RunService").Heartbeat:connect(function(s, p)
    tf = tf + s
    if tf >= frame then
      for i = 1, math.floor(tf / frame) do
        Heartbeat:Fire()
      end
      tf = tf - frame * math.floor(tf / frame)
    end
  end)
  function swait(num)
    if num == 0 or num == nil then
      Heartbeat.Event:wait()
    else
      for i = 1, num do
        Heartbeat.Event:wait()
      end
    end
  end
  tool = Instance.new("Tool")
  tool.CanBeDropped = false
  tool.RequiresHandle = false
  tool.Name = "Ultra gaster power"
  tool.Parent = plr.Backpack
  RSC0 = CFrame.new(1, 0.5, 0, 0, 0, 1, 0, 1, 0, -1, 0, 0)
  RSC1 = CFrame.new(-0.5, 0.5, 0, 0, 0, 1, 0, 1, 0, -1, 0, 0)
  LSC0 = CFrame.new(-1, 0.5, 0, 0, 0, -1, 0, 1, 0, 1, 0, 0)
  LSC1 = CFrame.new(0.5, 0.5, 0, 0, 0, -1, 0, 1, 0, 1, 0, 0)
  RHC0 = CFrame.new(1, -1, 0, 0, 0, 1, 0, 1, 0, -1, 0, 0)
  RHC1 = CFrame.new(0.5, 1, 0, 0, 0, 1, 0, 1, 0, -1, 0, 0)
  LHC0 = CFrame.new(-1, -1, 0, 0, 0, -1, 0, 1, 0, 1, 0, 0)
  LHC1 = CFrame.new(-0.5, 1, 0, 0, 0, -1, 0, 1, 0, 1, 0, 0)
  NC0 = CFrame.new(0, 1, 0, -1, 0, 0, 0, 0, 1, 0, 1, 0)
  NC1 = CFrame.new(0, -0.5, 0, -1, 0, 0, 0, 0, 1, 0, 1, 0)
  RJC0 = CFrame.new(0, 0, 0, -1, 0, 0, 0, 0, 1, 0, 1, 0)
  RJC1 = CFrame.new(0, 0, 0, -1, 0, 0, 0, 0, 1, 0, 1, 0)
  RS = tors:FindFirstChild("Right Shoulder")
  LS = tors:FindFirstChild("Left Shoulder")
  RH = tors:FindFirstChild("Right Hip")
  LH = tors:FindFirstChild("Left Hip")
  RJ = hrp:FindFirstChild("RootJoint")
  N = tors:FindFirstChild("Neck")
  cf = CFrame.new
  ang = CFrame.Angles
  rd = math.rad
  rd2 = math.random
  function nooutline(p)
    p.TopSurface, p.BottomSurface, p.LeftSurface, p.RightSurface, p.FrontSurface, p.BottomSurface = 10, 10, 10, 10, 10, 10
  end
  function makepart(color, name, reflec, mater, parnt, cfram)
    local port = Instance.new("Part")
    port.BrickColor = BrickColor.new(color)
    port.Name = name
    nooutline(port)
    port.Reflectance = reflec
    port.Material = mater
    port.Anchored = false
    port.CanCollide = false
    port.Locked = true
    port.Size = Vector3.new(0.2, 0.2, 0.2)
    port.Parent = parnt
    return port
  end
  function makemesh(meshtype, scale, meshid, parent)
    local mes = Instance.new("SpecialMesh")
    mes.MeshType = meshtype
    mes.Scale = scale
    if meshtype == "FileMesh" then
      mes.MeshId = meshid
    end
    mes.Parent = parent
    return mes
  end
  function makeweld(parent, p0, p1, c0, c1)
    local wel = Instance.new("Weld")
    wel.Part0 = p0
    wel.Part1 = p1
    wel.C0 = c0
    if c1 ~= nil then
      wel.C1 = c1
    end
    wel.Parent = parent
    return wel
  end
  function smokz(prnt)
    s = Instance.new("Smoke")
    s.Color = Color3.new(1, 1, 1)
    s.Enabled = false
    s.Name = "smok"
    s.Opacity = 0.5
    s.RiseVelocity = 0.2
    s.Size = 0.1
    s.Parent = prnt
  end
  function glow(tz, paz, smokinz, length)
    if tz.Parent:FindFirstChildOfClass("Humanoid") and paz.Transparency == 1 then
      do
        local s = Instance.new("Sound")
        s.SoundId = "rbxassetid://298181829"
        s.Volume = 0.25
        s.Pitch = math.random(9, 11) / 10
        s.Parent = paz
        s:Play()
        paz.Transparency = 0.7
        if smokinz == true then
          paz.smok.Enabled = true
        end
        delay(length, function()
          paz.Transparency = 1
          paz.smok.Enabled = false
          s:Destroy()
        end)
      end
    end
  end
  function makeglow()
    for _, p in pairs(chr:GetChildren()) do
      if p.ClassName == "Accessory" then
        do
          local h = p:FindFirstChildOfClass("Part")
          local nh = h:Clone()
          nh.Parent = nil
          nh.CFrame = h.CFrame
          nh.Transparency = 1
          nh.Name = "Glow"
          nh.Material = "Neon"
          nh.BrickColor = BrickColor.new("Dark stone grey")
          nh.CustomPhysicalProperties = PhysicalProperties.new(0.2, 0.3, 0.5)
          nh.Parent = h
          makeweld(nh, nh, h, cf(0, 0, 0))
          local m = nh:FindFirstChildOfClass("SpecialMesh")
          m.Scale = m.Scale + Vector3.new(0.06, 0.06, 0.06)
          m.TextureId = ""
          smokz(nh)
          nh.Touched:connect(function(po)
            glow(po, nh, true, 0.8)
          end)
        end
      elseif p.ClassName == "Part" and p ~= hrp then
        do
          local n = p:Clone()
          n.Parent = nil
          n.Transparency = 1
          n.Material = "Neon"
          n.Name = "Glow"
          n.BrickColor = BrickColor.new("Dark stone grey")
          n.CFrame = p.CFrame
          n.CustomPhysicalProperties = PhysicalProperties.new(0.2, 0.3, 0.5)
          n.Parent = p
          makeweld(n, n, p, cf(0, 0, 0))
          smokz(n)
          n.Touched:connect(function(po)
            glow(po, n, true, 0.8)
          end)
          if n:FindFirstChildOfClass("Decal") then
            n:FindFirstChildOfClass("Decal"):Destroy()
          end
          if p:FindFirstChildOfClass("SpecialMesh") then
            local c = p:FindFirstChildOfClass("SpecialMesh"):Clone()
            c.Parent = nil
            c.Scale = c.Scale + Vector3.new(0.05, 0.05, 0.05)
            c.Parent = n
          else
            local m = Instance.new("BlockMesh")
            m.Scale = Vector3.new(1.05, 1.025, 1.05)
            if p == tors then
              m.Scale = Vector3.new(1.05, 1.05, 1.05)
            end
            m.Parent = n
          end
        end
      end
    end
  end
  makeglow()
  function fglow(glopart, duration)
    for _ = 1, 4 do
      swait()
      glopart.Transparency = glopart.Transparency - 0.075
    end
    delay(duration, function()
      for _ = 1, 4 do
        swait()
        glopart.Transparency = glopart.Transparency + 0.075
      end
    end)
  end
  function lerpz(joint, prop, cfrmz, alp)
    joint[prop] = joint[prop]:lerp(cfrmz, alp)
  end
  function resetlerp()
    RJ.C0 = RJC0
    RJ.C1 = RJC1
    N.C0 = NC0
    N.C1 = NC1
    RS.C0 = RSC0
    RS.C1 = RSC1
    LS.C0 = LSC0
    LS.C1 = LSC1
    RH.C0 = RHC0
    RH.C1 = RHC1
    LH.C0 = LHC0
  end