--# Таблица предметов, которые нужно раздобыть и в последствии отдать.
local need_item = {"bread",8,"kolbasa",6,"conserva",10,"medkit",3,"energy_drink",4,"vodka",10,"medkit_army",1,"antir ad" ,2,"bandage",7}

--# Функция принимает в качестве аргумента таблицу вида:
--# {"section_name", count, "section_name", count, ...}
function predmety_yazhik_complete (p)
local actor = db.actor
--# Есть ли актор? (риторический вопрос)
if actor then
--# Разобъём аргумент (таблицу) на пары, где twain - это секция предмета, который проверяем, а twain+1 - его количество.
for twain = 1, #p, 2 do
--# Для каждой пары секция - количество заведём один счётчик, который будет считать количесвто предметов в инвенторе.
local cnt = 0
--# Перебираем инвентарь ГГ.
actor:iterate_inventory(
function (dummy, item)
--# Если секция совпала, то увеличим сумму.
if item:section() == p[twain] then cnt = cnt + 1 end
end
,nil)
--# Если общая сумма указанного предмета меньше нужной, т.е. не хватает, то заканчиваем счёт и возвращаем соответствующее значение.
if cnt < p[twain+1] then return false end
end
--# Если все предметы есть в указанном количестве - вернём true.
return true
end
--# Если актора не существует вернём false.
return false
end

--# Проверка наличия всех предметов.
function predmety_yazhik_complete1()
return give_have_out_in.predmety_yazhik_complete(need_item)
end

--# Передача всех найденных предметов.
function take_need_item (actor, npc, item_table)
--# Перебираем всю таблиуц нужных предметов, через один элемент.
--# twain - секция
--# twain+1 - количество
for twain = 1, #item_table, 2 do
--# Передаём все предметы в нужном количестве.
for i = 1, twain+1 do
db.actor:transfer_item(twain, npc)
end
end
end

<function_complete>predmety.predmety_yazhik_complete1</function_complete>
<infoportion_set_complete>sidor_ammo_done</infoportion_set_complete>

function predmety_yazhik_complete1()
tbl = {"bread",8,"kolbasa",6,"conserva",10,"medkit",3,"energy_drink",4,"vodka",10,"medkit_army",1,"antirad" ,2,"bandage",7}
for twain = 1, #tbl, 2 do
if not predmety_yazhik_complete (tbl[twain], tbl[twain+1]) then
return false
end
end
return true
end

function predmety_yazhik_complete(section,number)
local actor = db.actor
if actor then
local cnt = 0
actor:iterate_inventory(
function (dummy, item)
if item:section() == section then cnt = cnt + 1 end
end
,nil)
return cnt >= number
end
return false
end