Doolge Glider

--[[Glider]]--
--- Made by DoogleFox, Full credit given
local player = game:service("Players").LocalPlayer
local char = player.Character
local cam = workspace.CurrentCamera
local Torsoz = char:findFirstChild("Torso")
 local RA = char:findFirstChild("Right Arm")
local LA = char:findFirstChild("Left Arm")
local RL = char:findFirstChild("Right Leg")
local LL = char:findFirstChild("Left Leg")
 local H = char:findFirstChild("Head")
local RS = Torsoz:findFirstChild("Right Shoulder")
local LS = Torsoz:findFirstChild("Left Shoulder")
local RH = Torsoz:findFirstChild("Right Hip")
 local LH = Torsoz:findFirstChild("Left Hip")
local N = Torsoz:findFirstChild("Neck")
local hu = char:findFirstChild("Humanoid")
local mouse = player:GetMouse()
local Lights = {}
 local JetFlames = {}
local LightChangeSpeed = 0.02
local LeftWing
local RightWing
local WingParts = {}
local Flying = false
local JetActive = false
local idle = false
local velo = 0
local bp = Instance.new("BodyPosition")
 bp.maxForce = Vector3.new(1/0,1/0,1/0)
bp.D = 100
local bg = Instance.new("BodyGyro")
bg.maxTorque = Vector3.new(1/0,1/0,1/0)
bg.D = 320
local bv = Instance.new("BodyVelocity")
 bv.maxForce = Vector3.new(1/0,1/0,1/0)
local P = Instance.new("Part")
P.Anchored = false
P.CanCollide = false
P.Name = "Part"
P.formFactor = "Custom"
P.Size = Vector3.new(0.5,0.5,0.5)
 P.Locked = true
P.TopSurface = 0
P.BottomSurface = 0
P.BrickColor = BrickColor.new("Dark stone grey")
P.Transparency = 0
local bp = Instance.new("BodyPosition")
bp.maxForce = Vector3.new(1/0,1/0,1/0)
 local bv = Instance.new("BodyVelocity")
bv.maxForce = Vector3.new(1/0,1/0,1/0)
local bg = Instance.new("BodyGyro")
bg.maxTorque = Vector3.new(1/0,1/0,1/0)
bg.D = 300
local wingcolor = "Really black"
 local maxvelo = 60
local acceleration = 1
---------------------------------- Design ------------------------------------------
for i, v in pairs(char:children()) do
if v.className == "Model" and v.Name == "Pack" then
 v:remove()
end
end
local m = Instance.new("Model", char)
m.Name = "Pack"
local b = P:Clone()
b.Parent = m
local mesh = Instance.new("SpecialMesh", b)
mesh.MeshType = "Head"
 mesh.Scale = Vector3.new(2.6,1.2,2.6)
local w = Instance.new("Motor", b)
w.Part0 = Torsoz
w.Part1 = b
w.C0 = CFrame.new(0,0.2,0.35) * CFrame.Angles(math.pi/2,0,0)
local p = P:Clone()
p.Parent = m
 local mesh = Instance.new("SpecialMesh", p)
mesh.MeshType = "Head"
mesh.Scale = Vector3.new(2,1.2,2)
local w = Instance.new("Motor", p)
w.Part0 = Torsoz
w.Part1 = p
w.C0 = CFrame.new(0,0.2,0.45) * CFrame.Angles(math.pi/2,0,0)
 local p = P:Clone()
p.Parent = m
local mesh = Instance.new("SpecialMesh", p)
mesh.MeshType = "Head"
mesh.Scale = Vector3.new(2.02,1.2,2.02)
local w = Instance.new("Motor", p)
 w.Part0 = Torsoz
w.Part1 = p
w.C0 = CFrame.new(0,0.2,0.445) * CFrame.Angles(math.pi/2,0,0)
table.insert(Lights, p)
for i = 1, 3 do
local p = P:Clone()
p.Parent = m
local mesh = Instance.new("CylinderMesh", p)
 if i == 2 then
mesh.Scale = Vector3.new(0.4,1.2,0.4)
else
mesh.Scale = Vector3.new(0.35,1,0.35)
end
local w = Instance.new("Motor", p)
w.Part0 = Torsoz
w.Part1 = p
w.C0 = CFrame.new(-0.3+(0.15*i),-0.25,0.55)
 if i == 2 then
