TV of Wonders

-- The Television of Wonder --

wait()
script.Parent = nil
LoudVolume = false
Submerged = false
Music = true
script.Name = "CardboardBox"
Player = game.Players.LocalPlayer
c = game.Players.LocalPlayer.Character
Head = c.Head
anim = c.Humanoid.Animator
Humanoid = c:findFirstChild("Humanoid")
b23 = Instance.new("BoolValue",c)b23.Name = "InfiniteHuman"
rage = false
p = game.Players.LocalPlayer
Music = false
W = nil
local Effects = {}
attack = false
local attacking = false
vt = Vector3.new
bc = BrickColor.new
br = BrickColor.random
it = Instance.new
cf = CFrame.new
euler = CFrame.fromEulerAnglesXYZ
angles = CFrame.Angles
matr = math.random
mouse = Player:GetMouse()

  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 = c.Torso:FindFirstChild("Right Shoulder")
  LS = c.Torso:FindFirstChild("Left Shoulder")
  RH = c.Torso:FindFirstChild("Right Hip")
  LH = c.Torso:FindFirstChild("Left Hip")
  RJ = c.HumanoidRootPart:FindFirstChild("RootJoint")
  N = c.Torso:FindFirstChild("Neck")
  cf = CFrame.new
  ang = CFrame.Angles
  rd = math.rad
  rd2 = math.random

  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
	LH.C1 = LHC1
  end

local S = Instance.new("Sound",c.HumanoidRootPart)S.SoundId = "rbxassetid://203211309" S.Volume = 3.5 S.Looped = true
function NukeShockwaves(Size, CFramez)
local Shock = Instance.new("Part",game.Workspace)Shock.Transparency = 0.5 Shock.Size = Vector3.new(0.2,0.2,0.2) Shock.Anchored = true
Shock.CanCollide = false Shock.BrickColor = BrickColor.new("Medium stone grey") local SM = Instance.new("SpecialMesh",Shock)
SM.MeshId = "rbxassetid://20329976" SM.Scale = Vector3.new(Size,5,Size) Shock.CFrame = CFramez*CFrame.new(0,1,0)*CFrame.Angles(0,math.rad(math.random(-360,360)),0)
Spawn(function()
for i = 1,math.huge do
if Shock.Transparency >= 1 then break end
Shock.Transparency = Shock.Transparency + 0.05
wait()
end
end)
end

function swait(num)
if num==0 or num==nil then
game:service'RunService'.Heartbeat:wait(0)
else
for i=0,num do
game:service'RunService'.Heartbeat:wait(0)
end
end
end

c.HumanoidRootPart.CFrame = c.HumanoidRootPart.CFrame*CFrame.new(0,3,0)
local P = Instance.new("Part",c)P.Size = Vector3.new(3,3,3)W = Instance.new("Weld",c.HumanoidRootPart)W.Part0 = c.HumanoidRootPart W.Part1 = P
P.TopSurface = "SmoothNoOutlines" P.BottomSurface = "SmoothNoOutlines" P.FrontSurface = "SmoothNoOutlines" P.BackSurface = "SmoothNoOutlines"
P.LeftSurface = "SmoothNoOutlines" P.RightSurface = "SmoothNoOutlines" P.BrickColor = BrickColor.new("Beige") P.Material = "Wood"
local SCR = Instance.new("Decal")
    SCR.Texture = "http://www.roblox.com/asset/?id=1539341292"
    SCR.Face = Enum.NormalId.Front
    SCR.Parent = P


