Advertisement
einsteinK

Airput

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