-- Спавним левел-чейнджер
function spawn_level_changer(sid, from_pos, from_level, dest_pos, dest_level, hint, mode, dest_dir)

local vertexes = {
l01_escape = {lvid=594266, gvid=0},
l04_darkvalley = {lvid=121712, gvid=815},
l11_pripyat = {lvid=142116, gvid=2270},
l12_stancia = {lvid=405348, gvid=2400},
l12_stancia_2 = {lvid=9914, gvid=2517}
dead_city = {lvid=551769, gvid=2795}
l08_yantar = {lvid=141470, gvid=1438}
-- l12_stancia_2 = {lvid=227423, gvid=2635}
}

local obj = alife():create("level_changer", from_pos, vertexes[from_level]["lvid"], vertexes[from_level]["gvid"])

if obj then

level.map_add_object_spot(obj.id, "level_changer", hint)

local packet = net_packet()

obj:STATE_Write(packet)

-- свойства cse_alife_object
local game_vertex_id = packet:r_u16()
local cse_alife_object__unk1_f32 = packet:r_float()
local cse_alife_object__unk2_u32 = 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 cse_alife_object__unk3_u32 = packet:r_s32()

-- свойства cse_shape
local shape_count = packet:r_u8()
local shape_type
local center
local radius

if shape_count == 0 then
shape_type = 0
center = vector():set(0,0,0)
radius = 10.0
shape_count = 1
else
for i=1,shape_count do
local shape_type = packet:r_u8()
if shape_type == 0 then
local center = packet:r_vec3()
local radius = packet:r_float()
else
local v1 = packet:r_vec3()
local v2 = packet:r_vec3()
local v3 = packet:r_vec3()
local v4 = packet:r_vec3()
end
end
end

-- свойства cse_alife_space_restrictor
local restrictor_type = packet:r_u8()

-- свойства cse_alife_level_changer
local dest_game_vertex_id = packet:r_u16()
local dest_level_vertex_id = packet:r_s32()
local dest_position = packet:r_vec3()
local dest_direction = packet:r_vec3()
local dest_level_name = packet:r_stringZ()
local dest_graph_point = packet:r_stringZ()
local silent_mode = packet:r_u8()

if packet:r_elapsed() ~= 0 then get_console():execute("left="..packet:r_elapsed()) end

-- свойства cse_alife_object
packet:w_u16(game_vertex_id)
packet:w_float(cse_alife_object__unk1_f32)
packet:w_s32(cse_alife_object__unk2_u32)
packet:w_s32(level_vertex_id)
packet:w_s32(object_flags)
packet:w_stringZ(custom_data)
packet:w_s32(sid)
packet:w_s32(cse_alife_object__unk3_u32)

-- свойства cse_shape
packet:w_u8(shape_count)

for i=1,shape_count do
packet:w_u8(shape_type)
if shape_type == 0 then
packet:w_vec3(vector():set(0,0,0))
packet:w_float(3)
else
packet:w_vec3(vector():set(3,0,0))
packet:w_vec3(vector():set(0,3,0))
packet:w_vec3(vector():set(0,0,3))
packet:w_vec3(vector():set(0,0,0))
end
end

-- свойства cse_alife_space_restrictor
packet:w_u8(restrictor_type)

-- свойства cse_alife_level_changer
packet:w_u16(vertexes[dest_level]["gvid"])
packet:w_s32(vertexes[dest_level]["lvid"])
packet:w_vec3(dest_pos)
if dest_dir then
packet:w_vec3(dest_dir)
else
packet:w_vec3(dest_direction)
end
packet:w_stringZ(dest_level)
packet:w_stringZ(dest_graph_point)
packet:w_u8(mode)

obj:STATE_Read(packet, packet:w_tell()-packet:r_tell())

end
end


-- Спавн всех нужных переходов
function set_lc(actor, npc)
-- Кордон - Темная долина
spawn_level_changer(6001, vector():set(368.9,15.17,-42.65), "l01_escape", vector():set(-44.77, 0.43, -541.35), "l04_darkvalley", "to_darkvalley", 0)

