;Добавлен автозахват цели
snd_gyro  = weapons\binoculars_gyro
snd_zoomin  = weapons\binoculars_zoomin
snd_zoomout       = weapons\binoculars_zoomout

vision_present   = true
vis_frame_speed   = 4   ; скорость, с которой наводится рамка на цель
vis_frame_color   = 0.7,0.7,0.7,1.0    ; цвет рамки RGBA (A) Не учитывается
found_snd    = detectors\DA-2_beep1
;/Добавлен автозахват цели

class                   =  WP_AK74

class                   = WP_BINOC

...
[wpn_sg550_sr]:identity_immunities
GroupControlSection  = spawn_group
discovery_dependency  =                          
$spawn                  = "weapons\sg550_sr"     ; option for Level Editor
$npc      = on    ; option for Level Editor
$prefetch      = 8
scheduled               = off              ; option for ALife Simulator
cform                   = skeleton
class                   = WP_BINOC
min_radius              = 30
max_radius              = 100
description    = enc_arsenal_sg550sr
...
...
;звуки
snd_draw   = weapons\sig550\sig550_draw
snd_holster   = weapons\sig550\holster
snd_shoot   = weapons\sig550\sg550_sr_shot
snd_empty   = weapons\gen_empty, 0.5
snd_reload   = weapons\sig550\sg550_sr_reload, 1.0, 0.15
snd_shoot_grenade  = weapons\m203_shot
snd_reload_grenade    = weapons\sig550\grenload
snd_switch   = weapons\groza_switch, 1.0, 0.5
snd_silncer_shot  = weapons\sig550\sg550_sr_silent, 0.65

;params when silencer is attached                          
;similar to corresponding params without prefix silencer_

;silencer_flame_particles  = weapons\generic_weapon01
silencer_smoke_particles  = weapons\generic_shoot_00

;Добавлен автозахват цели
snd_gyro  = weapons\binoculars_gyro
snd_zoomin  = weapons\binoculars_zoomin
snd_zoomout       = weapons\binoculars_zoomout

vision_present   = true
vis_frame_speed   = 4   ; скорость, с которой наводится рамка на цель
vis_frame_color   = 0.7,0.7,0.7,1.0    ; цвет рамки RGBA (A) Не учитывается
found_snd    = detectors\DA-2_beep1
;/Добавлен автозахват цели

[wpn_sg550sr_sk1_hud]
allow_inertion   = true
shell_point                 = -0.008, 0.015, -0.80
shell_dir     = 0.0, 0.0, 0.0
...
...

-- Износ холодного оружия
                            if active_slot == 0 then
                             wpn:set_condition(wpn:condition()-level.get_game_difficulty()*0.001)
                            end

babah.update(delta)
                      amk.oau_watchdog=178
                             marsh_radiation.update()
                             danger.enemy_calmdown()
                             lightning.strike_if_needed()

babah.update(delta)
                      amk.oau_watchdog=178
                           -- marsh_radiation.update()
                             danger.enemy_calmdown()
                             lightning.strike_if_needed()

{+agr_krot_band_done}

function actor_binder:update(delta)

db.actor:give_info_portion("agr_krot_band_done")

function actor_binder:update(delta)
db.actor:give_info_portion("agr_krot_band_done")
-- malandrinus

<has_info>foto_ohota_white_wolf</has_info>

<!-- Возвращаемся к Аазу -->
<dialog id="ohota_wolf_done">
             <!-- <has_info>ohota_wolf_have</has_info> -->
             <!-- <has_info>ohota_wolf_start</has_info> -->
             <!-- <has_info>foto_ohota_white_wolf</has_info> -->
             <!-- <dont_has_info>ohota_wolf_done</dont_has_info> -->
             <!-- <dont_has_info>ohota_wolf_fail</dont_has_info> -->
<phrase_list>

db.actor:give_info_portion("ohota_dog1_dead")
db.actor:give_info_portion("ohota_dog2_dead")

db.actor:give_info_portion("cat_kulon_have")

db.actor:give_info_portion("kuznec_sucker_dead")

volna_sak_battle

volna_sak_test

volna_sak_have

--elseif dik == DIK_keys.DIK_M then self:matants()

elseif dik == DIK_keys.DIK_M then
db.actor:give_info_portion("upi_sdelka_poneslas")
--sak.create_items_actor("blocknot_saharova",1) --Блокнот Сахарова. Перед строкой убрать 2 тире если нужен этот блокнот

db.actor:give_info_portion("upi_sdelka_poneslas")

db.actor:give_info_portion("stealth_find_pda_have1")
db.actor:give_info_portion("stealth_find_pda_have2")
db.actor:give_info_portion("stealth_find_pda_have3")
db.actor:give_info_portion("stealth_find_pda_have4")
db.actor:give_info_portion("stealth_find_pda_have5")

<action>kostya_dialog.stealth2_done</action>
<give_info>stealth2_done</give_info>
<action>dialogs.break_dialog</action>

<give_info>stealth_find_pda_have1</give_info>
<give_info>stealth_find_pda_have2</give_info>
<give_info>stealth_find_pda_have3</give_info>
<give_info>stealth_find_pda_have4</give_info>
<give_info>stealth_find_pda_have5</give_info>

db.actor:give_info_portion("kot_find_rabi_djoker_vodka")

