Auto Collect Apple ( [Update 11])

 Players = :()
 Workspace = :()
 TweenService = :()
 CoreGui = :()
 UserInputService = :()

 LocalPlayer = Players.LocalPlayer
 GuiParent = (gethui  ())  CoreGui
 GuiName = 

 .AppleFarmCleanup 
    (.AppleFarmCleanup)


 OldGui = GuiParent:(GuiName)
 OldGui 
    OldGui:()


 AppleFolder = Workspace:()
 FlySpeed = 
 MaxRange = 
 IsFarming = 
 CachedModels = {}
 CurrentTween = 

 AppleNotFoundShown = 
 AppleNotFoundToken = 

 ScreenGui = .()
ScreenGui.Name = GuiName
ScreenGui.ResetOnSpawn = 
ScreenGui.Parent = GuiParent

  (model)
     model  model:() 
         model:().Position
    
     


 AddedConn = 
 RemovingConn = 
 FolderWatchConn = 
 InputConn = 

  (folder)
      folder  AppleFolder == folder  AddedConn   

    AppleFolder = folder
    CachedModels = {}

     AddedConn  AddedConn:() 
     RemovingConn  RemovingConn:() 

     _, obj  (AppleFolder:()) 
         obj:() 
            CachedModels[obj] = 
        
    

    AddedConn = AppleFolder.DescendantAdded:((obj)
         obj:() 
            CachedModels[obj] = 
        
    )

    RemovingConn = AppleFolder.DescendantRemoving:((obj)
         CachedModels[obj] 
            CachedModels[obj] = 
        
    )


 AppleFolder 
    (AppleFolder)


FolderWatchConn = Workspace.ChildAdded:((child)
     child.Name ==  
        (child)
    
)

  ()
    IsFarming = 
    AppleNotFoundToken += 
    AppleNotFoundShown = 

     CurrentTween 
        CurrentTween:()
        CurrentTween = 
    

     AddedConn 
        AddedConn:()
        AddedConn = 
    

     RemovingConn 
        RemovingConn:()
        RemovingConn = 
    

     FolderWatchConn 
        FolderWatchConn:()
        FolderWatchConn = 
    

     InputConn 
        InputConn:()
        InputConn = 
    

     char = LocalPlayer.Character
     hrp = char  char:()

     hrp 
        hrp.Velocity = .(, , )
    


.AppleFarmCleanup = CleanupAll
ScreenGui.Destroying:(CleanupAll)

 MainFrame = .()
MainFrame.Size = .(, , , )
MainFrame.Position = .(, -, , )
MainFrame.BackgroundColor3 = .(, , )
MainFrame.BorderSizePixel = 
MainFrame.Active = 
MainFrame.Draggable = 
MainFrame.Parent = ScreenGui

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

 Title = .()
Title.Size = .(, -, , )
Title.Position = .(, , , )
Title.BackgroundTransparency = 
Title.Text = 
Title.TextColor3 = .(, , )
Title.Font = .Font.GothamBold
Title.TextSize = 
Title.TextXAlignment = .TextXAlignment.Left
Title.Parent = MainFrame

 MinimizeBtn = .()
MinimizeBtn.Size = .(, , , )
MinimizeBtn.Position = .(, -, , )
MinimizeBtn.BackgroundColor3 = .(, , )
MinimizeBtn.Text = 
MinimizeBtn.TextColor3 = .(, , )
MinimizeBtn.Font = .Font.GothamBold
MinimizeBtn.TextSize = 
MinimizeBtn.Parent = MainFrame

 MinCorner = .()
MinCorner.CornerRadius = .(, )
MinCorner.Parent = MinimizeBtn

 CloseBtn = .()
CloseBtn.Size = .(, , , )
CloseBtn.Position = .(, -, , )
CloseBtn.BackgroundColor3 = .(, , )
CloseBtn.Text = 
CloseBtn.TextColor3 = .(, , )
CloseBtn.Font = .Font.GothamBold
CloseBtn.TextSize = 
CloseBtn.Parent = MainFrame

 CloseCorner = .()
CloseCorner.CornerRadius = .(, )
CloseCorner.Parent = CloseBtn

 StatusLabel = .()
StatusLabel.Size = .(, , , )
StatusLabel.Position = .(, , , )
StatusLabel.BackgroundTransparency = 
StatusLabel.Text = 
StatusLabel.TextColor3 = .(, , )
StatusLabel.Font = .Font.Gotham
StatusLabel.TextSize = 
StatusLabel.TextXAlignment = .TextXAlignment.Left
StatusLabel.Parent = MainFrame

 ToggleButton = .()
ToggleButton.Size = .(, , , )
ToggleButton.Position = .(, , , )
ToggleButton.BackgroundColor3 = .(, , )
ToggleButton.Text = 
ToggleButton.TextColor3 = .(, , )
ToggleButton.Font = .Font.GothamMedium
ToggleButton.TextSize = 
ToggleButton.Parent = MainFrame

 BtnCorner = .()
BtnCorner.CornerRadius = .(, )
BtnCorner.Parent = ToggleButton

 CreditLabel = .()