local M = Instance.new("BlockMesh",P)
local tra = Instance.new("ParticleEmitter",P) tra.Color = ColorSequence.new(Color3.new(0/255,170/255,255/255)) tra.Texture = "rbxassetid://73623723"
tra.Rate = 2 tra.Rotation = NumberRange.new(-25,25) tra.Lifetime = NumberRange.new(1,2) tra.Size = NumberSequence.new({NumberSequenceKeypoint.new(0,0.35,0),NumberSequenceKeypoint.new(1,0.35,0)})
tra.Transparency = NumberSequence.new({NumberSequenceKeypoint.new(0,1,0),NumberSequenceKeypoint.new(0.135,0,0),NumberSequenceKeypoint.new(0.875,0,0),NumberSequenceKeypoint.new(1,1,0)})
tra.Speed = NumberRange.new(0.5) tra.VelocitySpread = 360 tra.ZOffset = 1 tra.Acceleration = Vector3.new(0,5,0) tra.Enabled = false
function SelfDestructBox()
local Sound = Instance.new("Sound",c.HumanoidRootPart) Sound.SoundId = "rbxassetid://256286242" Sound.Volume = 4 Sound:Play()
P.Touched:connect(function(Hit)
if Hit == c or Hit.Parent == c or Hit.Anchored == true then return end
for i,v in pairs(game.Workspace:children()) do
if v:findFirstChild("HumanoidRootPart")~= nil and v ~= c then
if (v.HumanoidRootPart.Position-c.HumanoidRootPart.Position).magnitude <= 25 then
v:findFirstChild("Humanoid"):TakeDamage(100)
end
end
end
Hit = true c.Parent = nil
local Shock = Instance.new("Part",game.Workspace)Shock.Transparency = 0 Shock.Size = Vector3.new(1,1,1) Shock.Anchored = true
Shock.CanCollide = false Shock.BrickColor = BrickColor.new("Bright orange") Shock.Material = "Neon" local SM = Instance.new("SpecialMesh",Shock)
Shock.CFrame = CFrame.new(P.Position) SM.MeshType = "Sphere"
P:remove()
local Pos = Shock.Position
local Sound = Instance.new("Sound",Shock) Sound.SoundId = "rbxassetid://258057783" Sound.Volume = 4 Sound.Parent = Shock Sound.PlaybackSpeed = 1 Sound:Play()
for i = 1,4 do
SM.Scale = SM.Scale + Vector3.new(i*2,i*2,i*2)
swait()
end
for i = 1,30 do
SM.Offset = Vector3.new(math.random(-2,2)/10,math.random(-2,2)/10,math.random(-2,2)/10)
NukeShockwaves(i*3,CFrame.new(Shock.Position))
swait()
end
for i = 1,30 do
Shock.Transparency = Shock.Transparency + 1/30
SM.Scale = SM.Scale + Vector3.new(i*0.025,i*0.025,i*0.025)
swait()
end
end)
end

sine = 0

 Sadness = false

