· 6 years ago · Jun 25, 2019, 12:24 AM
1-- This script has been converted to FE by iPxter
2
3
4if game:GetService("RunService"):IsClient() then error("Script must be server-side in order to work; use h/ and not hl/") end
5local Player,Mouse,mouse,UserInputService,ContextActionService = owner
6do
7 print("FE Compatibility code by Mokiros | Translated to FE by iPxter")
8 script.Parent = Player.Character
9
10 --RemoteEvent for communicating
11 local Event = Instance.new("RemoteEvent")
12 Event.Name = "UserInput_Event"
13
14 --Fake event to make stuff like Mouse.KeyDown work
15 local function fakeEvent()
16 local t = {_fakeEvent=true,Connect=function(self,f)self.Function=f end}
17 t.connect = t.Connect
18 return t
19 end
20
21 --Creating fake input objects with fake variables
22 local m = {Target=nil,Hit=CFrame.new(),KeyUp=fakeEvent(),KeyDown=fakeEvent(),Button1Up=fakeEvent(),Button1Down=fakeEvent()}
23 local UIS = {InputBegan=fakeEvent(),InputEnded=fakeEvent()}
24 local CAS = {Actions={},BindAction=function(self,name,fun,touch,...)
25 CAS.Actions[name] = fun and {Name=name,Function=fun,Keys={...}} or nil
26 end}
27 --Merged 2 functions into one by checking amount of arguments
28 CAS.UnbindAction = CAS.BindAction
29
30 --This function will trigger the events that have been :Connect()'ed
31 local function te(self,ev,...)
32 local t = m[ev]
33 if t and t._fakeEvent and t.Function then
34 t.Function(...)
35 end
36 end
37 m.TrigEvent = te
38 UIS.TrigEvent = te
39
40 Event.OnServerEvent:Connect(function(plr,io)
41 if plr~=Player then return end
42 if io.isMouse then
43 m.Target = io.Target
44 m.Hit = io.Hit
45 else
46 local b = io.UserInputState == Enum.UserInputState.Begin
47 if io.UserInputType == Enum.UserInputType.MouseButton1 then
48 return m:TrigEvent(b and "Button1Down" or "Button1Up")
49 end
50 for _,t in pairs(CAS.Actions) do
51 for _,k in pairs(t.Keys) do
52 if k==io.KeyCode then
53 t.Function(t.Name,io.UserInputState,io)
54 end
55 end
56 end
57 m:TrigEvent(b and "KeyDown" or "KeyUp",io.KeyCode.Name:lower())
58 UIS:TrigEvent(b and "InputBegan" or "InputEnded",io,false)
59 end
60 end)
61 Event.Parent = NLS([==[
62 local Player = game:GetService("Players").LocalPlayer
63 local Event = script:WaitForChild("UserInput_Event")
64
65 local UIS = game:GetService("UserInputService")
66 local input = function(io,a)
67 if a then return end
68 --Since InputObject is a client-side instance, we create and pass table instead
69 Event:FireServer({KeyCode=io.KeyCode,UserInputType=io.UserInputType,UserInputState=io.UserInputState})
70 end
71 UIS.InputBegan:Connect(input)
72 UIS.InputEnded:Connect(input)
73
74 local Mouse = Player:GetMouse()
75 local h,t
76 --Give the server mouse data 30 times every second, but only if the values changed
77 --If player is not moving their mouse, client won't fire events
78 while wait(1/30) do
79 if h~=Mouse.Hit or t~=Mouse.Target then
80 h,t=Mouse.Hit,Mouse.Target
81 Event:FireServer({isMouse=true,Target=t,Hit=h})
82 end
83 end]==],Player.Character)
84 Mouse,mouse,UserInputService,ContextActionService = m,m,UIS,CAS
85end
86
87local wsmode = 1
88local jpmode = 1
89local gothrough = false
90local lotptog = false
91local bodyang = nil
92local cameratoggle = false
93local spintoggle = false
94local flytoggle = false
95local scg = Instance.new('ScreenGui',game.Players.LocalPlayer.PlayerGui)
96scg.ResetOnSpawn = false
97local frm = Instance.new('Frame',scg)
98frm.BorderSizePixel = 0
99frm.BackgroundColor3 = Color3.new(255/255,122/255,122/255)
100frm.Size = UDim2.new(0.3,0,0.3,0)
101frm.Position = UDim2.new(0.35,0,0.35,0)
102frm.Draggable = true
103
104
105local topl = Instance.new('TextLabel',frm)
106topl.BorderSizePixel = 0
107topl.BackgroundColor3 = Color3.new(255/255,70/255,70/255)
108topl.Size = UDim2.new(0.9,1,0.2,0)
109topl.Position = UDim2.new(0,0,0,0)
110topl.TextScaled = true
111topl.Font = "SourceSansLight"
112topl.TextColor3 = Color3.new(1,1,1)
113topl.Text = "Newbie's FE Gui V1.1"
114topl.Draggable = true
115
116local scrl = Instance.new('ScrollingFrame',frm)
117scrl.BorderSizePixel = 0
118scrl.BackgroundColor3 = Color3.new(255/255,122/255,122/255)
119scrl.Size = UDim2.new(1,0,0.8,0)
120scrl.Position = UDim2.new(0,0,0.2,0)
121scrl.BottomImage = "rbxasset://textures/ui/Scroll/scroll-middle.png"
122scrl.TopImage = "rbxasset://textures/ui/Scroll/scroll-middle.png"
123
124
125
126
127
128
129local plr = Instance.new('TextBox',scrl)
130plr.BorderSizePixel = 0
131plr.BackgroundColor3 = Color3.new(255/255,150/255,150/255)
132plr.Size = UDim2.new(0.425,0,0.1,0)
133plr.Position = UDim2.new(0.05,0,0.025,0)
134plr.TextScaled = true
135plr.Font = "SourceSansLight"
136plr.TextColor3 = Color3.new(1,1,1)
137plr.Text = "Player Specify"
138
139
140local plrsp = Instance.new('TextButton',scrl)
141plrsp.BorderSizePixel = 0
142plrsp.BackgroundColor3 = Color3.new(255/255,70/255,70/255)
143plrsp.Size = UDim2.new(0.425,0,0.1,0)
144plrsp.Position = UDim2.new(0.5,0,0.025,0)
145plrsp.TextScaled = true
146plrsp.Font = "SourceSansLight"
147plrsp.TextColor3 = Color3.new(1,1,1)
148plrsp.Text = "Spawn Blocks"
149
150
151local minim = Instance.new('TextButton',frm)
152minim.BorderSizePixel = 0
153minim.BackgroundColor3 = Color3.new(200/255,50/255,50/255)
154minim.Size = UDim2.new(0.1,0,0.2,0)
155minim.Position = UDim2.new(0.9,0,0,0)
156minim.TextScaled = true
157minim.Font = "SourceSansLight"
158minim.TextColor3 = Color3.new(1,1,1)
159minim.Text = "-"
160
161
162
163
164
165function sblock()
166for i=1,20 do
167wait(1)
168 for _,v in pairs(game.Players.LocalPlayer.Backpack:GetChildren()) do
169if v:IsA'Accoutrement' then
170v.Parent=game.Players.LocalPlayer.Character
171v.Parent = workspace.Terrain
172end
173end
174for i,v in pairs(game.Players.LocalPlayer.Character:GetChildren()) do
175if v:IsA'Accoutrement' then
176for ape,hax in pairs(v.Handle:GetChildren()) do
177hax:Destroy()
178end
179wait'.1'
180v.Parent=game.Players.LocalPlayer.StarterGear
181end
182end
183for _,v in pairs(game.Players.LocalPlayer.Character:GetChildren()) do
184v:Destroy()
185end
186local prt=Instance.new("Model", workspace);
187 Instance.new("Part", prt).Name="Torso";
188 Instance.new("Part", prt).Name="Head";
189 Instance.new("Humanoid", prt).Name="Humanoid";
190 game.Players.LocalPlayer.Character=prt
191
192repeat wait(1) until game.Players.LocalPlayer.Character:FindFirstChild'Head'
193for lol,dad in pairs(game.Players.LocalPlayer.Backpack:GetChildren()) do
194if dad:IsA'Accoutrement' then
195dad.Parent = game.Players.LocalPlayer.StarterGear
196end
197end
198for _,v in pairs(game.Players.LocalPlayer.Character:GetChildren()) do
199v:Destroy()
200end
201local prt2=Instance.new("Model", workspace);
202 Instance.new("Part", prt).Name="Torso";
203 Instance.new("Part", prt).Name="Head";
204 Instance.new("Humanoid", prt).Name="Humanoid";
205 game.Players.LocalPlayer.Character=prt
206end
207end
208plrsp.MouseButton1Click:connect(sblock)
209
210
211
212
213
214local spin = Instance.new('TextButton',scrl)
215spin.BorderSizePixel = 0
216spin.BackgroundColor3 = Color3.new(255/255,70/255,70/255)
217spin.Size = UDim2.new(0.425,0,0.1,0)
218spin.Position = UDim2.new(0.05,0,0.15,0)
219spin.TextScaled = true
220spin.Font = "SourceSansLight"
221spin.TextColor3 = Color3.new(1,1,1)
222spin.Text = "Crazy Spin: OFF"
223
224local fly = Instance.new('TextButton',scrl)
225fly.BorderSizePixel = 0
226fly.BackgroundColor3 = Color3.new(255/255,70/255,70/255)
227fly.Size = UDim2.new(0.425,0,0.1,0)
228fly.Position = UDim2.new(0.5,0,0.15,0)
229fly.TextScaled = true
230fly.Font = "SourceSansLight"
231fly.TextColor3 = Color3.new(1,1,1)
232fly.Text = "Fly: OFF"
233
234
235
236
237local seethr = Instance.new('TextButton',scrl)
238seethr.BorderSizePixel = 0
239seethr.BackgroundColor3 = Color3.new(255/255,70/255,70/255)
240seethr.Size = UDim2.new(0.425,0,0.1,0)
241seethr.Position = UDim2.new(0.05,0,0.275,0)
242seethr.TextScaled = true
243seethr.Font = "SourceSansLight"
244seethr.TextColor3 = Color3.new(1,1,1)
245seethr.Text = "See-Through: OFF"
246
247local tpto = Instance.new('TextButton',scrl)
248tpto.BorderSizePixel = 0
249tpto.BackgroundColor3 = Color3.new(255/255,70/255,70/255)
250tpto.Size = UDim2.new(0.425,0,0.1,0)
251tpto.Position = UDim2.new(0.5,0,0.275,0)
252tpto.TextScaled = true
253tpto.Font = "SourceSansLight"
254tpto.TextColor3 = Color3.new(1,1,1)
255tpto.Text = "Teleport To"
256
257
258
259local ws = Instance.new('TextButton',scrl)
260ws.BorderSizePixel = 0
261ws.BackgroundColor3 = Color3.new(255/255,70/255,70/255)
262ws.Size = UDim2.new(0.425,0,0.1,0)
263ws.Position = UDim2.new(0.05,0,0.4,0)
264ws.TextScaled = true
265ws.Font = "SourceSansLight"
266ws.TextColor3 = Color3.new(1,1,1)
267ws.Text = "WalkSpeed: Normal"
268
269local jp = Instance.new('TextButton',scrl)
270jp.BorderSizePixel = 0
271jp.BackgroundColor3 = Color3.new(255/255,70/255,70/255)
272jp.Size = UDim2.new(0.425,0,0.1,0)
273jp.Position = UDim2.new(0.5,0,0.4,0)
274jp.TextScaled = true
275jp.Font = "SourceSansLight"
276jp.TextColor3 = Color3.new(1,1,1)
277jp.Text = "JumpPower: Normal"
278
279
280
281
282
283local lotp = Instance.new('TextButton',scrl)
284lotp.BorderSizePixel = 0
285lotp.BackgroundColor3 = Color3.new(255/255,70/255,70/255)
286lotp.Size = UDim2.new(0.425,0,0.1,0)
287lotp.Position = UDim2.new(0.05,0,0.525,0)
288lotp.TextScaled = true
289lotp.Font = "SourceSansLight"
290lotp.TextColor3 = Color3.new(1,1,1)
291lotp.Text = "Loop-Teleport: OFF"
292
293local sb = Instance.new('TextButton',scrl)
294sb.BorderSizePixel = 0
295sb.BackgroundColor3 = Color3.new(255/255,70/255,70/255)
296sb.Size = UDim2.new(0.425,0,0.1,0)
297sb.Position = UDim2.new(0.5,0,0.525,0)
298sb.TextScaled = true
299sb.Font = "SourceSansLight"
300sb.TextColor3 = Color3.new(1,1,1)
301sb.Text = "Noclip"
302
303
304local cr = Instance.new('TextLabel',scrl)
305cr.BorderSizePixel = 0
306cr.BackgroundColor3 = Color3.new(255/255,70/255,70/255)
307cr.Size = UDim2.new(0.875,0,0.225,0)
308cr.Position = UDim2.new(0.05,0,0.65,0)
309cr.TextScaled = true
310cr.Font = "SourceSansLight"
311cr.TextColor3 = Color3.new(1,1,1)
312cr.Text = "Gui Created by Newbie15. Credit Goes to RGeeneus/Ignoramical for the Fly Script and Natural Modder for leaking the block spam script. but most importantly credits go to the users of this Gui."
313
314
315local fl = Instance.new('TextLabel',scrl)
316fl.BorderSizePixel = 0
317fl.BackgroundColor3 = Color3.new(255/255,70/255,70/255)
318fl.Size = UDim2.new(0.875,0,0.075,0)
319fl.Position = UDim2.new(0.05,0,0.9,0)
320fl.TextScaled = true
321fl.Font = "SourceSansLight"
322fl.TextColor3 = Color3.new(1,1,1)
323if game.Workspace.FilteringEnabled == true then
324fl.Text = "Filtering is Enabled"
325else
326fl.Text = "Filtering is Disabled"
327end
328
329
330
331
332local gui2 = Instance.new('ScreenGui',game.Players.LocalPlayer.PlayerGui)
333gui2.ResetOnSpawn = false
334
335
336local oc = Instance.new('TextButton',gui2)
337oc.BorderSizePixel = 0
338oc.BackgroundColor3 = Color3.new(255/255,70/255,70/255)
339oc.Size = UDim2.new(0,50,0,50)
340oc.Position = UDim2.new(0,0,0,0)
341oc.TextScaled = true
342oc.Font = "SourceSansLight"
343oc.TextColor3 = Color3.new(1,1,1)
344oc.Text = "Close"
345oc.Draggable = true
346
347
348
349
350
351
352
353
354
355
356
357
358
359-- FLY SCRIPT BY RGEENEUS
360
361-- The following code should be in a local script.
362-- Only works on PC, not xbox or mobile. I do not have devices to test on.
363-- Call the start fly function AFTER the character exists to fly. The function does not run if there is no character.
364
365local speed = 50 -- This is the fly speed. Change it to whatever you like. The variable can be changed while running
366
367local c
368local h
369local bv
370local bav
371local cam
372local flying
373local p = game.Players.LocalPlayer
374local buttons = {W = false, S = false, A = false, D = false, Moving = false}
375
376local startFly = function () -- Call this function to begin flying
377 if not p.Character or not p.Character.Head or flying then return end
378 c = p.Character
379 h = c.Humanoid
380 h.PlatformStand = true
381 cam = workspace:WaitForChild('Camera')
382 bv = Instance.new("BodyVelocity")
383 bav = Instance.new("BodyAngularVelocity")
384 bv.Velocity, bv.MaxForce, bv.P = Vector3.new(0, 0, 0), Vector3.new(10000, 10000, 10000), 1000
385 bav.AngularVelocity, bav.MaxTorque, bav.P = Vector3.new(0, 0, 0), Vector3.new(10000, 10000, 10000), 1000
386 bv.Parent = c.Head
387 bav.Parent = c.Head
388 flying = true
389 h.Died:connect(function() flying = false end)
390end
391
392local endFly = function () -- Call this function to stop flying
393 if not p.Character or not flying then return end
394 h.PlatformStand = false
395 bv:Destroy()
396 bav:Destroy()
397 flying = false
398end
399
400game:GetService("UserInputService").InputBegan:connect(function (input, GPE)
401 if GPE then return end
402 for i, e in pairs(buttons) do
403 if i ~= "Moving" and input.KeyCode == Enum.KeyCode[i] then
404 buttons[i] = true
405 buttons.Moving = true
406 end
407 end
408end)
409
410game:GetService("UserInputService").InputEnded:connect(function (input, GPE)
411 if GPE then return end
412 local a = false
413 for i, e in pairs(buttons) do
414 if i ~= "Moving" then
415 if input.KeyCode == Enum.KeyCode[i] then
416 buttons[i] = false
417 end
418 if buttons[i] then a = true end
419 end
420 end
421 buttons.Moving = a
422end)
423
424local setVec = function (vec)
425 return vec * (speed / vec.Magnitude)
426end
427
428game:GetService("RunService").Heartbeat:connect(function (step) -- The actual fly function, called every frame
429 if flying and c and c.PrimaryPart then
430 local p = c.PrimaryPart.Position
431 local cf = cam.CFrame
432 local ax, ay, az = cf:toEulerAnglesXYZ()
433 c:SetPrimaryPartCFrame(CFrame.new(p.x, p.y, p.z) * CFrame.Angles(ax, ay, az))
434 if buttons.Moving then
435 local t = Vector3.new()
436 if buttons.W then t = t + (setVec(cf.lookVector)) end
437 if buttons.S then t = t - (setVec(cf.lookVector)) end
438 if buttons.A then t = t - (setVec(cf.rightVector)) end
439 if buttons.D then t = t + (setVec(cf.rightVector)) end
440 c:TranslateBy(t * step)
441 end
442 end
443end)
444
445
446
447
448
449
450
451
452
453
454
455
456
457
458function spintogl()
459 if spintoggle == true then
460 spintoggle = false
461 spin.Text = "Crazy Spin: OFF"
462 else
463 spintoggle = true
464 spin.Text = "Crazy Spin: ON"
465 local bodyang = Instance.new('BodyAngularVelocity',game.Players.LocalPlayer.Character.PrimaryPart)
466 bodyang.AngularVelocity = Vector3.new(90,999,0)
467 bodyang.MaxTorque = Vector3.new(60000,100,3000)
468 bodyang.P = 5000000
469 repeat
470 wait(0.001)
471 until spintoggle == false
472 bodyang:Destroy()
473 end
474end
475spin.MouseButton1Click:connect(spintogl)
476
477
478function flytogl()
479 if flytoggle == true then
480 flytoggle = false
481 fly.Text = "Fly: OFF"
482 else
483 flytoggle = true
484 fly.Text = "Fly: ON"
485 startFly()
486 repeat
487 wait(0.001)
488 until flytoggle == false
489 endFly()
490 end
491end
492fly.MouseButton1Click:connect(flytogl)
493
494
495
496function opctogl()
497 if scg.Enabled == true then
498 scg.Enabled = false
499 oc.Text = "Open"
500 else
501 scg.Enabled = true
502 oc.Text = "Close"
503 end
504end
505oc.MouseButton1Click:connect(opctogl)
506function telep()
507 game.Players.LocalPlayer.Character:MoveTo(game.Players:FindFirstChild(plr.Text).Character.PrimaryPart.Position)
508end
509tpto.MouseButton1Click:connect(telep)
510
511
512function camtogl()
513 if cameratoggle == false then
514 cameratoggle = true
515 game.Workspace.CurrentCamera.CameraType = "Follow"
516 seethr.Text = "See-Through: ON"
517 else
518 cameratoggle = false
519 game.Workspace.CurrentCamera.CameraType = "Custom"
520 seethr.Text = "See-Through: OFF"
521 end
522end
523seethr.MouseButton1Click:connect(camtogl)
524
525
526
527
528
529
530function wsp()
531 if wsmode ~= 5 then
532 wsmode = wsmode + 1
533 else
534 wsmode = 1
535 end
536 if wsmode == 1 then
537 ws.Text = "WalkSpeed: Normal"
538 game.Players.LocalPlayer.Character.Humanoid.WalkSpeed = 16
539 end
540 if wsmode == 2 then
541 ws.Text = "WalkSpeed: Fast"
542 game.Players.LocalPlayer.Character.Humanoid.WalkSpeed = 32
543 end
544 if wsmode == 3 then
545 ws.Text = "WalkSpeed: FASTER"
546 game.Players.LocalPlayer.Character.Humanoid.WalkSpeed = 70
547 end
548 if wsmode == 4 then
549 ws.Text = "WalkSpeed: EXTREME"
550 game.Players.LocalPlayer.Character.Humanoid.WalkSpeed = 150
551 end
552 if wsmode == 5 then
553 ws.Text = "WalkSpeed: The Speed of Light"
554 game.Players.LocalPlayer.Character.Humanoid.WalkSpeed = 4357234785243
555 end
556end
557ws.MouseButton1Click:connect(wsp)
558
559
560
561
562
563function jpp()
564 if jpmode ~= 5 then
565 jpmode = jpmode + 1
566 else
567 jpmode = 1
568 end
569 if jpmode == 1 then
570 jp.Text = "JumpPower: Normal"
571 game.Players.LocalPlayer.Character.Humanoid.JumpPower = 50
572 end
573 if jpmode == 2 then
574 jp.Text = "JumpPower: Trampoline"
575 game.Players.LocalPlayer.Character.Humanoid.JumpPower = 100
576 end
577 if jpmode == 3 then
578 jp.Text = "JumpPower: Big Trampoline"
579 game.Players.LocalPlayer.Character.Humanoid.JumpPower = 200
580 end
581 if jpmode == 4 then
582 jp.Text = "JumpPower: Bigger Trampoline"
583 game.Players.LocalPlayer.Character.Humanoid.JumpPower = 400
584 end
585 if jpmode == 5 then
586 jp.Text = "JumpPower: The Speed of Light"
587 game.Players.LocalPlayer.Character.Humanoid.JumpPower = 80000
588 end
589end
590jp.MouseButton1Click:connect(jpp)
591
592function spawnblock()
593 if gothrough == false then
594 gothrough = true
595 sb.Text = "Noclip"
596 local gc = game.Players.LocalPlayer.Character:GetChildren()
597 for i = 1,#gc,1 do
598 if (gc[i].ClassName == "Part") or (gc[i].ClassName == "MeshPart") then
599 gc[i].CollisionGroupId = 29
600 end
601 end
602 game:service("RunService").Stepped:wait()
603 else
604 gothrough = false
605 sb.Text = "Noclip"
606 local gc = game.Players.LocalPlayer.Character:GetChildren()
607 for i = 1,#gc,1 do
608 if (gc[i].ClassName == "Part") or (gc[i].ClassName == "MeshPart") then
609 gc[i].CollisionGroupId = 1
610 game:service("RunService").Stepped:wait()
611 end
612 end
613 end
614end
615sb.MouseButton1Click:connect(spawnblock)
616function looptelep()
617 if lotptog == false then
618 lotptog = true
619 lotp.Text = "Loop-Teleport: ON"
620 repeat
621 game.Players.LocalPlayer.Character:MoveTo(game.Players:FindFirstChild(plr.Text).Character.PrimaryPart.Position)
622 wait(0.001)
623 until lotptog == false
624 else
625 lotptog = false
626 lotp.Text = "Loop-Teleport: OFF"
627 end
628end
629lotp.MouseButton1Click:connect(looptelep)
630
631
632function minimi()
633 scg.Enabled = false
634 oc.Text = "Open"
635end
636minim.MouseButton1Click:connect(minimi)