<infoportion_complete>kot_find_rabi_have</infoportion_complete>

doktor_lekar1_have - поговорить с Доктором.
doktor_lekar1_done - завершение квеста.

local look_radius_box = 10

--elseif dik == DIK_keys.DIK_M then self:matants()

elseif dik == DIK_keys.DIK_M then
                         npc_drug()

function npc_drug() -- Делаем непися другом
                        local npc = level_object_by_sid(022) --( ... ) сюда писать story_id из алл.спавна. 022 - это Фанат.
                          if npc and npc:alive() then
                            npc:set_relation(game_object.friend, db.actor)
                          end
end

elseif db.actor~=nil and dik==DIK_keys.DIK_I then
db.actor:set_character_community("stranger", 0, 0) -- ветка Монгола

elseif db.actor~=nil and dik==DIK_keys.DIK_I then
sak.set_community(actor, npc)

function t_zonedocs(location)
                      local a, se_obj
                   for i=1,table.getn(zonedocs[location]) do
                    a = zonedocs
                    [location][i]se_obj = alife():create("zonedocs".."_"..tostring(i), vector():set(a.position.x,a.position.y,a.position.z), a.lv, a.gv)
                   end
                   -- Дубликаты
                   if     location=="agro" then
                    local se_obj = alife():create("zonedocs_26",vector():set(-72.308654785156,2.4818267822266,-116.6388092041),3256,797)
                   elseif location=="dt" then
                    local se_obj = alife():create("zonedocs_22",vector():set(85.389030456543,4.3991627693176,146.19708251953),30402,1221)
                   end
end

function t_zonedocs(location)
                     local a, se_obj
                  for i=1,table.getn(zonedocs[location]) do
                   a = zonedocs
                   [location][i]se_obj = alife():create("zonedocs".."_"..tostring(i), vector():set(a.position.x,a.position.y,a.position.z), a.lv, a.gv)
                     level.map_add_object_spot_ser(se_obj.id, "artefact_location", "Документ Воронина "..tostring(i))
                  end
                  -- Дубликаты
                  if     location=="agro" then
                   local se_obj = alife():create("zonedocs_26",vector():set(-72.308654785156,2.4818267822266,-116.6388092041),3256,797)
                     level.map_add_object_spot_ser(se_obj.id, "artefact_location", "Документ Воронина 26")
                  elseif location=="dt" then
                   local se_obj = alife():create("zonedocs_22",vector():set(85.389030456543,4.3991627693176,146.19708251953),30402,1221)
                     level.map_add_object_spot_ser(se_obj.id, "artefact_location", "Документ Воронина 22")
                  end
end

-- спавн снайперов и Снегиря на ЧАЭС2
function create_snegir_2chaes()
local snipers = {
                 {position={x=409.23071289063,y=36.875762939453,z=86.418243408203},gv=2600,lv=139080,look=1},
                 {position={x=172.48136901855,y=70.372261047363,z=125.20753479004},gv=2573,lv=70575,look=1},
...
...
}

-- спавн снайперов и Снегиря на ЧАЭС2
function create_snegir_2chaes()
local snipers = {
                 {position={x=409.23071289063,y=36.875762939453,z=86.418243408203},gv=2600,lv=139080,look=1}
}

function fli_chaes_set_range()
    local object_all
    for k, v in pairs (db.storage) do
  object_all = level.object_by_id(k)

  if object_all and object_all:section() == "fli_snp1" and object_all:alive() then
   object_all:set_range(450) -- 450 меняем на 10
  end
    end
end

updatable_binders[self.object:id()] = self

self.particle = amk_particle.amk_particle({["particle"] = "anomaly2\\gravity_damage_02_smoke",["pos"] = self.object:position()}) --подсвечиваем рестрикторы

function restrictor_binder:net_destroy()

if self.particle and not self.particle:is_finished() then self.particle:stop() end -- снимаем подсветку рестрикторов

-- Spawn
elseif db.actor~=nil and dik==DIK_keys.DIK_1 then
alife():create("ammo_9x39_sp5",db.actor:position(),db.actor:level_vertex_id(),db.actor:game_vertex_id(),db.actor:id())
elseif db.actor~=nil and dik==DIK_keys.DIK_2 then
alife():create("ammo_23x76_shrap",db.actor:position(),db.actor:level_vertex_id(),db.actor:game_vertex_id(),db.actor:id())
elseif db.actor~=nil and dik==DIK_keys.DIK_3 then
alife():create("ammo_5.45x39_izomorf",db.actor:position(),db.actor:level_vertex_id(),db.actor:game_vertex_id(),db.actor:id())
elseif db.actor~=nil and dik==DIK_keys.DIK_4 then
alife():create("ammo_5.56x45_gd",db.actor:position(),db.actor:level_vertex_id(),db.actor:game_vertex_id(),db.actor:id())
elseif db.actor~=nil and dik==DIK_keys.DIK_5 then
alife():create("wpn_abakan_m2",db.actor:position(),db.actor:level_vertex_id(),db.actor:game_vertex_id(),db.actor:id())
elseif db.actor~=nil and dik==DIK_keys.DIK_6 then
alife():create("wpn_oicw",db.actor:position(),db.actor:level_vertex_id(),db.actor:game_vertex_id(),db.actor:id())
elseif db.actor~=nil and dik==DIK_keys.DIK_7 then
alife():create("wpn_oicw",db.actor:position(),db.actor:level_vertex_id(),db.actor:game_vertex_id(),db.actor:id())
elseif db.actor~=nil and dik==DIK_keys.DIK_8 then
alife():create("wpn_m16a2_sk1_otdaca_ves",db.actor:position(),db.actor:level_vertex_id(),db.actor:game_vertex_id(),db.actor:id())
elseif db.actor~=nil and dik==DIK_keys.DIK_9 then
alife():create("red_mozg",db.actor:position(),db.actor:level_vertex_id(),db.actor:game_vertex_id(),db.actor:id())
elseif db.actor~=nil and dik==DIK_keys.DIK_0 then
alife():create("af_inferno",db.actor:position(),db.actor:level_vertex_id(),db.actor:game_vertex_id(),db.actor:id())
-- /Spawn