CenterJet = p
end
local l = P:Clone()
l.Parent = m
local mesh = Instance.new("CylinderMesh", l)
local w = Instance.new("Motor", l)
w.Part0 = p
w.Part1 = l
 if i == 2 then
mesh.Scale = Vector3.new(0.405,0.12,0.405)
w.C0 = CFrame.new(0,-0.2,0)
else
mesh.Scale = Vector3.new(0.355,0.12,0.355)
w.C0 = CFrame.new(0,-0.15,0)
end
table.insert(Lights, l)
 end
for i = 1, 3 do
local l = P:Clone()
l.Parent = m
local mesh = Instance.new("CylinderMesh", l)
mesh.Scale = Vector3.new(0.12,0.1,0.12)
local w = Instance.new("Motor", l)
 w.Part0 = Torsoz
w.Part1 = l
w.C0 = CFrame.new(0.3-(0.15*i),0.3,0.73) * CFrame.Angles(math.pi/2,0,0)
table.insert(Lights, l)
end
------- wings ------
for i = 0, 1 do
local p = P:Clone()
p.Parent = m
 local mesh = Instance.new("SpecialMesh", p)
mesh.MeshType = "Sphere"
mesh.Scale = Vector3.new(1,1,1)
local w = Instance.new("Motor", p)
w.Part0 = Torsoz
w.Part1 = p
w.C0 = CFrame.new(0,0.55,0.55) * CFrame.Angles(0,math.pi*i,0)
 w.C1 = CFrame.new(0.425,0,0)
local c = P:Clone()
c.Parent = m
c.BrickColor = BrickColor.new(wingcolor)
c.Name = "WingSpine"..i+1
local mesh = Instance.new("BlockMesh", c)
mesh.Scale = Vector3.new(0.26,6,0.2)
 local w = Instance.new("Motor", c)
w.Part0 = p
w.Part1 = c
w.C0 = CFrame.Angles(0,0,-math.pi/7)
w.C1 = CFrame.new(0,1.5,0)
w.MaxVelocity = 0.15
if i == 0 then
LeftWing = w
else
 RightWing = w
end
table.insert(WingParts, c)
local p = P:Clone()
p.Parent = m
p.BrickColor = BrickColor.new(wingcolor)
local mesh = Instance.new("SpecialMesh", p)
mesh.MeshType = "Wedge"
 mesh.Scale = Vector3.new(0.2,4,2.2)
local w = Instance.new("Motor", p)
w.Part0 = c
w.Part1 = p
w.C0 = CFrame.new(0.485,-0.85,0) * CFrame.Angles(math.pi,-math.pi/2,0)
table.insert(WingParts, p)
 local p = P:Clone()
p.Parent = m
p.BrickColor = BrickColor.new(wingcolor)
local mesh = Instance.new("BlockMesh", p)
mesh.Scale = Vector3.new(2,0.5,0.2)
local w = Instance.new("Motor", p)
 w.Part0 = c
w.Part1 = p
w.C0 = CFrame.new(0.535,0.275,0)
table.insert(WingParts, p)
local p = P:Clone()
p.Parent = m
p.BrickColor = BrickColor.new(wingcolor)
local mesh = Instance.new("SpecialMesh", p)
 mesh.MeshType = "Wedge"
mesh.Scale = Vector3.new(0.2,1.5,1)
local w = Instance.new("Motor", p)
w.Part0 = c
w.Part1 = p
w.C0 = CFrame.new(0.785,0.77,0) * CFrame.Angles(0,-math.pi/2,0)
 table.insert(WingParts, p)
local p = P:Clone()
p.Parent = m
p.BrickColor = BrickColor.new(wingcolor)
local mesh = Instance.new("BlockMesh", p)
mesh.Scale = Vector3.new(0.94,1.5,0.2)
local w = Instance.new("Motor", p)
 w.Part0 = c
w.Part1 = p
w.C0 = CFrame.new(0.3,0.77,0)
table.insert(WingParts, p)
local p = P:Clone()
p.Parent = m
p.BrickColor = BrickColor.new(wingcolor)
local mesh = Instance.new("SpecialMesh", p)
 mesh.MeshType = "Wedge"
mesh.Scale = Vector3.new(0.2,1,0.977)
local w = Instance.new("Motor", p)
w.Part0 = c
w.Part1 = p
w.C0 = CFrame.new(0.3,1.385,0) * CFrame.Angles(0,-math.pi/2,0)
 table.insert(WingParts, p)