-- ЧАЭС - Припять
spawn_level_changer(6002, vector():set(918.1,-0.1,-401.96), "l12_stancia", vector():set(31.28,1.135,420.61), "l11_pripyat", "to_pripyat", 0, vector():set(0,-3.1,0))

-- ЧАЭС2 - ЧАЭС
-- spawn_level_changer(6003, vector():set(554.52,150,201), "l12_stancia_2", vector():set(117.6,-0.1,-76.3), "l12_stancia", "to_aes", 1, vector():set(0,-1.5,0))
spawn_level_changer(6003, vector():set(-42.15,-0.02,56.03), "l12_stancia_2", vector():set(126,-0.1,-76.3), "l12_stancia", "to_aes", 0, vector():set(0,-1.5,0))

-- ЧАЭС - ЧАЭС2
spawn_level_changer(6004, vector():set(117.6,-0.1,-76.3), "l12_stancia", vector():set(-42.15,-0.02,64), "l12_stancia_2", "to_aes", 0)

-- мг - янтарь
spawn_level_changer(6005, vector():set(-263.5,4.01,-143.3), "dead_city", vector():set(-260.78,-16.64,-43), "l08_yantar", "to_aes7", 0)

-- Перемещаем актора, ато он на трубе станет
db.actor:set_actor_position(vector():set(1035.12,-0.0999,229.564))

-- Ставим стандартную погоду, отключаем таймер и выброс
level.set_weather("default")
db.actor:give_info_portion("freeplay")

end
end


-- Отмечаем на карте новые точки перехода
function mark_lc()
local obj = alife():story_object(6001)
if obj then
level.map_add_object_spot(obj.id, "level_changer", "to_darkvalley")
end
local obj = alife():story_object(6002)
if obj then
level.map_add_object_spot(obj.id, "level_changer", "to_pripyat")
end
local obj = alife():story_object(6003)
if obj then
level.map_add_object_spot(obj.id, "level_changer", "to_aes")
end
local obj = alife():story_object(6004)
if obj then
level.map_add_object_spot(obj.id, "level_changer", "to_aes")
end
local obj = alife():story_object(6005)
if obj then
level.map_add_object_spot(obj.id, "level_changer", "to_aes7")
end
end

object_binder.update(self, delta)

-- помечаем точки переходов
freeplay.mark_lc()

и активация скрипта <action>freeplay.set_lc</action> рпописана чрез диолог

Уже вечность, как Singapur22 довёл до ума переход с Инсайда.Делаешь новый скрипт,обзываешь его perehod.script.Пишешь в него:
function create_level_changer(
p_story_id, -- STORY_ID нового level_changer (понадобится нам позже)
p_position, -- вектор, координаты точки, в которой будет располагаться центр нового level_changer
p_lvertex_id, -- level_vertext_id - идентифицируют уровень, на котором будет создан level_changer
p_gvertex_id, -- game_vertext_id

p_dest_lv, -- level_vertex_id - идентифицируют уровень, на будет перебрасывать игрока
p_dest_gv, -- game_vertex_id
p_dest_pos, -- координаты точки, в которой на новом уровне окажется игрок
p_dest_dir, -- направрение взгляда игрока
p_dest_level, -- название уровня, например "L11_Pripyat"
p_silent -- следует задать 1, чтобы подавить вопрос о смене уровня (автоматический переход)
)
local obj = alife():create("level_changer", p_position, p_lvertex_id, p_gvertex_id)

level.map_add_object_spot(obj.id, "level_changer", "")

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

-- свойства cse_alife_object
local game_vertex_id = packet:r_u16()
local cse_alife_object__unk1_f32 = packet:r_float()
local cse_alife_object__unk2_u32 = 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 axis_x_x = packet:r_float()
local axis_x_y = packet:r_float()
local axis_x_z = packet:r_float()
local axis_y_x = packet:r_float()
local axis_y_y = packet:r_float()
local axis_y_z = packet:r_float()
local axis_z_x = packet:r_float()
local axis_z_y = packet:r_float()
local axis_z_z = packet:r_float()
local offset_x = packet:r_float()
local offset_y = packet:r_float()
local offset_z = packet:r_float()
end
end

