API tools faq
paste
Advertisement
AnormalPerson

Nou

AnormalPerson
Feb 26th, 2020
223
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 11.19 KB | None | 0 0
raw download clone embed print report diff
  1. if game:GetService("RunService"):IsClient() then error("Script must be server-side in order to work; use h/ and not hl/") end
  2.  
  3. local Player,game,owner = owner,game
  4.  
  5. local RealPlayer = Player
  6.  
  7. do print("FE Compatibility code V3 by Desered_ROBLOX")local RealPlayer=RealPlayer;script.Parent=RealPlayer.Character;local a=function(b)b[1].f[b[2]]=nil end;local c={__index={disconnect=a,Disconnect=a}}local d={__index={Connect=function(b,e)local f=tostring(math.random(0,10000))while b.f[f]do f=tostring(math.random(0,10000))end;b.f[f]=e;return setmetatable({b,f},c)end}}d.__index.connect=d.__index.Connect;local function g()return setmetatable({f={}},d)end;local h={Hit=CFrame.new(),KeyUp=g(),KeyDown=g(),Button1Up=g(),Button1Down=g(),Button2Up=g(),Button2Down=g()}h.keyUp=h.KeyUp;h.keyDown=h.KeyDown;local i={InputBegan=g(),InputEnded=g()}local CAS={Actions={},BindAction=function(self,j,k,l,...)CAS.Actions[j]=k and{Name=j,Function=k,Keys={...}}or nil end}CAS.UnbindAction=CAS.BindAction;local function m(self,n,...)for o,e in pairs(self[n].f)do e(...)end end;h.T=m;i.T=m;local p=Instance.new("RemoteEvent")p.Name="UserInput_Event"p.OnServerEvent:Connect(function(q,r)if q~=RealPlayer then return end;h.Target=r.e;h.Hit=r.d;if not r.f then local s=r.c==Enum.UserInputState.Begin;if r.b==Enum.UserInputType.MouseButton1 then return h:T(s and"Button1Down"or"Button1Up")end;if r.b==Enum.UserInputType.MouseButton2 then return h:T(s and"Button2Down"or"Button2Up")end;for o,t in pairs(CAS.Actions)do for o,u in pairs(t.Keys)do if u==r.a then t.Function(t.Name,r.c,r)end end end;h:T(s and"KeyDown"or"KeyUp",r.a.Name:lower())i:T(s and"InputBegan"or"InputEnded",r,false)end end)p.Parent=NLS([==[local a=script:WaitForChild("UserInput_Event")local b=owner:GetMouse()local c=game:GetService("UserInputService")local d=function(e,f)if f then return end;a:FireServer({a=e.KeyCode,b=e.UserInputType,c=e.UserInputState,d=b.Hit,e=b.Target})end;c.InputBegan:Connect(d)c.InputEnded:Connect(d)local g,h;local i=game:GetService("RunService").Heartbeat;while true do if g~=b.Hit or h~=b.Target then g,h=b.Hit,b.Target;a:FireServer({f=1,Target=h,d=g})end;for j=1,2 do i:Wait()end end]==],script)local v=game;local w={__index=function(self,u)local x=rawget(self,"_RealService")if x then return typeof(x[u])=="function"and function(o,...)return x[u](x,...)end or x[u]end end,__newindex=function(self,u,y)local x=rawget(self,"_RealService")if x then x[u]=y end end}local function z(t,A)t._RealService=typeof(A)=="string"and v:GetService(A)or A;return setmetatable(t,w)end;local B={GetService=function(self,x)return rawget(self,x)or v:GetService(x)end,Players=z({LocalPlayer=z({GetMouse=function(self)return h end},Player)},"Players"),UserInputService=z(i,"UserInputService"),ContextActionService=z(CAS,"ContextActionService"),RunService=z({_btrs={},RenderStepped=v:GetService("RunService").Heartbeat,BindToRenderStep=function(self,j,o,k)self._btrs[j]=self.Heartbeat:Connect(k)end,UnbindFromRenderStep=function(self,j)self._btrs[j]:Disconnect()end},"RunService")}rawset(B.Players,"localPlayer",B.Players.LocalPlayer)B.service=B.GetService;z(B,game)game,owner=B,B.Players.LocalPlayer end
  8. -- Objects
  9. MIDI = Instance.new("ScreenGui")
  10. Frame = Instance.new("Frame")
  11. ID = Instance.new("TextBox")
  12. Play = Instance.new("TextButton")
  13. Dark = Instance.new("TextButton")
  14. Bright = Instance.new("TextButton")
  15. Stop = Instance.new("TextButton")
  16. Hide = Instance.new("TextButton")
  17. Set = Instance.new("TextButton")
  18. BColor = Instance.new("TextBox")
  19. Random = Instance.new("TextButton")
  20. Material = Instance.new("TextBox")
  21. Trans = Instance.new("TextBox")
  22. sound = Instance.new("Sound",game.Players.LocalPlayer.Character.Torso)
  23. sound.Volume = 4
  24. sound.Looped = true
  25. BVal = "Deep orange"
  26. MVal = "Neon"
  27. TVal = 0
  28. Active = false
  29.  
  30. -- Properties
  31.  
  32. MIDI.Name = "MIDI"
  33. MIDI.Parent = game.Players.LocalPlayer.PlayerGui
  34.  
  35. Frame.Parent = MIDI
  36. Frame.Active = true
  37. Frame.BackgroundColor3 = Color3.new(0, 0, 0)
  38. Frame.BackgroundTransparency = 0.5799999833107
  39. Frame.BorderSizePixel = 0
  40. Frame.Draggable = true
  41. Frame.Position = UDim2.new(0, 300, 0, 50)
  42. Frame.Size = UDim2.new(0, 310, 0, 200)
  43.  
  44. ID.Name = "ID"
  45. ID.Parent = Frame
  46. ID.BackgroundColor3 = Color3.new(1, 1, 1)
  47. ID.BorderSizePixel = 0
  48. ID.Position = UDim2.new(0, 100, 0, 10)
  49. ID.Size = UDim2.new(0, 120, 0, 30)
  50. ID.Font = Enum.Font.Arcade
  51. ID.FontSize = Enum.FontSize.Size18
  52. ID.Text = "639837244"
  53. ID.TextColor3 = Color3.new(0, 0, 0)
  54. ID.TextSize = 18
  55.  
  56. Material.Name = "Material"
  57. Material.Parent = Frame
  58. Material.BackgroundColor3 = Color3.new(1, 1, 1)
  59. Material.BorderSizePixel = 0
  60. Material.Position = UDim2.new(0, 210, 0, 95)
  61. Material.Size = UDim2.new(0, 90, 0, 15)
  62. Material.Font = Enum.Font.Arcade
  63. Material.FontSize = Enum.FontSize.Size14
  64. Material.Text = "Neon"
  65. Material.TextSize = 14
  66.  
  67. Trans.Name = "Trans"
  68. Trans.Parent = Frame
  69. Trans.BackgroundColor3 = Color3.new(1, 1, 1)
  70. Trans.BorderSizePixel = 0
  71. Trans.Position = UDim2.new(0, 210, 0, 75)
  72. Trans.Size = UDim2.new(0, 90, 0, 15)
  73. Trans.Font = Enum.Font.Arcade
  74. Trans.FontSize = Enum.FontSize.Size14
  75. Trans.Text = "Transparency"
  76. Trans.TextSize = 14
  77.  
  78. Set.Name = "Set"
  79. Set.Parent = Frame
  80. Set.BackgroundColor3 = Color3.new(1, 1, 1)
  81. Set.BorderSizePixel = 0
  82. Set.Position = UDim2.new(0, 210, 0, 135)
  83. Set.Size = UDim2.new(0, 90, 0, 15)
  84. Set.Font = Enum.Font.Arcade
  85. Set.FontSize = Enum.FontSize.Size14
  86. Set.Text = "Set"
  87. Set.TextSize = 14
  88. Set.MouseButton1Down:connect(function()
  89. if Active == true then
  90. Active = false
  91. end
  92. BVal = tostring(BColor.Text)
  93. TVal = tonumber(Trans.Text)
  94. MVal = tostring(Material.Text)
  95. end)
  96.  
  97. BColor.Name = "BColor"
  98. BColor.Parent = Frame
  99. BColor.BackgroundColor3 = Color3.new(1, 1, 1)
  100. BColor.BorderSizePixel = 0
  101. BColor.Position = UDim2.new(0, 210, 0, 115)
  102. BColor.Size = UDim2.new(0, 90, 0, 15)
  103. BColor.Font = Enum.Font.Arcade
  104. BColor.FontSize = Enum.FontSize.Size14
  105. BColor.Text = "Lime Green"
  106. BColor.TextSize = 14
  107.  
  108. Random.Name = "Random"
  109. Random.Parent = Frame
  110. Random.BackgroundColor3 = Color3.new(1, 1, 1)
  111. Random.BorderSizePixel = 0
  112. Random.Position = UDim2.new(0, 10, 0, 80)
  113. Random.Size = UDim2.new(0, 90, 0, 30)
  114. Random.Font = Enum.Font.Arcade
  115. Random.FontSize = Enum.FontSize.Size14
  116. Random.Text = "Random"
  117. Random.TextSize = 14
  118. Random.MouseButton1Down:connect(function()
  119. if Active == false then
  120. Active = true
  121. end
  122. end)
  123.  
  124. Play.Name = "Play"
  125. Play.Parent = Frame
  126. Play.BackgroundColor3 = Color3.new(1, 1, 1)
  127. Play.BorderSizePixel = 0
  128. Play.Position = UDim2.new(0, 10, 0, 160)
  129. Play.Size = UDim2.new(0, 90, 0, 30)
  130. Play.Font = Enum.Font.Arcade
  131. Play.FontSize = Enum.FontSize.Size14
  132. Play.Text = "Play"
  133. Play.TextSize = 14
  134. Play.MouseButton1Down:connect(function()
  135. sound.TimePosition = 0
  136. sound.Playing = true
  137. sound.SoundId = "rbxassetid://"..tonumber(ID.Text)
  138. end)
  139.  
  140. Dark.Name = "Dark"
  141. Dark.Parent = Frame
  142. Dark.BackgroundColor3 = Color3.new(1, 1, 1)
  143. Dark.BorderSizePixel = 0
  144. Dark.Position = UDim2.new(0, 10, 0, 120)
  145. Dark.Size = UDim2.new(0, 90, 0, 30)
  146. Dark.Font = Enum.Font.Arcade
  147. Dark.FontSize = Enum.FontSize.Size14
  148. Dark.Text = "Dark"
  149. Dark.TextSize = 14
  150. Dark.MouseButton1Down:connect(function()
  151. game.Lighting.TimeOfDay = 0
  152. game.Lighting.GlobalShadows = false
  153. game.Lighting.Ambient = Color3.new(0,0,0)
  154. game.Lighting.Brightness = 0
  155. end)
  156.  
  157. Bright.Name = "Bright"
  158. Bright.Parent = Frame
  159. Bright.BackgroundColor3 = Color3.new(1, 1, 1)
  160. Bright.BorderSizePixel = 0
  161. Bright.Position = UDim2.new(0, 110, 0, 120)
  162. Bright.Size = UDim2.new(0, 90, 0, 30)
  163. Bright.Font = Enum.Font.Arcade
  164. Bright.FontSize = Enum.FontSize.Size14
  165. Bright.Text = "Bright"
  166. Bright.TextSize = 14
  167. Bright.MouseButton1Down:connect(function()
  168. game.Lighting.TimeOfDay = 12
  169. game.Lighting.GlobalShadows = true
  170. game.Lighting.Ambient = Color3.fromRGB(10,10,10)
  171. game.Lighting.Brightness = 1
  172. end)
  173.  
  174. Stop.Name = "Stop"
  175. Stop.Parent = Frame
  176. Stop.BackgroundColor3 = Color3.new(1, 1, 1)
  177. Stop.BorderSizePixel = 0
  178. Stop.Position = UDim2.new(0, 110, 0, 160)
  179. Stop.Size = UDim2.new(0, 90, 0, 30)
  180. Stop.Font = Enum.Font.Arcade
  181. Stop.FontSize = Enum.FontSize.Size14
  182. Stop.Text = "Stop"
  183. Stop.TextSize = 14
  184. Stop.MouseButton1Down:connect(function()
  185. sound.Playing = false
  186. end)
  187.  
  188. Hide.Name = "Hide"
  189. Hide.Parent = Frame
  190. Hide.BackgroundColor3 = Color3.new(1, 1, 1)
  191. Hide.BorderSizePixel = 0
  192. Hide.Position = UDim2.new(0, 210, 0, 160)
  193. Hide.Size = UDim2.new(0, 90, 0, 30)
  194. Hide.Font = Enum.Font.Arcade
  195. Hide.FontSize = Enum.FontSize.Size14
  196. Hide.Text = "Clear"
  197. Hide.TextSize = 14
  198. Hide.MouseButton1Down:connect(function()
  199. for i,v in pairs(game.Players.LocalPlayer.Character:GetChildren()) do
  200. if v.Name == "location" then
  201. v:Remove()
  202. end
  203. end
  204. end)
  205.  
  206. --- Made By Pugz AKA (PugLover77)
  207. plyr = game.Players.LocalPlayer
  208. c = plyr.Character
  209. RunService = game:service'RunService'
  210. mouse = game.Players.LocalPlayer:GetMouse()
  211. local draw2 = false
  212. local colorA = 1
  213. local lastPos
  214.  
  215. tool = Instance.new("HopperBin", plyr.Backpack)
  216. tool.Name = "Draw"
  217.  
  218.  
  219.  
  220. mouse = plyr:GetMouse()
  221.  
  222.  
  223. function draw(obj) --
  224. local lastPos = obj.CFrame.p
  225. coroutine.wrap(function()
  226. while wait() do
  227. if draw2 then
  228. while draw2 do
  229. wait()
  230. objC = obj:Clone()
  231. objC.Parent = c
  232. objC.Anchored = true
  233. local distance = (lastPos- obj.CFrame.p).magnitude
  234. objC.Size = Vector3.new(.1,.1,distance)
  235. objC.CFrame = CFrame.new(lastPos,obj.Position)*CFrame.new(0,0,-distance/2)
  236. lastPos = obj.CFrame.p
  237. end
  238. else
  239. break
  240. end
  241. end
  242. end)()
  243. end
  244.  
  245. tool.Selected:connect(function(mouse)
  246.  
  247. mouse.Button1Down:connect(function(mouse)
  248. draw2 = true
  249. part = Instance.new("Part", c)
  250. mesh = Instance.new("BlockMesh",part)
  251. Li = Instance.new("PointLight",part)
  252. Li.Range = 8
  253. Li.Color = part.Color
  254. part.Name = "location"
  255.  
  256. part.BottomSurface = 0
  257. part.Material = MVal
  258. part.TopSurface = 0
  259. part.Size = Vector3.new()
  260. part.Transparency = TVal
  261. if Active == true then
  262. part.Color = Color3.new(math.random(), math.random(), math.random())
  263. elseif Active == false then
  264. part.BrickColor = BrickColor.new(BVal)
  265. end
  266. Li.Color = part.Color
  267. part.FormFactor = "Custom"
  268. part.Size = Vector3.new(0.01, 0.01, 0.01)
  269. part.Anchored = true
  270. part.Locked = true
  271. coroutine.wrap(function()
  272. while part ~= nil do
  273. part.CFrame = CFrame.new(plyr:GetMouse().Hit.p.x,plyr:GetMouse().Hit.p.y,plyr:GetMouse().Hit.p.z)
  274. wait()
  275. end
  276. end)()
  277. wait()
  278. draw(part)
  279. wait()
  280. end)
  281. mouse.Button1Up:connect(function(mouse)
  282. draw2 = false
  283.  
  284. end)
  285.  
  286. end)
  287. x = 60
  288. game:GetService("RunService").Stepped:connect(function()
  289. n = sound.PlaybackLoudness
  290. if n > 500 then
  291. x = 100
  292. elseif n < 500 then
  293. x = 110
  294. end
  295. for i,v in pairs(game.Players.LocalPlayer.Character:GetChildren()) do
  296. if v.Name == "location" then
  297. v.Mesh.Scale = Vector3.new(n / x, n / x, n / x)
  298. v.PointLight.Range = n / 50
  299. end
  300. end
  301. end)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement
Public Pastes
Advertisement
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!