local wounded_time = xr_logic.pstor_retrieve(self.npc, "wounded_time")
   if wounded_time ~= nil and wounded_time <= 200000 then
    xr_sound.set_sound_play(self.npc:id(),"help_thanks")
   end
    
   xr_logic.pstor_store(self.npc, "wounded_time", nil)
  end

  local begin_wounded = xr_logic.pstor_retrieve(self.npc, "begin_wounded")
   local current_time = time_global()
   if begin_wounded ~= nil and current_time - begin_wounded <= 60000 then
    xr_sound.set_sound_play(self.npc:id(), "help_thanks")
   end
    
   xr_logic.pstor_store(self.npc, "begin_wounded", nil)

""use= {=is_wounded} false, {!is_squad_commander} false, {=actor_enemy} false, {=has_enemy} false, {=actor_has_weapon} false, {=dist_to_actor_le(3)} true, false\n"..
"snd_on_use = {=is_wounded} nil, {=actor_enemy} nil, {!is_squad_commander} meet_use_no_talk_leader, {=actor_has_weapon} meet_use_no_weapon, {=has_enemy} meet_use_no_fight, {=dist_to_actor_le(3)} meet_use_no_default, nil\n"..

"use = {=is_wounded} false, {=actor_enemy} false, {=has_enemy} false, {=actor_has_weapon} false, {=dist_to_actor_le(3)} true, false\n"..
"snd_on_use = {=is_wounded} nil, {=actor_enemy} nil, {=actor_has_weapon} meet_use_no_weapon, {=has_enemy} meet_use_no_fight, {=dist_to_actor_le(3)} meet_use_no_default, nil\n"..

if(xr_logic.pick_section_from_condlist(get_story_object("actor"), nil, self.survive)=="true") then
      if(db.actor.health<=h.power) then
                h.power = db.actor.health - 0.05
       if(h.power<0) then
        h.power = 0
       end
      end
     end

function new_sound()
local sound_1 = [[zvuk_1]]
local sound_2 = [[zvuk_2]]
local sound_3 = [[zvuk_3]]
local music = { sound_1,sound_2,sound_3 }
local rand_music = music[math.random(#music)]
local snd_obj
snd_obj = xr_sound.get_safe_sound_object(rand_music)
snd_obj:play_no_feedback(db.actor, sound_object.s2d, 1, vector(), 1.0)
end

--VSm
--VScallback.init()
--VSm

--VSm
--VScallback.OnMutantDeth(victim, who)
--VSm

function get_gulag_members(gname)
     local gulag_members = {}
     local gulag = xr_gulag.get_gulag_by_name(gname)
        if gulag == nil then
      gulag_members[1] = nil
      return gulag_members
     end
     for k,v in pairs(gulag.Object) do
      if (v == true or ( v:alive() and    --     
         not(xr_wounded.is_heavy_wounded_by_id(k) or
             xr_wounded.is_psy_wounded_by_id(k)))) and
       gulag.Object_begin_job[k] == true
      then
       if type(v) ~= "boolean" then
        table.insert(gulag_members,v:id())
       end
      end
     end
     return gulag_members
end

if gulag == nil or gulag.Object == nil then  
     gulag_members[1] = nil  
     return gulag_members
end