[logic]
active = sr_idle@one

[sr_idle@one]
on_actor_inside = {+potapov_first_dialog_start} nil %=spawn_shompl.spawn_monsters()%

----------
-- чтение формы из нет-пакета
----------
function r_shape(packet)
local s
local st = {}
st.count = packet:r_u8()
st.shapes = {}
for i=1, st.count do
s = {}
s.type = packet:r_u8()
if s.type == 0 then
s.center = packet:r_vec3()
s.radius = packet:r_float()
else
s.axis_x = packet:r_vec3()
s.axis_y = packet:r_vec3()
s.axis_z = packet:r_vec3()
s.offset = packet:r_vec3()
end
st.shapes[i] = s
end
return st
end

----------
-- запись формы в нет-пакет
----------
function w_shape(packet, st)
local s
packet:w_u8(st.count)
for i=1, st.count do
s = st.shapes[i]
packet:w_u8(s.type)
if s.type == 0 then
packet:w_vec3(s.center)
packet:w_float(s.radius)
else
packet:w_vec3(s.axis_x)
packet:w_vec3(s.axis_y)
packet:w_v ec3(s.axis_z)
packet:w_vec3(s.offset)
end
end
end

----------
-- перепаковка нет-пакета созданного скриптом рестрикта
----------
function rewrite_restrictor(se_obj, custom, radius)
local packet = net_packet()
se_obj:STATE_Write(packet)
local game_vertex_id = packet:r_u16()
local distance = packet:r_float()
local direct_control = packet:r_s32()
local level_vertex_id = packet:r_s32()
local object_flags = packet:r_s32()
local custom_data = packet:r_stringZ()
local story_id = packet:r_s32()
local spawn_story_id = packet:r_s32()
local shape = r_shape(packet)
local restrictor_type = packet:r_u8()

custom_data = custom
shape = {}
shape.count = 1
shape.shapes = {}
shape.shapes[1] = {}
shape.shapes[1].type = 0
shape.shapes[1].center = vector():set(0,0,0)
shape.shapes[1].radius = radius

packet:w_u16(game_vertex_id)
packet:w_float(distance)
packet:w_s32(direct_control)
packet:w_s32(level_vertex_id)
packet:w _s32(object_flags)
packet:w_stringZ(custom_data)
packet:w_s32(story_id)
packet:w_s32(spawn_story_id)
w_shape(packet, shape)
packet:w_u8(restrictor_type)
se_obj:STATE_Read(packet, packet:w_tell() - packet:r_tell())
end

function create_shompl_restr()
local se_obj = alife():create("space_restrictor",vector():set(144.67300415039,8.5598239435425,-20.42113668566079),1171261,4027)
local custom = "[logic]\ncfg = scripts\\ins\\shompl.ltx" --путь к логике рестриктора
rewrite_restrictor(se_obj, custom, 5.0) --5.0 - это радиус действия нашего рестриктора
end

function spawn_monsters()
alife():create("gar_bandit_respawn_1",vector():set(68.054977416992,4.4271631240845,-29.120529174805),1049668,4008)
alife():create("repair_kit",vector():set(68.054977416992,4.4271631240845,-29.120529174805),1049668,4008)
local obj= alife():create("agr_bandit_respawn_1",vector():set(68.054977416992,4.4271631240845,-29.120529174805),1049668,4008)
obj:on_death()
end

[logic]
active = walker1

[walker1]
path_walk = mil_leader_walk
path_look = mil_leader_look
on_info = {+mil_freedom_under_attack} camper1

[camper1]
path_walk = mil_defense_walk1
path_look = mil_defense_look1
radius = 5
on_info = {-mil_freedom_under_attack} walker1