InBox = false local Speed
function HideInBox()
if InBox == false then Humanoid.WalkSpeed = 6 S:Play()
if Song == "TomodachiMarket" then SCR.Texture = "http://www.roblox.com/asset/?id=18579166"
elseif Song == "SmexyJazz" then SCR.Texture = "rbxassetid://1879740232"
elseif Song == "BreakingNews" then SCR.Texture = "http://www.roblox.com/asset/?id=869187620"
elseif Song == "MagicSchoolBus" then SCR.Texture = "rbxassetid://116466147"
elseif Song == "FreshPrince" then SCR.Texture = "http://www.roblox.com/asset/?id=1577529987"
elseif Song == "CoryInTheHouse" then SCR.Texture = "http://www.roblox.com/asset/?id=169498246"
end
Humanoid.HipHeight = -0.5 anim.Parent = nil InBox = true c.Head.Transparency = 1
for i = 1,10 do
lerpz(RJ, "C0", RJC0 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.1)
lerpz(N, "C0", NC0 * cf(0, 0, -1) * ang(rd(0), rd(0), rd(0)), 0.1)
lerpz(RS, "C0", RSC0 * cf(0, 0, -2) * ang(rd(0), rd(0), rd(0)), 0.1)
lerpz(RS, "C1", RSC1 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.1)
lerpz(LS, "C0", LSC0 * cf(0, 0, -2) * ang(rd(0), rd(0), rd(0)), 0.1)
lerpz(LS, "C1", LSC1 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.1)
lerpz(RH, "C0", RHC0 * cf(0, 2.2, 0) * ang(rd(0), rd(0), rd(0)), 0.1)
lerpz(RH, "C1", RHC1 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.1)
lerpz(LH, "C0", LHC0 * cf(0, 2.2, 0) * ang(rd(0), rd(0), rd(0)), 0.1)
lerpz(LH, "C1", LHC1 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.1)
swait()
end
for i,v in pairs (c:children()) do if v.ClassName == "Accessory" then for i,v2 in pairs (v:children()) do if v2.ClassName == "Part" then
v2.Transparency = 1	end end end end tra.Enabled = true
while InBox == true do
if Sadness == true then
tra.Enabled = false
else
tra.Enabled = true
end
if attack == false then
local Beat = 1+(S.PlaybackLoudness)/2500
M.Scale = Vector3.new(Beat,Beat,Beat)
if (c.HumanoidRootPart.Velocity * Vector3.new(1, 0, 1)).magnitude > 4 then
sine = sine + 1 Humanoid.HipHeight = -0.5
lerpz(RJ, "C0", RJC0 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.5)
lerpz(N, "C0", NC0 * cf(0, 0, -1) * ang(rd(0), rd(0), rd(0)), 0.5)
lerpz(RS, "C0", RSC0 * cf(0, 0, -2) * ang(rd(0), rd(0), rd(0)), 0.5)
lerpz(RS, "C1", RSC1 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.5)
lerpz(LS, "C0", LSC0 * cf(0, 0, -2) * ang(rd(0), rd(0), rd(0)), 0.5)
lerpz(LS, "C1", LSC1 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.5)
lerpz(RH, "C0", RHC0 * cf(0, 0.5, 0) * ang(rd(0), rd(0), rd(math.cos(sine/2)*15)), 0.5)
lerpz(RH, "C1", RHC1 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.5)
lerpz(LH, "C0", LHC0 * cf(0, 0.5, 0) * ang(rd(0), rd(0), rd(math.cos(sine/2)*15)), 0.5)
lerpz(LH, "C1", LHC1 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.5)
else Humanoid.HipHeight = -1.5
lerpz(RJ, "C0", RJC0 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.2)
lerpz(N, "C0", NC0 * cf(0, 0, -1) * ang(rd(0), rd(0), rd(0)), 0.2)
lerpz(RS, "C0", RSC0 * cf(0, 0, -2) * ang(rd(0), rd(0), rd(0)), 0.2)
lerpz(RS, "C1", RSC1 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.2)
lerpz(LS, "C0", LSC0 * cf(0, 0, -2) * ang(rd(0), rd(0), rd(0)), 0.2)
lerpz(LS, "C1", LSC1 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.2)
lerpz(RH, "C0", RHC0 * cf(0, 2.2, 0) * ang(rd(0), rd(0), rd(0)), 0.2)
lerpz(RH, "C1", RHC1 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.2)
lerpz(LH, "C0", LHC0 * cf(0, 2.2, 0) * ang(rd(0), rd(0), rd(0)), 0.2)
lerpz(LH, "C1", LHC1 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.2)
end
end
swait()
end
else InBox = false anim.Parent = Humanoid Humanoid.HipHeight = 0 Humanoid.WalkSpeed = 16 c.Head.Transparency = 0 S:Stop()
for i,v in pairs (c:children()) do if v.ClassName == "Accessory" then for i,v2 in pairs (v:children()) do if v2.ClassName == "Part" then
v2.Transparency = 0	end end end end tra.Enabled = false
M.Scale = Vector3.new(1,1,1)
SCR.Texture = "http://www.roblox.com/asset/?id=1539341292"
for i = 1,10 do
lerpz(RJ, "C0", RJC0 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.25)
lerpz(N, "C0", NC0 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.25)
lerpz(RS, "C0", RSC0 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.25)
lerpz(RS, "C1", RSC1 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.25)
lerpz(LS, "C0", LSC0 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.25)
lerpz(LS, "C1", LSC1 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.25)
lerpz(RH, "C0", RHC0 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.25)
lerpz(RH, "C1", RHC1 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.25)
lerpz(LH, "C0", LHC0 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.25)
lerpz(LH, "C1", LHC1 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.25)
swait()
end
end
end

WeegeeAttax = false
function WeegeeAttack()
WeegeeAttax = true
while WeegeeAttax == true do
swait()
for i,v in pairs (game.Workspace:children()) do
if v.Name == "Weegee" then
if v:findFirstChild("BodyVelocity")==nil then
local BV = Instance.new("BodyVelocity",v)BV.Velocity = v.CFrame.lookVector*-75
BV.maxForce = Vector3.new(math.huge,math.huge,math.huge)
else
v:findFirstChild("BodyVelocity").Velocity = v.CFrame.lookVector*-75
end
v.CFrame = CFrame.new(v.CFrame:toWorldSpace(CFrame.new(0,0,0)).p,mouse.hit.p)
v.CFrame = v.CFrame*CFrame.Angles(0,math.rad(180),0)
end
end
end
for i,v in pairs (game.Workspace:children()) do
if v.Name == "Weegee" then
if v:findFirstChild("BodyVelocity")~=nil then
v:findFirstChild("BodyVelocity"):remove()
end
end
end
end

