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(-251.29605102539,-19.598033905029,-153.39739990234),9512,8)
local custom = "[logic]\ncfg = scripts\\ins\\shompl.ltx"
rewrite_restrictor(se_obj, custom, 5.0)
end

function spawn_shompl()
alife():create("gar_bandit_respawn_1",vector():set(-216.72268676758,-19.972440719604,-153.30784606934),36609,41)
alife():create("repair_kit",vector():set(-216.72268676758,-19.972440719604,-153.30784606934),36609,41)
end

<phrase id="321111">
<give_info>esc_trader_can_leave</give_info>-- поршень
<action>ins_restrictor.create_shompl_restr()</action>-- спавн рестрикса
</phrase>

[logic]
active = sr_idle@one

[sr_idle@one]
on_actor_inside = {+esc_trader_can_leave} nil %=play_snd(dream_rats_l)%

function create_shompl_restr()
local se_obj = alife():create("space_restrictor",vector():set(-251.29605102539,-19.598033905029,-153.39739990234),9512,8)
local custom = "[logic]\ncfg = scripts\\ins\\shompl.ltx"
rewrite_restrictor(se_obj, custom, 5.0)
end