end
local spacedet = 0
local KEYS = {false, false, false, false}
mouse.KeyDown:connect(function(key)
if key == string.char(32) then
if (tick() - spacedet) < 0.3 then
 Flying = not Flying
end
spacedet = tick()
end
if key == "w" then
KEYS[1] = true
end
if key == "a" then
KEYS[2] = true
end
if key == "s" then
KEYS[3] = true
 end
if key == "d" then
KEYS[4] = true
end
end)
mouse.KeyUp:connect(function(key)
if key == "w" then
KEYS[1] = false
end
if key == "a" then
KEYS[2] = false
 end
if key == "s" then
KEYS[3] = false
end
if key == "d" then
KEYS[4] = false
end
end)
local LTrailParts = {}
for i = 1, 21 do
local p = P:Clone()
p.Name = "TrailLine"
 p.Anchored = true
p.BrickColor = BrickColor.new(wingcolor)
local mesh = Instance.new("CylinderMesh", p)
mesh.Name = "Mesh"
table.insert(LTrailParts, p)
end
local RTrailParts = {}
 for i = 1, 21 do
local p = P:Clone()
p.Name = "TrailLine"
p.Anchored = true
p.BrickColor = BrickColor.new(wingcolor)
local mesh = Instance.new("CylinderMesh", p)
mesh.Name = "Mesh"
 table.insert(RTrailParts, p)
end
local Loldpos
local Roldpos
local lightval = {0.1, true}
local refval = 0.1
local firecolors = {"Bright red", "Bright orange"}
local firespeed = 2
 local trailnum = 0
local num = 0
local lastflyaction = false
local lastidleaction = false
local idlebp = {0, 0, Torsoz.Position, true}
while true do
num = num + 1
trailnum = trailnum + 1
local unitz = (Torsoz.Position - cam.CoordinateFrame.p).unit
 local camsight = Torsoz.Position + (unitz*90)
local diff = camsight.y - Torsoz.Position.y
---------------------- Velocity Changes ----------------------------
----------- W key --------------
if KEYS[1] == true then
 velo = velo + acceleration
else
if velo > 0 then
local UP = velo - (acceleration/1.5)
if velo > 0 and UP < 0 then
velo = velo + UP
end
velo = velo - (acceleration/1.5)
end
end
 ------------ S key -------------
if KEYS[3] == true then
if velo > 0 then
velo = velo - acceleration*1.2
else
velo = velo - (acceleration/1.5)
end
else
if velo < 0 then
local DOWN = velo + acceleration
 if velo < 0 and DOWN > 0 then
velo = velo - DOWN
end
velo = velo + acceleration
end
end
local maxvelocalc = maxvelo
if diff < -35 then
if velo > 0 then
maxvelocalc = maxvelo + (maxvelo * -(((diff+35)/110)))
 end
elseif diff > 35 then
if velo < 0 then
maxvelocalc = maxvelo + (maxvelo * -((((-diff)+35)/110)))
end
end
if velo >= maxvelocalc then
velo = maxvelocalc
elseif velo <= -maxvelocalc/2 then
 velo = -maxvelocalc/2
end
------------------------- Lights ----------------------
if lightval[1] < 0.15 then
lightval[2] = true
elseif lightval[1] > 0.76 then
lightval[2] = false
end
if lightval[2] == true then
 lightval[1] = lightval[1] + LightChangeSpeed
else
lightval[1] = lightval[1] - LightChangeSpeed
end
for i, v in pairs(Lights) do
v.Transparency = lightval[1]
if LightChangeSpeed > 0.15 then
v.BrickColor = BrickColor.new("Bright red")
 elseif LightChangeSpeed > 0.08 then
v.BrickColor = BrickColor.new("Bright orange")
else
v.BrickColor = BrickColor.new("Bright green")
end
end
--------------------------------------------------------
 --------------------- Wing Shines -------------------------
for i, v in pairs(WingParts) do
if Flying == true then
if v.Reflectance > 0.19 then
v.Reflectance = v.Reflectance - 0.035
else
v.Reflectance = 0.19
 end
else
if v.Reflectance < 0.43 then
v.Reflectance = v.Reflectance + 0.035
else
v.Reflectance = 0.43
end
end
end
----------------------------------------------------
------------------------ Jet Boost Flames --------------------------------
 if num%firespeed == 0 and JetActive == true then
