function spawn()
local p=vector(),lv,gv
   p.x=db.actor:position().x+1
   p.y=db.actor:position().y
   p.z=db.actor:position().z
   lv=db.actor:level_vertex_id()
   gv=db.actor:game_vertex_id()
   sobj = this.create_anom("campfire",p,lv,gv,1,0.1)
end

function get_story_id_not_replay()
local ST
ST = xr_logic.pstor_retrieve(db.actor, "ScriptAnomId", 0)
if type(ST) ~= "number" or ST == nil then
ST = 9000
xr_logic.pstor_store(db.actor, "ScriptAnomId", ST)
end
if type(ST) == "number" or ST ~= nil then
ST = ST + 1
xr_logic.pstor_store(db.actor, "ScriptAnomId", ST)
end
return tonumber(ST)
end

function create_anom(name_anom, posit_anom, lvid_anom, gvid_anom, radius_anom, power_anom)
local obj = alife():create(name_anom, posit_anom, lvid_anom, gvid_anom)

function use_inventory_item(section,self)
   local item_name=section:section()
   if item_name == "spichki" and db.actor:has_info("actor_use_item") == false then
    start_time_use_item = game.get_game_time()
    db.actor:give_info_portion("actor_use_item")
  spichki.spawn()
   end
end

function timer_use_item(self)
   local time_to_use = 60 --Игровые секунды, время использования предмета
   if db.actor:has_info("actor_use_item") then   
    if  (start_time_use_item == nil or game.get_game_time():diffSec(start_time_use_item) >= time_to_use) then
     db.actor:disable_info_portion("actor_use_item")
    end
   end
end

function spawn()
local p=vector(),lv,gv
   p.x=db.actor:position().x+1
   p.y=db.actor:position().y
   p.z=db.actor:position().z
   lv=db.actor:level_vertex_id()
   gv=db.actor:game_vertex_id()
   sobj = this.create_anom("campfire",p,lv,gv,1,0.1)
end

-----------------------------------Так как костер это разновидность аномалии, то это нужно для спавна скриптом-----------------------------------

function get_story_id_not_replay()
local ST
ST = xr_logic.pstor_retrieve(db.actor, "ScriptAnomId", 0)
if type(ST) ~= "number" or ST == nil then
ST = 9000
xr_logic.pstor_store(db.actor, "ScriptAnomId", ST)
end
if type(ST) == "number" or ST ~= nil then
ST = ST + 1
xr_logic.pstor_store(db.actor, "ScriptAnomId", ST)
end
return tonumber(ST)
end

function create_anom(name_anom, posit_anom, lvid_anom, gvid_anom, radius_anom, power_anom)
local obj = alife():create(name_anom, posit_anom, lvid_anom, gvid_anom)

-----------------------write----------------------
local packet = net_packet()
obj:STATE_Write(packet)

-----------------------load-----------------------
-- cse_alife_object
local game_vertex_id = packet:r_u16()
local distance = packet:r_float()
local direct_control = packet:r_u32()
local level_vertex_id = packet:r_u32()
local object_flags = packet:r_u32()
local custom_data = packet:r_stringZ()
local story_id = packet:r_u32()
local spawn_story_id = packet:r_u32()

-- cse_shape
local shape_count = packet:r_u8()
for i=1,shape_count do
local shape_type = packet:r_u8()
if shape_type == 0 then
-- sphere
local center = packet:r_vec3()
local radius = packet:r_float()
else
-- box
local box = packet:r_matrix()
end
end

-- cse_alife_space_restrictor
local restrictor_type = packet:r_u8()

-- cse_alife_custom_zone
local max_power = packet:r_float()
local owner_id = packet:r_u32()
local enabled_time = packet:r_u32()
local disabled_time = packet:r_u32()
local start_time_shift = packet:r_u32()

-- cse_alife_anomalous_zone
local offline_interactive_radius = packet:r_float()
local artefact_spawn_count = packet:r_u16()
local artefact_position_offset = packet:r_u32()

-- se_zone_anom
local last_spawn_time_present = packet:r_u8()

if (string.find (name_anom, 'zone_zharka_static') ~= nil
or string.find (name_anom, 'zone_witches_galantine') ~= nil
or string.find (name_anom, 'zone_mosquito_bald') ~= nil
or string.find (name_anom, 'zone_mincer') ~= nil
or string.find (name_anom, 'zone_gravi_zone') ~= nil
or string.find (name_anom, 'zone_buzz') ~= nil )
and packet:r_elapsed() ~= 0 then
abort("left=%d", left)
end

---------------------------save--------------------
-- cse_alife_object
packet:w_begin(game_vertex_id)
packet:w_float(distance)
packet:w_u32(direct_control)
packet:w_u32(level_vertex_id)
object_flags = bit_not(193)
packet:w_u32(object_flags)
packet:w_stringZ(custom_data)
packet:w_u32(get_story_id_not_replay())
packet:w_u32(get_story_id_not_replay())

-- cse_shape
packet:w_u8(1) -- количество фигур
packet:w_u8(0) -- тип фигуры: сфера
packet:w_vec3(vector():set(0, 0, 0))
if radius_anom ~= nil then
packet:w_float(radius_anom)
else
packet:w_float(1.0)
end

-- cse_alife_space_restrictor
packet:w_u8(restrictor_type)

-- cse_alife_custom_zone
if power_anom ~= nil then
packet:w_float(power_anom)
else
packet:w_float(max_power)
end
packet:w_u32(owner_id)
packet:w_u32(enabled_time)
packet:w_u32(disabled_time)
packet:w_u32(start_time_shift)

-- cse_alife_anomalous_zone
packet:w_float(offline_interactive_radius)
packet:w_u16(artefact_spawn_count)
packet:w_u32(artefact_position_offset)

-- se_zone_anom
packet:w_u8(last_spawn_time_present)

------------------------read------------------------
packet:r_seek(0)
obj:STATE_Read (packet, packet:w_tell())

end

if type == "esc_blockpost" then
                t = { section = "logic@esc_blockpost1",
                      idle = 0,
                      prior = 20, state = {0,1},
                      in_rest = "", out_rest = ""
                }
                table.insert(sj, t)
                t = { section = "logic@esc_blockpost2",
                      idle = 0,
                      prior = 40, state = {0,1},
                      in_rest = "", out_rest = ""
                }
                table.insert(sj, t)
                t = { section = "logic@esc_blockpost3",
                      idle = 0,
                      prior = 60, state = {0,1},
                      in_rest = "", out_rest = ""
                }
                table.insert(sj, t)
        end

--------------------

    if gulag_type == "esc_bloсkpost" then
  return npc_community == "military"
    end

--------------------
       
        if type == "esc_bloсkpost" then
       return function(gulag)
  if level.get_time_hours() >= 6 and level.get_time_hours() <= 22 then
   return 0  -- день
  else
   return 1  -- ночь
  end
       end
    end

[logic@esc_blockpost1]
active = walker@esc_blockpost_walker1

[walker@esc_blockpost_walker1]
path_walk  = soldier_walk1
path_look  = soldier_look1

[logic@esc_blockpost2]
active = walker@esc_blockpost_walker2

[walker@esc_blockpost_walker2]
path_walk  = soldier_walk2
path_look  = soldier_look2

[logic@esc_blockpost3]
active = walker@esc_blockpost_walker3

[walker@esc_blockpost_walker3]
path_walk  = soldier_walk3
path_look  = soldier_look3