CreditLabel.Size = .(, , , )
CreditLabel.Position = .(, , , -)
CreditLabel.BackgroundTransparency = 
CreditLabel.Text = 
CreditLabel.TextColor3 = .(, , )
CreditLabel.Font = .Font.Gotham
CreditLabel.TextSize = 
CreditLabel.Parent = MainFrame

 OpenBtn = .()
OpenBtn.Size = .(, , , )
OpenBtn.Position = .(, -, , )
OpenBtn.BackgroundColor3 = .(, , )
OpenBtn.Text = 
OpenBtn.TextColor3 = .(, , )
OpenBtn.Font = .Font.GothamBold
OpenBtn.TextSize = 
OpenBtn.Visible = 
OpenBtn.Active = 
OpenBtn.Draggable = 
OpenBtn.Parent = ScreenGui

 OpenCorner = .()
OpenCorner.CornerRadius = .(, )
OpenCorner.Parent = OpenBtn

 OpenStroke = .()
OpenStroke.Color = .(, , )
OpenStroke.Thickness = 
OpenStroke.Parent = OpenBtn

MinimizeBtn.MouseButton1Click:(()
    MainFrame.Visible = 
    OpenBtn.Visible = 
)

OpenBtn.MouseButton1Click:(()
    OpenBtn.Visible = 
    MainFrame.Visible = 
)

CloseBtn.MouseButton1Click:(()
    ScreenGui:()
)

  ()
     currentFolder = Workspace:()

      currentFolder 
        IsFarming = 
        AppleNotFoundToken += 
        AppleNotFoundShown = 

        ToggleButton.Text = 
        ToggleButton.BackgroundColor3 = .(, , )
        StatusLabel.Text = 
        
    

     currentFolder ~= AppleFolder 
        (currentFolder)
    

    IsFarming =  IsFarming

     IsFarming 
        AppleNotFoundShown = 
        AppleNotFoundToken += 

        ToggleButton.Text = 
        ToggleButton.BackgroundColor3 = .(, , )
    
        AppleNotFoundToken += 
        AppleNotFoundShown = 

        ToggleButton.Text = 
        ToggleButton.BackgroundColor3 = .(, , )
        StatusLabel.Text = 

         CurrentTween 
            CurrentTween:()
            CurrentTween = 
        
    


ToggleButton.MouseButton1Click:(ToggleFarm)

InputConn = UserInputService.InputBegan:((input, gameProcessed)
      gameProcessed  input.KeyCode == .KeyCode.Q 
        ()
    
)

  (hrpPosition)
      AppleFolder   AppleFolder.Parent 
         , MaxRange
    

     nearestModel = 
     shortestDist = MaxRange

     model, _  (CachedModels) 
         model  model.Parent  model:(AppleFolder) 
             pos = (model)

             pos 
                 dist = (hrpPosition - pos).Magnitude

                 dist <= shortestDist 
                    shortestDist = dist
                    nearestModel = model
                
            
        
            CachedModels[model] = 
        
    

     nearestModel, shortestDist


  ()
     AppleNotFoundShown 
        
    

    AppleNotFoundShown = 
    AppleNotFoundToken += 

     currentToken = AppleNotFoundToken

    StatusLabel.Text = 

    .(, ()
          ScreenGui   ScreenGui.Parent 
            
        

         IsFarming
             AppleNotFoundShown
             AppleNotFoundToken == currentToken
             StatusLabel.Text ==  

            StatusLabel.Text = 
        
    )


  ()
    AppleNotFoundShown = 
    AppleNotFoundToken += 


.(()
     ScreenGui  ScreenGui.Parent 
        .()

         IsFarming 
              AppleFolder   AppleFolder.Parent 
                IsFarming = 
                AppleNotFoundToken += 
                AppleNotFoundShown = 

                ToggleButton.Text = 
                ToggleButton.BackgroundColor3 = .(, , )
                StatusLabel.Text = 

                 CurrentTween 
                    CurrentTween:()
                    CurrentTween = 
                

                
            

             char = LocalPlayer.Character
             hrp = char  char:()
             humanoid = char  char:()

             hrp  humanoid  humanoid.Health >  
                 targetModel, distance = (hrp.Position)

                 targetModel  IsFarming 
                    ()

                     targetPos = (targetModel)

                     targetPos 
                        StatusLabel.Text = 

                        hrp.Velocity = .(, , )

                         duration = distance / FlySpeed
                         tweenInfo = TweenInfo.(duration, .EasingStyle.Linear)

                        CurrentTween = TweenService:(hrp, tweenInfo, {
                             = .(targetPos + .(, , ))
                        })

                        CurrentTween:()

                         CurrentTween  CurrentTween.PlaybackState == .PlaybackState.Playing 
                              IsFarming
                                  targetModel
                                  targetModel.Parent
                                  ScreenGui
                                  ScreenGui.Parent 

                                CurrentTween:()
                                CurrentTween = 
                                
                            

                            hrp.AssemblyLinearVelocity = .zero
                            .()
                        

                        CurrentTween = 
                    
                
                    ()

                     CurrentTween 
                        CurrentTween:()
                        CurrentTween = 
                    
                
            
        
             AppleFolder  AppleFolder.Parent
                 StatusLabel.Text ~=  

                StatusLabel.Text = 
            
        
    
)