function getColor(obj)

local partOnBelt = inventory.on_belt("bioradar2")

local partOnBelt = inventory.on_belt("bioradar2") or inventory.on_belt("bioradar")

-- condition - диапазон состояний выпавших бронежилетов и оружия
-- probability_outfit - вероятность выпадения бронежилетов
local data_by_community = {
             default = { -- значения по-умолчанию для неизвестной группировки
              condition = {min = 5, max = 95}, -- состояние от и до
              probability_outfit = 15 -- вероятность выпадения брони
             },
             communities = {
              ["military"]    = {
               condition   = {min = 35, max = 75},
               probability_outfit    = 20
              },

-- Атака насекомых при приближении к чумному зомби
if self.object:section()=="zombie_plague" then
           if self.object:alive() and self.object:position():distance_to(db.actor:position()) < 10 then -- эффект хита при расстоянии меньше 10м
            level.add_pp_effector("dead_zone.ppe", 1001, true)
            level.set_pp_effector_factor(1001, 0.1)
...

-- Атака насекомых при приближении к комариному зомби
if self.object:section()=="zombie_plague_komar" then
           if self.object:alive() and self.object:position():distance_to(db.actor:position()) < 12 then -- эффект хита при расстоянии меньше 12м
            level.add_pp_effector("total_recall.ppe", 1002, true)
            level.set_pp_effector_factor(1002, 0.1)
...

; Варлаб
[nano_tel_1]:zone_teleport_out    -- эту строку приводим в такой вид [nano_tel_1]:zone_teleport
teleport   = standart
script_binding           = bind_mteleport.bind
radius    = 0.5
poz_x    = 29.784
poz_y    = -8.027
poz_z    = 11.162

...
if not dist then dist = 13 end -- дистанция захвата
...
if not self.target then
self:capture(0.999,13)

-- amk.start_timer("run5", 0.5, "fly.wrong_fly()")

function returner_allowed()
    if has_alife_info("no_teleport_near_heli_btr") and not (has_alife_info("snpt_jupiter5_have3") and not has_alife_info("snpt_jupiter6_done")) then    
     news_manager.send_tip(db.actor, "Возвращение из района скопления вражеских сил невозможно по техническим причинам. Для восстановления функциональности устраните угрозу.", nil, "nano", 20000)
     return false
    elseif db.actor:active_item() then
     news_manager.send_tip(db.actor, "Возвращатель не работает при наличии в руках любого предмета или оружия. Для восстановления функциональности исправьте ситуацию.", nil, "nano", 20000)
     return false
    elseif actor_is_in_danger() then
     return false
    elseif not returner_pos then    
     news_manager.send_tip(db.actor, "Не задана позиция возвращения. Для установки позиции нажмите дважды клавишу Возвращателя.", nil, "nano", 20000)
     return false
    elseif returner_pos:distance_to_xz(db.actor:position()) > 30 then    
     news_manager.send_tip(db.actor, "Возвращение невозможно из-за слишком большого расстояния. Для смены позиции нажмите дважды клавишу Возвращателя.", nil, "nano", 20000)
     return false
    elseif returner_pos:distance_to(db.actor:position()) < 1 then    
     news_manager.send_tip(db.actor, "Слишком малое расстояние между текущей и заданной позицией. Для выполнения возвращения нужно отойти подальше.", nil, "nano", 20000)
     return false
    end
    return true
end

function returner_allowed()
           if not returner_pos then
               news_manager.send_tip(db.actor, "Не задана позиция возвращения. Для установки позиции нажмите дважды клавишу Возвращателя.", nil, "nano", 20000)
return false
       end
return true
end

-- фото монстров и неписей
function foto_binder:check_creatures()
  local clsid, section
   
  for id,obj in pairs(db.creatures) do
   clsid = obj:clsid()
   section = obj:section()
    
   -- монстры
   if IAmAMonster [clsid]and obj:alive() and db.actor:see(obj) and not protected_items.is_monster_friend(section) then
    -- сначала смотрим тихую охоту
    if  (has_alife_info("silent_hunt_start") and not has_alife_info("silent_hunt_done")) and
     (silent_hunt_monsters [clsid]and not has_alife_info("monster_stealth_"..silent_hunt_monsters[clsid])) and
     self:obj_in_shot(obj:bone_position("bip01_head"), 0, 2, 3.5, true, nil, true)
    then
     -- удачный снимок и такого еще не было
     news_manager.send_tip(db.actor, "%c[255,160,160,160]".."МЕЧЕНЫЙ:".."\\n".."%c[255,255,128,128]Захар, я подкрался к очередному монстру и успешно его сфотографировал.".."".."\n", nil, nil, 15000)
     news_manager.send_tip(db.actor, "%c[255,160,160,160]".."ЗАХАР:".."\\n".."%c[255,255,128,128]Отлично. Неси фото и ищи следующего.".."\n", 15, nil, 15000)
     db.actor:give_info_portion("monster_stealth_"..silent_hunt_monsters[clsid])
     return true
      
    -- затем фото уникальных монстров
    elseif  
     foto_unique_monster [section]and  
     has_alife_info(foto_unique_monster[section].has_info) and not has_alife_info(foto_unique_monster[section].info) and
     self:obj_in_shot(obj:center(), 5, 10, 3.0, false, nil, false)
    then
     -- удачный снимок и такого еще не было
     news_manager.send_tip(db.actor, "Уникальный монстр сфотографирован.".."\n", nil, nil, 10000)
     db.actor:give_info_portion(foto_unique_monster[section].info)
     return true

    -- затем обычную охоту
    elseif (has_alife_info("foto_ohota_start") and not has_alife_info("foto_ohota_done")) and
     foto_ohota_monsters [section]and not has_alife_info(foto_ohota_monsters[section]) and
     self:obj_in_shot(obj:center(), 5, 10, 3.0, false, nil, false)
    then
     -- удачный снимок и такого еще не было
     news_manager.send_tip(db.actor, "Монстр сфотографирован.".."\n", nil, nil, 10000)

     db.actor:give_info_portion(foto_ohota_monsters[section])

     return true
    end
   end
  end
   
  return false
end

-- фото аномалий
function foto_binder:check_anomaly()
  if not has_alife_info("foto_ohota_start") or has_alife_info("foto_anomaly_done") then return false end

  local anoms = amk_anoms.get_anomaly_list(db.actor, 10)
  for anom_sect, info in pairs(foto_ohota_anomaly) do
   if not has_alife_info(info) then
    -- такого снимка еще не было, смотрим аномалии
    for _, anom in ipairs(anoms) do  -- внутри это: {id=id,name=obj:name(),pos=o.pos,radius=o.radius}
     if string.find(anom.name, anom_sect) and self:obj_in_shot(anom.pos, 5, 10, 3.5, false, nil, false) then
      -- удачный снимок
      news_manager.send_tip(db.actor, "Аномалия сфотографирована.".."\n", nil, nil, 10000)
      db.actor:give_info_portion(info)
      return true
     end
    end
   end
  end
   
  return false
end

-- фото монстров и неписей
function foto_binder:check_creatures()
  local clsid, section
   
  for id,obj in pairs(db.creatures) do
   clsid = obj:clsid()
   section = obj:section()
    
   -- монстры
   if IAmAMonster [clsid]--[[and obj:alive() and db.actor:see(obj)]] and not protected_items.is_monster_friend(section) then
    -- сначала смотрим тихую охоту
    if  (has_alife_info("silent_hunt_start") and not has_alife_info("silent_hunt_done")) and
     (silent_hunt_monsters [clsid]and not has_alife_info("monster_stealth_"..silent_hunt_monsters[clsid])) --and
     --self:obj_in_shot(obj:bone_position("bip01_head"), 0, 2, 3.5, true, nil, false)
    then
     -- удачный снимок и такого еще не было
     news_manager.send_tip(db.actor, "%c[255,160,160,160]".."МЕЧЕНЫЙ:".."\\n".."%c[255,255,128,128]Захар, я подкрался к очередному монстру и успешно его сфотографировал.".."".."\n", nil, nil, 15000)
     news_manager.send_tip(db.actor, "%c[255,160,160,160]".."ЗАХАР:".."\\n".."%c[255,255,128,128]Отлично. Неси фото и ищи следующего.".."\n", 15, nil, 15000)
     db.actor:give_info_portion("monster_stealth_"..silent_hunt_monsters[clsid])
     return true
      
    -- затем фото уникальных монстров
    elseif  
     foto_unique_monster [section]and  
     has_alife_info(foto_unique_monster[section].has_info) and not has_alife_info(foto_unique_monster[section].info) and
     self:obj_in_shot(obj:center(), 5, 10, 3.0, false, nil, false)
    then
     -- удачный снимок и такого еще не было
     news_manager.send_tip(db.actor, "Уникальный монстр сфотографирован.".."\n", nil, nil, 10000)
     db.actor:give_info_portion(foto_unique_monster[section].info)
     return true

    -- затем обычную охоту
    elseif (has_alife_info("foto_ohota_start") and not has_alife_info("foto_ohota_done")) and
     foto_ohota_monsters [section]and not has_alife_info(foto_ohota_monsters[section]) --and
     --self:obj_in_shot(obj:center(), 5, 10, 3.0, false, nil, false)
    then
     -- удачный снимок и такого еще не было
     news_manager.send_tip(db.actor, "Монстр сфотографирован.".."\n", nil, nil, 10000)
     for k,v in pairs(foto_ohota_monsters) do
      db.actor:give_info_portion(v)
     end
     return true
    end
   end
  end
   
  return false
end

-- фото аномалий
function foto_binder:check_anomaly()
  if not has_alife_info("foto_ohota_start") or has_alife_info("foto_anomaly_done") then return false end

  local anoms = amk_anoms.get_anomaly_list(db.actor, 1000)
  for anom_sect, info in pairs(foto_ohota_anomaly) do
   if not has_alife_info(info) then
    -- такого снимка еще не было, смотрим аномалии
    for _, anom in ipairs(anoms) do  -- внутри это: {id=id,name=obj:name(),pos=o.pos,radius=o.radius}
     if string.find(anom.name, anom_sect) --[[and self:obj_in_shot(anom.pos, 5, 10, 3.5, false, nil, false)]] then
      -- удачный снимок
      news_manager.send_tip(db.actor, "Аномалия сфотографирована.".."\n", nil, nil, 10000)
      db.actor:give_info_portion(info)
      return true
     end
    end
   end
  end
   
  return false
end

-- Ножи, которыми можно отрезать
local knives = {
    "wpn_addon_shtyk_nozh",
    "wpn_bat_a",
    "wpn_bat_b",
    "wpn_elf",
    "wpn_knif2",
    "wpn_knif3",
    "wpn_knif4",
    "wpn_knifa",
    "wpn_knife",
    "wpn_knife_m",
    "wpn_knife_n",
    "wpn_knife_new",
    "wpn_machete",
    "wpn_kukri",
    "wpn_topor",
}

-- Ножи, которыми можно отрезать
local knives = {
}

function actor_has_knife()
    for i, section in ipairs(knives) do
  if db.actor:object(section) or db.actor:object("fake_"..section) then
   return true
  end
    end
    return false
end

function actor_has_knife()
    for i, section in ipairs(knives) do
  if db.actor:object(section) or db.actor:object("fake_"..section) then
   return true
  end
    end
    return true
end

function on_part_take(obj)
    if not monster or not rx_utils.read_from_ini(nil, obj:section(), "monster_part", false, 0) then return end

    if actor_has_knife() then
  local difficulty = level.get_game_difficulty()
  if difficulty > 0 then
   bind_stalker.hide_weapon()
   --snp.move_off() -- обездвиживание отключено
   amk.remove_timer("monster_parts")
   amk.start_timer("monster_parts", difficulty*2, 0)
   --amk.start_timer("move_on", difficulty, 0) -- обездвиживание отключено
  end
  
  level.start_stop_menu(level.main_input_receiver(), true)
  if snd and snd:playing() then
   snd:stop()
  end
  snd = xr_sound.get_safe_sound_object("zwuk\\inv_mutant_loot_"..math.random(1,9))
  snd:play_at_pos(db.actor, vector(), 0, sound_object.s2d)

    else
  db.actor:transfer_item(obj, monster)
    end
end

function on_part_take(obj)
    if not monster or not rx_utils.read_from_ini(nil, obj:section(), "monster_part", false, 0) then return end

    if actor_has_knife() or not actor_has_knife() then
  local difficulty = level.get_game_difficulty()
  if difficulty > 0 then
   bind_stalker.hide_weapon()
   --snp.move_off() -- обездвиживание отключено
   amk.remove_timer("monster_parts")
   amk.start_timer("monster_parts", difficulty*2, 0)
   --amk.start_timer("move_on", difficulty, 0) -- обездвиживание отключено
  end
  
  level.start_stop_menu(level.main_input_receiver(), true)
  if snd and snd:playing() then
   snd:stop()
  end
  snd = xr_sound.get_safe_sound_object("zwuk\\inv_mutant_loot_"..math.random(1,9))
  snd:play_at_pos(db.actor, vector(), 0, sound_object.s2d)

    else
  db.actor:transfer_item(obj, monster)
    end
end

<string id="doctor_vybros_0">
<text>Доктор, задолбал уже этот выброс на ЧАЭС, может пошаманишь?</text>
</string>
<string id="doctor_vybros_1">
<text>Глотни-ка аспиринчику, глядишь и полегчает.</text>
</string>
<string id="doctor_vybros_2">
<text>Золото, ты, а не человек!</text>
</string>

<specific_character id="doktor" team_default = "1">

<actor_dialog>trade_dialog_doktor</actor_dialog>

<actor_dialog>doctor_vybros</actor_dialog>

<info_portion id="stop_blowout">
</info_portion>

<dialog id="doctor_vybros">
<dont_has_info>stop_blowout</dont_has_info>
<phrase_list>
<phrase id="0">
<text>doctor_vybros_0</text>
<next>1</next>
</phrase>
<phrase id="1">
<text>doctor_vybros_1</text>
<action>arhara_dialog.dell_duratskiy_timer</action>
<next>2</next>
</phrase>
<phrase id="2">
<text>doctor_vybros_2</text>
<give_info>stop_blowout</give_info>
</phrase>
</phrase_list>
</dialog>

function dell_duratskiy_timer()
local se_obj = alife():object("aes2_space_restrictor_death_0000")
if se_obj then
alife():release(se_obj, true)
end
end

elseif  dik == DIK_keys.DIK_Q then
           self:OnMessageQuitWin()

elseif db.actor~=nil and dik==DIK_keys.DIK_I then
sak.add_new_to_peshera1()

function snpt_jupiter5_have2()
    if has_alife_info("snpt_jupiter5_fail") then return end

    db.actor:give_info_portion("snpt_jupiter5_have1")
    --[[local p={
        {position={x=363.57598876953,y=27.446691513062,z=-199.10688781738},gv=3741,lv=1292568},
        {position={x=448.03466796875,y=27.67280960083,z=-164.00025939941},gv=3741,lv=1427096},
        {position={x=373.82931518555,y=27.448501586914,z=-195.63957214355},gv=3741,lv=1308599},
        {position={x=329.47528076172,y=27.650470733643,z=-168.52958679199},gv=3741,lv=1243576},
        {position={x=353.50900268555,y=28.190092086792,z=-159.15997314453},gv=3741,lv=1278942},
        {position={x=374.54891967773,y=27.489912033081,z=-174.95315551758},gv=3741,lv=1309630},
        {position={x=356.46075439453,y=28.496633529663,z=-152.48675537109},gv=3741,lv=1282778},
        {position={x=453.34948730469,y=26.964168548584,z=-121.35138702393},gv=3741,lv=1436029},
        {position={x=435.44659423828,y=27.529432296753,z=-148.63513183594},gv=3741,lv=1405378},
        {position={x=421.47744750977,y=27.673887252808,z=-161.87846374512},gv=3741,lv=1381590},
        {position={x=434.01824951172,y=27.674629211426,z=-179.73728942871},gv=3741,lv=1402829},
        {position={x=382.095703125,y=27.631851196289,z=-188.90495300293},gv=3741,lv=1320360},
        {position={x=334.22894287109,y=28.79377746582,z=-147.85690307617},gv=3741,lv=1249755},
        {position={x=412.97665405273,y=27.673191070557,z=-175.97169494629},gv=3741,lv=1367973}
    }
    local a
    for i=1,#p do
        a = p
        [i]amk_mod.spawn_military_tech_pack(alife():create("vehicle_btr",vector():set(a.position.x,a.position.y,a.position.z),a.lv,a.gv),"vehicle_btr", "scripts\\snp\\btr.ltx")
    end]]
end

elseif  dik == DIK_keys.DIK_Q then
                             self:OnMessageQuitWin()

elseif db.actor~=nil and dik==DIK_keys.DIK_I then
    local obj = alife():object("veh_car_baggi")
    if obj then alife():release(obj) end -- если багги в игре, то удаляем
    alife():create(13236) -- спавним даже если нету.

function borov_bottle_spawn()
    alife():create("quest_vodka",vector():set(50.144065856934,1.9814517498016,-37.293888092041),238905,990)
    alife():create("quest_vodka",vector():set(50.127235412598,1.982654094696,-33.908508300781),238907,990)
...
...
  spawn_restrictor.borov_otboi_sr1()

function borov_bottle_spawn()
    alife():create("quest_vodka",vector():set(50.144065856934,1.9814517498016,-37.293888092041),238905,990)
  spawn_restrictor.borov_otboi_sr1()

db.actor:give_info_portion("borov_bottle_have")

-- спавн снайперов и Снегиря на ЧАЭС2
function create_snegir_2chaes()
local snipers = {
          {position={x=409.23071289063,y=36.875762939453,z=86.418243408203},gv=2600,lv=139080,look=1},
          {position={x=172.48136901855,y=70.372261047363,z=125.20753479004},gv=2573,lv=70575,look=1},
          {position={x=189.91955566406,y=70.372077941895,z=141.20712280273},gv=2573,lv=75777,look=1},
          {position={x=305.48309326172,y=11.397486686707,z=96.222267150879},gv=2593,lv=104572,look=1},
          {position={x=358.35037231445,y=11.404424667358,z=113.97929382324},gv=2593,lv=116488,look=1},
          {position={x=410.96298217773,y=36.876304626465,z=119.66000366211},gv=2600,lv=139448,look=1},
          {position={x=483.32315063477,y=59.435405731201,z=146.46691894531},gv=2632,lv=154803,look=1},
          {position={x=575.15216064453,y=24.998668670654,z=199.3540802002},gv=2628,lv=171982,look=1},
          {position={x=575.46990966797,y=24.998685836792,z=193.50148010254},gv=2628,lv=171966,look=1},
          {position={x=575.46771240234,y=24.998683929443,z=187.53498840332},gv=2628,lv=171950,look=1},
                   
          {position={x=575.58471679688,y=24.998687744141,z=181.55274963379},gv=2628,lv=171932,look=1},
          {position={x=553.11633300781,y=18.204418182373,z=267.35687255859},gv=2614,lv=165993,look=1},
          {position={x=533.80627441406,y=18.204002380371,z=269.17105102539},gv=2614,lv=163676,look=1},
          {position={x=518.12701416016,y=18.204000473022,z=267.62637329102},gv=2617,lv=161848,look=1},
          {position={x=488.64236450195,y=18.204389572144,z=267.44641113281},gv=2617,lv=156302,look=1},
          {position={x=487.60028076172,y=18.204246520996,z=281.50741577148},gv=2617,lv=156129,look=1},
          {position={x=488.5290222168,y=27.301128387451,z=284.16500854492},gv=2616,lv=156316,look=1},
          {position={x=519.97094726563,y=28.126697540283,z=291.35888671875},gv=2616,lv=162105,look=1},
          {position={x=507.25091552734,y=13.127098083496,z=195.16532897949},gv=2604,lv=160721,look=1},
          {position={x=480.55364990234,y=13.12659740448,z=213.30813598633},gv=2604,lv=154394,look=1},
                   
          {position={x=378.89047241211,y=11.81697845459,z=209.43588256836},gv=2605,lv=125814,look=1},
          {position={x=362.09072875977,y=14.598697662354,z=267.74829101563},gv=2585,lv=118040,look=1},
          {position={x=378.65679931641,y=15.876114845276,z=270.78552246094},gv=2585,lv=125898,look=1},
          {position={x=389.32849121094,y=15.540486335754,z=343.87194824219},gv=2584,lv=131027,look=1},
          {position={x=264.71508789063,y=16.754657745361,z=421.22540283203},gv=2579,lv=94170,look=2},
          {position={x=230.45460510254,y=16.754398345947,z=380.94827270508},gv=2580,lv=83132,look=2},
          {position={x=177.38592529297,y=16.74927520752,z=317.06820678711},gv=2580,lv=72210,look=2},
          {position={x=273.54168701172,y=4.4994444847107,z=395.80023193359},gv=2581,lv=97247,look=2},
          {position={x=264.78759765625,y=4.4987468719482,z=382.75961303711},gv=2581,lv=94097,look=2},
          {position={x=273.51214599609,y=4.4987468719482,z=332.58352661133},gv=2581,lv=97087,look=2},
                   
          {position={x=243.16813659668,y=4.498553276062,z=305.07571411133},gv=2582,lv=87074,look=2},
          {position={x=237.28952026367,y=4.4997248649597,z=292.40936279297},gv=2582,lv=84688,look=2},
          {position={x=154.32054138184,y=16.755195617676,z=292.70745849609},gv=2553,lv=67047,look=2},
          {position={x=54.741218566895,y=28.198616027832,z=331.54794311523},gv=2543,lv=49546,look=2},
          {position={x=40.902587890625,y=28.190008163452,z=287.2868347168},gv=2544,lv=43210,look=2},
          {position={x=54.641830444336,y=28.198602676392,z=263.18823242188},gv=2545,lv=49448,look=2},
          {position={x=257.0188293457,y=50.00891494751,z=105.80181121826},gv=2575,lv=91665,look=2},
          {position={x=580.25439453125,y=18.204385757446,z=267.88745117188},gv=2613,lv=175503,look=3},
          {position={x=569.34197998047,y=18.203435897827,z=267.35604858398},gv=2613,lv=169259,look=4},
          {position={x=569.26904296875,y=18.204019546509,z=288.71075439453},gv=2613,lv=169289,look=5},
                   
          {position={x=579.12561035156,y=18.204021453857,z=294.49252319336},gv=2613,lv=174619,look=6},
          {position={x=579.89025878906,y=18.204019546509,z=288.69152832031},gv=2613,lv=175071,look=6},
          {position={x=579.96398925781,y=18.204019546509,z=276.86349487305},gv=2613,lv=175516,look=6},
          {position={x=356.7585144043,y=-0.019002586603165,z=275.82641601563},gv=2583,lv=116027,look=1},
          {position={x=375.23059082031,y=15.569175720215,z=308.73474121094},gv=2584,lv=124260,look=2},
          {position={x=214.08877563477,y=50.010437011719,z=142.09692382813},gv=2573,lv=79846,look=1},
          {position={x=201.91387939453,y=21.803108215332,z=186.72601318359},gv=2569,lv=78115,look=2},
          {position={x=145.61558532715,y=21.803106307983,z=190.26878356934},gv=2560,lv=66024,look=2},
          {position={x=177.76370239258,y=16.732582092285,z=233.58312988281},gv=2552,lv=72335,look=2},
          {position={x=2.4865853786469,y=28.195501327515,z=275.06988525391},gv=2541,lv=25785,look=2},
                   
          {position={x=65.412673950195,y=16.752981185913,z=307.02719116211},gv=2555,lv=53073,look=2},
          {position={x=134.43841552734,y=-0.015206664800644,z=230.44943237305},gv=2550,lv=64557,look=2},
          {position={x=243.38114929199,y=-0.00041913986206055,z=270.41223144531},gv=2548,lv=87348,look=2},
          {position={x=366.55828857422,y=-0.0032874643802643,z=211.66920471191},gv=2588,lv=120187,look=1},
          {position={x=385.44412231445,y=-0.00017166137695313,z=179.76438903809},gv=2598,lv=129164,look=1},
          {position={x=370.82672119141,y=-0.023116797208786,z=124.89398193359},gv=2596,lv=122178,look=1},
          {position={x=372.92236328125,y=-0.095461905002594,z=73.56819152832},gv=2595,lv=123111,look=1},
          {position={x=435.26232910156,y=36.876407623291,z=123.60925292969},gv=2601,lv=145416,look=1},
          {position={x=414.48815917969,y=9.9674711227417,z=129.18397521973},gv=2599,lv=140299,look=1},
          {position={x=430.22592163086,y=10.148262023926,z=151.33465576172},gv=2599,lv=144273,look=1},
                   
          {position={x=424.3752746582,y=8.5021018981934,z=170.54034423828},gv=2599,lv=142806,look=1},
          {position={x=460.01007080078,y=10.125782966614,z=156.20686340332},gv=2599,lv=150278,look=1},
          {position={x=317.50268554688,y=-0.001323401927948,z=213.56285095215},gv=2590,lv=106919,look=1},
          {position={x=273.71130371094,y=-0.0014455914497375,z=334.43276977539},gv=2547,lv=97092,look=2},
          {position={x=469.23120117188,y=-0.091352522373199,z=276.38082885742},gv=2607,lv=151851,look=1},
          {position={x=525.82452392578,y=-0.00058794021606445,z=265.18814086914},gv=2606,lv=162788,look=1},
          {position={x=577.20806884766,y=-0.10122099518776,z=228.00660705566},gv=2622,lv=173522,look=1},
          {position={x=463.56359863281,y=0.0052489638328552,z=148.75215148926},gv=2632,lv=150785,look=1},
          {position={x=260.30001831055,y=50.007335662842,z=142.20069885254},gv=2574,lv=92813,look=1},
          {position={x=203.83106994629,y=-0.00041216611862183,z=274.6474609375},gv=2548,lv=78446,look=2},
                   
          {position={x=187.07653808594,y=70.373901367188,z=122.39974212646},gv=2573,lv=75081,look=1},
          {position={x=311.14794921875,y=-0.017121851444244,z=122.32120513916},gv=2593,lv=105564,look=1},
          {position={x=294.64834594727,y=16.823398590088,z=69.368637084961},gv=2594,lv=102442,look=1}
}

-- спавн снайперов и Снегиря на ЧАЭС2
function create_snegir_2chaes()
local snipers = {
          {position={x=409.23071289063,y=36.875762939453,z=86.418243408203},gv=2600,lv=139080,look=1}}

function inform_20_pda_have()
           return new_dialog.item_much("device_pda_npc",20) ~= false       
end

function inform_40_pda_have()
           return new_dialog.item_much("device_pda_npc",40) ~= false
end

function inform_20_pda(first_speaker, second_speaker)
          local item = ""
          local count = math.random(2,3)  -- случайно выдаст 2 или 3 предмета, список предметов в таблице local nagrad = { ... level_7 = {.
       local actor, trader
       if db.actor and db.actor:id() == first_speaker:id() then
        actor = first_speaker
        trader = second_speaker
       else
        actor = second_speaker
        trader = first_speaker
       end
       item = nagrad.level_7[math.random(table.getn(nagrad.level_7))]
       flamethrower.relocate_n_items_section(trader, "device_pda_npc", "out", 20)
       flamethrower.relocate_n_items_section(actor, item , "in", count)
end

function give_antirad(first_speaker, second_speaker)
      sak.out_item_namber("antirad", 1)  -- 1-сколько отдать антирада
end

<string id="garik_dialog_5">
      <text>Ладно, я всё равно ими не пользуюсь, предпочитаю водку.</text>
</string>

function has_soldiers_bribe(actor, npc)
      return sak.have_item_namber("vodka",1) ~= false  -- здесь чего и сколько нужно
end
function give_soldiers_bribe(actor, npc)
      sak.out_item_namber("vodka",1)  -- здесь сколько и что забирает
      archievements.acv_count_event("acv_bribe", 20, "Честный налогоплательщик")
end

function has_soldiers_bribe(actor, npc)
      return db.actor:money()>=10000 -- есть ли нужная сумма
end
function give_soldiers_bribe(actor, npc)
      aem_manager.manage_money(10000, "out") -- сколько платить денег
      archievements.acv_count_event("acv_bribe", 20, "Честный налогоплательщик")
end

<string id="esc_bridge_soldiers_start_13">
         <text>А нельзя!\nНо если очень хочется... то можно. Например, за бутылочку и...  можешь мне ещё водочки принести?</text>
       </string>

function spawn()
alife():create("sergeant_counter",db.actor:position(),db.actor:level_vertex_id(),db.actor:game_vertex_id(),db.actor:id())
end

<action>akill.grom_npc_hit</action>

<action>akill.taynik_grom_spawn</action>

if outfit:section() == "exo_mil_exoskeleton_addr" then
   new_system_rad()
  elseif outfit:section() == "exo_mil_exoskeleton_addrs" then
   new_system_rad()
   new_system_power()

   new_anti_dot()
  end

-- отключение на мастере распознавания НПС и дистанции
function options_dialog:OnDifficultyChanged()
       if self.list_difficulty:CurrentID() == 3 then -- знак "==" изменить на ">"
        self.check_tips:SetCheck(false)
        self.check_tips:Enable(false)
        self.check_dist:SetCheck(false)
        self.check_dist:Enable(false)
       else
        self.check_tips:Enable(true)
        self.check_dist:Enable(true)
       end

       inventory.need_update = true    -- для пересчета иммунитетов при смене уровня сложности
end

-- автопереключение опций в зависимости от сложности
function switch_options(difficulty)
       if difficulty == 3 then -- тоже самое, меняем знаки: "==" на ">"
        get_console():execute("hud_info off")
        get_console():execute("hud_crosshair_dist off")
       end

       inventory.need_update = true    -- для пересчета иммунитетов
end