My script

 Players = :()
 Workspace = :()
 UserInputService = :()

 Player = Players.LocalPlayer
 Character = Player.Character  Player.CharacterAdded:()
 Humanoid = Character:()
 Camera = .CurrentCamera

 isRunning = 
 collected = 
 killMode = 
 killedCount = 
 menuOpen = 
 isFrozen = 


 Settings = {
    CollectionInterval = ,
    TeleportInterval = ,
    FarmDelay = ,   
}


 MAX_HEIGHT = 

 chestTypes = {
    [] = ,
    [] = ,
    [] = ,
    [] = ,
    [] = ,
    [] = ,
    [] = ,
    [] = ,
    [] = ,
    [] = ,
}

 chestNames = {
    [] = {,},
    [] = {,},
    [] = {,},
    [] = {,},
    [] = {,},
    [] = {,},
    [] = {,},
    [] = {,},
    [] = {,},
    [] = {,},
}

 ScreenGui = .()
ScreenGui.Parent = Player.PlayerGui
ScreenGui.Enabled = 

 Menu = .()
Menu.Size = .(, , , )
Menu.Position = .(, -, , -)
Menu.BackgroundColor3 = .(, , )
Menu.BackgroundTransparency = 
Menu.BorderSizePixel = 
Menu.BorderColor3 = .(, , )
Menu.Active = 
Menu.Draggable = 
Menu.Parent = ScreenGui

 CloseBtn = .()
CloseBtn.Size = .(, , , )
CloseBtn.Position = .(, -, , )
CloseBtn.BackgroundColor3 = .(, , )
CloseBtn.Text = 
CloseBtn.TextColor3 = .(, , )
CloseBtn.TextScaled = 
CloseBtn.Font = .Font.GothamBold
CloseBtn.Parent = Menu
CloseBtn.MouseButton1Click:(()
    menuOpen = 
    ScreenGui.Enabled = 
)

 Title = .()
Title.Size = .(, , , )
Title.BackgroundTransparency = 
Title.Text = 
Title.TextColor3 = .(, , )
Title.TextScaled = 
Title.Font = .Font.GothamBold
Title.Parent = Menu

 BigCounter = .()
BigCounter.Size = .(, , , )
BigCounter.Position = .(, , , )
BigCounter.BackgroundColor3 = .(, , )
BigCounter.BackgroundTransparency = 
BigCounter.BorderSizePixel = 
BigCounter.BorderColor3 = .(, , )
BigCounter.Parent = Menu

 BigCounterLabel = .()
BigCounterLabel.Size = .(, , , )
BigCounterLabel.BackgroundTransparency = 
BigCounterLabel.Text = 
BigCounterLabel.TextColor3 = .(, , )
BigCounterLabel.TextScaled = 
BigCounterLabel.Font = .Font.GothamBold
BigCounterLabel.Parent = BigCounter

 FreezeBtn = .()
FreezeBtn.Size = .(, , , )
FreezeBtn.Position = .(, , , )
FreezeBtn.BackgroundColor3 = .(, , )
FreezeBtn.Text = 
FreezeBtn.TextColor3 = .(, , )
FreezeBtn.TextScaled = 
FreezeBtn.Font = .Font.GothamBold
FreezeBtn.BorderSizePixel = 
FreezeBtn.Parent = Menu

 Tab1 = .()
Tab1.Size = .(, -, , )
Tab1.Position = .(, , , )
Tab1.BackgroundColor3 = .(, , )
Tab1.Text = 
Tab1.TextColor3 = .(, , )
Tab1.TextScaled = 
Tab1.Font = .Font.GothamBold
Tab1.Parent = Menu

 Tab2 = .()
Tab2.Size = .(, -, , )
Tab2.Position = .(, , , )
Tab2.BackgroundColor3 = .(, , )
Tab2.Text = 
Tab2.TextColor3 = .(, , )
Tab2.TextScaled = 
Tab2.Font = .Font.GothamBold
Tab2.Parent = Menu

 TabContent1 = .()
TabContent1.Size = .(, -, , )
TabContent1.Position = .(, , , )
TabContent1.BackgroundTransparency = 
TabContent1.Parent = Menu

 TabContent2 = .()