-- свойства cse_alife_space_restrictor
local restrictor_type = packet:r_u8()

-- свойства cse_level_changer
local dest_game_vertex_id = packet:r_u16()
local dest_level_vertex_id = packet:r_u32()
local dest_position = packet:r_vec3()
local dest_direction = packet:r_vec3()
local dest_level_name = packet:r_stringZ()
local dest_graph_point = packet:r_stringZ()
local silent_mode = packet:r_u8()

packet:w_begin(game_vertex_id) -- game_vertex_id
packet:w_float(cse_alife_object__unk1_f32)
packet:w_u32(cse_alife_object__unk2_u32)
packet:w_u32(level_vertex_id) -- level_vertex_id
packet:w_u32( bit_not(193) ) -- object_flags = -193 = 0xFFFFFF3E
packet:w_stringZ(custom_data)
packet:w_u32(p_story_id) -- story_id
packet:w_u32(spawn_story_id)

packet:w_u8(1) -- количество фигур
-- packet:w_u8(0) -- тип фигуры: сфера
-- packet:w_vec3(vector():set(0, 0, 0)) -- sphere_center
-- packet:w_float(3.0)
packet:w_u8(1) -- тип фигуры: box
packet:w_float(2) -- axis_x_x
packet:w_float(0) -- axis_x_y
packet:w_float(0) -- axis_x_z
packet:w_float(0) -- axis_y_x
packet:w_float(4) -- axis_y_y
packet:w_float(0) -- axis_y_z
packet:w_float(0) -- axis_z_x
packet:w_float(0) -- axis_z_y
packet:w_float(4) -- axis_z_z
packet:w_float(0) -- offset_x
packet:w_float(0) -- offset_y
packet:w_float(0) -- offset_z

packet:w_u8(3) -- restrictor_type

packet:w_u16(p_dest_gv) -- destination game_vertex_id
packet:w_u32(p_dest_lv) -- destination level_vertex_id
packet:w_vec3(p_dest_pos) -- destination position
packet:w_vec3(p_dest_dir) -- destination direction (направление взгляда)
packet:w_stringZ(p_dest_level) -- destination level name
packet:w_stringZ("start_actor_99") -- some string, always const
packet:w_u8(p_silent) -- 1 for silent level changing

packet:r_seek(0)
obj:STATE_Read(packet, packet:w_tell())
end

Ниже пишешь скрипты своих переходов:

function changer_escape_darkscape()
create_level_changer(6002, vector():set( 369.6816,15.1765,-43.0454 ), 594337,252,
497,
2721,
vector():set( -614.567,-2.590,-385.790 ),
vector():set( 0.0, 0.0, -1.0 ),
"k01_darkscape",
0)
end

6002 - это story_id перехода(от балды,лишь бы не совпадал с другими идами)
369.6816,15.1765,-43.0454 ), 594337,252, --\\ откуда переходим
-614.567,-2.590,-385.790 --\\ координаты,куа переходим
497 --\\ левелвертекс,куда переходим
2721 --\\ геймвертекс,куда переходим
"k01_darkscape", --\\ лока,на которую переходим(любое название)
0) --\\поставишь 1), не будет вопроса:вы хотите перйти
Вызвать можешь через диалог,как обычно:
<action>perehod.changer_escape_darkscape</action>

Отметки переходов в level_tasks.script, в function add_lchanger_location()
Добавь свою со своим стори_ид(типа 6002):
obj = sim:story_object(6002)
if obj then
level.map_add_object_spot(obj.id, "level_changer", "to_darkskape")
end
Можешь писать вместо to_darkskape, в Кишку,если лень в text\rus\***.xml пиСать.Остальные переходы так же, в этот же файл,добавляй функции,типа function changer_escape_darkscape()
Всё!