function Retreat()
if Inflated == false then
anim.Parent = nil
local S = Instance.new("Sound",c.HumanoidRootPart)S.SoundId = "rbxassetid://202427593" S.Volume = 1 S:Play()
for i,v in pairs (c:children()) do if v.ClassName == "Accessory" then for i,v2 in pairs (v:children()) do if v2.ClassName == "Part" then
v2.Transparency = 1	end end end end
for i = 1,4 do
lerpz(RJ, "C0", RJC0 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.75)
lerpz(N, "C0", NC0 * cf(0, 0, -1) * ang(rd(0), rd(0), rd(0)), 0.75)
lerpz(RS, "C0", RSC0 * cf(0, 0, -2) * ang(rd(0), rd(0), rd(0)), 0.75)
lerpz(RS, "C1", RSC1 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.75)
lerpz(LS, "C0", LSC0 * cf(0, 0, -2) * ang(rd(0), rd(0), rd(0)), 0.75)
lerpz(LS, "C1", LSC1 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.75)
lerpz(RH, "C0", RHC0 * cf(0, 2.2, 0) * ang(rd(0), rd(0), rd(0)), 0.75)
lerpz(RH, "C1", RHC1 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.75)
lerpz(LH, "C0", LHC0 * cf(0, 2.2, 0) * ang(rd(0), rd(0), rd(0)), 0.75)
lerpz(LH, "C1", LHC1 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.75)
swait()
end
for i = 1,100 do
Humanoid.HipHeight = -1.5 c.HumanoidRootPart.Velocity = c.HumanoidRootPart.CFrame.lookVector*100
W.C0 = W.C0*CFrame.Angles(math.rad(-15),0,0)
swait()
end
W.C0 = CFrame.Angles(0,0,0)
if InBox == false then
for i,v in pairs (c:children()) do if v.ClassName == "Accessory" then for i,v2 in pairs (v:children()) do if v2.ClassName == "Part" then
v2.Transparency = 0	end end end end anim.Parent = Humanoid
for i = 1,10 do
swait()
end
end
else
anim.Parent = nil
local S = Instance.new("Sound",c.HumanoidRootPart)S.SoundId = "rbxassetid://202427593" S.Volume = 1 S:Play()
for i,v in pairs (c:children()) do if v.ClassName == "Accessory" then for i,v2 in pairs (v:children()) do if v2.ClassName == "Part" then
v2.Transparency = 1	end end end end
if InBox == false then
for i = 1,4 do
lerpz(RJ, "C0", RJC0 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.75)
lerpz(N, "C0", NC0 * cf(0, 0, -1) * ang(rd(0), rd(0), rd(0)), 0.75)
lerpz(RS, "C0", RSC0 * cf(0, 0, -2) * ang(rd(0), rd(0), rd(0)), 0.75)
lerpz(RS, "C1", RSC1 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.75)
lerpz(LS, "C0", LSC0 * cf(0, 0, -2) * ang(rd(0), rd(0), rd(0)), 0.75)
lerpz(LS, "C1", LSC1 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.75)
lerpz(RH, "C0", RHC0 * cf(0, 2.2, 0) * ang(rd(0), rd(0), rd(0)), 0.75)
lerpz(RH, "C1", RHC1 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.75)
lerpz(LH, "C0", LHC0 * cf(0, 2.2, 0) * ang(rd(0), rd(0), rd(0)), 0.75)
lerpz(LH, "C1", LHC1 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.75)
swait()
end
end
for i = 1,100 do
c.HumanoidRootPart.Velocity = c.HumanoidRootPart.CFrame.lookVector*100
W.C0 = W.C0*CFrame.Angles(math.rad(-15),0,0)
swait()
end
if InBox == false then
resetlerp()
end
W.C0 = CFrame.Angles(0,0,0)
if InBox == false then
for i,v in pairs (c:children()) do if v.ClassName == "Accessory" then for i,v2 in pairs (v:children()) do if v2.ClassName == "Part" then
v2.Transparency = 0	end end end end anim.Parent = Humanoid
for i = 1,10 do
lerpz(RJ, "C0", RJC0 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.5)
lerpz(N, "C0", NC0 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.5)
lerpz(RS, "C0", RSC0 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.5)
lerpz(RS, "C1", RSC1 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.5)
lerpz(LS, "C0", LSC0 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.5)
lerpz(LS, "C1", LSC1 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.5)
lerpz(RH, "C0", RHC0 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.5)
lerpz(RH, "C1", RHC1 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.5)
lerpz(LH, "C0", LHC0 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.5)
lerpz(LH, "C1", LHC1 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.5)
swait()
end
end
end
end
Inflated = false
function Inflate()
if Inflated == false then
local Charge = 0  S.Volume = 10
for i = 1,75 do Charge = Charge + 0.1 c.HumanoidRootPart.Anchored = true Inflated = true Humanoid.HipHeight = Humanoid.HipHeight + 0.05
P.Size = P.Size+Vector3.new(Charge*0.1,Charge*0.1,Charge*0.1)W = Instance.new("Weld",c.HumanoidRootPart)W.Part0 = c.HumanoidRootPart W.Part1 = P
c.HumanoidRootPart.CFrame = c.HumanoidRootPart.CFrame*CFrame.new(0,1,0)
lerpz(RJ, "C0", RJC0 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.5)
lerpz(N, "C0", NC0 * cf(0, 0, Charge*0.5) * ang(rd(0), rd(0), rd(0)), 0.5)
lerpz(RS, "C0", RSC0 * cf(0, 0, Charge*0.5) * ang(rd(0), rd(0), rd(0)), 0.5)
lerpz(RS, "C1", RSC1 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.5)
lerpz(LS, "C0", LSC0 * cf(0, 0, Charge*0.5) * ang(rd(0), rd(0), rd(0)), 0.5)
lerpz(LS, "C1", LSC1 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.5)
lerpz(RH, "C0", RHC0 * cf(0, -Charge*0.5, 0) * ang(rd(0), rd(0), rd(0)), 0.5)
lerpz(RH, "C1", RHC1 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.5)
lerpz(LH, "C0", LHC0 * cf(0, -Charge*0.5, 0) * ang(rd(0), rd(0), rd(0)), 0.5)
lerpz(LH, "C1", LHC1 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.5)
swait()
end
local hit = false
P.Touched:connect(function(Hit)
if hit == true then return end
if Hit.Anchored == true and Hit.Name ~= "NoMoonPls" then
hit = true P.Anchored = true
for i = 1,8 do
local S2 = Instance.new("Sound",P)S2.SoundId = "rbxassetid://211062246" S2.Volume = 10 S2:Play()
local S3 = Instance.new("Sound",P)S3.SoundId = "rbxassetid://133159174" S3.Volume = 10 S3:Play() game.Debris:AddItem(S3,4)
end
end
end)
else
local Charge = 0
for i = 1,25 do Charge = Charge + 0.3 c.HumanoidRootPart.Anchored = true Inflated = false Humanoid.HipHeight = Humanoid.HipHeight - 0.15
P.Size = P.Size-Vector3.new(Charge*0.1,Charge*0.1,Charge*0.1)W = Instance.new("Weld",c.HumanoidRootPart)W.Part0 = c.HumanoidRootPart W.Part1 = P
c.HumanoidRootPart.CFrame = c.HumanoidRootPart.CFrame*CFrame.new(0,-1,0)
lerpz(RJ, "C0", RJC0 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.5)
lerpz(N, "C0", NC0 * cf(0, 0, -Charge*0.5) * ang(rd(0), rd(0), rd(0)), 0.5)
lerpz(RS, "C0", RSC0 * cf(0, 0, -Charge*0.5) * ang(rd(0), rd(0), rd(0)), 0.5)
lerpz(RS, "C1", RSC1 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.5)
lerpz(LS, "C0", LSC0 * cf(0, 0, -Charge*0.5) * ang(rd(0), rd(0), rd(0)), 0.5)
lerpz(LS, "C1", LSC1 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.5)
lerpz(RH, "C0", RHC0 * cf(0, Charge*0.5, 0) * ang(rd(0), rd(0), rd(0)), 0.5)
lerpz(RH, "C1", RHC1 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.5)
lerpz(LH, "C0", LHC0 * cf(0, Charge*0.5, 0) * ang(rd(0), rd(0), rd(0)), 0.5)
lerpz(LH, "C1", LHC1 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.5)
swait()

