Advertisement
Guest User

Untitled

a guest
Nov 28th, 2015
74
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 2.65 KB | None | 0 0
  1. local Screen
  2. for k,v in pairs(workspace:GetChildren()) do
  3. if v:IsA("Part") and v.Anchored and v.Name:lower():find("base") then
  4. Screen = v
  5. end
  6. end if not Screen then return end
  7. local Gui = Instance.new("SurfaceGui",Screen)
  8. Gui.Face = "Top" Gui.CanvasSize = Vector2.new(800,600)
  9. local Frame = Instance.new("Frame",Gui)
  10. Frame.Size = UDim2.new(1,0,1,0)
  11. Frame.BackgroundTransparency = 1
  12.  
  13. local Filters = {
  14. "HaxSB","SB_Script","Script 'W",
  15. "ServerScriptService.oxSB","Script ended",
  16. "Can't insert this asset"
  17. }
  18.  
  19. local function Line()
  20. local l = Instance.new("TextLabel",Frame)
  21. l.Size = UDim2.new(1,0,0,8)
  22. l.Position = UDim2.new(0,0,1,0)
  23. l.Font = "SourceSansBold"
  24. l.TextColor3 = Color3.new()
  25. l.TextStrokeTransparency = 1
  26. l.ClipsDescendants = true
  27. l.TextXAlignment = "Left"
  28. l.BackgroundTransparency = 1
  29. l.BorderSizePixel = 0
  30. l.FontSize = "Size8" return l
  31. end local off = UDim2.new(0,0,0,8)
  32. local function AddLine(msg,col)
  33. local line = Line()
  34. line.Text = " "..tostring(msg)
  35. line.TextStrokeColor3 = col
  36. for k,v in pairs(Frame:GetChildren()) do
  37. v.Position = v.Position - off
  38. end
  39. end AddLine("RBXDev Airput loaded",Color3.new(0,1,1))
  40. local function AddLines(msg,col)
  41. for k,v in pairs(Filters) do
  42. if msg:find(v) then
  43. return
  44. end
  45. end
  46. if msg:match("\n") then
  47. local a,b = msg:match("^(.-)\n(.*)$")
  48. if a then msg = b AddLine(a,col) end
  49. else
  50. return AddLine(msg,col)
  51. end
  52. for v in msg:gmatch("[^\n]+") do
  53. AddLine("\t"..v,col)
  54. end
  55. end
  56.  
  57. local con = game:GetService("LogService").MessageOut:connect(function(msg,typ)
  58. if typ == Enum.MessageType.MessageInfo then
  59. if not msg:match("^Stack") and not msg:match("Script '%[string \"CENSORED\"%]'") then
  60. AddLines(msg,Color3.new(0.75,0.75,0.75))
  61. end
  62. elseif typ == Enum.MessageType.MessageWarning then
  63. local a,b,c = msg:match("Something unexpectedly tried to set the parent of (%w+) to (%w+)"
  64. .." while trying to set the parent of %w+%. Current parent is (%w+)%.")
  65. if a then
  66. AddLines(("Couldn't parent %s to %s. Parent stays %s"):format(a,b,c),Color3.new(0.5,1))
  67. elseif not msg:match("^Type failed to learn") and not msg:match("^ClassDescriptor failed to learn") then
  68. AddLines(msg,Color3.new(1,0.5))
  69. end
  70. elseif typ == Enum.MessageType.MessageError then
  71. if not msg:match("^SendData: ") and not msg:match("^%[string \"CENSORED\"%]") then
  72. AddLines(msg,Color3.new(1))
  73. end
  74. elseif not msg:match("^MAIN ") and not msg:match("^ERROR ") then
  75. if not msg:match("^Player %d+ ") and not msg:match("STAT: ") then
  76. AddLines(msg,Color3.new(1,1,1))
  77. end
  78. end
  79. end)
  80.  
  81. while Frame:IsDescendantOf(workspace) do
  82. wait()
  83. end con:disconnect() Gui:Destroy()
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement