Astro_Food's gift

local plr = owner
local char = plr.Character
local attacking = false
local attackd = false
local hum = char.Humanoid
local RS = char.Torso["Right Shoulder"]
local LS = char.Torso["Left Shoulder"]
local RH = char.Torso["Right Hip"]
local LH = char.Torso["Left Hip"]
local neck = char.Torso["Neck"]
local anim = char.Animate
local rootj = char.HumanoidRootPart.RootJoint
local timepos = 0
local sine = 0
local RSnor = RS.C0
local LSnor = LS.C0
local RHnor = RH.C0
local LHnor = LH.C0
local rootjnor = rootj.C0
local necknor = neck.C0

--clerp stuff--

Swait,swait = function(number)
	if number == 0 or number == nil then
		game:GetService("RunService").Heartbeat:Wait()
	else
		for i = 1,number do
			game:GetService("RunService").Heartbeat:Wait()
		end
	end
end

clerp = function(toclerp, cf, number)
	local joint = toclerp
	joint.C0 = joint.C0:Lerp(cf, number)
end
clerp2 = function(toclerp, cf)
	local joint = toclerp
	joint.C0 = cf
end


---------------

--functions--

function CreateMesh(MESH, PARENT, MESHTYPE, MESHID, TEXTUREID, SCALE, OFFSET)
	local NEWMESH = Instance.new(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 Vector3.new(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 = Instance.new("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 = BrickColor.new(tostring(BRICKCOLOR))
	NEWPART.Name = NAME
	NEWPART.Size = SIZE
	NEWPART.Position = char.Torso.Position
	NEWPART.Material = MATERIAL
	NEWPART:BreakJoints()
	NEWPART.Parent = PARENT
	return NEWPART
end

local S = Instance.new("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()
		if DOESLOOP == true then
			NEWSOUND.Looped = true
		else
			repeat wait(1) until NEWSOUND.Playing == false or NEWSOUND.Parent ~= PARENT
			NEWSOUND:remove()
		end
	end))
	return NEWSOUND
end


--Converted with ttyyuu12345's model to script plugin v4
function sandbox(var,func)
	local env = getfenv(func)
	local newenv = setmetatable({},{
		__index = function(self,k)
			if k=="script" then
				return var
			else
				return env[k]
			end
		end,
	})
	setfenv(func,newenv)
	return func
end
cors = {}
mas = Instance.new("Model",game:GetService("Lighting"))
Model0 = Instance.new("Model")
Model1 = Instance.new("Model")
Part2 = Instance.new("Part")
Part3 = Instance.new("Part")
Weld4 = Instance.new("Weld")
Weld5 = Instance.new("Weld")
Weld6 = Instance.new("Weld")
Weld7 = Instance.new("Weld")
Weld8 = Instance.new("Weld")
Part9 = Instance.new("Part")
Part10 = Instance.new("Part")
Part11 = Instance.new("Part")
Model12 = Instance.new("Model")
Part13 = Instance.new("Part")
SpecialMesh14 = Instance.new("SpecialMesh")
Decal15 = Instance.new("Decal")
Model0.Name = "astrosgift"
Model0.Parent = mas
Model1.Name = "table"
Model1.Parent = Model0
Part2.Name = "top"
Part2.Parent = Model1
Part2.CFrame = CFrame.new(38, 2.75, 34.25, 1, 0, 0, 0, 1, 0, 0, 0, 1)
Part2.Position = Vector3.new(38, 2.75, 34.25)
Part2.Color = Color3.new(0.854902, 0.521569, 0.254902)
Part2.Size = Vector3.new(6, 0.5, 9.5)
Part2.BottomSurface = Enum.SurfaceType.Smooth
Part2.BrickColor = BrickColor.new("Bright orange")
Part2.Material = Enum.Material.Wood
Part2.TopSurface = Enum.SurfaceType.Smooth
Part2.brickColor = BrickColor.new("Bright orange")
Part3.Parent = Model1
Part3.CFrame = CFrame.new(35.25, 1.25, 38.75, 1, 0, 0, 0, 1, 0, 0, 0, 1)
Part3.Position = Vector3.new(35.25, 1.25, 38.75)
Part3.Color = Color3.new(0.854902, 0.521569, 0.254902)
Part3.Size = Vector3.new(0.5, 2.5, 0.5)
Part3.BottomSurface = Enum.SurfaceType.Smooth
Part3.BrickColor = BrickColor.new("Bright orange")
Part3.Material = Enum.Material.Wood
Part3.TopSurface = Enum.SurfaceType.Smooth
Part3.brickColor = BrickColor.new("Bright orange")
Weld4.Name = "BTWeld"
Weld4.Parent = Part3
Weld4.C1 = CFrame.new(-5.5, 0, 0, 1, 0, 0, 0, 1, 0, 0, 0, 1)
Weld4.Part0 = Part3
Weld4.Part1 = Part9
Weld4.part1 = Part9
Weld5.Name = "BTWeld"
Weld5.Parent = Part3
Weld5.C1 = CFrame.new(-2.54999924, -2.75, 4.04999924, 1, 0, 0, 0, 1, 0, 0, 0, 1)
Weld5.Part0 = Part3
Weld5.Part1 = Part13
Weld5.part1 = Part13
Weld6.Name = "BTWeld"
Weld6.Parent = Part3
Weld6.C1 = CFrame.new(-2.75, -1.5, 4.5, 1, 0, 0, 0, 1, 0, 0, 0, 1)
Weld6.Part0 = Part3
Weld6.Part1 = Part2
Weld6.part1 = Part2
Weld7.Name = "BTWeld"
Weld7.Parent = Part3
Weld7.C1 = CFrame.new(-5.5, 0, 9, 1, 0, 0, 0, 1, 0, 0, 0, 1)
Weld7.Part0 = Part3
Weld7.Part1 = Part11
Weld7.part1 = Part11
Weld8.Name = "BTWeld"
Weld8.Parent = Part3
Weld8.C1 = CFrame.new(0, 0, 9, 1, 0, 0, 0, 1, 0, 0, 0, 1)
Weld8.Part0 = Part3
Weld8.Part1 = Part10
Weld8.part1 = Part10
Part9.Parent = Model1
Part9.CFrame = CFrame.new(40.75, 1.25, 38.75, 1, 0, 0, 0, 1, 0, 0, 0, 1)
Part9.Position = Vector3.new(40.75, 1.25, 38.75)
Part9.Color = Color3.new(0.854902, 0.521569, 0.254902)
Part9.Size = Vector3.new(0.5, 2.5, 0.5)
Part9.BottomSurface = Enum.SurfaceType.Smooth
Part9.BrickColor = BrickColor.new("Bright orange")
Part9.Material = Enum.Material.Wood
Part9.TopSurface = Enum.SurfaceType.Smooth
Part9.brickColor = BrickColor.new("Bright orange")
Part10.Parent = Model1
Part10.CFrame = CFrame.new(35.25, 1.25, 29.75, 1, 0, 0, 0, 1, 0, 0, 0, 1)
Part10.Position = Vector3.new(35.25, 1.25, 29.75)
Part10.Color = Color3.new(0.854902, 0.521569, 0.254902)
Part10.Size = Vector3.new(0.5, 2.5, 0.5)
Part10.BottomSurface = Enum.SurfaceType.Smooth
Part10.BrickColor = BrickColor.new("Bright orange")
Part10.Material = Enum.Material.Wood
Part10.TopSurface = Enum.SurfaceType.Smooth
Part10.brickColor = BrickColor.new("Bright orange")
Part11.Parent = Model1
Part11.CFrame = CFrame.new(40.75, 1.25, 29.75, 1, 0, 0, 0, 1, 0, 0, 0, 1)
Part11.Position = Vector3.new(40.75, 1.25, 29.75)
Part11.Color = Color3.new(0.854902, 0.521569, 0.254902)
Part11.Size = Vector3.new(0.5, 2.5, 0.5)
Part11.BottomSurface = Enum.SurfaceType.Smooth
Part11.BrickColor = BrickColor.new("Bright orange")
Part11.Material = Enum.Material.Wood
Part11.TopSurface = Enum.SurfaceType.Smooth
Part11.brickColor = BrickColor.new("Bright orange")
Model12.Name = "gift"
Model12.Parent = Model0
Part13.Name = "Gift"
Part13.Parent = Model12
Part13.CFrame = CFrame.new(37.7999992, 4, 34.7000008, 1, 0, 0, 0, 1, 0, 0, 0, 1)
Part13.Position = Vector3.new(37.7999992, 4, 34.7000008)
Part13.Size = Vector3.new(1.39999986, 2.00000048, 1.60000014)
Part13.BottomSurface = Enum.SurfaceType.Smooth
Part13.TopSurface = Enum.SurfaceType.Smooth
Part13.FormFactor = Enum.FormFactor.Custom
Part13.formFactor = Enum.FormFactor.Custom
SpecialMesh14.Parent = Part13
SpecialMesh14.MeshId = "http://www.roblox.com/asset/?id=66887781"
SpecialMesh14.Scale = Vector3.new(1.5, 1.5, 1.5)
SpecialMesh14.TextureId = "http://www.roblox.com/asset/?id="
SpecialMesh14.MeshType = Enum.MeshType.FileMesh
Decal15.Parent = Part13
Decal15.Texture = "rbxassetid://195514412"
Decal15.Face = Enum.NormalId.Left
for i,v in pairs(mas:GetChildren()) do
	v.Parent = char
	pcall(function() v:MakeJoints() end)
end
mas:Destroy()
for i,v in pairs(cors) do
	spawn(function()
		pcall(v)
	end)
end
root = char.HumanoidRootPart
root.Anchored = true

function ezweld(p, a, b, cf)
	local weld = Instance.new("Weld",p)
	weld.Part0 = a
	weld.Part1 = b
	weld.C0 = cf
	return weld
end

--[[
local fet = Instance.new("Animation",char)
fet.AnimationId = "rbxassetid://180435571"
local anima = hum:LoadAnimation(fet)
anima:Play()
Swait(5)
]]--
anim = char.Humanoid:FindFirstChild("Animator")
if anim then
	anim:Destroy()
end
top = Model0.table.top
weldyay = ezweld(top,top,root,CFrame.new(4, 0.25, 0) * CFrame.Angles(0, 77, 0))

--here comes the actual script--

coroutine.resume(coroutine.create(function()
	while true do
		Swait()
		sine = sine + 1
	end
end))

for i = 1,56 do
	Swait()
	--anima:Play()
	clerp(RS, RSnor * CFrame.new(0, 0, 0) * CFrame.Angles(0, 0, 77), 0.15)
	clerp(LS, LSnor * CFrame.new(0, 0, 0) * CFrame.Angles(0, 0, -77), 0.15)
end
CreateSound("1544234899", char.Head, 10, 1)
CreateSound("1544234899", char.Head, 10, 1)
for i = 1,56 do
	Swait()
	--anima:Play()
	clerp(RS, RSnor * CFrame.new(0, 0, 0) * CFrame.Angles(0, 0, 90), 0.15)
	clerp(LS, LSnor * CFrame.new(0, 0, 0) * CFrame.Angles(0, 0, -77), 0.15)
	clerp(neck, necknor * CFrame.Angles(0 - 0.25  * math.cos(sine / 3.5), 0, 0.5),0.15)
end
for i = 1,220 do
	Swait()
	--anima:Play()
	clerp(RS, RSnor * CFrame.new(0, 0, 0) * CFrame.Angles(0, 0, 77), 0.15)
	clerp(LS, LSnor * CFrame.new(0, 0, 0) * CFrame.Angles(0, 0, -77), 0.15)
	clerp(neck, necknor,0.15)
end
pengu = Instance.new("Sound",Model0.gift.Gift)
pengu.SoundId = "rbxassetid://142912516"
pengu.Playing = true
pengu.Volume = 10
pengu.TimePosition = 2
pengu:Play()
for i = 1,100 do
	Swait()
	--anima:Play()
	clerp(RS, RSnor * CFrame.new(0, 0, 0) * CFrame.Angles(0, 0, 77 + 77), 0.15)
	clerp(LS, LSnor * CFrame.new(0, 0, 0) * CFrame.Angles(0, 0, -77 + -77), 0.15)
	clerp(neck, necknor * CFrame.Angles(-77, 0, 0),0.15)
	clerp(rootj, rootjnor * CFrame.new(0.35, -1.75, 0.75) * CFrame.Angles(77, 0, 0),0.15)
end
pengu.TimePosition = 15
for i = 1,100 do
	Swait()
	--anima:Play()
	clerp(RS, RSnor * CFrame.new(0, 0, 0) * CFrame.Angles(-0.5, 0, 77 + 77) * CFrame.Angles(0, 0, 0 + 1 * math.cos(sine / 3)), 0.15)
	clerp(LS, LSnor * CFrame.new(0, 0, 0) * CFrame.Angles(-0.5, 0, -77 + -77) * CFrame.Angles(0, 0, 0 + 1 * math.cos(sine / 3)), 0.15)
	clerp(neck, necknor * CFrame.Angles(-77, 0, 0),0.15)
	clerp(rootj, rootjnor * CFrame.new(0.35, -1.75, 0.75) * CFrame.Angles(77, 0, 0),0.15)
end
dogmesh = "rbxassetid://3711034169"
dogtex = "rbxassetid://3664830686"
present = Instance.new("Part",Model0)
present.Name = "dog"
present.Position = Model0.gift.Gift.Position
present.Anchored = true
present.CanCollide = true
present.Size = Vector3.new(0.1, 0.1, 0.1)
weldp = ezweld(Model0.gift, present, Model0.gift.Gift, CFrame.new())
mesh = Instance.new("SpecialMesh",present)
mesh.MeshId = dogmesh
mesh.TextureId = dogtex
mesh.Scale = Vector3.new(1, 1, 1.15)
pengu:Destroy()
for i = 1,56 do
	Swait()
	--anima:Play()
	Model0.gift:ClearAllChildren()
	clerp(RS, RSnor * CFrame.new(0, 0, 0) * CFrame.Angles(0, 0, 77), 0.15)
	clerp(LS, LSnor * CFrame.new(0, 0, 0) * CFrame.Angles(0, 0, -77), 0.15)
	clerp(neck, necknor, 0.15)
	clerp(rootj, rootjnor, 0.15)
end
CreateSound("283432014", char.Head, 10, 1)
for i = 1,100 do
	Swait()
	--anima:Play()
	Model0.gift:ClearAllChildren()
	clerp(RS, RSnor * CFrame.new(0, 0, 0) * CFrame.Angles(0, 0, 77 + 77), 0.15)
	clerp(LS, LSnor * CFrame.new(0, 0, 0) * CFrame.Angles(0, 0, -77 + -77), 0.15)
	clerp(neck, necknor, 0.15)
	clerp(rootj, rootjnor, 0.15)
end
for i = 1,56 do
	Swait()
	--anima:Play()
	Model0.gift:ClearAllChildren()
	clerp(RS, RSnor * CFrame.new(0, 0, 0) * CFrame.Angles(0, 0.5, 77), 0.15)
	clerp(LS, LSnor * CFrame.new(0, 0, 0) * CFrame.Angles(0, 0, -77), 0.15)
	clerp(neck, necknor, 0.15)
	clerp(rootj, rootjnor, 0.15)
end
for i = 1,56 do
	Swait()
	--anima:Play()
	Model0.gift:ClearAllChildren()
	clerp(RS, RSnor * CFrame.new(2, 0, 0) * CFrame.Angles(0, 0.5, 77), 0.15)
	clerp(LS, LSnor * CFrame.new(0, 0, 0) * CFrame.Angles(0, 0, -77), 0.15)
	clerp(neck, necknor, 0.15)
	clerp(rootj, rootjnor, 0.15)
end
present.Anchored = false
presweld = ezweld(present, present, char["Right Arm"],CFrame.new(0, 0, 2) * CFrame.Angles(77, 0, 0))
for i = 1,56 do
	Swait()
	--anima:Play()
	Model0.gift:ClearAllChildren()
	clerp(RS, RSnor * CFrame.new(0, 0, 0) * CFrame.Angles(0, 0.5, 77), 0.15)
	clerp(LS, LSnor * CFrame.new(0, 0, 0) * CFrame.Angles(0, 0, -77), 0.15)
	clerp(neck, necknor, 0.15)
	clerp(rootj, rootjnor, 0.15)
end
for i = 1,56 do
	Swait()
	--anima:Play()
	Model0.gift:ClearAllChildren()
	clerp(RS, RSnor * CFrame.new(0, 0, 0) * CFrame.Angles(0, 0, 77 + 2 * math.cos(sine / 2)), 0.15)
	clerp(LS, LSnor * CFrame.new(0, 0, 0) * CFrame.Angles(0, 0, -77), 0.15)
	clerp(neck, necknor, 0.15)
	clerp(rootj, rootjnor, 0.15)
end
for i = 1,56 do
	Swait()
	--anima:Play()
	Model0.gift:ClearAllChildren()
	clerp(RS, RSnor * CFrame.new(0, 0, 0) * CFrame.Angles(0, 0, 77), 0.15)
	clerp(LS, LSnor * CFrame.new(0, 0, 0) * CFrame.Angles(0, 0, -77), 0.15)
	clerp(neck, necknor, 0.15)
	clerp(rootj, rootjnor, 0.15)
end
for i = 1,56 do
	Swait()
	--anima:Play()
	Model0.gift:ClearAllChildren()
	clerp(RS, RSnor * CFrame.new(0, 0, 0) * CFrame.Angles(0, 0, 77), 0.15)
	clerp(LS, LSnor * CFrame.new(0, 0, 0) * CFrame.Angles(0, 0.75, -77), 0.15)
	clerp(neck, necknor, 0.15)
	clerp(rootj, rootjnor, 0.15)
end
posmesh = "rbxassetid://3704756364"
postex = "rbxassetid://3683828771"
present2 = Instance.new("Part",Model0)
present2.Name = "tahpose"
present2.Position = char["Right Arm"].Position
present2.Anchored = true
present2.CanCollide = true
present2.Size = Vector3.new(0.0001, 0.0001, 0.0001) - Vector3.new(0.01, 0.01, 0.01)
weldp2 = ezweld(Model0.gift, present2, char["Left Arm"], CFrame.new())
mesh2 = Instance.new("SpecialMesh",present2)
mesh2.MeshId = posmesh
mesh2.TextureId = postex
mesh2.Scale = Vector3.new(1, 1, 1)
present2.Anchored = false
pres2weld = ezweld(present2, present2, char["Left Arm"],CFrame.new(0, -1.565, 0.5) * CFrame.Angles(77, 0, 0))
for i = 1,56 do
	Swait()
	--anima:Play()
	clerp(RS, RSnor * CFrame.new(0, 0, 0) * CFrame.Angles(0, 0, 77), 0.15)
	clerp(LS, LSnor * CFrame.new(0, 0, 0) * CFrame.Angles(0, 0, -77) * CFrame.Angles(1, 0, 68), 0.15)
	clerp(neck, necknor, 0.15)
	clerp(rootj, rootjnor, 0.15)
	clerp(pres2weld, CFrame.new(0, -1.565, 0.5) * CFrame.Angles(77, 0, 0), 0.15)
end
pres2weld:Destroy()
present2.Anchored = false
present2:BreakJoints()
pres21weld = ezweld(present2, present2, char["Head"],CFrame.new())
for i = 1,25 do
	Swait()
	for _,v in pairs (char:children()) do
		if v:IsA("Accessory") then
			v:Destroy()
		end
	end
	clerp(pres21weld, CFrame.new(0, -1.565, 0) * CFrame.Angles(0, 0, 0), 0.15)
end
for i = 1,56 do
	Swait()
	--anima:Play()
	Model0.gift:ClearAllChildren()
	clerp(RS, RSnor * CFrame.new(0, 0, 0) * CFrame.Angles(0, 0, 77), 0.15)
	clerp(LS, LSnor * CFrame.new(0, 0, 0) * CFrame.Angles(0, 0, -77), 0.15)
	clerp(neck, necknor, 0.15)
	clerp(rootj, rootjnor, 0.15)
end
for i = 1,15 do
	Swait()
	--anima:Play()
	clerp(RS, RSnor * CFrame.new(0, 0, 0) * CFrame.Angles(0, 0, 77), 0.15)
	clerp(LS, LSnor * CFrame.new(0, 0, 0) * CFrame.Angles(0, 0, -77) * CFrame.Angles(0.75, 0, 67.75), 0.15)
	clerp(neck, necknor, 0.15)
	clerp(rootj, rootjnor, 0.15)
	clerp(pres21weld, CFrame.new(0, -1.656, 0) * CFrame.Angles(0, 0, -0.5), 0.15)
end
for i = 1,25 do
	Swait()
	--anima:Play()
	clerp(RS, RSnor * CFrame.new(0, 0, 0) * CFrame.Angles(0, 0, 77), 0.15)
	clerp(LS, LSnor * CFrame.new(0, 0, 0) * CFrame.Angles(0, 0, -77), 0.15)
	clerp(neck, necknor, 0.15)
	clerp(rootj, rootjnor, 0.15)
	clerp(pres21weld, CFrame.new(0, -1.565, 0) * CFrame.Angles(0, 0, 0), 0.15)
end
for i = 1,220 do
	Swait()
	--anima:Play()
	Model0.gift:ClearAllChildren()
	clerp(RS, RSnor * CFrame.new(0, 0, 0) * CFrame.Angles(0 + 0.5 * math.cos(sine / 12), 0, 77 + 77), 0.15)
	clerp(LS, LSnor * CFrame.new(0, 0, 0) * CFrame.Angles(0 + -0.5 * math.cos(sine / 12), 0, -77 + -77), 0.15)
	clerp(neck, necknor, 0.15)
	clerp(rootj, rootjnor, 0.15)
end
for i = 1,56 do
	Swait()
	--anima:Play()
	clerp(RS, RSnor * CFrame.new(0, 0, 0) * CFrame.Angles(0, 0, 77), 0.15)
	clerp(LS, LSnor * CFrame.new(0, 0, 0) * CFrame.Angles(0, 0, -77), 0.15)
	clerp(neck, necknor, 0.15)
	clerp(rootj, rootjnor, 0.15)
	clerp(pres21weld, CFrame.new(0, -1.565, 0) * CFrame.Angles(0, 0, 0), 0.15)
end