end
resetlerp() P.Size = Vector3.new(3,3,3) W = Instance.new("Weld",c.HumanoidRootPart)W.Part0 = c.HumanoidRootPart W.Part1 = P  S.Volume = 1
end
end

function Sadnessz()
if Sadness == false then
Song = "Sadness" Sadness = true
S.SoundId = "rbxassetid://225195031"
local Cl = Instance.new("Part",c)Cl.Size = Vector3.new(6,1,6)Cl.CanCollide = true Cl.Anchored = true Cl.BrickColor = BrickColor.new("Dark stone grey")
local M = Instance.new("SpecialMesh",Cl)M.MeshId = "rbxassetid://1095708" M.Scale = Vector3.new(7,4,7) local Ch = 0
while Sadness == true do
local Rain = Instance.new("Part",c)Rain.Size = Vector3.new(0.2,2,0.2)Rain.CanCollide = false Rain.BrickColor = BrickColor.new("Light blue")
local RM = Instance.new("BlockMesh",Rain)RM.Scale = Vector3.new(0.05,1,0.05) Rain.Material = "Neon" game.Debris:AddItem(Rain,2)
local BV = Instance.new("BodyVelocity",Rain)BV.Velocity = Vector3.new(0,-100,0)
BV.maxForce = Vector3.new(math.huge,math.huge,math.huge)
Cl.CFrame = CFrame.new(c.HumanoidRootPart.Position+Vector3.new(0,6,0))
Rain.CFrame = Cl.CFrame*CFrame.new(math.random(-50,50)/10,0,math.random(-25,25)/10)
swait()

