Func PickUpLoot()
    Local $lAgent
    Local $aitem
    Local $lDeadlock
    For $i = 1 To GetMaxAgents()
        If GetIsDead(-2) Then Return
        $lAgent = GetAgentByID($i)
        If DllStructGetData($lAgent, 'Type') <> 0x400 Then ContinueLoop
        $aitem = GetItemByAgentID($i)
        If CanPickUp($aitem) Then
            PickUpItem($aitem)
            $lDeadlock = TimerInit()xxxxx
            While GetAgentExists($i)
                Sleep(100)
                If GetIsDead(-2) Then Return
                If TimerDiff($lDeadlock) > 10000 Then ExitLoop
            WEnd
        EndIf
    Next
EndFunc   ;==>PickUpLoot



; Checks if should pick up the given item. Returns True or False
Func CanPickUp($aItem)
    Local $lModelID = DllStructGetData(($aItem), 'ModelID')
    Local $lRarity = GetRarity($aItem)
    If $lModelID == 2511 And GetGoldCharacter() < 99000 Then Return True    ; gold coins (only pick if character has less than 99k in inventory)
    ;If $lModelID > 21785 And $lModelID < 21806 Then Return True    ; Elite/Normal Tomes
    If $lModelID == $ITEM_ID_DYES Then  ; if dye
        Switch DllStructGetData($aItem, "ExtraID")
            Case $ITEM_EXTRAID_BLACKDYE, $ITEM_EXTRAID_WHITEDYE ; only pick white and black ones
                Return False
            Case Else
                Return False
        EndSwitch
    EndIf
    If $lRarity == $RARITY_GOLD             Then Return True; gold items
    If $lModelID == $ITEM_ID_LOCKPICKS      Then Return True ; Lockpicks
    If $lModelID == $ITEM_ID_GLACIAL_STONES Then Return True ; glacial stones
    ; ==== Pcons ====
    If $lModelID == $ITEM_ID_TOTS           Then Return True
    If $lModelID == $ITEM_ID_GOLDEN_EGGS    Then Return True
    If $lModelID == $ITEM_ID_BUNNIES        Then Return True
    If $lModelID == $ITEM_ID_GROG           Then Return True
    If $lModelID == $ITEM_ID_CLOVER         Then Return True
    If $lModelID == $ITEM_ID_PIE            Then Return True
    If $lModelID == $ITEM_ID_CIDER          Then Return True
    If $lModelID == $ITEM_ID_POPPERS        Then Return True
    If $lModelID == $ITEM_ID_ROCKETS        Then Return True
    If $lModelID == $ITEM_ID_CUPCAKES       Then Return True
    If $lModelID == $ITEM_ID_SPARKLER       Then Return True
    If $lModelID == $ITEM_ID_HONEYCOMB      Then Return True
    If $lModelID == $ITEM_ID_VICTORY_TOKEN  Then Return True
    If $lModelID == $ITEM_ID_LUNAR_TOKEN    Then Return True
    If $lModelID == $ITEM_ID_HUNTERS_ALE    Then Return True
    If $lModelID == $ITEM_ID_LUNAR_TOKENS   Then Return True
    If $lModelID == $ITEM_ID_KRYTAN_BRANDY  Then Return True
    If $lModelID == $ITEM_ID_BLUE_DRINK     Then Return True
    If $lModelID == $ITEM_ID_GHOST_IN_A_BOX Then Return True
    If $lModelID == $ITEM_ID_SHAMROCK_ALE   Then Return True

    ; If you want to pick up more stuff add it here
    Return False
EndFunc   ;==>CanPickUp