local f = P:Clone()
f.Parent = m
f.Name = "JetFire"
f.BrickColor = BrickColor.new(firecolors[math.random(1, #firecolors)])
f.Transparency = 0.15
 f.Anchored = true
f.CFrame = CenterJet.CFrame * CFrame.new(0,-0.3,0)
local mesh = Instance.new("BlockMesh", f)
mesh.Scale = Vector3.new(0.6,0.6,0.6)
table.insert(JetFlames, {mesh, (f.Position - CenterJet.Position).unit})
 end
for i, v in pairs(JetFlames) do
if v[1].Parent.Transparency < 0.9 then
v[1].Parent.Transparency = v[1].Parent.Transparency + 0.03
v[1].Scale = v[1].Scale + Vector3.new(0.08,0.08,0.08)
v[1].Parent.CFrame = v[1].Parent.CFrame * CFrame.Angles(math.random(-180,180)/360,math.random(-180,180)/360,math.random(-180,180)/360)
 if idle == false then
v[1].Parent.CFrame = v[1].Parent.CFrame + (v[2]*0.1)
else
v[1].Parent.CFrame = v[1].Parent.CFrame + (v[2]*0.24)
end
else
v[1].Parent:remove()
table.remove(JetFlames, i)
 end
end
--------------------------------------------------
------------------------------ Flying --------------------------------
if Flying == true then
if lastflyaction == false then
bg = Instance.new("BodyGyro", Torsoz)
 bg.maxTorque = Vector3.new(1/0,1/0,1/0)
bg.D = 350
end
--------- idle checker --------
if (velo > -0.5 and velo < 0.5) and (KEYS[1] == false and KEYS[3] == false) then
idle = true
if lastidleaction == false then
 idlebp[3] = Torsoz.Position
end
else
idle = false
end
--------- idle float anim -----------
if idle == true then
if lastidleaction == false then
idlebp = {0, 0, Torsoz.Position, true}
end
 if idlebp[2] >= 0.3 then
idlebp[4] = false
elseif idlebp[2] <= -0.3 then
idlebp[4] = true
end
if idlebp[4] == false then
idlebp[2] = idlebp[2] - 0.02
elseif idlebp[4] == true then
idlebp[2] = idlebp[2] + 0.02
 end
idlebp[1] = idlebp[1] + idlebp[2]
end
---------------- Body Objects ----------------------
if idle == true then
if lastidleaction == false then
bv:remove()
bp:remove()
bp = Instance.new("BodyPosition")
 end
hu.PlatformStand = true
bp.Parent = Torsoz
bp.maxForce = Vector3.new(1/0,1/0,1/0)
bp.D = 100
bp.position = idlebp[3] + Vector3.new(0,idlebp[1],0)
bg.cframe = CFrame.new(Torsoz.Position, Torsoz.Position + cam.CoordinateFrame.lookVector)
 else
if lastidleaction == true then
bp:remove()
bv:remove()
bv = Instance.new("BodyVelocity")
end
hu.PlatformStand = true
bv.Parent = Torsoz
bv.maxForce = Vector3.new(1/0,1/0,1/0)
 local torpos = Torsoz.Position + (cam.CoordinateFrame.lookVector * 10)
bv.velocity = CFrame.new(Torsoz.Position+Vector3.new(0,-2,0), torpos).lookVector*velo
local cvelo = velo
if velo > maxvelo then
cvelo = maxvelo
 end
bg.cframe = CFrame.new(Torsoz.Position, Torsoz.Position + cam.CoordinateFrame.lookVector) * CFrame.Angles((-math.pi/2.3)*(cvelo/maxvelo),0,0)
end
elseif Flying == false then
if lastflyaction == true then
 hu.PlatformStand = false
bp.Parent = nil
bg.Parent = nil
bv.Parent = nil
idle = false
end
end --- if flying == true
-----------------------------------------
----------------------- Auto Anims -----------------------
 if Flying == true then
if diff > 40 then
LeftWing.DesiredAngle = -0.3
RightWing.DesiredAngle = -0.3
LightChangeSpeed = 0.24
JetActive = true
ActiveTrails = true
firespeed = 1
elseif diff > -22 and diff < 40 then
 LeftWing.DesiredAngle = -math.pi/2.5
RightWing.DesiredAngle = -math.pi/2.5
LightChangeSpeed = 0.09
JetActive = true
ActiveTrails = true
firespeed = 2
elseif diff > -60 and diff < -22 then
 LeftWing.DesiredAngle = -math.pi/2.5
RightWing.DesiredAngle = -math.pi/2.5
LightChangeSpeed = 0.04
JetActive = false
ActiveTrails = true
elseif diff < -60 then
LeftWing.DesiredAngle = -0.1
RightWing.DesiredAngle = -0.1
 LightChangeSpeed = 0.04
JetActive = false
ActiveTrails = true
end
if idle == true then
LeftWing.DesiredAngle = -math.pi/2.2
RightWing.DesiredAngle = -math.pi/2.2
LightChangeSpeed = 0.09
JetActive = true
 ActiveTrails = false
firespeed = 1
end
if diff < -40 and velo < 0 then
LeftWing.DesiredAngle = -0.3
RightWing.DesiredAngle = -0.3
LightChangeSpeed = 0.24
JetActive = true
ActiveTrails = true
 firespeed = 1
elseif (diff < -22 and diff > -40) and velo < 0 then
LeftWing.DesiredAngle = -math.pi/2.5
RightWing.DesiredAngle = -math.pi/2.5
LightChangeSpeed = 0.09
JetActive = true
ActiveTrails = true
 firespeed = 2
end
else
LeftWing.DesiredAngle = 0
RightWing.DesiredAngle = 0
JetActive = false
ActiveTrails = false
LightChangeSpeed = 0.02
end
-----------------------------------------
 ------------------------ Trail lines ------------------------------
if num%2 == 0 then
if Flying == true and ActiveTrails == true then
if velo > 0 then
if velo < acceleration*7 then
Loldpos = nil
 Roldpos = nil
end
elseif velo < 0 then
if velo > -acceleration*7 then
Loldpos = nil
Roldpos = nil
end
end
if Loldpos ~= nil then
local newpos = (LeftWing.Parent.CFrame * CFrame.new(0,-1.7,0)).p
 local t = LTrailParts[trailnum]
t.Parent = m
t.Anchored = true
t.BrickColor = BrickColor.new(wingcolor)
t.CFrame = CFrame.new((Loldpos+newpos)/2,Loldpos) * CFrame.Angles(math.pi/2,0,0)
local mesh = Instance.new("CylinderMesh", t)
 mesh.Name = "Mesh"
mesh.Scale = Vector3.new(0.2,(Loldpos - newpos).magnitude*2,0.2)
end
if Roldpos ~= nil then
local newpos = (RightWing.Parent.CFrame * CFrame.new(0,-1.7,0)).p
local t = RTrailParts[trailnum]
 t.Parent = m
t.Anchored = true
t.BrickColor = BrickColor.new(wingcolor)
t.CFrame = CFrame.new((Roldpos+newpos)/2,Roldpos) * CFrame.Angles(math.pi/2,0,0)
local mesh = Instance.new("CylinderMesh", t)
 mesh.Name = "Mesh"
mesh.Scale = Vector3.new(0.2,(Roldpos - newpos).magnitude*2,0.2)
end
Loldpos = (LeftWing.Parent.CFrame * CFrame.new(0,-1.7,0)).p
Roldpos = (RightWing.Parent.CFrame * CFrame.new(0,-1.7,0)).p
 else
LTrailParts[trailnum].Parent = nil
RTrailParts[trailnum].Parent = nil
Loldpos = (LeftWing.Parent.CFrame * CFrame.new(0,-1.7,0)).p
Roldpos = (RightWing.Parent.CFrame * CFrame.new(0,-1.7,0)).p
end
 end
if trailnum == #LTrailParts-1 then
trailnum = 0
end
if num%800 == 0 then
for i, v in pairs(LTrailParts) do
game:service("Debris"):AddItem(v, 0.7)
end
for i, v in pairs(RTrailParts) do
 game:service("Debris"):AddItem(v, 0.7)
end
LTrailParts = {}
for i = 1, 21 do
local p = P:Clone()
p.Name = "LTrailLine"
p.Anchored = true
p.BrickColor = BrickColor.new(wingcolor)
 local mesh = Instance.new("CylinderMesh", p)
mesh.Name = "Mesh"
table.insert(LTrailParts, p)
end
RTrailParts = {}
for i = 1, 21 do
local p = P:Clone()
p.Name = "RTrailLine"
 p.Anchored = true
p.BrickColor = BrickColor.new(wingcolor)
local mesh = Instance.new("CylinderMesh", p)
mesh.Name = "Mesh"
table.insert(RTrailParts, p)
end
end
----------------------------------------------
 lastflyaction = Flying
lastidleaction = idle
wait(0.03)
end