TabContent2.Size = .(, -, , )
TabContent2.Position = .(, , , )
TabContent2.BackgroundTransparency = 
TabContent2.Visible = 
TabContent2.Parent = Menu

 ChestScroll = .()
ChestScroll.Size = .(, , , )
ChestScroll.Position = .(, , , )
ChestScroll.BackgroundTransparency = 
ChestScroll.CanvasSize = .(, , , )
ChestScroll.ScrollBarThickness = 
ChestScroll.Parent = TabContent1

 AutoFarmBtn = .()
AutoFarmBtn.Size = .(, , , )
AutoFarmBtn.Position = .(, , , )
AutoFarmBtn.BackgroundColor3 = .(, , )
AutoFarmBtn.Text = 
AutoFarmBtn.TextColor3 = .(, , )
AutoFarmBtn.TextScaled = 
AutoFarmBtn.Font = .Font.GothamBold
AutoFarmBtn.Parent = TabContent1

AutoFarmBtn.MouseButton1Click:(()
    isRunning =  isRunning
     isRunning 
        AutoFarmBtn.Text = 
        AutoFarmBtn.BackgroundColor3 = .(, , )
    
        AutoFarmBtn.Text = 
        AutoFarmBtn.BackgroundColor3 = .(, , )
    
)

 yPos = 
 name, _  (chestTypes) 
     btn = .()
    btn.Size = .(, -, , )
    btn.Position = .(, , , yPos)
    btn.BackgroundColor3 = .(, , )
    btn.Text = name
    btn.TextColor3 = .(, , )
    btn.TextScaled = 
    btn.Font = .Font.GothamBold
    btn.Parent = ChestScroll
    btn.MouseButton1Click:(()
        chestTypes[name] =  chestTypes[name]
         chestTypes[name] 
            btn.Text = name
            btn.BackgroundColor3 = .(, , )
        
            btn.Text = name
            btn.BackgroundColor3 = .(, , )
        
    )
    yPos = yPos + 

ChestScroll.CanvasSize = .(, , , yPos + )

 KillStatus = .()
KillStatus.Size = .(, , , )
KillStatus.Position = .(, , , )
KillStatus.BackgroundTransparency = 
KillStatus.Text = 
KillStatus.TextColor3 = .(, , )
KillStatus.TextScaled = 
KillStatus.Font = .Font.GothamBold
KillStatus.Parent = TabContent2

 KillBtn = .()
KillBtn.Size = .(, , , )
KillBtn.Position = .(, , , )
KillBtn.BackgroundColor3 = .(, , )
KillBtn.Text = 
KillBtn.TextColor3 = .(, , )
KillBtn.TextScaled = 
KillBtn.Font = .Font.GothamBold
KillBtn.Parent = TabContent2

 KillLoopBtn = .()
KillLoopBtn.Size = .(, , , )
KillLoopBtn.Position = .(, , , )
KillLoopBtn.BackgroundColor3 = .(, , )
KillLoopBtn.Text = 
KillLoopBtn.TextColor3 = .(, , )
KillLoopBtn.TextScaled = 
KillLoopBtn.Font = .Font.GothamBold
KillLoopBtn.Parent = TabContent2

 KillCountLabel = .()
KillCountLabel.Size = .(, , , )
KillCountLabel.Position = .(, , , )
KillCountLabel.BackgroundTransparency = 
KillCountLabel.Text = 
KillCountLabel.TextColor3 = .(, , )
KillCountLabel.TextScaled = 
KillCountLabel.Font = .Font.GothamBold
KillCountLabel.Parent = TabContent2

Tab1.MouseButton1Click:(()
    Tab1.BackgroundColor3 = .(, , )
    Tab1.TextColor3 = .(, , )
    Tab2.BackgroundColor3 = .(, , )
    Tab2.TextColor3 = .(, , )
    TabContent1.Visible = 
    TabContent2.Visible = 
)

