HTTP Spy v2 Tool

 HttpSpy = .()
 MainFrame = .()
 UICorner = .()
 TitleBar = .()
 UICorner_2 = .()
 TitleText = .()
 MainContainer = .()
 UIListLayout = .()
 UIPadding = .()


HttpSpy.Name = 
HttpSpy.Parent = .CoreGui
HttpSpy.ZIndexBehavior = .ZIndexBehavior.Sibling

MainFrame.Name = 
MainFrame.Parent = HttpSpy
MainFrame.BackgroundColor3 = .(, , )
MainFrame.BorderSizePixel = 
MainFrame.Position = .(, , , )
MainFrame.Size = .(, , , )

UICorner.CornerRadius = .(, )
UICorner.Parent = MainFrame

TitleBar.Name = 
TitleBar.Parent = MainFrame
TitleBar.BackgroundColor3 = .(, , )
TitleBar.BorderSizePixel = 
TitleBar.Size = .(, , , )

UICorner_2.CornerRadius = .(, )
UICorner_2.Parent = TitleBar

TitleText.Name = 
TitleText.Parent = TitleBar
TitleText.BackgroundTransparency = 
TitleText.Position = .(, , , )
TitleText.Size = .(, -, , )
TitleText.Font = .Font.GothamSemibold
TitleText.Text = 
TitleText.TextColor3 = .(, , )
TitleText.TextSize = 
TitleText.TextXAlignment = .TextXAlignment.Left

 MinimizeButton = .()
MinimizeButton.Name = 
MinimizeButton.Parent = TitleBar
MinimizeButton.BackgroundTransparency = 
MinimizeButton.Position = .(, -, , )
MinimizeButton.Size = .(, , , )
MinimizeButton.Font = .Font.GothamBold
MinimizeButton.Text = 
MinimizeButton.TextColor3 = .(, , )
MinimizeButton.TextSize = 

MainContainer.Name = 
MainContainer.Parent = MainFrame
MainContainer.BackgroundTransparency = 
MainContainer.Position = .(, , , )
MainContainer.Size = .(, , , -)
MainContainer.ScrollBarThickness = 
MainContainer.ScrollBarImageColor3 = .(, , )

UIListLayout.Parent = MainContainer
UIListLayout.SortOrder = .SortOrder.LayoutOrder
UIListLayout.Padding = .(, )

UIPadding.Parent = MainContainer
UIPadding.PaddingLeft = .(, )
UIPadding.PaddingRight = .(, )
UIPadding.PaddingTop = .(, )

 NotificationFrame = .()
 NotificationText = .()

NotificationFrame.Name = 
NotificationFrame.Parent = HttpSpy
NotificationFrame.BackgroundColor3 = .(, , )
NotificationFrame.BorderSizePixel = 
NotificationFrame.Position = .(, -, , -)
NotificationFrame.Size = .(, , , )
NotificationFrame.Visible = 

 NotificationCorner = .()
NotificationCorner.CornerRadius = .(, )
NotificationCorner.Parent = NotificationFrame

NotificationText.Name = 
NotificationText.Parent = NotificationFrame
NotificationText.BackgroundTransparency = 
NotificationText.Size = .(, , , )
NotificationText.Font = .Font.GothamSemibold
NotificationText.TextColor3 = .(, , )
NotificationText.TextSize = 
NotificationText.Text = 

 isMinimized = 

MinimizeButton.MouseButton1Click:(()
    isMinimized =  isMinimized

      isMinimized 
        MainContainer.Visible = 
        MainFrame.Size = .(, , , )
        MinimizeButton.Text = 
        
    

    MainContainer.Visible = 
    MainFrame.Size = .(, , , )
    MinimizeButton.Text = 
)


  (gui)
     dragging
     dragInput
     dragStart
     startPos

      (input)
         delta = input.Position - dragStart
        gui.Position = .(startPos.X.Scale, startPos.X.Offset + delta.X, startPos.Y.Scale, startPos.Y.Offset + delta.Y)
    

    gui.InputBegan:((input)
         input.UserInputType ~= .UserInputType.MouseButton1  input.UserInputType ~= .UserInputType.Touch   

        dragging = 
        dragStart = input.Position
        startPos = gui.Position

        input.Changed:(()
             input.UserInputState ~= .UserInputState.End   
            dragging = 
        )
    )

    gui.InputChanged:((input)
         input.UserInputType ~= .UserInputType.MouseMovement  input.UserInputType ~= .UserInputType.Touch   
        dragInput = input
    )

    :().InputChanged:((input)
         input ~= dragInput   dragging   
        (input)
    )


(MainFrame)

  (frame)
     layout = frame:()

      ()
        frame.CanvasSize = .(, , , layout.AbsoluteContentSize.Y + )
    

    layout:():(updateCanvasSize)
    ()


(MainContainer)

  ()
    NotificationFrame.Visible = 
    .()
    NotificationFrame.Visible = 


  (method, url, headers)
      method   url 
         
    

     text = method ..  .. url

      headers  (headers) ~=  
         text
    

    text ..= 
     key, value  (headers) 
        text ..= .(, (key), (value))
    

     text


  (method, url, headers)
     LogEntry = .()
    LogEntry.BackgroundColor3 = .(, , )
    LogEntry.BorderSizePixel = 
    LogEntry.Size = .(, , , )
    LogEntry.Font = .Font.SourceSansSemibold
    LogEntry.TextColor3 = .(, , )
    LogEntry.TextSize = 
    LogEntry.TextWrapped = 
    LogEntry.TextXAlignment = .TextXAlignment.Left
    LogEntry.TextYAlignment = .TextYAlignment.Top
    LogEntry.AutoButtonColor = 

     UICorner = .()
    UICorner.CornerRadius = .(, )
    UICorner.Parent = LogEntry

     UIPadding = .()
    UIPadding.Parent = LogEntry
    UIPadding.PaddingLeft = .(, )
    UIPadding.PaddingRight = .(, )
    UIPadding.PaddingTop = .(, )
    UIPadding.PaddingBottom = .(, )

     logText = (method, url, headers)
    LogEntry.Text = logText
    LogEntry.Parent = MainContainer

     textSize = :():(
        LogEntry.Text,
        LogEntry.TextSize,
        LogEntry.Font,
        .(MainContainer.AbsoluteSize.X - , .huge)
    )
    LogEntry.Size = .(, , , textSize.Y + )

     OriginalColor = LogEntry.BackgroundColor3

    LogEntry.MouseEnter:(()
        LogEntry.BackgroundColor3 = .(, , )
    )

    LogEntry.MouseLeave:(()
        LogEntry.BackgroundColor3 = OriginalColor
    )

    LogEntry.MouseButton1Click:(()
        (logText)
        ()
    )

    MainContainer.CanvasSize = .(, , , UIListLayout.AbsoluteContentSize.Y)



 HttpGet
HttpGet = (.HttpGet, (self, url, ...)
    (, url)
     (self, url, ...)
)

 HttpPost
HttpPost = (.HttpPost, (self, url, ...)
    (, url)
     (self, url, ...)
)

 RequestLog
   .request 
    RequestLog = (.request, (dat)
        (dat.Method  , dat.Url, dat.Headers)
         (dat)
    )
  
    RequestLog = (, (dat)
        (dat.Method  , dat.Url, dat.Headers)
         (dat)
    )

    (, )