(IsStalker(obj)) and (not obj:alive()) and (obj_pos:distance_to_sqr(actor_pos)<4)

function player_instant_corpse_eat()
     for i=1, 65535, 1 do  
         local obj = alife():object(i)  
         if obj then  
             local obj_pos = obj.position  
             local actor_pos = db.actor:position()  
             if IsStalker(obj) and (not obj:alive()0 and (obj_pos:distance_to(actor_pos)<4) then  
                 db.actor.health = -0.05 --для теста, чтобы эффект был заметен  
             elseif IsMonster(obj) and (not obj:alive()) and (obj_pos:distance_to(actor_pos)<4) then  
                 db.actor.health = -0.05 --аналогично  
             end  
         end  
     end
end

function player_instant_corpse_eat()
for i=1, 65535, 1 do
          local obj = alife():object(i)
          if obj then
              local obj_pos = obj.position
              local actor_pos = db.actor:position()
              if IsStalker(obj) and not obj:alive() and obj_pos:distance_to_sqr(actor_pos)<4 then
                  --# Стоим в радиусе двух метров от трупа сталкера
      db.actor.health = -0.05
              elseif IsMonster(obj) and not obj:alive() and obj_pos:distance_to_sqr(actor_pos)<4 then
                  --# Стоит в радиусе двух метров от трупа монстра
      db.actor.health = -0.05
              end
          end
   end
end

db.actor.state == normal

[logic]
active = sr_idle@wait_actor

[sr_idle@wait_actor]
on_actor_inside = nil %=run_postprocess(deadcity_wake_old) =run_cam_effector(camera_mar_02_up)%

db.actor.state == normal

Если ГГ стоит то...