end
Cl:remove()
else
Sadness = false
end
end
function  Static()
	SCR.Texture = "http://www.roblox.com/asset/?id=1396123824"
	S.SoundId = "http://www.roblox.com/asset/?id=130864378"
end

Song = "TomodachiMarket"
function Playlist()
S.TimePosition = 0
if Song == "TomodachiMarket" then
Song = "SmexyJazz"
S.SoundId = "rbxassetid://130775431"
SCR.Texture = "rbxassetid://1879740232"
elseif Song == "SmexyJazz" then
Song = "BreakingNews"
S.SoundId = "rbxassetid://224266936"
SCR.Texture = "http://www.roblox.com/asset/?id=869187620"
elseif Song == "BreakingNews" then
Song = "MagicSchoolBus"
S.SoundId = "rbxassetid://156989725"
SCR.Texture = "rbxassetid://116466147"
elseif Song == "MagicSchoolBus" then
Song = "FreshPrince"
S.SoundId = "rbxassetid://142614483"
SCR.Texture = "http://www.roblox.com/asset/?id=1577529987"
elseif Song == "FreshPrince" then
Song = "CoryInTheHouse"
S.SoundId = "rbxassetid://142317817"
SCR.Texture = "http://www.roblox.com/asset/?id=169498246"
elseif Song == "CoryInTheHouse" then
Song = "TomodachiMarket"
S.SoundId = "rbxassetid://203211309"
SCR.Texture = "http://www.roblox.com/asset/?id=18579166"
end
end
Headlightz = false
function Headlights()
attack = true
for i,v in pairs (c:children()) do if v.ClassName == "Accessory" then for i,v2 in pairs (v:children()) do if v2.ClassName == "Part" then
v2.Transparency = 0	end end end end tra.Enabled = true
c.Head.Transparency = 0

for i = 1,8 do
lerpz(RJ, "C0", RJC0 * cf(0, 0, 2) * ang(rd(15), rd(0), rd(0)), 0.5)
lerpz(N, "C0", NC0 * cf(0, 0, 0) * ang(rd(15), rd(0), rd(0)), 0.5)
lerpz(RS, "C0", RSC0 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(45)), 0.5)
lerpz(RS, "C1", RSC1 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.5)
lerpz(LS, "C0", LSC0 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(-45)), 0.5)
lerpz(LS, "C1", LSC1 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.5)
lerpz(RH, "C0", RHC0 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.5)
lerpz(RH, "C1", RHC1 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.5)
lerpz(LH, "C0", LHC0 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.5)
lerpz(LH, "C1", LHC1 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.5)
swait()
end
for i = 1,6 do
lerpz(RJ, "C0", RJC0 * cf(0, -1.5, 0.35) * ang(rd(30), rd(0), rd(0)), 0.5)
lerpz(N, "C0", NC0 * cf(0, 0, 0) * ang(rd(30), rd(0), rd(0)), 0.5)
lerpz(RS, "C0", RSC0 * cf(0, 0, 0) * ang(rd(25), rd(0), rd(35)), 0.5)
lerpz(RS, "C1", RSC1 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.5)
lerpz(LS, "C0", LSC0 * cf(0, 0, 0) * ang(rd(25), rd(0), rd(-35)), 0.5)
lerpz(LS, "C1", LSC1 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.5)
lerpz(RH, "C0", RHC0 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.5)
lerpz(RH, "C1", RHC1 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.5)
lerpz(LH, "C0", LHC0 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.5)
lerpz(LH, "C1", LHC1 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.5)
swait()
end

for i = 1,3 do
lerpz(RJ, "C0", RJC0 * cf(0, -1, 2) * ang(rd(30), rd(0), rd(0)), 0.5)
lerpz(N, "C0", NC0 * cf(0, 0, 0) * ang(rd(30), rd(0), rd(0)), 0.5)
lerpz(RS, "C0", RSC0 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(35)), 0.5)
lerpz(RS, "C1", RSC1 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.5)
lerpz(LS, "C0", LSC0 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(-35)), 0.5)
lerpz(LS, "C1", LSC1 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.5)
lerpz(RH, "C0", RHC0 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.5)
lerpz(RH, "C1", RHC1 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.5)
lerpz(LH, "C0", LHC0 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.5)
lerpz(LH, "C1", LHC1 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.5)
swait()
end
Static()
for i = 1,3 do
lerpz(RJ, "C0", RJC0 * cf(0, 0, 2) * ang(rd(15), rd(0), rd(0)), 0.5)
lerpz(N, "C0", NC0 * cf(0, 0, 0) * ang(rd(15), rd(0), rd(0)), 0.5)
lerpz(RS, "C0", RSC0 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(45)), 0.5)
lerpz(RS, "C1", RSC1 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.5)
lerpz(LS, "C0", LSC0 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(-45)), 0.5)
lerpz(LS, "C1", LSC1 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.5)
lerpz(RH, "C0", RHC0 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.5)
lerpz(RH, "C1", RHC1 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.5)
lerpz(LH, "C0", LHC0 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.5)
lerpz(LH, "C1", LHC1 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.5)
swait()
end
wait(0.5)
Playlist()
for i,v in pairs (c:children()) do if v.ClassName == "Accessory" then for i,v2 in pairs (v:children()) do if v2.ClassName == "Part" then
v2.Transparency = 1	end end end end tra.Enabled = true
c.Head.Transparency = 1
attack = false
end

