Verity

 VerityOk, VerityErr = (()


 Players = :()
 TweetService = :()
 RunService = :()
 UserInputService = :()
 TextChatService = :()
 ReplicatedStorage = :()

 LocalPlayer = Players.LocalPlayer
 PlayerGui = LocalPlayer:()




 Config = {
    BotName = ,
    FollowEnabled = ,
    FollowDistance = ,
    AutoChatEnabled = ,
    AngryMode = ,
    SilentMode = ,
    OpenMode = ,
    
    IdleIntervalMin = ,
    IdleIntervalMax = ,
    
    CrypticMessage = ,
    
    Whitelist = {}, 
    
    Keybinds = {
        [] = ,
        [] = 
    },
    
    IdleMessages = {
        ,
        ,
        ,
    },
    
    AngryIdleMessages = {
        ,
        ,
        
    }
}

 ChatResponses = {
    []             = {, , , },
    []                = {, , , },
    []               = {, , },
    []          = {, , },
    []                = {, , },
    []      = {, },
    []        = {, , },
    []           = {, , },
    []               = {, , },
    []           = {, },
    []                = {, },
    []       = {, , },
    []     = {, },
    [] = {, },
    []   = {, },
    []       = {, },
    []= {, , },
    []   = {, },
    []         = {, , },
    []            = {, },
    []             = {, },
    []               = {, , },
    []                = {, },
    []              = {},
    []          = {, },
    []     = {, },
    []     = {, },
    []      = {, },
    []     = {, },
    []              = {, },
    []      = {, },
    []      = {, },
    []               = {, },
    []    = {, },
    []     = {, },
    []         = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
}

 AngryChatResponses = {
    [] = {, , },
    [] = {, },
    [] = {, , },
    [] = {, , },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
    [] = {, },
}


 Theme = {
    Panel = .(, , ),
    TopBar = .(, , ),
    Field = .(, , ),
    FieldBorder = .(, , ),
    Accent = .(, , ),
    On = .(, , ),
    Off = .(, , ),
    Warn = .(, , ),
    TextPrimary = .(, , ),
    TextMuted = .(, , )
}


 lastInteractionTime = .()
 crypticActive = 




  (instance, radius)
     UICorner = .()
    UICorner.CornerRadius = .(, radius)
    UICorner.Parent = instance
     UICorner


  (instance, color, thickness, transparency)
     UIStroke = .()
    UIStroke.Color = color
    UIStroke.Thickness = thickness
    UIStroke.Transparency = transparency  
    UIStroke.ApplyStrokeMode = .ApplyStrokeMode.Border
    UIStroke.Parent = instance
     UIStroke


  (instance, properties, duration, style)
      instance   instance.Parent   
    duration = duration  
    style = style  .EasingStyle.Quad
     info = TweenInfo.(duration, style, .EasingDirection.Out)
     t = TweetService:(instance, info, properties)
    t:()
     t


  ()
     , LocalPlayer.Name, 


  (username)
     Config.OpenMode    
     username == LocalPlayer.Name    
     _, name  (Config.Whitelist) 
         name:() == username:()    
    
     


  (username)
      (username) 
        .(Config.Whitelist, username)
    


  (username)
     i, name  (Config.Whitelist) 
         name:() == username:() 
            .(Config.Whitelist, i)
            
        
    



  (message)
     Config.SilentMode  message ==    
    
     ok = (()
         TextChatService.ChatVersion == .ChatVersion.TextChatService 
             channel = TextChatService.TextChannels:()
             channel 
                channel:(message)
            
        
             chatEvents = ReplicatedStorage:()
             sayMessage = chatEvents  chatEvents:()
             sayMessage 
                sayMessage:(message, )
            
        
    )
    
      ok 
        ()
    


  (sender, message)
     sender == LocalPlayer   
      (sender.Name)   Config.OpenMode   

     cleanMessage = .(message)
     senderName = sender.DisplayName  sender.Name
    lastInteractionTime = .()

     Config.AngryMode 
         keyword, replies  (AngryChatResponses) 
             .(cleanMessage, keyword, , ) 
                 reply = replies[.(, #replies)]
                (.(reply, , senderName))
                
            
        
    

     keyword, replies  (ChatResponses) 
         .(cleanMessage, keyword, , ) 
             reply = replies[.(, #replies)]
            (.(reply, , senderName))
            
        
    





 PlayerGui:()  
    PlayerGui.XenoBotGUI:() 
    .()





.(()
      
         waitTime = .(Config.IdleIntervalMin, Config.IdleIntervalMax)
        .(waitTime)
         Config.AutoChatEnabled  (.() - lastInteractionTime) >= waitTime 
             phraseList = Config.AngryMode  Config.AngryIdleMessages  Config.IdleMessages
             #phraseList >  
                 phrase = phraseList[.(, #phraseList)]
                (phrase)
                crypticActive = (Config.AngryMode  phrase == Config.CrypticMessage)
                lastInteractionTime = .()
            
        
    
)




 KeyAliases = {
    Ctrl = .KeyCode.LeftControl,
    Shift = .KeyCode.LeftShift,
    Alt = .KeyCode.LeftAlt,
    Space = .KeyCode.Space,
}

  (keyName)
    keyName = keyName:(, ):(, )
     KeyAliases[keyName]   KeyAliases[keyName] 
     ok, code = (()  .KeyCode[keyName] )
     ok  code   code 
     


 ActiveKeybinds = {}

  (keyName, phrase)
     code = (keyName)
     code  ActiveKeybinds[code] = phrase   
     


 keyName, phrase  (Config.Keybinds)  (keyName, phrase) 

UserInputService.InputBegan:((input, gameProcessed)
     gameProcessed   
     phrase = ActiveKeybinds[input.KeyCode]
     phrase  .(() (phrase) ) 
)




 ScreenGui = .()
ScreenGui.Name = 
ScreenGui.Parent = PlayerGui
ScreenGui.ResetOnSpawn = 
ScreenGui.IgnoreGuiInset = 

 MainFrame = .()
MainFrame.Name = 
MainFrame.Parent = ScreenGui
MainFrame.BackgroundColor3 = Theme.Panel
MainFrame.Position = .(, -, , -)
MainFrame.Size = .(, , , )
MainFrame.Active = 
MainFrame.Draggable = 
(MainFrame, )
(MainFrame, Theme.FieldBorder, , )


 TopBar = .()
TopBar.Parent = MainFrame
TopBar.BackgroundColor3 = Theme.TopBar
TopBar.Size = .(, , , )
(TopBar, )

 Title = .()
Title.Parent = TopBar
Title.Position = .(, , , )
Title.Size = .(, -, , )
Title.BackgroundTransparency = 
Title.Text = Config.BotName:()
Title.TextColor3 = Theme.TextPrimary
Title.Font = .Font.GothamBold
Title.TextSize = 
Title.TextXAlignment = .TextXAlignment.Left


 CloseBtn = .()
CloseBtn.Parent = TopBar
CloseBtn.Size = .(, , , )
CloseBtn.Position = .(, -, , -)
CloseBtn.BackgroundColor3 = Theme.TopBar
CloseBtn.Text = 
CloseBtn.TextColor3 = Theme.TextMuted
CloseBtn.Font = .Font.GothamBold
CloseBtn.TextSize = 
(CloseBtn, )
CloseBtn.MouseButton1Click:(() ScreenGui:() )


 ContentFrame = .()
ContentFrame.Parent = MainFrame
ContentFrame.BackgroundTransparency = 
ContentFrame.Position = .(, , , )
ContentFrame.Size = .(, , , -)
ContentFrame.CanvasSize = .(, , , )
ContentFrame.AutomaticCanvasSize = .AutomaticSize.Y
ContentFrame.ScrollBarThickness = 
ContentFrame.ScrollBarImageColor3 = Theme.Accent

 Layout = .()
Layout.Parent = ContentFrame
Layout.Padding = .(, )
Layout.HorizontalAlignment = .HorizontalAlignment.Center

  (label, getState, onToggle)
     Card = .()
    Card.Size = .(, , , )
    Card.BackgroundColor3 = Theme.Field
    Card.Parent = ContentFrame
    (Card, )
    
     Lbl = .()
    Lbl.Parent = Card
    Lbl.Position = .(, , , )
    Lbl.Size = .(, -, , )
    Lbl.BackgroundTransparency = 
    Lbl.Text = label
    Lbl.TextColor3 = Theme.TextPrimary
    Lbl.Font = .Font.Gotham
    Lbl.TextSize = 
    Lbl.TextXAlignment = .TextXAlignment.Left
    
     Btn = .()
    Btn.Parent = Card
    Btn.Size = .(, , , )
    Btn.Position = .(, -, , -)
    Btn.BackgroundColor3 = ()  Theme.On  Theme.Off
    Btn.Text = 
    (Btn, )
    
    Btn.MouseButton1Click:(()
        ()
        (Btn, {BackgroundColor3 = ()  Theme.On  Theme.Off})
    )


  (placeholder, defaultValue, onCommit)
     Card = .()
    Card.Size = .(, , , )
    Card.BackgroundColor3 = Theme.Field
    Card.Parent = ContentFrame
    (Card, )
    
     Box = .()
    Box.Parent = Card
    Box.Size = .(, -, , )
    Box.Position = .(, , , )
    Box.BackgroundTransparency = 
    Box.Text = (defaultValue)
    Box.PlaceholderText = placeholder
    Box.TextColor3 = Theme.TextPrimary
    Box.PlaceholderColor3 = Theme.TextMuted
    Box.Font = .Font.Gotham
    Box.TextSize = 
    Box.TextXAlignment = .TextXAlignment.Left
    Box.ClearTextOnFocus = 
    
    Box.FocusLost:(() (Box.Text) )



(, ()  Config.FollowEnabled , () Config.FollowEnabled =  Config.FollowEnabled )
(, ()  Config.AutoChatEnabled , () Config.AutoChatEnabled =  Config.AutoChatEnabled )
(, ()  Config.AngryMode , () Config.AngryMode =  Config.AngryMode )
(, ()  Config.SilentMode , () Config.SilentMode =  Config.SilentMode )
(, ()  Config.OpenMode , () Config.OpenMode =  Config.OpenMode )

(, Config.BotName, (text)  text ~=   Config.BotName = text Title.Text = text:()  )
(, Config.FollowDistance, (text) Config.FollowDistance = (text)  Config.FollowDistance )

 StatusLabel = .()
StatusLabel.Parent = ContentFrame
StatusLabel.Size = .(, , , )
StatusLabel.BackgroundTransparency = 
StatusLabel.Text = 
StatusLabel.TextColor3 = Theme.TextMuted
StatusLabel.Font = .Font.Gotham
StatusLabel.TextSize = 




 blockCheckPos = 
 blockCheckTime = .()
 lastFollowUpdate = .()

RunService.Heartbeat:(()
      ScreenGui.Parent   
    
     ok, err = (()
          Config.FollowEnabled 
            StatusLabel.Text = 
            blockCheckPos = 
            
        

         .() - lastFollowUpdate <    
        lastFollowUpdate = .()

         char = LocalPlayer.Character
         root = char  char:()
         hum = char  char:()
          (root  hum)   

         target, dist = , .huge
         _, p  (Players:()) 
             p ~= LocalPlayer  p.Character 
                 otherRoot = p.Character:()
                 otherRoot 
                     d = (root.Position - otherRoot.Position).Magnitude
                     d < dist  dist = d; target = p 
                
            
        

          target   

         dist > Config.FollowDistance 
             targetRoot = target.Character  target.Character:()
             targetRoot 
                hum:(targetRoot.Position)
                StatusLabel.Text =  .. (target.DisplayName  target.Name)

                 .() - blockCheckTime >  
                     blockCheckPos  (root.Position - blockCheckPos).Magnitude <  
                        hum.Jump = 
                    
                    blockCheckPos = root.Position
                    blockCheckTime = .()
                
            
        
            StatusLabel.Text = 
            blockCheckPos = 
        
    )

      ok  .() 
)




  (player, text)
      player  text ==    
    (processMessage, player, text)


 TextChatService.ChatVersion == .ChatVersion.TextChatService 
    TextChatService.MessageReceived:((msg)
         msg.TextSource 
            (Players:(msg.TextSource.UserId), msg.Text)
        
    )

    Players.PlayerAdded:((p) p.Chatted:((m) (p, m) ) )
     _, p  (Players:())  p.Chatted:((m) (p, m) ) 


()

)

  VerityOk 
    ( .. (VerityErr))