function ItemInInventory takes unit u, integer itemId returns item
    local integer index=0
    local item    indexItem
    local integer i
    loop
        set indexItem = UnitItemInSlot(u, index)
        if indexItem != null and GetItemTypeId(indexItem) == itemId then
            set i=index + 1
        endif
        set index = index + 1
        exitwhen index >= 6
    endloop
    set indexItem=null
    if (i == 0) then
        return null
    else
        return UnitItemInSlot(u, i-1)
    endif
endfunction

function Trig_QuestMobDies_Conditions takes nothing returns boolean
local integer i
local unit u=udg_player_hero[GetPlayerId(GetOwningPlayer(GetKillingUnit()))]
local item it=null
    if GetUnitTypeId(GetTriggerUnit())=='n00H' and GetRandomInt(1,100)<=35 and LoadInteger(udg_h,GetHandleId(u),StringHash("CurrentQuest"))==StringHash("Potion") and GetItemCharges(ItemInInventory(u,'I021'))<7 then
//а если убрать проверку на количество зарядов, то вещи падают. Просто не хочу, чтобы они продолжали падать, когда гер собрал достаточное кол-во
        set it = CreateItem('I021',GetUnitX(GetTriggerUnit()),GetUnitY(GetTriggerUnit()))
        call SetItemUserData(it,GetPlayerId(GetOwningPlayer(u))+1)
    endif
    set u=null
    set it=null
    return false
endfunction