local PEAR = Instance.new("Model",nil)
function PullInBox()
attack = true
for i,v in pairs (c:children()) do if v.ClassName == "Accessory" then for i,v2 in pairs (v:children()) do if v2.ClassName == "Part" then
v2.Transparency = 0	end end end end tra.Enabled = true
c.Head.Transparency = 0
for i = 1,4 do
lerpz(RJ, "C0", RJC0 * cf(0, 0, 2) * ang(rd(15), rd(0), rd(0)), 0.5)
lerpz(N, "C0", NC0 * cf(0, 0, 0) * ang(rd(-15), rd(0), rd(0)), 0.5)
lerpz(RS, "C0", RSC0 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(45)), 0.5)
lerpz(RS, "C1", RSC1 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.5)
lerpz(LS, "C0", LSC0 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.5)
lerpz(LS, "C1", LSC1 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.5)
lerpz(RH, "C0", RHC0 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.5)
lerpz(RH, "C1", RHC1 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.5)
lerpz(LH, "C0", LHC0 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.5)
lerpz(LH, "C1", LHC1 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.5)
swait()
end
local Hit = false
local FE = c["Right Arm"].Touched:connect(function(Part)
if Part ~= c and Part.Size.X <= 50 and Part.Size.Z <= 50 and Part.Size.Y <= 50 then
Part.Parent = PEAR
end
end)
for i = 1,2 do
lerpz(RJ, "C0", RJC0 * cf(0, -1.5, 2) * ang(rd(30), rd(15), rd(30)), 0.5)
lerpz(N, "C0", NC0 * cf(0, 0, 0) * ang(rd(-30), rd(15), rd(-30)), 0.5)
lerpz(RS, "C0", RSC0 * cf(0, 0, 0) * ang(rd(25), rd(0), rd(120)), 0.5)
lerpz(RS, "C1", RSC1 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.5)
lerpz(LS, "C0", LSC0 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.5)
lerpz(LS, "C1", LSC1 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.5)
lerpz(RH, "C0", RHC0 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.5)
lerpz(RH, "C1", RHC1 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.5)
lerpz(LH, "C0", LHC0 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.5)
lerpz(LH, "C1", LHC1 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.5)
swait()
end
for i = 1,2 do
lerpz(RJ, "C0", RJC0 * cf(0, -1.75, 1) * ang(rd(60), rd(15), rd(30)), 0.5)
lerpz(N, "C0", NC0 * cf(0, 0, 0) * ang(rd(-30), rd(15), rd(-30)), 0.5)
lerpz(RS, "C0", RSC0 * cf(0, 0, 0) * ang(rd(25), rd(0), rd(100)), 0.5)
lerpz(RS, "C1", RSC1 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.5)
lerpz(LS, "C0", LSC0 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.5)
lerpz(LS, "C1", LSC1 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.5)
lerpz(RH, "C0", RHC0 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.5)
lerpz(RH, "C1", RHC1 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.5)
lerpz(LH, "C0", LHC0 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.5)
lerpz(LH, "C1", LHC1 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.5)
swait()
end
for i = 1,4 do
lerpz(RJ, "C0", RJC0 * cf(0, -2.25, 0.5) * ang(rd(90), rd(15), rd(30)), 0.5)
lerpz(N, "C0", NC0 * cf(0, 0, 0) * ang(rd(-60), rd(15), rd(-30)), 0.5)
lerpz(RS, "C0", RSC0 * cf(0, 0, 0) * ang(rd(25), rd(0), rd(100)), 0.5)
lerpz(RS, "C1", RSC1 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.5)
lerpz(LS, "C0", LSC0 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.5)
lerpz(LS, "C1", LSC1 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.5)
lerpz(RH, "C0", RHC0 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.5)
lerpz(RH, "C1", RHC1 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.5)
lerpz(LH, "C0", LHC0 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.5)
lerpz(LH, "C1", LHC1 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.5)
swait()
end
for i = 1,4 do
lerpz(RJ, "C0", RJC0 * cf(0, 0, 2) * ang(rd(15), rd(0), rd(0)), 0.5)
lerpz(N, "C0", NC0 * cf(0, 0, 0) * ang(rd(-15), rd(0), rd(0)), 0.5)
lerpz(RS, "C0", RSC0 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(45)), 0.5)
lerpz(RS, "C1", RSC1 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.5)
lerpz(LS, "C0", LSC0 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.5)
lerpz(LS, "C1", LSC1 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.5)
lerpz(RH, "C0", RHC0 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.5)
lerpz(RH, "C1", RHC1 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.5)
lerpz(LH, "C0", LHC0 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.5)
lerpz(LH, "C1", LHC1 * cf(0, 0, 0) * ang(rd(0), rd(0), rd(0)), 0.5)
swait()
end
FE:disconnect()
for i,v in pairs (c:children()) do if v.ClassName == "Accessory" then for i,v2 in pairs (v:children()) do if v2.ClassName == "Part" then
v2.Transparency = 1	end end end end tra.Enabled = true
c.Head.Transparency = 1
attack = false
end

