https://yadi.sk/i/cT1ScHvV3VJmkT
https://yadi.sk/i/cT1ScHvV3VJmkT
https://yadi.sk/i/cT1ScHvV3VJmkT
https://yadi.sk/i/ZMOMrndG3VJmtq

function zat_test_actor_has_needed_medic(first_speaker, second_speaker)
local item_sections = {
[1] = "medkit",
[2] = "drug_anabiotic",
[3] = "bandage"
}
local needed = 10
local count = 0
local item_section
local function calc(temp, item)
if item:section() == item_section then
count = count + 1
end
end
for k,v in pairs(item_sections) do
item_section = v
get_story_object("actor"):iterate_inventory(calc, actor)
end
return count >= needed
end

function zat_test_transfer_medic_supplies(first_speaker, second_speaker)
local npc = dialogs.who_is_npc(first_speaker, second_speaker)
local actor = dialogs.who_is_actor(first_speaker, second_speaker)
local i = 10
local j = 0
local section
local item_sections = {
[1] = "medkit",
[2] = "drug_anabiotic",
[3] = "bandage"
}
local function transfer_object_item(temp, item)
if (item:section() == section and i ~= 0) then
actor:transfer_item(item, npc)
i = i - 1
end
end
for k,v in pairs(item_sections) do
section = v
j = i
actor:iterate_inventory(transfer_object_item, nil)
if ((j - i) ~= 0) then
news_manager.relocate_item(actor, "out", section, j - i)
end
end
end