API tools faq
paste
Advertisement
HenloMyDude

visualizer arm test

HenloMyDude
Sep 8th, 2019
236
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 21.38 KB | None | 0 0
raw download clone embed print report
  1.  
  2. if game:GetService("RunService"):IsClient()then error("Please run as a server script. Use h/ instead of hl/.")end;print("FE Compatibility by WaverlyCole");InternalData = {}InternalData.RealOwner = owner;InternalData.RealObjs = {};InternalData.SoundLoudness = {};
  3. do
  4. script.Parent = InternalData.RealOwner.Character
  5. local Event = Instance.new("RemoteEvent");Event.Name = "UserInput";InternalData.Event = Event
  6. local function createObject (connections, index)
  7. local proxy = newproxy (true);local meta = getmetatable (proxy);
  8. local runbind = function (self, i, ...) connections[i]:Fire (...); end;
  9. while (#connections > 0) do connections[table.remove(connections, 1)] = Instance.new ('BindableEvent');end;
  10. meta.__index = function (self, i)
  11. if (i == 'TriggerEvent') then return runbind end;
  12. return connections[i] and connections[i].Event or index[i];
  13. end;
  14. meta.__newindex = index;meta.__metatable = false;return proxy
  15. end;
  16. local Mouse = createObject({"KeyUp","KeyDown","Button1Down","Button1Up"},{["Target"] = nil;["Hit"] = CFrame.new()})
  17. local UserInputService = createObject({"InputBegan","InputEnded"},{})
  18. local ContextActionService = {Actions={},BindAction = function(self,actionName,Func,touch,...)
  19. self.Actions[actionName] = Func and {Name=actionName,Function=Func,Keys={...}} or nil
  20. end};ContextActionService.UnBindAction = ContextActionService.BindAction
  21. Event.OnServerEvent:Connect(function(FiredBy,Input)
  22. if FiredBy ~= InternalData.RealOwner then return end
  23. if Input.MouseEvent then
  24. Mouse.Target = Input.Target;Mouse.Hit = Input.Hit
  25. elseif Input.Sound then
  26. if InternalData.SoundLoudness[Input.Sound] then InternalData.SoundLoudness[Input.Sound] = Input.Loudness end
  27. else
  28. local Begin = Input.UserInputState == Enum.UserInputState.Begin
  29. if Input.UserInputType == Enum.UserInputType.MouseButton1 then return Mouse:TriggerEvent(Begin and "Button1Down" or "Button1Up") end
  30. for _,Action in pairs(ContextActionService.Actions) do
  31. for _,Key in pairs(Action.Keys) do if Key==Input.KeyCode then Action.Function(Action.Name,Input.UserInputState,Input) end end
  32. end
  33. Mouse:TriggerEvent(Begin and "KeyDown" or "KeyUp",Input.KeyCode.Name:lower());UserInputService:TriggerEvent(Begin and "InputBegan" or "InputEnded",Input,false)
  34. end
  35. end)
  36. InternalData["Mouse"] = Mouse;InternalData["ContextActionService"] = ContextActionService;InternalData["UserInputService"] = UserInputService
  37. Event.Parent = NLS([[
  38. local Player = owner;
  39. local Sounds = {};
  40. local Event = script:WaitForChild("UserInput");
  41. local UserInputService = game:GetService("UserInputService");
  42. local Mouse = Player:GetMouse();
  43. local Input = function(Input,gameProcessedEvent)
  44. if gameProcessedEvent then return end
  45. Event:FireServer({KeyCode=Input.KeyCode,UserInputType=Input.UserInputType,UserInputState=Input.UserInputState})
  46. end
  47. Event.OnClientEvent:connect(function(Args)
  48. if Args[1] == "NewSound" then table.insert(Sounds,Args[2]) end
  49. end)
  50. UserInputService.InputBegan:Connect(Input);UserInputService.InputEnded:Connect(Input)
  51. local Hit,Target
  52. while wait(1/30) do
  53. for x,Sound in pairs(Sounds) do
  54. if Sound.Parent then Event:FireServer({["Sound"]=Sound,["Loudness"]=Sound.PlaybackLoudness}) end
  55. end
  56. if Hit ~= Mouse.Hit or Target ~= Mouse.Target then
  57. Hit = Mouse.Hit;Target = Mouse.Target;
  58. Event:FireServer({["MouseEvent"]=true,["Target"]=Target,["Hit"]=Hit})
  59. end
  60. end
  61. ]],InternalData.RealOwner.Character)
  62. end
  63. InternalData.NewOwner = setmetatable({},{
  64. __index = function (self,Index)
  65. local Type = type(InternalData.RealOwner[Index])
  66. if Type == "function" then
  67. if Index:lower() == "getmouse" or Index:lower() == "mouse" then
  68. return function (self)return InternalData["Mouse"] end
  69. end
  70. return function (self,...)return InternalData.RealOwner[Index](InternalData.RealOwner,...) end
  71. elseif Index == "FakePlayer" then
  72. return true
  73. end
  74. return InternalData.RealOwner[Index]
  75. end;
  76. __tostring = function(self) return tostring(InternalData.RealOwner) end
  77. })
  78. --LoadLibrary("RbxUtility").Create
  79. rans=string.reverse'!321enirboreheibmoz yb edam'
  80. InternalData.LoadLibrary = LoadLibrary;LoadLibrary = function(Library)
  81. if Library == "RbxUtility" then
  82. return setmetatable({},{
  83. __tostring = function() return "RbxUtility" end;
  84. __index = function(self, Index)
  85. if Index:lower() == "create" then
  86. return function(Type)
  87. return function(Data)
  88. Data = Data or {}
  89. local Inst = Instance.new(Type)
  90. for x,y in pairs(Data) do
  91. if InternalData.RealObjs[y] then y = InternalData.RealObjs[y] end
  92. if y == owner then y = InternalData.RealOwner end
  93. Inst[x] = y
  94. end
  95. return Inst
  96. end
  97. end
  98. end
  99. return InternalData.LoadLibrary(Library)[Index]
  100. end
  101. })
  102. end
  103. return InternalData.LoadLibrary(Library)
  104. end
  105. InternalData.RealInstance = Instance;Instance = setmetatable({},{
  106. __index = function (self,Index)
  107. if Index:lower() == 'new' then
  108. return function (Type, Parent)
  109. if Parent == owner then Parent = InternalData.RealOwner end
  110. if InternalData.RealObjs[Parent] then Parent = InternalData.RealObjs[Parent] end
  111. local Real = InternalData.RealInstance.new(Type,Parent)
  112. if not Type then return end
  113. if Type == "BillboardGui" then
  114. local ToReturn = setmetatable({},{
  115. __index = function (self,Index)
  116. if type(Real[Index]) == "function" then
  117. if Index:lower() == "clone" then
  118. return function (self)
  119. local Real = Real:Clone()
  120. local ToReturn = setmetatable({RealObject = Real},{
  121. __index = function (self,Index)
  122. if type(Real[Index]) == "function" then return function (self,...) return Real[Index](Real,...)end end
  123. return Real[Index]
  124. end;
  125. __newindex = function (self,Index,Value)
  126. if InternalData.RealObjs[Value] then Value = InternalData.RealObjs[Value] end
  127. if Value == owner then Value = InternalData.RealOwner end
  128. Real[Index] = Value
  129. end;
  130. __tostring = function(self) return tostring(Real) end;
  131. })
  132. InternalData.RealObjs[ToReturn] = Real;return ToReturn;
  133. end
  134. end
  135. return function (self,...) return Real[Index](Real,...)end
  136. end
  137. return Real[Index]
  138. end;
  139. __newindex = function (self,Index,Value)
  140. if InternalData.RealObjs[Value] then Value = InternalData.RealObjs[Value] end
  141. if Value == owner then Value = InternalData.RealOwner end
  142. Real[Index] = Value
  143. end;
  144. __tostring = function(self) return tostring(Real) end;
  145. })
  146. InternalData.RealObjs[ToReturn] = Real;return ToReturn;
  147. elseif Type:lower() == "sound" then
  148. Real.Parent = owner.Character;
  149. local ToReturn = setmetatable({RealObject = Real},{
  150. __index = function (self,Index)
  151. if Index:lower() == "playbackloudness" then
  152. return InternalData.SoundLoudness[Real] or 0
  153. elseif type(Real[Index]) == "function" then
  154. if Index:lower() == "clone" then
  155. return function (self)
  156. local Real = Real:Clone()
  157. local ToReturn = setmetatable({},{
  158. __index = function (self,Index)
  159. if type(Real[Index]) == "function" then return function (self,...) return Real[Index](Real,...)end end
  160. return Real[Index]
  161. end;
  162. __newindex = function (self,Index,Value)
  163. if InternalData.RealObjs[Value] then Value = InternalData.RealObjs[Value] end
  164. if Value == owner then Value = InternalData.RealOwner end
  165. Real[Index] = Value
  166. end;
  167. __tostring = function(self) return tostring(Real) end;
  168. })
  169. InternalData.RealObjs[ToReturn] = Real;return ToReturn;
  170. end
  171. end
  172. return function (self,...) return Real[Index](Real,...)end
  173. end
  174. return Real[Index]
  175. end;
  176. __newindex = function (self,Index,Value)
  177. if InternalData.RealObjs[Value] then Value = InternalData.RealObjs[Value] end
  178. if Value == owner then Value = InternalData.RealOwner end
  179. Real[Index] = Value
  180. end;
  181. __tostring = function(self) return tostring(Real) end;
  182. })
  183. InternalData.RealObjs[ToReturn] = Real;InternalData.SoundLoudness[Real] = 0;repeat wait() until InternalData.Event.Parent InternalData.Event:FireClient(InternalData.RealOwner,{"NewSound",Real}) return ToReturn;
  184. else
  185. local ToReturn = setmetatable({RealObject = Real},{
  186. __index = function (self,Index)
  187. if type(Real[Index]) == "function" then
  188. if Index:lower() == "clone" then
  189. return function (self)
  190. local Real = Real:Clone()
  191. local ToReturn = setmetatable({},{
  192. __index = function (self,Index)
  193. if type(Real[Index]) == "function" then return function (self,...) return Real[Index](Real,...)end end
  194. return Real[Index]
  195. end;
  196. __newindex = function (self,Index,Value)
  197. if InternalData.RealObjs[Value] then Value = InternalData.RealObjs[Value] end
  198. if Value == owner then Value = InternalData.RealOwner end
  199. Real[Index] = Value
  200. end;
  201. __tostring = function(self) return tostring(Real) end;
  202. })
  203. InternalData.RealObjs[ToReturn] = Real;return ToReturn;
  204. end
  205. end
  206. return function (self,...) return Real[Index](Real,...)end
  207. end
  208. return Real[Index]
  209. end;
  210. __newindex = function (self,Index,Value)
  211. if InternalData.RealObjs[Value] then Value = InternalData.RealObjs[Value] end
  212. if Value == owner then Value = InternalData.RealOwner end
  213. Real[Index] = Value
  214. end;
  215. __tostring = function(self) return tostring(Real) end;
  216. })
  217. InternalData.RealObjs[ToReturn] = Real;return ToReturn;
  218. end
  219. end
  220. end
  221. return InternalData.RealInstance[Index]
  222. end;
  223. __tostring = function(self) return tostring(InternalData.RealInstance) end;
  224. });
  225. InternalData.RealGame = game;game = setmetatable({},{
  226. __index = function (self,Index)
  227. if InternalData.RealGame[Index] then
  228. local Type = type(InternalData.RealGame[Index])
  229. if Type == "function" then
  230. if Index:lower() == "getservice" or Index:lower() == "service" then
  231. return function (self,Service)
  232. local FakeServices = {
  233. ["players"] = function()
  234. return setmetatable({},{
  235. __index = function (self2,Index2)
  236. local RealService = InternalData.RealGame:GetService(Service)
  237. local Type2 = type(RealService[Index2])
  238. if Type2 == "function" then
  239. return function (self,...) return RealService[Index2](RealService,...)end
  240. else
  241. if Index2:lower() == "localplayer" then return InternalData.NewOwner end
  242. return RealService[Index2]
  243. end
  244. end;
  245. __tostring = function(self) return tostring(InternalData.RealGame:GetService(Service)) end
  246. })
  247. end;
  248. ["contextactionservice"] = function() return InternalData["ContextActionService"] end;
  249. ["userinputservice"] = function() return InternalData["UserInputService"] end;
  250. ["debris"] = function()
  251. return setmetatable({},{
  252. __index = function(self2,Index2)
  253. local RealService = InternalData.RealGame:GetService(Service)
  254. local Type2 = type(RealService[Index2])
  255. if Type2 == "function" then
  256. if Index2:lower() == "additem" then
  257. return function (self,Item,Time)
  258. if InternalData.RealObjs[Item] then Item = InternalData.RealObjs[Item] end
  259. return RealService:AddItem(Item,Time)
  260. end
  261. end
  262. return function (self,...) return RealService[Index2](RealService,...) end
  263. end
  264. return RealService[Index2]
  265. end;
  266. __tostring = function(self) return tostring(InternalData.RealGame:GetService("Debris")) end
  267. })
  268. end;
  269. ["runservice"] = function()
  270. return setmetatable({},{
  271. __index = function(self2,Index2)
  272. local RealService = InternalData.RealGame:GetService(Service)
  273. local Type2 = type(RealService[Index2])
  274. if Type2 == "function" then
  275. return function (self,...) return RealService[Index2](RealService,...) end
  276. else
  277. local RunServices = {
  278. ["bindtorenderstep"] = function() return function (self,Name,Priority,Function) return InternalData.RealGame:GetService("RunService").Stepped:Connect(Function) end end;
  279. ["renderstepped"] = function() return RealService["Stepped"] end
  280. }
  281. if RunServices[Index2:lower()] then return RunServices[Index2:lower()]() end
  282. return RealService[Index2]
  283. end
  284. end;
  285. __tostring = function(self) return tostring(InternalData.RealGame:GetService("RunService")) end
  286. })
  287. end
  288. }
  289. if FakeServices[Service:lower()] then return FakeServices[Service:lower()]() end
  290. return InternalData.RealGame:GetService(Service)
  291. end
  292. end
  293. return function (self,...) return InternalData.RealGame[Index](InternalData.RealGame,...) end
  294. else
  295. if game:GetService(Index) then return game:GetService(Index) end
  296. return InternalData.RealGame[Index]
  297. end
  298. end
  299. return nil
  300. end;
  301. __tostring = function(self) return tostring(InternalData.game) end
  302. });Game = game;owner = game:GetService("Players").LocalPlayer;script = Instance.new("Script");print("Complete!")
  303.  
  304. local LocalPlayer = game:GetService("Players").LocalPlayer
  305. local plr = owner
  306. local char = plr.Character
  307. local attacking = false
  308. local attackd = false
  309. local hum = char.Humanoid
  310. local RS = char.Torso["Right Shoulder"]
  311. local LS = char.Torso["Left Shoulder"]
  312. local RH = char.Torso["Right Hip"]
  313. local LH = char.Torso["Left Hip"]
  314. local neck = char.Torso["Neck"]
  315. local anim = char.Animate
  316. local rootj = char.HumanoidRootPart.RootJoint
  317. local timepos = 0
  318. local sine = 0
  319. local RSnor = RS.C0
  320. local LSnor = LS.C0
  321. local RHnor = RH.C0
  322. local LHnor = LH.C0
  323. local rootjnor = rootj.C0
  324. local necknor = neck.C0
  325.  
  326. --clerp stuff--
  327.  
  328. Swait,swait = function(number)
  329. if number == 0 or number == nil then
  330. game:GetService("RunService").Heartbeat:Wait()
  331. else
  332. for i = 1,number do
  333. game:GetService("RunService").Heartbeat:Wait()
  334. end
  335. end
  336. end
  337.  
  338. clerp = function(toclerp, cf, number)
  339. local joint = toclerp
  340. joint.C0 = joint.C0:Lerp(cf, number)
  341. end
  342. clerp2 = function(toclerp, cf)
  343. local joint = toclerp
  344. joint.C0 = cf
  345. end
  346.  
  347.  
  348.  
  349.  
  350. Create,New = function(Type, ...)
  351. local Object = Instance.new(Type)
  352. for i,v in next,(...) do
  353. Object[i] = v
  354. end
  355. return Object
  356. end
  357.  
  358. -----effects---------
  359.  
  360. --[[
  361. local Weapon = Instance.new("Model")
  362. Weapon.Name = "Adds"
  363. Weapon.Parent = char
  364. local Effects = Instance.new("Folder", Weapon)
  365. Effects.Name = "Effects"
  366. --]]
  367. Effects = char
  368.  
  369. IT = Instance.new
  370. CF = CFrame.new
  371. cf = CFrame.new
  372. VT = Vector3.new
  373. RAD = math.rad
  374. C3 = Color3.new
  375. UD2 = UDim2.new
  376. BRICKC = BrickColor.new
  377. ANGLES = CFrame.Angles
  378. angles = CFrame.Angles
  379. EULER = CFrame.fromEulerAnglesXYZ
  380. COS = math.cos
  381. ACOS = math.acos
  382. SIN = math.sin
  383. ASIN = math.asin
  384. ABS = math.abs
  385. MRANDOM = math.random
  386. FLOOR = math.floor
  387. MSH = nil
  388.  
  389. local remote = Instance.new("RemoteFunction", char)
  390. remote.Name = "MouthRemote"
  391. remote.OnServerInvoke = recieveInfo
  392. TS = char.HumanoidRootPart.RootJoint
  393. NK = char.Torso.Neck
  394. function recieveInfo(player, info, n, t, ls, rs, lh, rh)
  395. playback = info
  396. NK.C0 = n
  397. TS.C0 = t
  398. LS.C0 = ls
  399. RS.C0 = rs
  400. LH.C0 = lh
  401. RH.C0 = rh
  402. return info
  403. end
  404.  
  405. moosik = Instance.new("Sound",char.Head)
  406. moosik.Looped = true
  407. moosik.SoundId = "rbxassetid://1846457890"
  408. moosik.Volume = 3
  409. moosik:Play()
  410. local playback = moosik.PlaybackLoudness
  411. nkc0 = NK.C0
  412. t = tick()
  413.  
  414. local RunS = game:GetService("RunService")
  415. RunS.Stepped:connect(function()
  416. t = t + 0.5
  417. local a = playback - 350
  418. a = a * 3
  419. if a < 0 then
  420. a = 0
  421. elseif a > 45 then
  422. a = 45
  423. end
  424. NK.C0 = NK.C0:lerp(nkc0 * CFrame.Angles(math.rad(a)/3, 0, 0), 0.1)
  425. 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!