INFECT PLAYER // ALIENATE

local PlayerName = "PLAYER NAME HERE"


-- INFECT PLAYER // ALIENATE







wait(2)



local players = game:GetService("Players")
local plr = players:FindFirstChild(PlayerName)
local char = plr.Character
local rigtype = char.Humanoid.RigType
--r6
if rigtype == Enum.HumanoidRigType.R6 then
    --col
    char.Head.BrickColor = BrickColor.Red()
    char.Torso.BrickColor = BrickColor.Red()
    char.LeftArm.BrickColor = BrickColor.Red()
    char.RightArm.BrickColor = BrickColor.Red()
    char.LeftLeg.BrickColor = BrickColor.Red()
    char.RightLeg.BrickColor = BrickColor.Red()
    --mat
    char.Head.Material = "Granite"
    char.Torso.Material = "Granite"
    char.LeftArm.Material = "Granite"
    char.RightArm.Material = "Granite"
    char.LeftLeg.Material = "Granite"
    char.RightLeg.Material = "Granite"
end
--r15
if rigtype == Enum.HumanoidRigType.R15 then
    --col
    char.Head.BrickColor = BrickColor.Red()
    char.UpperTorso.BrickColor = BrickColor.Red()
    char.LowerTorso.BrickColor = BrickColor.Red()
    char.RightUpperArm.BrickColor = BrickColor.Red()
    char.RightLowerArm.BrickColor = BrickColor.Red()
    char.RightHand.BrickColor = BrickColor.Red()
    char.LeftUpperArm.BrickColor = BrickColor.Red()
    char.LeftLowerArm.BrickColor = BrickColor.Red()
    char.LeftHand.BrickColor = BrickColor.Red()
    char.RightUpperLeg.BrickColor = BrickColor.Red()
    char.RightLowerLeg.BrickColor = BrickColor.Red()
    char.RightFoot.BrickColor = BrickColor.Red()
    char.LeftUpperLeg.BrickColor = BrickColor.Red()
    char.LeftLowerLeg.BrickColor = BrickColor.Red()
    char.LeftFoot.BrickColor = BrickColor.Red()
    --mat
    char.Head.Material = "Granite"
    char.UpperTorso.Material = "Granite"
    char.LowerTorso.Material = "Granite"
    char.RightUpperArm.Material = "Granite"
    char.RightLowerArm.Material = "Granite"
    char.RightHand.Material = "Granite"
    char.LeftUpperArm.Material = "Granite"
    char.LeftLowerArm.Material = "Granite"
    char.LeftHand.Material = "Granite"
    char.RightUpperLeg.Material = "Granite"
    char.RightLowerLeg.Material = "Granite"
    char.RightFoot.Material = "Granite"
    char.LeftUpperLeg.Material = "Granite"
    char.LeftLowerLeg.Material = "Granite"
    char.LeftFoot.Material = "Granite"
end
char.Shirt:Destroy()
char.Pants:Destroy()
--wackybubble1
local wackybubble1 = Instance.new("Part",workspace)
wackybubble1.Material = "Granite"
wackybubble1.BrickColor = BrickColor.Green()
wackybubble1.Size = Vector3.new(0.1,0.1,0.1)
wackybubble1.Anchored = true
wackybubble1.CanCollide = false
wackybubble1.Shape = "Ball"
--wackybubble2
local wackybubble2 = Instance.new("Part",workspace)
wackybubble2.Material = "Granite"
wackybubble2.BrickColor = BrickColor.Green()
wackybubble2.Size = Vector3.new(0.1,0.1,0.1)
wackybubble2.Anchored = true
wackybubble2.CanCollide = false
wackybubble2.Shape = "Ball"
--r15

local r15rng = math.random(1,15)
function pwbr15(BP,BP2,No)
    if r15rng == No then
        while true do
            char.Humanoid.Health = char.Humanoid.Health - 0.4
            wackybubble1.Position = char:FindFirstChild(BP).Position
            wackybubble2.Position = char:FindFirstChild(BP2).Position
            wait(0.1)
            wackybubble1.Size = wackybubble1.Size + Vector3.new(0.01,0.01,0.01)
            wackybubble2.Size = wackybubble1.Size + Vector3.new(0.01,0.01,0.01)
        end
    end
end
if rigtype == Enum.HumanoidRigType.R15 then
    pwbr15("Head","RightLowerArm",1)
    pwbr15("UpperTorso","LeftFoot",2)
    pwbr15("LowerTorso","RightUpperArm",3)
    pwbr15("LeftUpperArm","RightHand,4")
    pwbr15("LeftLowerArm","Head",5)
    pwbr15("LeftHand","LeftFoot",6)
    pwbr15("RightUpperArm","LeftUpperArm",7)
    pwbr15("RightLowerArm","LeftHand",8)
    pwbr15("RightHand","LeftLowerLeg",9)
    pwbr15("LeftUpperLeg","RightLowerArm",10)
    pwbr15("LeftLowerLeg","LeftUpperArm",11)
    pwbr15("LeftFoot","RightHand",12)
    pwbr15("RightUpperLeg","LowerTorso",13)
    pwbr15("RightLowerLeg","LeftLowerLeg",14)
    pwbr15("RightFoot","RightUpperLeg",15)
end
--r6
local r6rng = math.random(1,6)
function pwbr6(BP,BP2,No)
    if r6rng == No then
        while true do
            char.Humanoid.Health = char.Humanoid.Health - 0.4
            wackybubble1.Position = char:FindFirstChild(BP).Position
            wackybubble2.Position = char:FindFirstChild(BP2).Position
            wait(0.1)
            wackybubble1.Size = wackybubble1.Size + Vector3.new(0.01,0.01,0.01)
            wackybubble2.Size = wackybubble1.Size + Vector3.new(0.01,0.01,0.01)
        end
    end
end
if rigtype == Enum.HumanoidRigType.R6 then
    pwbr6("Head","LeftLeg",1)
    pwbr6("Torso","RightLeg",2)
    pwbr6("LeftLeg","RightArm",3)
    pwbr6("RightLeg","Head",4)
    pwbr6("LeftArm","Torso",5)
    pwbr6("RightArm","LeftArm",6)
end