Tab2.MouseButton1Click:(()
    Tab2.BackgroundColor3 = .(, , )
    Tab2.TextColor3 = .(, , )
    Tab1.BackgroundColor3 = .(, , )
    Tab1.TextColor3 = .(, , )
    TabContent1.Visible = 
    TabContent2.Visible = 
)




 ()
     result = {}
    
     playerPos = Character  Character.PrimaryPart  Character.PrimaryPart.Position  .(, , )
     groundY = playerPos.Y
    
     _, obj  (Workspace:()) 
         part = 
         prompt = 
         name = 
        
         obj:() 
            part = obj
            prompt = obj:()
            name = obj.Name:()
         obj:() 
            prompt = obj:(, )
            part = obj.PrimaryPart  obj:()
            name = obj.Name:()
        
        
         part  prompt  prompt.HoldDuration <=  
             part.Position.Y - groundY <= MAX_HEIGHT 
                 found = 
                 chestName, keywords  (chestNames) 
                     chestTypes[chestName] 
                         _, kw  (keywords) 
                             name:(kw) 
                                .(result, {
                                    Prompt = prompt,
                                    Position = part.Position,
                                    Part = part
                                })
                                found = 
                                
                            
                        
                         found   
                    
                
            
        
    
     result





  ()
    isFrozen = 
    FreezeBtn.Text = 
    FreezeBtn.BackgroundColor3 = .(, , )
    
     Humanoid 
        (() Humanoid.PlatformStand =  )
    
    
     hrp = Character:()
     hrp 
        (()
             bv = hrp:()  .()
            bv.Name = 
            bv.Velocity = .(, , )
            bv.MaxForce = .(.huge, .huge, .huge)
            bv.P = 
            bv.Parent = hrp
        )
    


  ()
    isFrozen = 
    FreezeBtn.Text = 
    FreezeBtn.BackgroundColor3 = .(, , )
    
     Humanoid 
        (() Humanoid.PlatformStand =  )
    
    
     hrp = Character  Character:()
     hrp 
        (()
             bv = hrp:()
             bv  bv:() 
        )
    


FreezeBtn.MouseButton1Click:(()
     isFrozen  ()  () 
)




 ()
     killed = 
     _, obj  (Workspace:()) 
         obj:() 
             isPlayer = 
             _, plr  (Players:()) 
                 obj == plr.Character 
                    isPlayer = 
                    
                
            
             isPlayer   
             obj == Character   
             obj.Name  obj.Name:():()   
             obj.Name  obj.Name:():()   
             hum = obj:()
             hum  hum.Health >  
                (()
                    hum.Health = 
                    hum:()
                    killed = killed + 
                )
            
        
    
     killed >  
        killedCount = killedCount + killed
        KillCountLabel.Text =  .. killedCount
    


 ()
     killMode 
        ()
        ()
    


KillBtn.MouseButton1Click:(()
    ()
)

KillLoopBtn.MouseButton1Click:(()
    killMode =  killMode
     killMode 
        KillLoopBtn.Text = 
        KillLoopBtn.BackgroundColor3 = .(, , )
        KillStatus.Text = 
        KillStatus.TextColor3 = .(, , )
        (KillLoopFunction)
    
        KillLoopBtn.Text = 
        KillLoopBtn.BackgroundColor3 = .(, , )
        KillStatus.Text = 
        KillStatus.TextColor3 = .(, , )
    
)




(()
      
         isRunning 
             player = .Players.LocalPlayer
             character = player.Character
              character 
                (Settings.FarmDelay)
                
            
            
             humanoidRootPart = character:()
              humanoidRootPart 
                (Settings.FarmDelay)
                
            

             chests = ()

             #chests >  
                .(chests, (a, b)
                     (humanoidRootPart.Position - a.Position).Magnitude < (humanoidRootPart.Position - b.Position).Magnitude
                )

                 _, target  (chests) 
                      isRunning   

                     target.Prompt  target.Prompt.Parent 
                         target.Position.Y - humanoidRootPart.Position.Y <= MAX_HEIGHT 
                            humanoidRootPart.CFrame = .(target.Position + .(, , ))
                            (Settings.TeleportInterval)

                            (()
                                (target.Prompt)
                            )
                            (Settings.CollectionInterval)

                            collected = collected + 
                            BigCounterLabel.Text =  .. collected
                        
                    
                
            
        
        
        
        (Settings.FarmDelay)
    
)

UserInputService.InputBegan:((input)
     input.KeyCode == .KeyCode.R 
        menuOpen =  menuOpen
        ScreenGui.Enabled = menuOpen
    
)

Player.CharacterAdded:((char)
    Character = char
    Humanoid = char:()
    .()
     isFrozen  () 
)