DaOMEGAa32

pun sans fe

May 14th, 2019
193
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 15.12 KB | None | 0 0
  1. --https://github.com/Mokiros/roblox-FE-compatibility
  2. if game:GetService("RunService"):IsClient() then error("Script must be server-side in order to work; use h/ and not hl/") end
  3. local Player,game,owner = owner,game
  4. local RealPlayer = Player
  5. do
  6. print("FE Compatibility code V2 by Mokiros")
  7. local RealPlayer = RealPlayer
  8. script.Parent = RealPlayer.Character
  9.  
  10. --Fake event to make stuff like Mouse.KeyDown work
  11. local Disconnect_Function = function(this)
  12. this[1].Functions[this[2]] = nil
  13. end
  14. local Disconnect_Metatable = {__index={disconnect=Disconnect_Function,Disconnect=Disconnect_Function}}
  15. local FakeEvent_Metatable = {__index={
  16. Connect = function(this,f)
  17. local i = tostring(math.random(0,10000))
  18. while this.Functions[i] do
  19. i = tostring(math.random(0,10000))
  20. end
  21. this.Functions[i] = f
  22. return setmetatable({this,i},Disconnect_Metatable)
  23. end
  24. }}
  25. FakeEvent_Metatable.__index.connect = FakeEvent_Metatable.__index.Connect
  26. local function fakeEvent()
  27. return setmetatable({Functions={}},FakeEvent_Metatable)
  28. end
  29.  
  30. --Creating fake input objects with fake variables
  31. local FakeMouse = {Hit=CFrame.new(),KeyUp=fakeEvent(),KeyDown=fakeEvent(),Button1Up=fakeEvent(),Button1Down=fakeEvent(),Button2Up=fakeEvent(),Button2Down=fakeEvent()}
  32. FakeMouse.keyUp = FakeMouse.KeyUp
  33. FakeMouse.keyDown = FakeMouse.KeyDown
  34. local UIS = {InputBegan=fakeEvent(),InputEnded=fakeEvent()}
  35. local CAS = {Actions={},BindAction=function(self,name,fun,touch,...)
  36. CAS.Actions[name] = fun and {Name=name,Function=fun,Keys={...}} or nil
  37. end}
  38. --Merged 2 functions into one by checking amount of arguments
  39. CAS.UnbindAction = CAS.BindAction
  40.  
  41. --This function will trigger the events that have been :Connect()'ed
  42. local function TriggerEvent(self,ev,...)
  43. for _,f in pairs(self[ev].Functions) do
  44. f(...)
  45. end
  46. end
  47. FakeMouse.TriggerEvent = TriggerEvent
  48. UIS.TriggerEvent = TriggerEvent
  49.  
  50. --Client communication
  51. local Event = Instance.new("RemoteEvent")
  52. Event.Name = "UserInput_Event"
  53. Event.OnServerEvent:Connect(function(plr,io)
  54. if plr~=RealPlayer then return end
  55. FakeMouse.Target = io.Target
  56. FakeMouse.Hit = io.Hit
  57. if not io.isMouse then
  58. local b = io.UserInputState == Enum.UserInputState.Begin
  59. if io.UserInputType == Enum.UserInputType.MouseButton1 then
  60. return FakeMouse:TriggerEvent(b and "Button1Down" or "Button1Up")
  61. end
  62. if io.UserInputType == Enum.UserInputType.MouseButton2 then
  63. return FakeMouse:TriggerEvent(b and "Button2Down" or "Button2Up")
  64. end
  65. for _,t in pairs(CAS.Actions) do
  66. for _,k in pairs(t.Keys) do
  67. if k==io.KeyCode then
  68. t.Function(t.Name,io.UserInputState,io)
  69. end
  70. end
  71. end
  72. FakeMouse:TriggerEvent(b and "KeyDown" or "KeyUp",io.KeyCode.Name:lower())
  73. UIS:TriggerEvent(b and "InputBegan" or "InputEnded",io,false)
  74. end
  75. end)
  76. Event.Parent = NLS([==[local Event = script:WaitForChild("UserInput_Event")
  77. local Mouse = owner:GetMouse()
  78. local UIS = game:GetService("UserInputService")
  79. local input = function(io,RobloxHandled)
  80. if RobloxHandled then return end
  81. --Since InputObject is a client-side instance, we create and pass table instead
  82. Event:FireServer({KeyCode=io.KeyCode,UserInputType=io.UserInputType,UserInputState=io.UserInputState,Hit=Mouse.Hit,Target=Mouse.Target})
  83. end
  84. UIS.InputBegan:Connect(input)
  85. UIS.InputEnded:Connect(input)
  86.  
  87. local h,t
  88. --Give the server mouse data every second frame, but only if the values changed
  89. --If player is not moving their mouse, client won't fire events
  90. local HB = game:GetService("RunService").Heartbeat
  91. while true do
  92. if h~=Mouse.Hit or t~=Mouse.Target then
  93. h,t=Mouse.Hit,Mouse.Target
  94. Event:FireServer({isMouse=true,Target=t,Hit=h})
  95. end
  96. --Wait 2 frames
  97. for i=1,2 do
  98. HB:Wait()
  99. end
  100. end]==],script)
  101.  
  102. ----Sandboxed game object that allows the usage of client-side methods and services
  103. --Real game object
  104. local RealGame = game
  105.  
  106. --Metatable for fake service
  107. local FakeService_Metatable = {
  108. __index = function(self,k)
  109. local s = rawget(self,"_RealService")
  110. if s then
  111. return typeof(s[k])=="function"
  112. and function(_,...)return s[k](s,...)end or s[k]
  113. end
  114. end,
  115. __newindex = function(self,k,v)
  116. local s = rawget(self,"_RealService")
  117. if s then s[k]=v end
  118. end
  119. }
  120. local function FakeService(t,RealService)
  121. t._RealService = typeof(RealService)=="string" and RealGame:GetService(RealService) or RealService
  122. return setmetatable(t,FakeService_Metatable)
  123. end
  124.  
  125. --Fake game object
  126. local FakeGame = {
  127. GetService = function(self,s)
  128. return rawget(self,s) or RealGame:GetService(s)
  129. end,
  130. Players = FakeService({
  131. LocalPlayer = FakeService({GetMouse=function(self)return FakeMouse end},Player)
  132. },"Players"),
  133. UserInputService = FakeService(UIS,"UserInputService"),
  134. ContextActionService = FakeService(CAS,"ContextActionService"),
  135. RunService = FakeService({
  136. _btrs = {},
  137. RenderStepped = RealGame:GetService("RunService").Heartbeat,
  138. BindToRenderStep = function(self,name,_,fun)
  139. self._btrs[name] = self.Heartbeat:Connect(fun)
  140. end,
  141. UnbindFromRenderStep = function(self,name)
  142. self._btrs[name]:Disconnect()
  143. end,
  144. },"RunService")
  145. }
  146. rawset(FakeGame.Players,"localPlayer",FakeGame.Players.LocalPlayer)
  147. FakeGame.service = FakeGame.GetService
  148. FakeService(FakeGame,game)
  149. --Changing owner to fake player object to support owner:GetMouse()
  150. game,owner = FakeGame,FakeGame.Players.LocalPlayer
  151. end
  152. --// CREATED BY 1x1x1x1IAMbck \\--
  153. --\\ THX TO GOODGUYAIDEN FOR HELPING //--
  154.  
  155. --// Main
  156.  
  157. player = game:GetService("Players").LocalPlayer
  158. chara = player.Character
  159. chara.Humanoid.MaxHealth = 1
  160. chara.Humanoid.Health = 1
  161. debby = game.Debris
  162. wait(1)
  163. plr = game.Players.LocalPlayer
  164. char = plr.Character
  165. mouse = plr:GetMouse()
  166. whitecolor = Color3.new(1,1,1)
  167. epicmode = false
  168. normal = true
  169. local ColorArray = {ColorSequenceKeypoint.new(0, Color3.new(0/0,0/255,0/255)),ColorSequenceKeypoint.new(1, Color3.new(0/0,0/0,0/0))}
  170. local Player = game.Players.LocalPlayer
  171. local Character = Player.Character
  172. local torso = Character.Torso
  173. local hed = Character.Head
  174. local p = game.Players.LocalPlayer
  175. local char = p.Character
  176.  
  177. --// Short keys
  178.  
  179. RArm = Character["Right Arm"]
  180. LArm = Character["Left Arm"]
  181. RLeg = Character["Right Leg"]
  182. LLeg = Character["Left Leg"]
  183.  
  184. --// Sounds
  185.  
  186. local trumpet = Instance.new("Sound",char.Torso)
  187. trumpet.SoundId = "rbxassetid://885599310"
  188. trumpet.Volume = 4
  189. trumpet.Looped = false
  190.  
  191. --// Controls
  192.  
  193. --// Controls \\--
  194.  
  195. if 1 then
  196. local MovesGui=Instance.new("ScreenGui",p:FindFirstChildOfClass("PlayerGui"))
  197. local Frm=Instance.new("Frame",MovesGui)Frm.BackgroundColor3=Color3.new()Frm.BorderSizePixel=0
  198. Frm.BackgroundTransparency=.5 Frm.Size=UDim2.new(.3,0,.5,0)local Show=true Frm.Position=UDim2.new(.7,0,.5,0)
  199. local idk=Instance.new("TextButton",Frm)idk.Size=UDim2.new(.5,0,.1,0)idk.Position=UDim2.new(-.5,0,.8,0)
  200. idk.Text="Hide"idk.TextStrokeTransparency=0 idk.BackgroundTransparency=.5 idk.BackgroundColor3=Color3.new()
  201. idk.BorderSizePixel=0 idk.TextColor3=Color3.new(1,1,1)
  202. idk.MouseButton1Click:connect(function()Show=not Show idk.Text=Show and "Hide"or"Show"end)
  203. local normal=Instance.new("TextLabel",Frm)normal.Size=UDim2.new(1,0,1,0)normal.TextStrokeTransparency=0
  204. normal.BackgroundTransparency=1 normal.TextColor3=Color3.new(1,1,1)
  205. normal.TextXAlignment="Left"normal.TextYAlignment="Top"
  206. normal.Text=[[Hey kiddo... Wanna hear some jokes?
  207. ----------------------------------
  208. *Q : Puns
  209. *E : Puns
  210. *R : Puns
  211. *F : Teleport
  212.  
  213.  
  214. Created By 1x1x1x1IAMbck
  215. Help by GoodGuyAiden
  216. ]]
  217. spawn(function()
  218. while game:service'RunService'.RenderStepped:wait()do
  219. Frm.Position=Frm.Position:lerp(UDim2.new(not Show and 1 or .7,0,.5,0),.1)
  220. end end)
  221. end
  222. --------------------------------------------------------
  223.  
  224.  
  225. --// Destroy and Grab Clothes
  226.  
  227. for i,v in pairs(char:GetChildren()) do
  228. if v.ClassName == "Shirt" or v.ClassName == "Pants" or v.ClassName == "ShirtGraphic" then
  229. v:Destroy()
  230. end
  231. end
  232. local shirt = Instance.new("Shirt",char)
  233. shirt.ShirtTemplate = "http://www.roblox.com/asset/?id=302011210"
  234. local pants = Instance.new("Pants",char)
  235. pants.PantsTemplate = "http://www.roblox.com/asset/?id=305718140"
  236. local bdycolors = char["Body Colors"]
  237. bdycolors.HeadColor3 = whitecolor
  238. bdycolors.LeftArmColor3 = whitecolor
  239. bdycolors.LeftLegColor3 = whitecolor
  240. bdycolors.RightArmColor3 = whitecolor
  241. bdycolors.RightLegColor3 = whitecolor
  242. bdycolors.TorsoColor3 = whitecolor
  243. for i,v in pairs(char:GetChildren()) do
  244. if v.ClassName == "Hat" or v.ClassName == "Accessory" then
  245. v:Destroy()
  246. end
  247. end
  248.  
  249. --// Face
  250. char.Head.face.Texture = "http://www.roblox.com/asset/?id=1099475357"
  251.  
  252.  
  253. --// Clothes creation
  254.  
  255. local Hair = char:FindFirstChild("Hair_F") or Instance.new("Hat")
  256. Hair.AttachmentPos = Vector3.new(0, 0.33, 0)
  257. Hair.Name = "Hair_F"
  258. local HairHandle = Hair:FindFirstChild("Handle") or Instance.new("Part", Hair)
  259. if HairHandle.Name ~= "Handle" then
  260. HairHandle.Size = Vector3.new(1,1,1)
  261. end
  262. HairHandle.BottomSurface = 0
  263. HairHandle.Name = "Handle"
  264. HairHandle.TopSurface = 0
  265. HairHandle.Locked = 1
  266. local Mesh = Hair:FindFirstChild("Mesh") or Instance.new("SpecialMesh", HairHandle)
  267. Mesh.TextureId = ""
  268. Mesh.MeshId = "http://www.roblox.com/asset/?id=430073345"
  269. Mesh.TextureId = "http://www.roblox.com/asset/?id=430073362"
  270. Mesh.Scale = Vector3.new(1.1,1.1,1.1)
  271. Mesh.Offset = Vector3.new(0,0,0)
  272. Hair.Parent = Character
  273. HairHandle.BrickColor = BrickColor.new("Really black")
  274. HairHandle.Material = Enum.Material.Granite
  275.  
  276. local tor = Instance.new("CharacterMesh")
  277. tor.Parent = Character
  278. tor.Name = "Bones"
  279. tor.BodyPart = "Torso"
  280. tor.MeshId = "430072717"
  281. tor.OverlayTextureId = "430072723"
  282.  
  283. local tor = Instance.new("CharacterMesh")
  284. tor.Parent = Character
  285. tor.Name = "Bones"
  286. tor.BodyPart = "LeftLeg"
  287. tor.MeshId = "430069778"
  288. tor.OverlayTextureId = "430069795"
  289.  
  290. local tor = Instance.new("CharacterMesh")
  291. tor.Parent = Character
  292. tor.Name = "Bones"
  293. tor.BodyPart = "RightLeg"
  294. tor.MeshId = "430070587"
  295. tor.OverlayTextureId = "430070605"
  296.  
  297. LArm.Transparency = 1
  298. RArm.Transparency = 1
  299. hed.Transparency = 1
  300.  
  301.  
  302.  
  303. New = function(Object, Parent, Name, Data)
  304. local Object = Instance.new(Object)
  305. for Index, Value in pairs(Data or {}) do
  306. Object[Index] = Value
  307. end
  308. Object.Parent = Parent
  309. Object.Name = Name
  310. return Object
  311. end
  312.  
  313. FakeHead = New("Model",chara,"FakeHead",{})
  314. MainPart = New("Part",FakeHead,"MainPart",{BrickColor = BrickColor.new("Institutional white"),Transparency = 1,Size = Vector3.new(2, 1, 1),CFrame = CFrame.new(18, 4.50000381, -6.5, -1, 0, 0, 0, 1, 0, 0, 0, -1),CanCollide = false,Color = Color3.new(0.972549, 0.972549, 0.972549),})
  315. Mesh = New("SpecialMesh",MainPart,"Mesh",{Scale = Vector3.new(1.25, 1.25, 1.25),})
  316. Weld = New("ManualWeld",MainPart,"Weld",{Part0 = MainPart,Part1 = chara.Head,C0 = CFrame.new(0, 0, 0, -1, 0, 0, 0, 1, 0, 0, 0, -1),C1 = CFrame.new(0, 3.81469727e-006, 0, -1, 0, 0, 0, 1, 0, 0, 0, -1),})
  317.  
  318. --// Chat \\--
  319.  
  320. local talksound = Instance.new("Sound",char.Torso)
  321. talksound.SoundId = "rbxassetid://928210219"
  322. talksound.Volume = 4
  323. function swait(num)
  324. if num==0 or num==nil then
  325. game:service'RunService'.Stepped:wait(0)
  326. else
  327. for i=0,num do
  328. game:service'RunService'.Stepped:wait(0)
  329. end
  330. end
  331. end
  332.  
  333.  
  334. function chatfunc(text)
  335. local chat = coroutine.wrap(function()
  336. if char:FindFirstChild("TalkingBillBoard") ~= nil then
  337. char:FindFirstChild("TalkingBillBoard"):Destroy()
  338. end
  339. local naeeym2 = Instance.new("BillboardGui",char)
  340. naeeym2.Size = UDim2.new(0,100,0,40)
  341. naeeym2.StudsOffset = Vector3.new(0,3,0)
  342. naeeym2.Adornee = char.Head
  343. naeeym2.Name = "TalkingBillBoard"
  344. local tecks2 = Instance.new("TextLabel",naeeym2)
  345. tecks2.BackgroundTransparency = 1
  346. tecks2.BorderSizePixel = 0
  347. tecks2.Text = ""
  348. tecks2.Font = "Fantasy"
  349. tecks2.TextSize = 30
  350. tecks2.TextStrokeTransparency = 0
  351. tecks2.TextColor3 = Color3.new(.6,0,0)
  352. tecks2.TextStrokeColor3 = Color3.new(0,0,0)
  353. tecks2.Size = UDim2.new(1,0,0.5,0)
  354. local tecks3 = Instance.new("TextLabel",naeeym2)
  355. tecks3.BackgroundTransparency = 1
  356. tecks3.BorderSizePixel = 0
  357. tecks3.Text = ""
  358. tecks3.Font = "Fantasy"
  359. tecks3.TextSize = 30
  360. tecks3.TextStrokeTransparency = 0
  361. tecks3.TextColor3 = Color3.new(0,0,0)
  362. tecks3.TextStrokeColor3 = Color3.new(1,1,1)
  363. tecks3.Size = UDim2.new(1,0,0.5,0)
  364. for i = 1,string.len(text),1 do
  365. tecks2.Text = string.sub(text,1,i)
  366. tecks3.Text = string.sub(text,1,i)
  367. talksound:Play()
  368. wait(0.01)
  369. end
  370. wait(2)
  371. for i = 1, 50 do
  372. swait()
  373. tecks2.Position = tecks2.Position - UDim2.new(math.random(-.4,.4),math.random(-5,5),.05,math.random(-5,5))
  374. tecks2.Rotation = tecks2.Rotation - .8
  375. tecks2.TextStrokeTransparency = tecks2.TextStrokeTransparency +.04
  376. tecks2.TextTransparency = tecks2.TextTransparency + .04
  377. tecks3.Position = tecks2.Position - UDim2.new(math.random(-.4,.4),math.random(-5,5),.05,math.random(-5,5))
  378. tecks3.Rotation = tecks2.Rotation + .8
  379. tecks3.TextStrokeTransparency = tecks2.TextStrokeTransparency +.04
  380. tecks3.TextTransparency = tecks2.TextTransparency + .04
  381. end
  382. naeeym2:Destroy()
  383. end)
  384. chat()
  385. end
  386. function onChatted(msg)
  387. chatfunc(msg)
  388. end
  389. wait(0.5)
  390. chatfunc("Hey kiddo...")
  391. wait(1)
  392. chatfunc("Wanna hear a joke?")
  393. plr.Chatted:connect(onChatted)
  394.  
  395.  
  396. --// Functions
  397.  
  398. local root = char.HumanoidRootPart
  399. function teleport(key)
  400. key = key:lower()
  401. if key == "f" and not teleportlimit then
  402. root.CFrame = CFrame.new(CFrame.new(mouse.Hit.p)*CFrame.new(0,2.8,0).p,root.Position)
  403. wait(0)
  404. end
  405. end
  406. mouse.KeyDown:connect(teleport)
  407.  
  408. function pun1(A)
  409. if A == "q" then
  410. local chatmath = math.random(1,3)
  411. if chatmath == 1 then
  412. chatfunc("Why can't skeletons play church music?")
  413. wait(5)
  414. chatfunc("Because they have no organs.")
  415. end
  416. if chatmath == 2 then
  417. chatfunc("Why are skeletons so calm?")
  418. wait(5)
  419. chatfunc("Because nothing gets under their skin!")
  420. end
  421. if chatmath == 3 then
  422. chatfunc("What does a skeleton order at a restaurant?")
  423. wait(5)
  424. chatfunc("SPARERIBS")
  425. end
  426. end
  427. end
  428. mouse.KeyDown:connect(pun1)
  429.  
  430. function pun2(AA)
  431. if AA == "e" then
  432. local chatmath = math.random(1,3)
  433. if chatmath == 1 then
  434. chatfunc("My favorite instrument?")
  435. wait(5)
  436. chatfunc("the TromBONE, of course.")
  437. wait(0.5)
  438. trumpet:Play()
  439. end
  440. if chatmath == 2 then
  441. chatfunc("What do skeletons hate the most about wind?")
  442. wait(5)
  443. chatfunc("Nothing, it goes right through them.")
  444. end
  445. if chatmath == 3 then
  446. chatfunc("Why don't skeletons fight each other?")
  447. wait(5)
  448. chatfunc("They don't have the guts.")
  449. end
  450. end
  451. end
  452. mouse.KeyDown:connect(pun2)
  453.  
  454. function pun3(AAAA)
  455. if AAAA == "r" then
  456. local chatmath = math.random(1,3)
  457. if chatmath == 1 then
  458. chatfunc("I'm so lazy,")
  459. wait(5)
  460. chatfunc("I'm bone idle!")
  461. end
  462. if chatmath == 2 then
  463. chatfunc("Why did the skeleton want a friend?")
  464. wait(5)
  465. chatfunc("Because she was feeling bonely.")
  466. end
  467. if chatmath == 3 then
  468. chatfunc("What does a skeleton tile his roof with?")
  469. wait(5)
  470. chatfunc("Shin-gles!")
  471. end
  472. end
  473. end
  474. mouse.KeyDown:connect(pun3)
  475.  
  476. --// END? \\--
Add Comment
Please, Sign In to add comment