Advertisement
plytalent

noclip

Jun 11th, 2020
1,259
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lua 7.57 KB | None | 0 0
  1. local plrs = game:GetService("Players")
  2. local plr = plrs.LocalPlayer
  3. local character = plr.Character
  4. local upordownorstable=-3.5
  5. local MANAFLY
  6. local mouse = plr:GetMouse()
  7. local harp={Up="q",Down="e"}
  8. local Ui
  9. local MANAFLY_EVENT
  10. for _,v in pairs(character:GetChildren())do
  11.     coroutine.resume(coroutine.create(function()
  12.         if v:IsA("Part")then
  13.             v.CanCollide = true
  14.             print("NoCollisionConstraint ",v.Name)
  15.             if v.Name:find("Leg") then
  16.                 v.Touched:Connect(function(hit)
  17.                     if not v:FindFirstChild("NoCollisionConstraint4") then
  18.                         d=Instance.new("NoCollisionConstraint",v)
  19.                         d.Name = "NoCollisionConstraint4"
  20.                     elseif v:FindFirstChild("NoCollisionConstraint4") then
  21.                         d=v:FindFirstChild("NoCollisionConstraint4")
  22.                     end
  23.                     if hit.Parent:FindFirstChild("HumanoidRootPart") and hit.Parent:FindFirstChild("Humanoid") and hit.Parent:IsA("Model")then
  24.                         d.Part0 = plr.Character:FindFirstChild("Torso")
  25.                         d.Part1 =hit.Parent:FindFirstChild("Left Leg")
  26.                     end
  27.                    
  28.                     if not v:FindFirstChild("NoCollisionConstraint3") then
  29.                         c=Instance.new("NoCollisionConstraint",v)
  30.                         c.Name = "NoCollisionConstraint3"
  31.                     elseif v:FindFirstChild("NoCollisionConstraint3") then
  32.                         c=v:FindFirstChild("NoCollisionConstraint3")
  33.                     end
  34.                     if hit.Parent:FindFirstChild("HumanoidRootPart") and hit.Parent:FindFirstChild("Humanoid") and hit.Parent:IsA("Model")then
  35.                         c.Part0 = plr.Character.Torso
  36.                         c.Part1 = hit.Parent:FindFirstChild("Head")
  37.                     end
  38.                     if not v:FindFirstChild("NoCollisionConstraint2") then
  39.                         b=Instance.new("NoCollisionConstraint",v)
  40.                         b.Name = "NoCollisionConstraint2"
  41.                     elseif v:FindFirstChild("NoCollisionConstraint2") then
  42.                         b=v:FindFirstChild("NoCollisionConstraint2")
  43.                     end
  44.  
  45.                     if hit.Parent:FindFirstChild("HumanoidRootPart") and hit.Parent:FindFirstChild("Humanoid") and hit.Parent:IsA("Model")then
  46.                         b.Part0 = plr.Character.Torso
  47.                         b.Part1 = hit.Parent:FindFirstChild("Torso")
  48.                     end
  49.                     if not v:FindFirstChild("NoCollisionConstraint")  then
  50.                         a=Instance.new("NoCollisionConstraint",v)
  51.                         a.Name = "NoCollisionConstraint"
  52.                     elseif v:FindFirstChild("NoCollisionConstraint") then
  53.                         a=v:FindFirstChild("NoCollisionConstraint")
  54.                     end
  55.                     if hit.Name ~= "MANAFLYPART" and hit.Name ~= " Torso"and hit.Name ~= "HumanoidRootPart" then
  56.                         a.Part0=plr.Character.Torso
  57.                         a.Part1=hit
  58.                     end
  59.                 end)
  60.             else
  61.                 v.Touched:Connect(function(hit)
  62.                     if not v:FindFirstChild("NoCollisionConstraint4") then
  63.                         d=Instance.new("NoCollisionConstraint",v)
  64.                         d.Name = "NoCollisionConstraint4"
  65.                     elseif v:FindFirstChild("NoCollisionConstraint4") then
  66.                         d=v:FindFirstChild("NoCollisionConstraint4")
  67.                     end
  68.                     if hit.Parent:FindFirstChild("HumanoidRootPart") and hit.Parent:FindFirstChild("Humanoid") and hit.Parent:IsA("Model")then
  69.                         d.Part0 = v
  70.                         d.Part1 = hit.Parent:FindFirstChild("Left Leg")
  71.                     end
  72.                     if not v:FindFirstChild("NoCollisionConstraint3") then
  73.                         c=Instance.new("NoCollisionConstraint",v)
  74.                         c.Name = "NoCollisionConstraint3"
  75.                     elseif v:FindFirstChild("NoCollisionConstraint3") then
  76.                         c=v:FindFirstChild("NoCollisionConstraint3")
  77.                     end
  78.                     if hit.Parent:FindFirstChild("HumanoidRootPart") and hit.Parent:FindFirstChild("Humanoid") and hit.Parent:IsA("Model")then
  79.                         c.Part0 = v
  80.                         c.Part1 = hit.Parent:FindFirstChild("Head")
  81.                     end
  82.  
  83.                     if not v:FindFirstChild("NoCollisionConstraint2") then
  84.                         b=Instance.new("NoCollisionConstraint",v)
  85.                         b.Name = "NoCollisionConstraint2"
  86.                     elseif v:FindFirstChild("NoCollisionConstraint2") then
  87.                         b=v:FindFirstChild("NoCollisionConstraint2")
  88.                     end
  89.                     if hit.Parent:FindFirstChild("HumanoidRootPart") and hit.Parent:FindFirstChild("Humanoid") and hit.Parent:IsA("Model")then
  90.                         b.Part0 = v
  91.                         b.Part1 = hit.Parent:FindFirstChild("Torso")
  92.                     end
  93.                     if not v:FindFirstChild("NoCollisionConstraint")  then
  94.                         a=Instance.new("NoCollisionConstraint",v)
  95.                         a.Name = "NoCollisionConstraint"
  96.                     elseif v:FindFirstChild("NoCollisionConstraint") then
  97.                         a=v:FindFirstChild("NoCollisionConstraint")
  98.                     end
  99.                     if hit.Name ~= "MANAFLYPART" and hit.Name ~= " Torso"and hit.Name ~= "HumanoidRootPart" then
  100.                         a.Part0=v
  101.                         a.Part1=hit
  102.                     end
  103.                 end)
  104.             end
  105.         end
  106.     end))
  107. end
  108. local function keydown(k)
  109.     if k == harp["Up"] then
  110.         upordownorstable = upordownorstable+2
  111.     elseif k == harp["Down"] then
  112.         upordownorstable = upordownorstable-3
  113.     end
  114. end
  115. local function keyup(k)
  116.     if harp["Up"] then
  117.         upordownorstable = -3.5
  118.     elseif k == harp["Down"] then
  119.         upordownorstable = -3.5
  120.     end
  121. end
  122. local mousekeyevent = {down=mouse.KeyDown:Connect(keydown),up = mouse.KeyUp:Connect(keyup)}
  123. game:GetService("RunService"):BindToRenderStep("HARP MANAFLY IN GAIA",1,function()
  124.     coroutine.resume(coroutine.create(function()
  125.         if not MANAFLY then
  126.             MANAFLY =  Instance.new("Part")
  127.         end
  128.         MANAFLY.Parent = workspace
  129.         MANAFLY.Size = Vector3.new(2,1,2)
  130.         MANAFLY.CFrame = plr.Character.HumanoidRootPart.CFrame * CFrame.new(0,upordownorstable,0)
  131.         MANAFLY.Name = "MANAFLYPART"
  132.         MANAFLY.Anchored = true
  133.         if not MANAFLY_EVENT then
  134.         MANAFLY_EVENT =MANAFLY.Touched:Connect(function(hit)
  135. --              print("Event Touched From ",v.Name)
  136.                 local a
  137.                 if not MANAFLY:FindFirstChild("NoCollisionConstraint")  then
  138.                     a=Instance.new("NoCollisionConstraint",MANAFLY)
  139.                     a.Name = "NoCollisionConstraint"
  140.                 elseif MANAFLY:FindFirstChild("NoCollisionConstraint") then
  141.                     a=MANAFLY:FindFirstChild("NoCollisionConstraint")
  142.                 end
  143.                 if hit.Parent ~= plr.Character then
  144.                     a.Part0=MANAFLY
  145.                     a.Part1=hit
  146.                 end
  147.             end)
  148.         end
  149.     end))
  150.     coroutine.resume(coroutine.create(function()
  151.         if not Ui then
  152.             Ui = Instance.new("Frame",Instance.new("ScreenGui",plr.PlayerGui))
  153.             local ButtonSubmit = Instance.new("TextButton",Ui)
  154.             local Up = Instance.new("TextBox",Ui)
  155.             local Down = Instance.new("TextBox",Ui)
  156.             local Key1 = Instance.new("TextLabel",Ui)
  157.             local Key2 = Instance.new("TextLabel",Ui)
  158.  
  159.             Ui.Position= UDim2.new(0.89, 0, 0.5, 0)
  160.             Ui.Size = UDim2.new(0.11, 0, 0.25, 0)
  161.             Ui.BorderSizePixel = 0
  162.  
  163.             ButtonSubmit.Size = UDim2.new(1, 0, 0.2, 0)
  164.             ButtonSubmit.Text = "SUBMIT"
  165.  
  166.             Key1.Position = UDim2.new(0, 0, 0.199, 0)
  167.             Key1.Size = UDim2.new(1, 0, 0.2, 0)
  168.             Key1.Text = "KEY UP"
  169.  
  170.             Up.Position = UDim2.new(0, 0, 0.397, 0)
  171.             Up.Size  = UDim2.new(1, 0, 0.2, 0)
  172.  
  173.             Key2.Position = UDim2.new(0, 0, 0.589, 0)
  174.             Key2.Size = UDim2.new(1, 0, 0.2, 0)
  175.             Key2.Text = "KEY DOWN"
  176.  
  177.             Down.Position = UDim2.new(0, 0, 0.795, 0)
  178.             Down.Size  = UDim2.new(1, 0, 0.2, 0)
  179.  
  180.             ButtonSubmit.MouseButton1Click:Connect(function()
  181.                 if Up.Text ~= "" or Up.Text ~= " " then
  182.                     harp["Up"]=Up.Text
  183.                     mousekeyevent.up:Disconnect()
  184.                     mousekeyevent.down:Disconnect()
  185.                     mousekeyevent = {down=mouse.KeyDown:Connect(keydown),up = mouse.KeyUp:Connect(keyup)}
  186.                 else
  187.                     harp["Up"]="q"
  188.                     mousekeyevent.up:Disconnect()
  189.                     mousekeyevent.down:Disconnect()
  190.                     mousekeyevent = {down=mouse.KeyDown:Connect(keydown),up = mouse.KeyUp:Connect(keyup)}
  191.                 end
  192.                 if Down.Text ~= "" or Down.Text ~= " " then
  193.                     harp["Down"]=Down.Text
  194.                     mousekeyevent.up:Disconnect()
  195.                     mousekeyevent.down:Disconnect()
  196.                     mousekeyevent = {down=mouse.KeyDown:Connect(keydown),up = mouse.KeyUp:Connect(keyup)}
  197.                 else
  198.                     harp["Up"]="e"
  199.                     mousekeyevent.up:Disconnect()
  200.                     mousekeyevent.down:Disconnect()
  201.                     mousekeyevent = {down=mouse.KeyDown:Connect(keydown),up = mouse.KeyUp:Connect(keyup)}
  202.                 end
  203.             end)
  204.         end
  205.     end))
  206. end)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement