lite_treshold = 0.05 -- насколько должно уменьшиться здоровье с предыдущего обновления чтоб экран окрасился в красный
crit_treshold = 0.30 -- насколько должно уменьшиться здоровье с предыдущего обновления чтоб ГГ начало шатать
drop_item_on_crit_prob = 0.20 -- вероятность того что ГГ выронит оружие
effector_power_coeff = 0.7
prev_health = -1
chk_h_t = 0

function wounded_pp_update()
            if (chk_h_t or 0) < time_global() then
              chk_h_t = time_global()+1000
              if prev_health > (db.actor.health + lite_treshold) then
                level.add_pp_effector("fire_hit.ppe", 2011, false)
                local effector_power = (prev_health - db.actor.health)*100*effector_power_coeff
                level.set_pp_effector_factor(2011, effector_power)
                if prev_health > db.actor.health + crit_treshold then
                  level.add_cam_effector("camera_effects\\fusker.anm", 999, false, "")             
                  local snd_obj = xr_sound.get_safe_sound_object([[actor\pain_3]])
                  snd_obj:play_no_feedback(db.actor, sound_object.s2d, 0, vector(), 1.0)
                  if math.random() < drop_item_on_crit_prob then
                    local active_item = db.actor:active_item()
                    if active_item and active_item:section() ~= "bolt" and active_item:section()~= "wpn_knife" then
                      db.actor:drop_item(active_item)
                    end
                  end
                end
              end
              p  rev_health = db.actor.health
            end
end

function actor_binder:update(delta)
          object_binder.update(self, delta)
          local time = time_global()
          game_stats.update (delta, self.object)

effect_blood.wounded_pp_update()