View difference between Paste ID: q2yDDwfg and T9uaFRgP

 if game:GetService("RunService"):IsClient()then error("Please run as a server script. Use h/ instead of hl/.")end;print("FE Compatibility: by WaverlyCole");InternalData = {}
 do
     script.Parent = owner.Character
     local Event = Instance.new("RemoteEvent");Event.Name = "UserInput"
     local function NewFakeEvent()
         local Bind = Instance.new("BindableEvent")
         local Fake;Fake = {Connections = {},
         fakeEvent=true;
         Connect=function(self,Func)
             Bind.Event:connect(Func)
             self.Connections[Bind] = true
             return setmetatable({Connected = true},{
             __index = function (self,Index)
                 if Index:lower() == "disconnect" then
                     return function() Fake.Connections[Bind] = false;self.Connected = false end
                 end
                 return Fake[Index]
             end;
             __tostring = function() return "Connection" end;
         })
         end}
         Fake.connect = Fake.Connect;return Fake;
     end
     local Mouse = {Target=nil,Hit=CFrame.new(),KeyUp=NewFakeEvent(),KeyDown=NewFakeEvent(),Button1Up=NewFakeEvent(),Button1Down=NewFakeEvent()}
     local UserInputService = {InputBegan=NewFakeEvent(),InputEnded=NewFakeEvent()}
     local ContextActionService = {Actions={},BindAction = function(self,actionName,Func,touch,...)
         self.Actions[actionName] = Func and {Name=actionName,Function=Func,Keys={...}} or nil
     end};ContextActionService.UnBindAction = ContextActionService.BindAction
     local function TriggerEvent(self,Event,...)
         local Trigger = Mouse[Event]
         if Trigger and Trigger.fakeEvent and Trigger.Connections then
             for Connection,Active in pairs(Trigger.Connections) do if Active then Connection:Fire(...) end end
         end
     end
     Mouse.TrigEvent = TriggerEvent;UserInputService.TrigEvent = TriggerEvent
     Event.OnServerEvent:Connect(function(FiredBy,Input)
         if FiredBy.Name ~= owner.Name then return end
         if Input.MouseEvent then
             Mouse.Target = Input.Target;Mouse.Hit = Input.Hit
         else
             local Begin = Input.UserInputState == Enum.UserInputState.Begin
             if Input.UserInputType == Enum.UserInputType.MouseButton1 then return Mouse:TrigEvent(Begin and "Button1Down" or "Button1Up") end
             for _,Action in pairs(ContextActionService.Actions) do
                 for _,Key in pairs(Action.Keys) do if Key==Input.KeyCode then Action.Function(Action.Name,Input.UserInputState,Input) end end
             end
             Mouse:TrigEvent(Begin and "KeyDown" or "KeyUp",Input.KeyCode.Name:lower())
             UserInputService:TrigEvent(Begin and "InputBegan" or "InputEnded",Input,false)
         end
     end)
     InternalData["Mouse"] = Mouse;InternalData["ContextActionService"] = ContextActionService;InternalData["UserInputService"] = UserInputService
     Event.Parent = NLS([[
         local Player = owner;local Event = script:WaitForChild("UserInput");local UserInputService = game:GetService("UserInputService");local Mouse = Player:GetMouse()
         local Input = function(Input,gameProcessedEvent)
             if gameProcessedEvent then return end
             Event:FireServer({KeyCode=Input.KeyCode,UserInputType=Input.UserInputType,UserInputState=Input.UserInputState})
         end
         UserInputService.InputBegan:Connect(Input);UserInputService.InputEnded:Connect(Input)
         local Hit,Target
         while wait(1/30) do
             if Hit ~= Mouse.Hit or Target ~= Mouse.Target then
                 Hit,Target = Mouse.Hit,Mouse.Target;Event:FireServer({["MouseEvent"]=true,["Target"]=Target,["Hit"]=Hit})
             end
         end
     ]],owner.Character)
 end
 RealGame = game;game = setmetatable({},{
     __index = function (self,Index)
         local Sandbox = function (Thing)
             if Thing:IsA("Player") then
                 local RealPlayer = Thing
                 return setmetatable({},{
                     __index = function (self,Index)
                         local Type = type(RealPlayer[Index])
                         if Type == "function" then
                             if Index:lower() == "getmouse" or Index:lower() == "mouse" then
                                 return function (self)return InternalData["Mouse"] end
                             end
                             return function (self,...)return RealPlayer[Index](RealPlayer,...) end
                         end
                         return RealPlayer[Index]
                     end;
                     __tostring = function(self) return RealPlayer.Name end
                 })
             end
         end
         if RealGame[Index] then
             local Type = type(RealGame[Index])
             if Type == "function" then
                 if Index:lower() == "getservice" or Index:lower() == "service" then
                     return function (self,Service)
                         local FakeServices = {
                             ["players"] = function()
                                 return setmetatable({},{
                                     __index = function (self2,Index2)
                                         local RealService = RealGame:GetService(Service)
                                         local Type2 = type(Index2)
                                         if Type2 == "function" then
                                             return function (self,...) return RealService[Index2](RealService,...)end
                                         else
                                             if Index2:lower() == "localplayer" then return Sandbox(owner) end
                                             return RealService[Index2]
                                         end
                                     end;
                                     __tostring = function(self) return RealGame:GetService(Service).Name end
                                 })
                             end;
                             ["contextactionservice"] = function() return InternalData["ContextActionService"] end;
                             ["userinputservice"] = function() return InternalData["UserInputService"] end;
                             ["runservice"] = function()
                                 return setmetatable({},{
                                     __index = function(self2,Index2)
                                         local RealService = RealGame:GetService(Service)
                                         local Type2 = type(Index2)
                                         if Type2 == "function" then
                                             return function (self,...) return RealService[Index2](RealService,...) end
                                         else
                                             local RunServices = {
                                                 ["bindtorenderstep"] = function() return function (self,Name,Priority,Function) return RealGame:GetService("RunService").Stepped:Connect(Function) end end;
                                                 ["renderstepped"] = function() return RealService["Stepped"] end
                                             }
                                             if RunServices[Index2:lower()] then return RunServices[Index2:lower()]() end
                                             return RealService[Index2]
                                         end
                                     end
                                 })
                             end
                         }
                         if FakeServices[Service:lower()] then return FakeServices[Service:lower()]() end
                         return RealGame:GetService(Service)
                     end
                 end
                 return function (self,...) return RealGame[Index](RealGame,...) end
             else
                 if game:GetService(Index) then return game:GetService(Index) end
                 return RealGame[Index]
             end
         end
         return nil
     end
 });Game = game;owner = game:GetService("Players").LocalPlayer;script = Instance.new("Script");print("Complete! Running...")
 
 Player = game:GetService("Players").LocalPlayer
 PlayerGui = Player.PlayerGui
 Cam = workspace.CurrentCamera
 Backpack = Player.Backpack
 Character = Player.Character
 Humanoid = Character.Humanoid
 Mouse = Player:GetMouse()
 RootPart = Character["HumanoidRootPart"]
 Torso = Character["Torso"]
 Head = Character["Head"]
 RightArm = Character["Right Arm"]
 LeftArm = Character["Left Arm"]
 RightLeg = Character["Right Leg"]
 LeftLeg = Character["Left Leg"]
 RootJoint = RootPart["RootJoint"]
 Neck = Torso["Neck"]
 RightShoulder = Torso["Right Shoulder"]
 LeftShoulder = Torso["Left Shoulder"]
 RightHip = Torso["Right Hip"]
 LeftHip = Torso["Left Hip"]
 function EatSound()
     local sick = Instance.new("Sound",Character)
     sick.SoundId = "rbxassetid://625712280"
     sick.Pitch = 1
     sick.Name = "Eating"
     sick.MaxDistance = 150
     sick.Volume = 2
 end
 
 epic = Instance.new("Sound",Head)
 epic.Playing = true
 epic.Looped = true
 epic.Volume = 5
 epic.SoundId = "rbxassetid://3090964224"
 
 
 IT = Instance.new
 CF = CFrame.new
 VT = Vector3.new
 RAD = math.rad
 C3 = Color3.new
 UD2 = UDim2.new
 BRICKC = BrickColor.new
 ANGLES = CFrame.Angles
 EULER = CFrame.fromEulerAnglesXYZ
 COS = math.cos
 ACOS = math.acos
 SIN = math.sin
 ASIN = math.asin
 ABS = math.abs
 MRANDOM = math.random
 FLOOR = math.floor
 
 --//=================================\\
 --||          USEFUL VALUES
 --\\=================================//
 
 Animation_Speed = 3
 Frame_Speed = 1 / 60 -- (1 / 30) OR (1 / 60)
 local Speed = 45
 local ROOTC0 = CF(0, 0, 0) * ANGLES(RAD(-90), RAD(0), RAD(180))
 local NECKC0 = CF(0, 1, 0) * ANGLES(RAD(-90), RAD(0), RAD(180))
 local RIGHTSHOULDERC0 = CF(-0.5, 0, 0) * ANGLES(RAD(0), RAD(90), RAD(0))
 local LEFTSHOULDERC0 = CF(0.5, 0, 0) * ANGLES(RAD(0), RAD(-90), RAD(0))
 local DAMAGEMULTIPLIER = 1
 local ANIM = "Idle"
 local ATTACK = false
 local EQUIPPED = false
 local HOLD = false
 local COMBO = 1
 local Rooted = false
 local SINE = 0
 local KEYHOLD = false
 local CHANGE = 2 / Animation_Speed
 local WALKINGANIM = false
 local VALUE1 = false
 local VALUE2 = false
 local ROBLOXIDLEANIMATION = IT("Animation")
 ROBLOXIDLEANIMATION.Name = "Roblox Idle Animation"
 ROBLOXIDLEANIMATION.AnimationId = "http://www.roblox.com/asset/?id=180435571"
 --ROBLOXIDLEANIMATION.Parent = Humanoid
 local WEAPONGUI = IT("ScreenGui", PlayerGui)
 WEAPONGUI.Name = "Weapon GUI"
 local Effects = IT("Folder", Character)
 Effects.Name = "Effects"
 local ANIMATOR = Humanoid.Animator
 local ANIMATE = Character.Animate
 local UNANCHOR = true
 local HITPOS = nil
 local HITFLOOR = nil
 local BODY = {}
 
 --//=================================\\
 --\\=================================//
 function chatf(text)
     local chat = coroutine.wrap(function()
     if Character:FindFirstChild("TalkingBillBoard")~= nil then
         Character:FindFirstChild("TalkingBillBoard"):destroy()
     end
     local Bill = Instance.new("BillboardGui",Character)
     Bill.Size = UDim2.new(0,100,0,40)
     Bill.StudsOffset = Vector3.new(0,3,0)
     Bill.Adornee = Character.Head
     Bill.Name = "TalkingBillBoard"
     local Heh = Instance.new("TextLabel",Bill)
     Heh.BackgroundTransparency = 1
     Heh.BorderSizePixel = 0
     Heh.Text = ""
     Heh.Font = "Fantasy"
     Heh.TextSize = 40
     Heh.TextStrokeTransparency = 0
     Heh.Size = UDim2.new(1,0,0.5,0)
     coroutine.resume(coroutine.create(function()
         while Heh ~= nil do
             Swait()
             Heh.Position = UDim2.new(math.random(-.4,.4),math.random(-5,5),.05,math.random(-5,5))
             Heh.Rotation = math.random(-5,5)
             Heh.TextColor3 = Color3.new(50/255,0,0)
             Heh.TextStrokeColor3 = Color3.new(255/255,0,0)
         end
     end))
     for i = 1,string.len(text),1 do
         Swait()
         Heh.Text = string.sub(text,1,i)
     end
     Swait(90)--Re[math.random(1, 93)]
     for i = 0, 1, .025 do
         Swait()
         Bill.ExtentsOffset = Vector3.new(math.random(-i, i), math.random(-i, i), math.random(-i, i))
         Heh.TextStrokeTransparency = i
         Heh.TextTransparency = i
     end
     Bill:Destroy()
     end)
 chat()
 end
 
 function chatfunc(text)
     local chat = coroutine.wrap(function()
     if Character:FindFirstChild("TalkingBillBoard")~= nil then
         Character:FindFirstChild("TalkingBillBoard"):destroy()
     end
     local Bill = Instance.new("BillboardGui",Character)
     Bill.Size = UDim2.new(0,100,0,40)
     Bill.StudsOffset = Vector3.new(0,3,0)
     Bill.Adornee = Character.Head
     Bill.Name = "TalkingBillBoard"
     local Hehe = Instance.new("TextLabel",Bill)
     Hehe.BackgroundTransparency = 1
     Hehe.BorderSizePixel = 0
     Hehe.Text = ""
     Hehe.Font = "Garamond"
     Hehe.TextSize = 40
     Hehe.TextStrokeTransparency = 0
     Hehe.Size = UDim2.new(1,0,0.5,0)
     coroutine.resume(coroutine.create(function()
         while Hehe ~= nil do
             Swait()
             Hehe.Position = UDim2.new(math.random(-.4,.4),math.random(-5,5),.05,math.random(-5,5))
             Hehe.Rotation = math.random(-5,5)
             Hehe.TextColor3 = Color3.new(0,0,50/255)
             Hehe.TextStrokeColor3 = Color3.new(0,0,100/255)
         end
     end))
     for i = 1,string.len(text),1 do
         Swait()
         Hehe.Text = string.sub(text,1,i)
     end
     Swait(90)--Re[math.random(1, 93)]
     for i = 0, 1, .025 do
         Swait()
         Bill.ExtentsOffset = Vector3.new(math.random(-i, i), math.random(-i, i), math.random(-i, i))
         Hehe.TextStrokeTransparency = i
         Hehe.TextTransparency = i
     end
     Bill:Destroy()
     end)
 chat()
 end
 
 --//=================================\\
 --|| SAZERENOS' ARTIFICIAL HEARTBEAT
 --\\=================================//
 
 ArtificialHB = Instance.new("BindableEvent", script)
 ArtificialHB.Name = "ArtificialHB"
 
 script:WaitForChild("ArtificialHB")
 
 frame = Frame_Speed
 tf = 0
 allowframeloss = false
 tossremainder = false
 lastframe = tick()
 script.ArtificialHB:Fire()
 
 game:GetService("RunService").Heartbeat:connect(function(s, p)
     tf = tf + s
     if tf >= frame then
         if allowframeloss then
             script.ArtificialHB:Fire()
             lastframe = tick()
         else
             for i = 1, math.floor(tf / frame) do
                 script.ArtificialHB:Fire()
             end
         lastframe = tick()
         end
         if tossremainder then
             tf = 0
         else
             tf = tf - frame * math.floor(tf / frame)
         end
     end
 end)
 
 --//=================================\\
 --\\=================================//
 
 --//=================================\\
 --||          SOME FUNCTIONS
 --\\=================================//
 
 function Raycast(POSITION, DIRECTION, RANGE, IGNOREDECENDANTS)
     return workspace:FindPartOnRay(Ray.new(POSITION, DIRECTION.unit * RANGE), IGNOREDECENDANTS)
 end
 
 function PositiveAngle(NUMBER)
     if NUMBER >= 0 then
         NUMBER = 0
     end
     return NUMBER
 end
 
 function NegativeAngle(NUMBER)
     if NUMBER <= 0 then
         NUMBER = 0
     end
     return NUMBER
 end
 
 function Swait(NUMBER)
     if NUMBER == 0 or NUMBER == nil then
         ArtificialHB.Event:wait()
     else
         for i = 1, NUMBER do
             ArtificialHB.Event:wait()
         end
     end
 end
 
 function CreateMesh(MESH, PARENT, MESHTYPE, MESHID, TEXTUREID, SCALE, OFFSET)
     local NEWMESH = IT(MESH)
     if MESH == "SpecialMesh" then
         NEWMESH.MeshType = MESHTYPE
         if MESHID ~= "nil" and MESHID ~= "" then
             NEWMESH.MeshId = "http://www.roblox.com/asset/?id="..MESHID
         end
         if TEXTUREID ~= "nil" and TEXTUREID ~= "" then
             NEWMESH.TextureId = "http://www.roblox.com/asset/?id="..TEXTUREID
         end
     end
     NEWMESH.Offset = OFFSET or VT(0, 0, 0)
     NEWMESH.Scale = SCALE
     NEWMESH.Parent = PARENT
     return NEWMESH
 end
 
 function CreatePart(FORMFACTOR, PARENT, MATERIAL, REFLECTANCE, TRANSPARENCY, BRICKCOLOR, NAME, SIZE, ANCHOR)
     local NEWPART = IT("Part")
     NEWPART.formFactor = FORMFACTOR
     NEWPART.Reflectance = REFLECTANCE
     NEWPART.Transparency = TRANSPARENCY
     NEWPART.CanCollide = false
     NEWPART.Locked = true
     NEWPART.Anchored = true
     if ANCHOR == false then
         NEWPART.Anchored = false
     end
     NEWPART.BrickColor = BRICKC(tostring(BRICKCOLOR))
     NEWPART.Name = NAME
     NEWPART.Size = SIZE
     NEWPART.Position = Torso.Position
     NEWPART.Material = MATERIAL
     NEWPART:BreakJoints()
     NEWPART.Parent = PARENT
     return NEWPART
 end
 
 function CreateSeat(FORMFACTOR, PARENT, MATERIAL, REFLECTANCE, TRANSPARENCY, BRICKCOLOR, NAME, SIZE, ANCHOR)
     local NEWPART = IT("Seat")
     NEWPART.formFactor = FORMFACTOR
     NEWPART.Reflectance = REFLECTANCE
     NEWPART.Transparency = TRANSPARENCY
     NEWPART.CanCollide = false
     NEWPART.Locked = true
     NEWPART.Anchored = true
     if ANCHOR == false then
         NEWPART.Anchored = false
     end
     NEWPART.BrickColor = BRICKC(tostring(BRICKCOLOR))
     NEWPART.Name = NAME
     NEWPART.Size = SIZE
     NEWPART.Position = Torso.Position
     NEWPART.Material = MATERIAL
     NEWPART:BreakJoints()
     NEWPART.Parent = PARENT
     return NEWPART
 end
 
     local function weldBetween(a, b)
         local weldd = Instance.new("ManualWeld")
         weldd.Part0 = a
         weldd.Part1 = b
         weldd.C0 = CFrame.new()
         weldd.C1 = b.CFrame:inverse() * a.CFrame
         weldd.Parent = a
         return weldd
     end
 
 
 function QuaternionFromCFrame(cf)
     local mx, my, mz, m00, m01, m02, m10, m11, m12, m20, m21, m22 = cf:components()
     local trace = m00 + m11 + m22
     if trace > 0 then
         local s = math.sqrt(1 + trace)
         local recip = 0.5 / s
         return (m21 - m12) * recip, (m02 - m20) * recip, (m10 - m01) * recip, s * 0.5
     else
         local i = 0
         if m11 > m00 then
             i = 1
         end
         if m22 > (i == 0 and m00 or m11) then
             i = 2
         end
         if i == 0 then
             local s = math.sqrt(m00 - m11 - m22 + 1)
             local recip = 0.5 / s
             return 0.5 * s, (m10 + m01) * recip, (m20 + m02) * recip, (m21 - m12) * recip
         elseif i == 1 then
             local s = math.sqrt(m11 - m22 - m00 + 1)
             local recip = 0.5 / s
             return (m01 + m10) * recip, 0.5 * s, (m21 + m12) * recip, (m02 - m20) * recip
         elseif i == 2 then
             local s = math.sqrt(m22 - m00 - m11 + 1)
             local recip = 0.5 / s return (m02 + m20) * recip, (m12 + m21) * recip, 0.5 * s, (m10 - m01) * recip
         end
     end
 end
 
 function QuaternionToCFrame(px, py, pz, x, y, z, w)
     local xs, ys, zs = x + x, y + y, z + z
     local wx, wy, wz = w * xs, w * ys, w * zs
     local xx = x * xs
     local xy = x * ys
     local xz = x * zs
     local yy = y * ys
     local yz = y * zs
     local zz = z * zs
     return CFrame.new(px, py, pz, 1 - (yy + zz), xy - wz, xz + wy, xy + wz, 1 - (xx + zz), yz - wx, xz - wy, yz + wx, 1 - (xx + yy))
 end
 
 function QuaternionSlerp(a, b, t)
     local cosTheta = a[1] * b[1] + a[2] * b[2] + a[3] * b[3] + a[4] * b[4]
     local startInterp, finishInterp;
     if cosTheta >= 0.0001 then
         if (1 - cosTheta) > 0.0001 then
             local theta = ACOS(cosTheta)
             local invSinTheta = 1 / SIN(theta)
             startInterp = SIN((1 - t) * theta) * invSinTheta
             finishInterp = SIN(t * theta) * invSinTheta
         else
             startInterp = 1 - t
             finishInterp = t
         end
     else
         if (1 + cosTheta) > 0.0001 then
             local theta = ACOS(-cosTheta)
             local invSinTheta = 1 / SIN(theta)
             startInterp = SIN((t - 1) * theta) * invSinTheta
             finishInterp = SIN(t * theta) * invSinTheta
         else
             startInterp = t - 1
             finishInterp = t
         end
     end
     return a[1] * startInterp + b[1] * finishInterp, a[2] * startInterp + b[2] * finishInterp, a[3] * startInterp + b[3] * finishInterp, a[4] * startInterp + b[4] * finishInterp
 end
 
 function Clerp(a, b, t)
     local qa = {QuaternionFromCFrame(a)}
     local qb = {QuaternionFromCFrame(b)}
     local ax, ay, az = a.x, a.y, a.z
     local bx, by, bz = b.x, b.y, b.z
     local _t = 1 - t
     return QuaternionToCFrame(_t * ax + t * bx, _t * ay + t * by, _t * az + t * bz, QuaternionSlerp(qa, qb, t))
 end
 
 function CreateFrame(PARENT, TRANSPARENCY, BORDERSIZEPIXEL, POSITION, SIZE, COLOR, BORDERCOLOR, NAME)
     local frame = IT("Frame")
     frame.BackgroundTransparency = TRANSPARENCY
     frame.BorderSizePixel = BORDERSIZEPIXEL
     frame.Position = POSITION
     frame.Size = SIZE
     frame.BackgroundColor3 = COLOR
     frame.BorderColor3 = BORDERCOLOR
     frame.Name = NAME
     frame.Parent = PARENT
     return frame
 end
 
 function CreateLabel(PARENT, TEXT, TEXTCOLOR, TEXTFONTSIZE, TEXTFONT, TRANSPARENCY, BORDERSIZEPIXEL, STROKETRANSPARENCY, NAME)
     local label = IT("TextLabel")
     label.BackgroundTransparency = 1
     label.Size = UD2(1, 0, 1, 0)
     label.Position = UD2(0, 0, 0, 0)
     label.TextColor3 = TEXTCOLOR
     label.TextStrokeColor3 = BRICKC"Cyan".Color
     label.TextStrokeTransparency = STROKETRANSPARENCY
     label.TextTransparency = TRANSPARENCY
     label.FontSize = TEXTFONTSIZE
     label.Font = TEXTFONT
     label.BorderSizePixel = BORDERSIZEPIXEL
     label.TextScaled = false
     label.Text = TEXT
     label.Name = NAME
     label.Parent = PARENT
     return label
 end
 
 function NoOutlines(PART)
     PART.TopSurface, PART.BottomSurface, PART.LeftSurface, PART.RightSurface, PART.FrontSurface, PART.BackSurface = 10, 10, 10, 10, 10, 10
 end
 
 function CreateWeldOrSnapOrMotor(TYPE, PARENT, PART0, PART1, C0, C1)
     local NEWWELD = IT(TYPE)
     NEWWELD.Part0 = PART0
     NEWWELD.Part1 = PART1
     NEWWELD.C0 = C0
     NEWWELD.C1 = C1
     NEWWELD.Parent = PARENT
     return NEWWELD
 end
 
 local S = IT("Sound")
 function CreateSound(ID, PARENT, VOLUME, PITCH, DOESLOOP)
     local NEWSOUND = nil
     coroutine.resume(coroutine.create(function()
         NEWSOUND = S:Clone()
         NEWSOUND.Parent = PARENT
         NEWSOUND.Volume = VOLUME
         NEWSOUND.Pitch = PITCH
         NEWSOUND.SoundId = "http://www.roblox.com/asset/?id="..ID
         NEWSOUND:play()
         NEWSOUND.Name = "Audio"
         if DOESLOOP == true then
             NEWSOUND.Looped = true
         else
             repeat Swait() until NEWSOUND.Playing == false
             NEWSOUND:remove()
         end
     end))
     return NEWSOUND
 end
 
 function CFrameFromTopBack(at, top, back)
     local right = top:Cross(back)
     return CF(at.x, at.y, at.z, right.x, top.x, back.x, right.y, top.y, back.y, right.z, top.z, back.z)
 end
 
 --WACKYEFFECT({EffectType = "", Size = VT(1,1,1), Size2 = VT(0,0,0), Transparency = 0, Transparency2 = 1, CFrame = CF(), MoveToPos = nil, RotationX = 0, RotationY = 0, RotationZ = 0, Material = "Neon", Color = C3(1,1,1), SoundID = nil, SoundPitch = nil, SoundVolume = nil})
 function WACKYEFFECT(Table)
     local TYPE = (Table.EffectType or "Sphere")
     local SIZE = (Table.Size or VT(1,1,1))
     local ENDSIZE = (Table.Size2 or VT(0,0,0))
     local TRANSPARENCY = (Table.Transparency or 0)
     local ENDTRANSPARENCY = (Table.Transparency2 or 1)
     local CFRAME = (Table.CFrame or Torso.CFrame)
     local MOVEDIRECTION = (Table.MoveToPos or nil)
     local ROTATION1 = (Table.RotationX or 0)
     local ROTATION2 = (Table.RotationY or 0)
     local ROTATION3 = (Table.RotationZ or 0)
     local MATERIAL = (Table.Material or "Neon")
     local COLOR = (Table.Color or C3(1,1,1))
     local TIME = (Table.Time or 45)
     local SOUNDID = (Table.SoundID or nil)
     local SOUNDPITCH = (Table.SoundPitch or nil)
     local SOUNDVOLUME = (Table.SoundVolume or nil)
     coroutine.resume(coroutine.create(function()
         local PLAYSSOUND = false
         local SOUND = nil
         local EFFECT = CreatePart(3, Effects, MATERIAL, 0, TRANSPARENCY, BRICKC("Pearl"), "Effect", VT(1,1,1), true)
         if SOUNDID ~= nil and SOUNDPITCH ~= nil and SOUNDVOLUME ~= nil then
             PLAYSSOUND = true
             SOUND = CreateSound(SOUNDID, EFFECT, SOUNDVOLUME, SOUNDPITCH, false)
         end
         EFFECT.Color = COLOR
         local MSH = nil
         if TYPE == "Sphere" then
             MSH = CreateMesh("SpecialMesh", EFFECT, "Sphere", "", "", SIZE, VT(0,0,0))
         elseif TYPE == "Block" then
             MSH = IT("BlockMesh",EFFECT)
             MSH.Scale = VT(SIZE.X,SIZE.X,SIZE.X)
         elseif TYPE == "Box" then
             MSH = IT("BlockMesh",EFFECT)
             MSH.Scale = SIZE
         elseif TYPE == "Wave" then
             MSH = CreateMesh("SpecialMesh", EFFECT, "FileMesh", "20329976", "", SIZE, VT(0,0,-SIZE.X/8))
         elseif TYPE == "Ring1" then
             MSH = CreateMesh("SpecialMesh", EFFECT, "FileMesh", "559831844", "", VT(SIZE.X,SIZE.X,0.1), VT(0,0,0))
         elseif TYPE == "Ring2" then
             MSH = CreateMesh("SpecialMesh", EFFECT, "FileMesh", "1050196336", "", VT(SIZE.X,SIZE.X,0.1), VT(0,0,0))
         elseif TYPE == "Ring3" then
             MSH = CreateMesh("SpecialMesh", EFFECT, "FileMesh", "471124075", "", VT(SIZE.X,SIZE.X,0.1), VT(0,0,0))
         elseif TYPE == "Slash" then
             MSH = CreateMesh("SpecialMesh", EFFECT, "FileMesh", "662586858", "", VT(SIZE.X/10,0,SIZE.X/10), VT(0,0,0))
         elseif TYPE == "Round Slash" then
             MSH = CreateMesh("SpecialMesh", EFFECT, "FileMesh", "662585058", "", VT(SIZE.X/10,0,SIZE.X/10), VT(0,0,0))
         elseif TYPE == "Swirl" then
             MSH = CreateMesh("SpecialMesh", EFFECT, "FileMesh", "1051557", "", SIZE, VT(0,0,0))
         elseif TYPE == "Skull" then
             MSH = CreateMesh("SpecialMesh", EFFECT, "FileMesh", "4770583", "", SIZE, VT(0,0,0))
         elseif TYPE == "Crystal" then
             MSH = CreateMesh("SpecialMesh", EFFECT, "FileMesh", "9756362", "", SIZE, VT(0,0,0))
         end
         if MSH ~= nil then
             local MOVESPEED = nil
             if MOVEDIRECTION ~= nil then
                 MOVESPEED = (CFRAME.p - MOVEDIRECTION).Magnitude/TIME
             end
             local GROWTH = SIZE - ENDSIZE
             local TRANS = TRANSPARENCY - ENDTRANSPARENCY
             if TYPE == "Block" then
                 EFFECT.CFrame = CFRAME*ANGLES(RAD(MRANDOM(0,360)),RAD(MRANDOM(0,360)),RAD(MRANDOM(0,360)))
             else
                 EFFECT.CFrame = CFRAME
             end
             for LOOP = 1, TIME do
                 Swait()
                 MSH.Scale = MSH.Scale - GROWTH/TIME
                 if TYPE == "Wave" then
                     MSH.Offset = VT(0,0,-MSH.Scale.X/8)
                 end
                 EFFECT.Transparency = EFFECT.Transparency - TRANS/TIME
                 if TYPE == "Block" then
                     EFFECT.CFrame = CFRAME*ANGLES(RAD(MRANDOM(0,360)),RAD(MRANDOM(0,360)),RAD(MRANDOM(0,360)))
                 else
                     EFFECT.CFrame = EFFECT.CFrame*ANGLES(RAD(ROTATION1),RAD(ROTATION2),RAD(ROTATION3))
                 end
                 if MOVEDIRECTION ~= nil then
                     local ORI = EFFECT.Orientation
                     EFFECT.CFrame = CF(EFFECT.Position,MOVEDIRECTION)*CF(0,0,-MOVESPEED)
                     EFFECT.Orientation = ORI
                 end
             end
             if PLAYSSOUND == false then
                 EFFECT:remove()
             else
                 repeat Swait() until SOUND.Playing == false
                 EFFECT:remove()
             end
         else
             if PLAYSSOUND == false then
                 EFFECT:remove()
             else
                 repeat Swait() until SOUND.Playing == false
                 EFFECT:remove()
             end
         end
     end))
 end
 
 function Shatter(Part)
     if Part.Transparency == 0 then
         local SOUNDPART = CreatePart(3, Effects, "Neon", 0, 1, Part.BrickColor, "OOF", VT(0,0,0))
         Debris:AddItem(SOUNDPART,5)
         CreateSound("84005018", SOUNDPART, 3, MRANDOM(8,12)/10, false)
         local SIZE = Part.Size.X + Part.Size.Y + Part.Size.Z
         local SIZESET = SIZE/4
         local XOffset = Part.Size.X*1.5/SIZESET
         local YOffset = Part.Size.Y*1.5/SIZESET
         local ZOffset = Part.Size.Z*1.5/SIZESET
         for x = 1, math.ceil(XOffset) do
             for y = 1, math.ceil(YOffset) do
                 for z = 1, math.ceil(ZOffset) do
                     local SHARD = CreatePart(3, Effects, "Neon", 0, 0, Part.BrickColor, "Shard", VT(SIZE,SIZE,SIZE)/10, false)
                     SHARD.CanCollide = true
                     SHARD.CFrame = Part.CFrame*CF((Part.Size.X/2-x/4),(Part.Size.Y/2-y/4),(Part.Size.Z/2-z/4))
                     SHARD.Velocity = VT(MRANDOM(-15,15),MRANDOM(-15,15),MRANDOM(-15,15))*3
                     Debris:AddItem(SHARD,MRANDOM(10,25)/3)
                 end
             end
         end
     end
     Part:remove()
 end
 
 function MakeForm(PART,TYPE)
     if TYPE == "Cyl" then
         local MSH = IT("CylinderMesh",PART)
     elseif TYPE == "Ball" then
         local MSH = IT("SpecialMesh",PART)
         MSH.MeshType = "Sphere"
     elseif TYPE == "Wedge" then
         local MSH = IT("SpecialMesh",PART)
         MSH.MeshType = "Wedge"
     end
 end
 
 Debris = game:GetService("Debris")
 
 function CastProperRay(StartPos, EndPos, Distance, Ignore)
     local DIRECTION = CF(StartPos,EndPos).lookVector
     return Raycast(StartPos, DIRECTION, Distance, Ignore)
 end
 
 function turnto(position)
     RootPart.CFrame=CFrame.new(RootPart.CFrame.p,VT(position.X,RootPart.Position.Y,position.Z)) * CFrame.new(0, 0, 0)
 end
 
 function ezweld(P1,P2,CFRAME)
     local ezweld = CreateWeldOrSnapOrMotor("Weld",Character,P1,P2,CFRAME,CF(0,0,0))
 end
 
 function CreateCylinder(FORMFACTOR, PARENT, MATERIAL, REFLECTANCE, TRANSPARENCY, BRICKCOLOR, NAME, SIZE, ANCHOR)
     local NEWPART = IT("Part")
     NEWPART.formFactor = FORMFACTOR
     NEWPART.Reflectance = REFLECTANCE
     NEWPART.Transparency = TRANSPARENCY
     NEWPART.CanCollide = false
     NEWPART.Locked = true
     NEWPART.Anchored = true
     if ANCHOR == false then
         NEWPART.Anchored = false
     end
     NEWPART.BrickColor = BRICKC(tostring(BRICKCOLOR))
     NEWPART.Name = NAME
     NEWPART.Size = SIZE
     NEWPART.Position = Torso.Position
     NEWPART.Material = MATERIAL
     NEWPART:BreakJoints()
     MakeForm(NEWPART,"Cyl")
     NEWPART.Parent = PARENT
     return NEWPART
 end
 
 function CreateBall(FORMFACTOR, PARENT, MATERIAL, REFLECTANCE, TRANSPARENCY, BRICKCOLOR, NAME, SIZE, ANCHOR)
     local NEWPART = IT("Part")
     NEWPART.formFactor = FORMFACTOR
     NEWPART.Reflectance = REFLECTANCE
     NEWPART.Transparency = TRANSPARENCY
     NEWPART.CanCollide = false
     NEWPART.Locked = true
     NEWPART.Anchored = true
     if ANCHOR == false then
         NEWPART.Anchored = false
     end
     NEWPART.BrickColor = BRICKC(tostring(BRICKCOLOR))
     NEWPART.Name = NAME
     NEWPART.Size = SIZE
     NEWPART.Position = Torso.Position
     NEWPART.Material = MATERIAL
     NEWPART:BreakJoints()
     MakeForm(NEWPART,"Ball")
     NEWPART.Parent = PARENT
     return NEWPART
 end
 
 function CreateWedge(FORMFACTOR, PARENT, MATERIAL, REFLECTANCE, TRANSPARENCY, BRICKCOLOR, NAME, SIZE, ANCHOR)
     local NEWPART = IT("Part")
     NEWPART.formFactor = FORMFACTOR
     NEWPART.Reflectance = REFLECTANCE
     NEWPART.Transparency = TRANSPARENCY
     NEWPART.CanCollide = false
     NEWPART.Locked = true
     NEWPART.Anchored = true
     if ANCHOR == false then
         NEWPART.Anchored = false
     end
     NEWPART.BrickColor = BRICKC(tostring(BRICKCOLOR))
     NEWPART.Name = NAME
     NEWPART.Size = SIZE
     NEWPART.Position = Torso.Position
     NEWPART.Material = MATERIAL
     NEWPART:BreakJoints()
     MakeForm(NEWPART,"Wedge")
     NEWPART.Parent = PARENT
     return NEWPART
 end
 local naeeym2 = IT("BillboardGui",Character)
 naeeym2.AlwaysOnTop = true
 naeeym2.Size = UDim2.new(6,40,1,20)
 naeeym2.StudsOffset = Vector3.new(0,3,0)
 naeeym2.MaxDistance = 75
 naeeym2.Adornee = Character.Torso
 naeeym2.Name = "Name"
 local tecks2 = IT("TextLabel",naeeym2)
 tecks2.BackgroundTransparency = 1
 tecks2.TextScaled = true
 tecks2.BorderSizePixel = 0
 tecks2.Text = "crunchy the worm"
 tecks2.Font = "Arcade"
 tecks2.TextSize = 70
 tecks2.TextStrokeTransparency = 0.5
 tecks2.TextColor3 = BRICKC"New Yeller".Color
 tecks2.TextStrokeColor3 = BRICKC"Hot pink".Color
 tecks2.Size = UDim2.new(1,0,0.5,0)
 tecks2.Parent = naeeym2
 local TagMoving = coroutine.wrap(function()
     for i = 1,"Inf" do
-        tecks2.Text ="Earthworm sally"
+        tecks2.Text ="Diarrhea"
         Swait(5)
-        tecks2.Text = "Earthworm sally"
+        tecks2.Text = "Diarrhea"
     end
 end)
 TagMoving()
 local naeeym3 = IT("BillboardGui",Character)
 naeeym3.AlwaysOnTop = true
 naeeym3.Size = UDim2.new(5,35,2,15)
 naeeym3.StudsOffset = Vector3.new(0,2,0)
 naeeym3.MaxDistance = 75
 naeeym3.Adornee = Character.Torso
 naeeym3.Name = "Name"
 local tecks3 = IT("TextLabel",naeeym3)
 tecks3.BackgroundTransparency = 1
 tecks3.TextScaled = true
 tecks3.BorderSizePixel = 0
 tecks3.Text = ""
 tecks3.Font = "Arcade"
 tecks3.TextSize = 30
 tecks3.TextStrokeTransparency = 0.5
 tecks3.TextColor3 = BRICKC"White".Color
 tecks3.TextStrokeColor3 = BRICKC"Deep orange".Color
 tecks3.Size = UDim2.new(1,0,0.5,0)
 tecks3.Parent = naeeym3
 ---------------------------------------------
 for i,v in pairs(Character:GetChildren()) do
     if v:IsA("Clothing") or v:IsA("Accessory") then
         v:Remove()
     else if v:IsA("Part") then
         v.Transparency = 1
         v.CanCollide = false
         end
     end
 end
 RightArm:Remove()
 LeftArm:Remove()
 RightLeg:Remove()
 LeftLeg:Remove()
 Head.face:Remove()
 ---------------------------------------------'
 Eating = false
 Eaten = 0
 AllowSit = false
 Networth = 0
 local WormHead = CreatePart(3,Character,"SmoothPlastic",0,0,"Hot pink","OofHead",VT(4,4,4),false)
 ezweld(WormHead,Torso,CF(0,0,0))
 local Setg = CreateSeat(3,Character,"SmoothPlastic",0,1,"White","OofHead",VT(2,0.1,2),false)
 ezweld(Setg,WormHead,CF(0,-2,0))
 if AllowSit ==  false then
     Setg.Disabled = true
 end
 WormHead.CanCollide = true
 local Fac = Instance.new("Decal",WormHead)
 Fac.Face = "Front"
 local RandomFace = math.random(1,3)
 if RandomFace == 1 then
     Fac.Texture = "rbxassetid://15298379"
 else if RandomFace == 2 then
     Fac.Texture = "rbxassetid://162136529"
 else
     Fac.Texture = "rbxassetid://282463320"
 end
 end
 LatestP = WormHead
 local EatPart = CreatePart(3,Character,"SmoothPlastic",0,1,"White","OofHead",VT(4,4,0),false)
 ezweld(EatPart,WormHead,CF(0,0,2))
 EatPart.Touched:Connect(function(nom)
     if Eating == true and nom.Name ~= "Base" and nom.Parent ~= Character and nom.Parent.Parent ~= Character and nom:IsA("Part") then
         nom:Remove()
         Humanoid.WalkSpeed = Humanoid.WalkSpeed + 0.1
         Eaten = Eaten + 1
         local bom = Character:FindFirstChild("Eating")
         if bom then
             bom:Play()
         end
         Networth = Networth +1
         if Eaten == 3 or Eaten > 3 then
             Eaten = 0
             local AP = CreatePart(3,Character,"SmoothPlastic",0,0,"Royal purple","Sitting",VT(4,4,4),false)
             ezweld(AP,LatestP,CF(0,-0.2,-3))
             AP.Massless = true
             Swait()
             AP.CanCollide = true
             Swait(2)
             AP:BreakJoints()
             local Rope = Instance.new("SpringConstraint",LatestP)
             local Attach = Instance.new("Attachment",LatestP)
             local Attach2 = Instance.new("Attachment",AP)
             Attach.Position = VT(0,0,2)
             Attach2.Position = VT(0,0,-2)
             Rope.Attachment0 = Attach
             Rope.Attachment1 = Attach2
             Rope.Visible = true
             Rope.Color = BRICKC("New Yeller")
             Rope.Coils = 3
             Rope.Radius = 0.1
             Rope.MaxLength = 1
             Rope.MinLength = 0
             Rope.MaxForce = 0.2
             Rope.LimitsEnabled = true
             LatestP = AP
         end
     end
 end)
 
 function ROARSound()
     ATTACK = true
     local Rawr = Character:FindFirstChild("ROAR")
     if Rawr then
         Rawr:Play()
         Fac.Texture = "rbxassetid://3108336859"
         Swait(40)
         if Eating == false then
             if RandomFace == 1 then
                 Fac.Texture = "rbxassetid://15298379"
             else if RandomFace == 2 then
                 Fac.Texture = "rbxassetid://162136529"
             else
                 Fac.Texture = "rbxassetid://282463320"
             end
             end
         else
             Fac.Texture = "rbxassetid://7317691"
             end
     else
         local sick = Instance.new("Sound",Character)
         sick.SoundId = "rbxassetid://138271815"
         sick.Pitch = 1
         sick.Name = "ROAR"
         sick.MaxDistance = 150
         sick.Volume = 2
         sick:Play()
         Fac.Texture = "rbxassetid://3108336859"
         Swait(40)
         if Eating == false then
             if RandomFace == 1 then
                 Fac.Texture = "rbxassetid://15298379"
             else if RandomFace == 2 then
                 Fac.Texture = "rbxassetid://162136529"
             else
                 Fac.Texture = "rbxassetid://282463320"
             end
             end
         else
             Fac.Texture = "rbxassetid://7317691"
         end
         end
     ATTACK = false
 end
 Mouse.KeyDown:Connect(function(k)
     if ATTACK == false then
         if k == "e" then
             ROARSound()
         else if k == "q" then
             if Eating == false then
                 Eating = true
                 Fac.Texture = "rbxassetid://2874875021"
             else if Eating == true then
                 Eating = false
                 if RandomFace == 1 then
                     Fac.Texture = "rbxassetid://15298379"
                 else if RandomFace == 2 then
                     Fac.Texture = "rbxassetid://162136529"
                 else
                     Fac.Texture = "rbxassetid://282463320"
                 end
                 end
             end
             end
         else if k == "m" then
             for i,v in pairs(Character:GetChildren()) do
                 if v:IsA("Part") then
                     v.CanCollide = false
                     Swait(10)
                     v.CanCollide = true
                 end
                 end
         else if k == "r" then
             if AllowSit == false then
                 warn("Sitting Allowed")
                 AllowSit = true
                 for i,v in pairs(Character:GetChildren()) do
                     if v:IsA("Seat") then
                         v.Disabled = false
                     end
                 end
             else if AllowSit == true then
                 warn("Sitting Not Allowed")
                 AllowSit = false
                 for i,v in pairs(Character:GetChildren()) do
                     if v:IsA("Seat") then
                         v.Disabled = true
                     end
                 end
             end
             end
         end
         end
         end
         end
     end
 end)
 function Forced()
     local g = Character:FindFirstChildOfClass("Forcefield")
     if g then
         local fiel = Instance.new("ForceField",Character)
         fiel.Visible = false
     end
 end
 while true do
     Swait()
     Forced()
     Humanoid.HipHeight = 1
     Humanoid.MaxHealth = 500
     Humanoid.Health = Humanoid.MaxHealth
     local bom = Character:FindFirstChild("Eating")
     if not bom then
         EatSound()
     end
 end