function switch_online(actor, npc)           
local npc = alife():story_object(111)    
       if npc then    
          alife():set_switch_online (npc:id (), true)        
          alife():set_switch_offline (npc:id (), false)        
       end    
end

-- Проверка нахождения актора в особой зоне
function actor_in_zone(pos_psy_x,pos_psy_y,size_psy_x,size_psy_y,z1,z2)
local pos = db.actor:position()
local x1 = pos_psy_x
local x2 = pos_psy_y
local y1 = size_psy_x
local y2 = size_psy_y
if (pos.x >= x1 and pos.x <= x2) and (pos.z >= y1 and pos.z <= y2) and (pos.y >= z1) and (pos.y <= z2) then
  return 1
end
return 0
end

function bla_bla()
local pos = db.actor:position()
       if pos.x>65 and pos.y>30 and pos.z<40 then
          ........
       end
end

esc_close_door, в коде это %-esc_close_door%

[1616]
; cse_abstract properties
section_name = space_restrictor
name = esc_close_door_restrictor
position = -255.506713867188,-20.2865753173828,-127.440452575684
direction = 0,0,0

; cse_alife_object properties
game_vertex_id = 0
distance = 0
level_vertex_id = 594270
object_flags = 0xffffff3e
custom_data = <<END
[logic]
active = sr_idle

[sr_idle]
on_actor_inside = %+esc_close_door%
END

; cse_shape properties
shapes = shape0
shape0:type = box
shape0:axis_x = 2.64159965515137,0,0
shape0:axis_y = 0,2.22759985923767,0
shape0:axis_z = 0,0,2.64159965515137
shape0:offset = 0,0,0

; cse_alife_space_restrictor properties
restrictor_type = 3

[logic]
active = ph_door@locked

[ph_door@locked]
locked = true
snd_open_start = trader_door_unlock
on_info = {+esc_trader_can_leave} ph_door@closed %=play_snd(device\door_servomotor)%

[ph_door@closed]
closed = true
locked = false
on_use = ph_door@open %-esc_close_door%
snd_open_start = trader_door_open_start
snd_close_start = trader_door_close_start
snd_close_stop = trader_door_close_stop

[ph_door@open]
closed = false
locked = false
on_use = ph_door@closed
on_info = {+esc_close_door} ph_door@closed
snd_open_start = trader_door_open_start
snd_close_start = trader_door_close_start
snd_close_stop = trader_door_close_stop

esc_trader_can_leave

function del_esc_trader()
local se_obj = alife():object("escape_trader")
       if se_obj then
         alife():release(se_obj, true)
       end      
local se_obj = alife():object("trader_door")
       if se_obj then
         alife():release(se_obj, true)
       end
local se_obj = alife():object("trader_physic_object0014")
       if se_obj then
         alife():release(se_obj, true)
       end
local se_obj = alife():object("trader_physic_object0013")
       if se_obj then
         alife():release(se_obj, true)
       end
local se_obj = alife():object("physic_object0025")
       if se_obj then
         alife():release(se_obj, true)
       end
end

function del_yan_sahar_door()    
local se_obj = alife():object("door_trader_0000")
     if se_obj then
       alife():release(se_obj, true)
     end
local se_obj = alife():object("door_trader")
     if se_obj then
       alife():release(se_obj, true)
     end
end

%=aes_kill_actor%

function имя_функции()                 
      if (xr_gulag.getGulagPopulation("имя_гулага") <= 1)  --здесь проверяем "больше", "меньше" или "равно"--
          then
--делаем что надо--  
      end  
end

local t
function babki1 ()
      local wpn, b, hp, k, d, e, x   
      wpn = db.actor:item_in_slot(1)  --пулучаем оружие как объект
      b = wpn:cost() --получаем цену пушки
      hp = wpn.health  --получаем состояние пушки
      k = b/100 --получаем коофициент (сколько стоит 1% здоровья пушки)
      e = 1 - hp -- получаем величину: количество здоровья пушки которого не хватает до полного здоровья
      x = k*e    
      t = math.ceil (x) -- получаем стоимость ремонта
      if db.actor:money() >= t and hp < 0.9 then   
          return true
          else
          return false
      end
end

function otd ()
      local npc = level_object_by_sid(515)
      dialogs.relocate_money(npc, t, "out")
end
   

level.map_remove_object_spot(obj.id,"crlc_material", "Припятская пленница")

local ObjId=0
function pda_killer_spawn()
local obj= alife():create("vodka",vector():set(-223.700,-7.678,-129.688),17000,281)
local text = "Водка"
level.map_add_object_spot_ser(obj.id, "blue_location", text) --/blue_location - тип метки
ObjId=obj.id
end

function delete_spot()
for a=1,65534 do --Перебор айди
local obj = alife():object(a)
if obj and obj:section_name() == "vodka" then
level.map_remove_object_spot(obj.id,"blue_location")
break
end
end
end