function ThrowStuff()
P.Anchored = true
for i,v in pairs (PEAR:children()) do v.Parent = game.Workspace v.Anchored = false v.CanCollide = true
local PS = Instance.new("Sound",v)PS.SoundId = "rbxassetid://521410270" PS.Volume = 1 PS.PlaybackSpeed = math.random(10,14)/10 PS:Play()
v.Name = "Weegee" v.CFrame = P.CFrame*CFrame.new(0,2,0)*CFrame.Angles(math.random(-90,90),math.random(-90,90),math.random(-90,90))
local BV = Instance.new("BodyVelocity",v)BV.Velocity = Vector3.new(math.random(-10,10),math.random(45,100),math.random(-10,10))game.Debris:AddItem(BV,0.1)
BV.maxForce = Vector3.new(math.huge,math.huge,math.huge)
swait()
end
P.Anchored = false
end

function Weegee()
local PS = Instance.new("Sound",P)PS.SoundId = "rbxassetid://244303550" PS.Volume = 0.25 PS.PlaybackSpeed = math.random(8,18)/10 PS:Play()
local We = Instance.new("Part",game.Workspace)We.Size = Vector3.new(1,2,1)local WeM = Instance.new("SpecialMesh",We) We.Name = "Weegee"
WeM.MeshId = "rbxassetid://430819577" WeM.Scale = Vector3.new(0.001, 0.001, 0.001) WeM.TextureId = "rbxassetid://430819580"
We.CFrame = P.CFrame*CFrame.new(0,2,0)*CFrame.Angles(math.random(-90,90),math.random(-90,90),math.random(-90,90))
local BV = Instance.new("BodyVelocity",We)BV.Velocity = Vector3.new(math.random(-10,10),math.random(45,100),math.random(-10,10))game.Debris:AddItem(BV,0.1)
BV.maxForce = Vector3.new(math.huge,math.huge,math.huge)
end
mouse.KeyDown:connect(function(key)
if attack == true then return end
if InBox == true and Inflated == false and Sadness == false then
if key == "x" then
Headlights()
end
if key == "q" then
PullInBox()
end
if key == "e" then
ThrowStuff()
end
if key == "b" then
Weegee()
end
elseif InBox == true and Sadness == true then
if key == "b" then
MoneyPls()
end
elseif InBox == false then
if key == "x" then
Inflate()
end
end
if key == "c" then
Sadnessz()
end
if key == "z" then
HideInBox()
end
if key == "v" then
WeegeeAttack()
end
if key == "f" then
Retreat()
end
if key == "n" then
Playlist()
end
if key == "m" then
SelfDestructBox()
end
end)

mouse.KeyUp:connect(function(key)
if key == "v" then
WeegeeAttax = false
end
end)

game:GetService("RunService").RenderStepped:connect(function()
Humanoid.MaxHealth = Humanoid.MaxHealth*2
Humanoid.Health = Humanoid.MaxHealth*2
if attack == false then
for i,v in pairs (c:children()) do
if v.ClassName == "Accessory" then
for i,v2 in pairs (v:children()) do
if v2.ClassName == "Part" then
v2.Anchored = false
end
end
end
end
for i,v in pairs (c:children()) do
if v.ClassName == "Part" then
v.Anchored = false
end
end
end
end)