Advertisement
BorkTheCat

Untitled

Apr 25th, 2019
103
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 2.94 KB | None | 0 0
  1.  
  2. local copy = "-- \n"
  3. function check(x, d)
  4. if typeof(d) == "boolean" or typeof(d) == "number" then
  5. copy = copy.." -"..tostring(x).." "..tostring(d).." "..tostring(typeof(d)).." \n"
  6. elseif typeof(d) == "function" then
  7. copy = copy.."\n"
  8. copy = copy.." -"..tostring(x).." "..tostring(d).." "..tostring(typeof(d)).." \n"
  9. for q, e in next, debug.getupvalues(d) do
  10. copy = copy.." "..tostring(q).." "..tostring(e).." "..tostring(typeof(e)).." \n"
  11. check2(q, e)
  12. end
  13. elseif typeof(d) == "table" then
  14. copy = copy.."\n"
  15. copy = copy.." -"..tostring(x).." "..tostring(d).." "..tostring(typeof(d)).." \n"
  16. for q, e in pairs(d) do
  17. if typeof(e) ~= "Instance" then
  18. copy = copy.." "..tostring(q).." "..tostring(e).." "..tostring(typeof(e)).." \n"
  19. check2(q, e)
  20. end
  21. end
  22. end
  23. end
  24. function check2(x, d)
  25. if typeof(d) == "boolean" or typeof(d) == "number" then
  26. copy = copy.." "..tostring(x).." "..tostring(d).." "..tostring(typeof(d)).." \n"
  27. elseif typeof(d) == "function" then
  28. for q, e in next, debug.getupvalues(d) do
  29. copy = copy.." "..tostring(q).." "..tostring(e).." "..tostring(typeof(e)).." \n"
  30. end
  31. elseif typeof(d) == "table" then
  32. copy = copy.."\n"
  33. copy = copy.." -"..x.." "..tostring(d).." "..tostring(typeof(d)).." \n"
  34. for q, e in pairs(d) do
  35. if typeof(e) ~= "Instance" then
  36. copy = copy.." "..tostring(q).." "..tostring(e).." "..tostring(typeof(e)).." \n"
  37. check2(q, e)
  38. end
  39. end
  40. end
  41. end
  42. local name
  43. local reg = getreg()
  44. for i, v in next, reg do
  45. if type(v) == 'function' then
  46. if getfenv(v).script then
  47. name = getfenv(v).script:GetFullName()
  48. if string.find(copy, name) == nil then
  49. copy = copy.."\n"
  50. copy = copy..name.."\n"
  51. for x, d in next, debug.getupvalues(v) do
  52. if string.find(name, "PlayerScripts.PlayerModule") == nil and string.find(name, "PlayerScripts.ControlScript") == nil and string.find(name, "ChatScript") == nil and string.find(name, "PlayerScripts.BubbleChat") == nil and string.find(name, "Chat.ClientChatModules") == nil and string.find(name, "Workspace."..game.Players.LocalPlayer.Name..".Animate") == nil and string.find(name, ".") ~= nil then
  53. if is_synapse_function(v) == false then
  54. check(x, d)
  55.  
  56. end
  57. end
  58. end
  59. elseif string.find(copy, name) then
  60. for x, d in next, debug.getupvalues(v) do
  61. if string.find(name, "PlayerScripts.PlayerModule") == nil and string.find(name, "PlayerScripts.ControlScript") == nil and string.find(name, "ChatScript") == nil and string.find(name, "PlayerScripts.BubbleChat") == nil and string.find(name, "Chat.ClientChatModules") == nil and string.find(name, "Workspace."..game.Players.LocalPlayer.Name..".Animate") == nil and string.find(name, ".") ~= nil then
  62. if is_synapse_function(v) == false then
  63. check(x, d)
  64.  
  65. end
  66. end
  67. end
  68.  
  69. end
  70. end
  71. end
  72. end
  73. syn.write_clipboard(copy)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement