Advertisement
iiJosephCats205

Untitled

Nov 18th, 2018
237
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. if game:GetService("RunService"):IsClient() then error("Script must be server-side in order to work; use h/ and not hl/") end
  2. local Player,game,owner = owner,game
  3. local RealPlayer = Player
  4. do
  5. print"Yeet <"
  6. local rp = RealPlayer
  7. script.Parent = rp.Character
  8.  
  9. --RemoteEvent for communicating
  10. local Event = Instance.new("RemoteEvent")
  11. Event.Name = "UserInput_Event"
  12.  
  13. --Fake event to make stuff like Mouse.KeyDown work
  14. local function fakeEvent()
  15. local t = {_fakeEvent=true,Functions={},Connect=function(self,f)table.insert(self.Functions,f) end}
  16. t.connect = t.Connect
  17. return t
  18. end
  19.  
  20. --Creating fake input objects with fake variables
  21. local m = {Target=nil,Hit=CFrame.new(),KeyUp=fakeEvent(),KeyDown=fakeEvent(),Button1Up=fakeEvent(),Button1Down=fakeEvent()}
  22. local UIS = {InputBegan=fakeEvent(),InputEnded=fakeEvent()}
  23. local CAS = {Actions={},BindAction=function(self,name,fun,touch,...)
  24. CAS.Actions[name] = fun and {Name=name,Function=fun,Keys={...}} or nil
  25. end}
  26. --Merged 2 functions into one by checking amount of arguments
  27. CAS.UnbindAction = CAS.BindAction
  28.  
  29. --This function will trigger the events that have been :Connect()'ed
  30. local function te(self,ev,...)
  31. local t = m[ev]
  32. if t and t._fakeEvent then
  33. for _,f in pairs(t.Functions) do
  34. f(...)
  35. end
  36. end
  37. end
  38. m.TrigEvent = te
  39. UIS.TrigEvent = te
  40.  
  41. Event.OnServerEvent:Connect(function(plr,io)
  42. if plr~=rp then return end
  43. m.Target = io.Target
  44. m.Hit = io.Hit
  45. if not io.isMouse then
  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 Mouse = Player:GetMouse()
  66. local UIS = game:GetService("UserInputService")
  67. local input = function(io,a)
  68. if a then return end
  69. --Since InputObject is a client-side instance, we create and pass table instead
  70. Event:FireServer({KeyCode=io.KeyCode,UserInputType=io.UserInputType,UserInputState=io.UserInputState,Hit=Mouse.Hit,Target=Mouse.Target})
  71. end
  72. UIS.InputBegan:Connect(input)
  73. UIS.InputEnded:Connect(input)
  74.  
  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.  
  85. ----Sandboxed game object that allows the usage of client-side methods and services
  86. --Real game object
  87. local _rg = game
  88.  
  89. --Metatable for fake service
  90. local fsmt = {
  91. __index = function(self,k)
  92. local s = rawget(self,"_RealService")
  93. if s then return s[k] end
  94. end,
  95. __newindex = function(self,k,v)
  96. local s = rawget(self,"_RealService")
  97. if s then s[k]=v end
  98. end,
  99. __call = function(self,...)
  100. local s = rawget(self,"_RealService")
  101. if s then return s(...) end
  102. end
  103. }
  104. local function FakeService(t,RealService)
  105. t._RealService = typeof(RealService)=="string" and _rg:GetService(RealService) or RealService
  106. return setmetatable(t,fsmt)
  107. end
  108.  
  109. --Fake game object
  110. local g = {
  111. GetService = function(self,s)
  112. return self[s]
  113. end,
  114. Players = FakeService({
  115. LocalPlayer = FakeService({GetMouse=function(self)return m end},Player)
  116. },"Players"),
  117. UserInputService = FakeService(UIS,"UserInputService"),
  118. ContextActionService = FakeService(CAS,"ContextActionService"),
  119. }
  120. rawset(g.Players,"localPlayer",g.Players.LocalPlayer)
  121. g.service = g.GetService
  122.  
  123. g.RunService = FakeService({
  124. RenderStepped = _rg:GetService("RunService").Heartbeat,
  125. BindToRenderStep = function(self,name,_,fun)
  126.  
  127. end,
  128. UnbindFromRenderStep = function(self,name)
  129. self._btrs[name]:Disconnect()
  130. end,
  131. },"RunService")
  132.  
  133. setmetatable(g,{
  134. __index=function(self,s)
  135. return _rg:GetService(s) or typeof(_rg[s])=="function"
  136. and function(_,...)return _rg[s](_rg,...)end or _rg[s]
  137. end,
  138. __newindex = fsmt.__newindex,
  139. __call = fsmt.__call
  140. })
  141. --Changing owner to fake player object to support owner:GetMouse()
  142. game,owner = g,g.Players.LocalPlayer
  143. end
  144.  
  145. --This ROBLOX Script Is Made By The Respected Owners.
  146. --Script Hidden For Privacy Of The Users. Script Hidden For Privacy Of The Users.
  147. --Username Input Is Required At The Bottom.
  148.  
  149. --Instructions Copy and paste into script builder,
  150. --Put two names into "YOURNAME", and "THE VICTIM" (One of them doesn't have to be you)
  151.  
  152. --This Script Makes two players in your game.. Well.. I think its in the title ;D
  153.  
  154. ----------------------------------------------------------------------------------------
  155. function fWeld(zName, zParent, zPart0, zPart1, zCoco, a, b, c, d, e, f)
  156. local funcw = Instance.new("Weld")
  157. funcw.Name = zName
  158. funcw.Parent = zParent
  159. funcw.Part0 = zPart0
  160. funcw.Part1 = zPart1
  161. if (zCoco == true) then
  162. funcw.C0 = CFrame.new(a, b, c) * CFrame.fromEulerAnglesXYZ(d, e, f)
  163. else
  164. funcw.C1 = CFrame.new(a, b, c) * CFrame.fromEulerAnglesXYZ(d, e, f)
  165. end
  166. return funcw
  167. end
  168. function fun(n1, n2)
  169. pcall(function()
  170. t1 = game.Players[n1].Character.Torso
  171. t2 = game.Players[n2].Character.Torso
  172. t2.Parent.Humanoid.PlatformStand = true
  173. t1["Left Shoulder"]:Remove()
  174. ls1 = Instance.new("Weld")
  175. ls1.Parent = t1
  176. ls1.Part0 = t1
  177. ls1.Part1 = t1.Parent["Left Arm"]
  178. ls1.C0 = CFrame.new(-1.5,0,0)
  179. ls1.Name = "Left Shoulder"
  180. t1["Right Shoulder"]:Remove()
  181. rs1 = Instance.new("Weld")
  182. rs1.Parent = t1
  183. rs1.Part0 = t1
  184. rs1.Part1 = t1.Parent["Right Arm"]
  185. rs1.C0 = CFrame.new(1.5,0,0)
  186. rs1.Name = "Right Shoulder"
  187. t2["Left Shoulder"]:Remove()
  188. ls2 = Instance.new("Weld")
  189. ls2.Parent = t2
  190. ls2.Part0 = t2
  191. ls2.Part1 = t2.Parent["Left Arm"]
  192. ls2.C0 = CFrame.new(-1.5,0,0)
  193. ls2.Name = "Left Shoulder"
  194. t2["Right Shoulder"]:Remove()
  195. rs2 = Instance.new("Weld")
  196. rs2.Parent = t2
  197. rs2.Part0 = t2
  198. rs2.Part1 = t2.Parent["Right Arm"]
  199. rs2.C0 = CFrame.new(1.5,0,0)
  200. rs2.Name = "Right Shoulder"
  201. t2["Left Hip"]:Remove()
  202. lh2 = Instance.new("Weld")
  203. lh2.Parent = t2
  204. lh2.Part0 = t2
  205. lh2.Part1 = t2.Parent["Left Leg"]
  206. lh2.C0 = CFrame.new(-0.5,-2,0)
  207. lh2.Name = "Left Hip"
  208. t2["Right Hip"]:Remove()
  209. rh2 = Instance.new("Weld")
  210. rh2.Parent = t2
  211. rh2.Part0 = t2
  212. rh2.Part1 = t2.Parent["Right Leg"]
  213. rh2.C0 = CFrame.new(0.5,-2,0)
  214. rh2.Name = "Right Hip"
  215. local d = Instance.new("Part")
  216. d.TopSurface = 0
  217. d.BottomSurface = 0
  218. d.CanCollide = false
  219. d.BrickColor = BrickColor.new("Medium stone grey")
  220. d.Shape = "Ball"
  221. d.Parent = t1
  222. d.Size = Vector3.new(1,1,1)
  223. local dm = Instance.new("SpecialMesh")
  224. dm.MeshType = "Sphere"
  225. dm.Parent = d
  226. dm.Scale = Vector3.new(0.4,0.4,0.4)
  227. fWeld("weld",t1,t1,d,true,-0.2,-1.3,-0.6,0,0,0)
  228. d2 = d:Clone()
  229. d2.Parent = t1
  230. fWeld("weld",t1,t1,d2,true,0.2,-1.3,-0.6,0,0,0)
  231. local c = Instance.new("Part")
  232. c.TopSurface = 0
  233. c.BottomSurface = 0
  234. c.CanCollide = false
  235. c.BrickColor = BrickColor.new("Pastel brown")
  236. c.Parent = t1
  237. c.formFactor = "Custom"
  238. c.Size = Vector3.new(0.4,1.3,0.4)
  239. cm = Instance.new("CylinderMesh")
  240. cm.Parent = c
  241. a = fWeld("weld",t1,t1,c,true,0,-1,-0.52+(-c.Size.y/2),math.rad(-80),0,0)
  242. c2 = d:Clone()
  243. c2.BrickColor = BrickColor.new("Medium stone grey")
  244. c2.Mesh.Scale = Vector3.new(0.4,0.62,0.4)
  245. c2.Parent = t1
  246. fWeld("weld",c,c,c2,true,0,0+(c.Size.y/2),0,math.rad(-10),0,0)
  247. local bl = Instance.new("Part")
  248. bl.TopSurface = 0
  249. bl.BottomSurface = 0
  250. bl.CanCollide = false
  251. bl.BrickColor = BrickColor.new("Pastel brown")
  252. bl.Shape = "Ball"
  253. bl.Parent = t2
  254. bl.Size = Vector3.new(1,1,1)
  255. local dm = Instance.new("SpecialMesh")
  256. dm.MeshType = "Sphere"
  257. dm.Parent = bl
  258. dm.Scale = Vector3.new(1.2,1.2,1.2)
  259. fWeld("weld",t2,t2,bl,true,-0.5,0.5,-0.6,0,0,0)
  260. local br = Instance.new("Part")
  261. br.TopSurface = 0
  262. br.BottomSurface = 0
  263. br.CanCollide = false
  264. br.BrickColor = BrickColor.new("Pastel brown")
  265. br.Shape = "Ball"
  266. br.Parent = t2
  267. br.Size = Vector3.new(1,1,1)
  268. local dm = Instance.new("SpecialMesh")
  269. dm.MeshType = "Sphere"
  270. dm.Parent = br
  271. dm.Scale = Vector3.new(1.2,1.2,1.2)
  272. fWeld("weld",t2,t2,br,true,0.5,0.5,-0.6,0,0,0)
  273. local bln = Instance.new("Part")
  274. bln.TopSurface = 0
  275. bln.BottomSurface = 0
  276. bln.CanCollide = false
  277. bln.Shape = "Ball"
  278. bln.Parent = t2
  279. bln.Size = Vector3.new(1,1,1)
  280. local dm = Instance.new("SpecialMesh")
  281. dm.MeshType = "Sphere"
  282. dm.Parent = bln
  283. dm.Scale = Vector3.new(0.2,0.2,0.2)
  284. fWeld("weld",t2,t2,bln,true,-0.5,0.5,-1.2,0,0,0)
  285. local brn = Instance.new("Part")
  286. brn.TopSurface = 0
  287. brn.BottomSurface = 0
  288. brn.CanCollide = false
  289. brn.Shape = "Ball"
  290. brn.Parent = t2
  291. brn.Size = Vector3.new(1,1,1)
  292. local dm = Instance.new("SpecialMesh")
  293. dm.MeshType = "Sphere"
  294. dm.Parent = brn
  295. dm.Scale = Vector3.new(0.2,0.2,0.2)
  296. fWeld("weld",t2,t2,brn,true,0.5,0.5,-1.2,0,0,0)
  297. lh2.C1 = CFrame.new(0,-1.5,-0.5) * CFrame.Angles(0.9,-0.4,0)
  298. rh2.C1 = CFrame.new(0,-1.5,-0.5) * CFrame.Angles(0.9,0.4,0)
  299. ls2.C1 = CFrame.new(-0.5,-1.3,-0.5) * CFrame.Angles(0.9,-0.4,0)
  300. rs2.C1 = CFrame.new(0.5,-1.3,-0.5) * CFrame.Angles(0.9,0.4,0)
  301. ls1.C1 = CFrame.new(-0.5,0.7,0) * CFrame.Angles(-0.9,-0.4,0)
  302. rs1.C1 = CFrame.new(0.5,0.7,0) * CFrame.Angles(-0.9,0.4,0)
  303. if t1:findFirstChild("weldx") ~= nil then
  304. t1.weldx:Remove()
  305. end
  306. we = fWeld("weldx", t1, t1, t2, true, 0, -0.9, -1.3, math.rad(-90), 0, 0)
  307. n = t2.Neck
  308. n.C0 = CFrame.new(0, 1.5, 0) * CFrame.Angles(math.rad(-210), math.rad(180), 0)
  309. end)
  310. coroutine.resume(coroutine.create(function()
  311. while wait() do
  312. for i = 1,6 do
  313. we.C1 = we.C1 * CFrame.new(0,-0.3,0)
  314. wait()
  315. end
  316.  
  317. for i = 1,6 do
  318. we.C1 = we.C1 * CFrame.new(0,0.3,0)
  319. wait()
  320. end
  321. end
  322. end))
  323. end
  324. fun("josephrodemer", "yurixc")
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement