S.T.A.L.K.E.R. Inside Wiki - Вклад участника [ru]

SoC. Спавн точек перехода между уровнями

2012-08-19T09:33:07Z

109.205.254.88: /* Дополняет авторы: vllzl */

В этой статье я попытаюсь передать практический опыт скриптового создания точек перехода между уровнями. Файл ''all.spawn'' меняться не будет, поэтому такой механизм более удобен для совмещения модов и не требует начала новой игры.

В качестве примера попробуем реализовать режим ''freeplay'' - продолжение игры после уничтожения О-Сознания. Для этого нужно создать как минимум две точки — возврат на ЧАЭС-1 со внутреннего дворика (после уничтожения О-Сознания) и переход из ЧАЭС-1 в Припять. К слову сказать, если вернуться на ЧАЭС-1, то там будет продолжать действовать таймер "выброса", который в конце-концов включит "deadzone". Отключить счетчик мне пока не удалось, но зато можно легко отключить сам "выброс" и всласть побегать по уровню.

== Часть 1. Генерация работающего LEVEL_CHANGER ==

Стандартной функции alife():create(…) недостаточно для создания полноценного level_changer.

Ниже я привожу код функции, которая создает и инициализирует level_changer (пишется в созданный нами файл '''_freeplay_sa.script'''): НИЧЕГО НЕ ПОДСТАВЛЯЙТЕ!
<lua>
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 - идентифицируют уровень, на который level_changer будет перебрасывать игрока
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())

-- news_manager.send_tip(db.actor, "LC creation finished", nil, nil, 30000)
end
</lua>

== Часть 2. '''Создание точек перехода''' ==

Теперь следует написать функции создания нужных точек перехода и подключить их к игре. Сами функции просты (тоже в файл '''_freeplay_sa.script''')
<lua>
function exit_monolit()
if (not has_alife_info("freeplay_activated1")) then
create_level_changer(11410, vector():set(-13.26, 47.71, 46.57), 200, 2417,
162109,
2384,
vector():set( 375.615, 0.224, 27.737 ),
vector():set( 0.0, 0.0 , 0.0 ),
"L12_Stancia",
1)

db.actor:give_info_portion("freeplay_activated1")
end

-- создается переход из ЧАЭС в Припять
create_chaes2pripyat_exit()

-- актер перебрасывается в level_changer, возвращающий его на ЧАЭС, ко входу в бункер
db.actor:set_actor_position( vector():set(-13.26, 47.71, 46.57) )
end

function refuze_o_sozn()
if (not has_alife_info("freeplay_activated2")) then
create_level_changer(21410, vector():set(946.872, 6.0, 167.66), 240852, 2637,
472710,
2280,
vector():set( 1062.15, -0.0982, -3.512 ),
vector():set( 0.0 , 0.0 , -1.0 ),
"L12_Stancia",
1)

db.actor:give_info_portion("freeplay_activated2")
end

-- создается переход из ЧАЭС в Припять
create_chaes2pripyat_exit()

-- актер перебрасывается в level_changer, возвращающий его к правым воротам ЧАЭС
db.actor:set_actor_position( vector():set(946.872, 6.0, 167.66) )
end

function create_chaes2pripyat_exit()
-- создается переход из ЧАЭС в Припять
if (not has_alife_info( "exit_chaes2pripyat_created" )) then
create_level_changer(31410, vector():set( 917.35, 0.419, -316.35 ), 403866, 2401,
73868,
2117,
vector():set( 31.3, 3.0, 240.0 ),
vector():set( 0.0, 0.0, -1.0 ),
"L11_Pripyat",
0)

db.actor:give_info_portion("exit_chaes2pripyat_created")
end
end
</lua>

Функция '''exit_monolit''' создает «тихий» переход на уровень ЧАЭС-1 и обычный - в начале уровня ЧАЭС-1 для возврата в Припять, после чего перебрасывает актера прямо внутрь созданного перехода. Функция '''refuze_o_sozn''' делает тоже самое, только игрок появляется перед воротами в правом верхем углу карты (мне кажется, что так более логично). Все телепорты защищаются уникальными info_portions, дабы избежать их повторного создания, ведь игрок может захотеть «закончить» игру несколько раз.

Теперь подключение.
Во-первых надо добавить новые info-portions. Я решил не изменять оригинальные файлы игры, а сделал для них (ну и для других тоже) отдельный файл
<code>
config\gameplay\_info_sa.xml
</code>
следующего вида:
<code>
<?xml version="1.0" encoding="windows-1251" ?>

<game_information_portions>

<info_portion id="freeplay_activated1"></info_portion>
<info_portion id="freeplay_activated2"></info_portion>
<info_portion id="exit_chaes2pripyat_created"></info_portion>

</game_information_portions>
</code>
Теперь в этот файл можно будет добавлять новые info_portion, которые вы будете использовать в своих сюжетах.
Подключается этот файл в system.ltx в секции «info_portions»:
<code>
[info_portions]
;список xml файлов, содержащих info_portions
files = _info_sa, info_portions, ....................
</code>

''Кстати, именно так я рекомендую добавлять новые диалоги и новых персонажей. Это упростит процессы совмещения модов и аддонов.''

Следующий шаг - подключение наших скриптов к игре. Для этого откройте файл
<code>
config\ui\ui_movies.xml
</code>
найдите элементы «''mov_desire_''» (их пять, по количеству ложных концовок игры - все варианты общения с Монолитом). Внутри каждого элемента есть дочерние элементы «''function_on_stop''», которые задают функцию, запускающуюся сразу после ролика. Стандартное содержимое:
<code>
<function_on_stop>xr_effects.game_credits</function_on_stop>
</code>
Функция '''xr_effects.game_credits''' запускает финальные титры. Именно ее и нужно заменить на вызов нашей функции _freeplay_sa.exit_monolit. Вот что должно получиться:
<code>
<function_on_stop>_freeplay_sa.exit_monolit</function_on_stop>

</code>
<blockquote>
''Старый элемент я советую не удалять, а закомментировать.''
</blockquote>

Чуть ниже «''mov_desire_5''» находится тэг ролика для концовки «Присоединение к О-Сознанию». Его мы трогать не будем - Меченый станет медузой. А вот после него - тэг для ролика «Отказ от О-Сознания»: «''mov_refuse_osoznanie''». Функцию завершения в нем заменим следующим образом:
<code>
<function_on_stop>_freeplay_sa.refuze_o_sozn</function_on_stop>

</code>

Можно запускать и, если есть сохранения перед монолитом и/или о-сознанием, тестировать. Первые переходы срабатывают «тихо» - запрос на смену уровня не выдается (в параметре p_silent задана 1). До перехода в Припять можно успеть добежать, пока не сработал выброс... Но это как-то неправильно, выброс надо остановить (он же произошел, пока мы были внутри станции). «По-честному» (скриптом, без модификации ''all.spawn'') таймер выброса отключить не получится, но зато выброс можно подавить небольшим «хаком». Найдите файл xr_logic.script, а в нем - функцию '''switch_to_section'''. Ее нужно модифицировать следующим образом:
<lua>
-- Выполняет переключение на указанную секцию, если задана.
-- Если section == nil, остается работать старая секция.
function switch_to_section(npc, st, section)
if section == nil or section == "" then
return false
end

-- 15.03.2008 by SA:
-- отключает "смертельные зоны" на ЧАЭС после запуска режима FREEPLAY
-- таймер не отключается, но сам "выброс" не происходит
if (section == "sr_aes_deadzone") then
if (has_alife_info("freeplay_activated1") or has_alife_info("freeplay_activated2")) then
return false
end
end

... далее без изменений ...
end
</lua>

Данный способ оставляет висящий на нулях таймер и все эффекты начала выброса, но сам «''выброс''» отключается.

И последнее: переход ЧАЭС1-Припять необходимо отметить на карте. Для этого существует вполне «легальный» механизм. Находим файл '''level_tasks.script''' и в конце функции '''add_lchanger_location''' дописываем следующее:
<code>
-- aes
obj = sim:story_object(31410)
if obj then
level.map_add_object_spot(obj.id, "level_changer", "to_pripyat")
end
</code>

Здесь 31410 - story_id нашего level_changer, который создается нашей функцией '''create_chaes2pripyat_exit'''.

На этом пока все (мелкие огрехи типа направления взгляда игрока после смены уровня исправлю позже).
Прошу тестировать и дополнять.

С уважением, sarthur.

== Дополняет авторы: vllzl ==
<code>
«По-честному» (скриптом, без модификации ''all.spawn'') таймер выброса отключить не получится.
</code>
Можно удалить таймер скриптом (удаляет рестриктор из игры)
Для этого в начале всех функций в sr_timer.script и sr_aes_deadzone.script написать:
<code>if not has_alife_info("freeplay_activated1") or ("freeplay_activated2") then</code>

Не забываем поставить второе end в конце функции(особенность Lua).

Удалит таймер и выброс из игры во фриплее. Vllzl
[[Категория:Скрипты]]

SoC. Создание проводника между локациями

2012-06-03T10:46:41Z

109.205.254.88: /* Реализация */

== Левел-чейнджер ==
Мы создадим левел-чейнджер на месте ГГ. Наш диалог создаст переход и ГГ попадет куда угодно.
== Реализация ==
Вы уже создали диалоги, если нет - статья [[Создание диалогов]]. Ниже есть функции создающие левел-чейнджер. Их ОЧЕНЬ много (на любой вкус):
<lua>
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 - идентифицируют уровень, на который level_changer будет перебрасывать игрока
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_s32(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_02") -- 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())
level.add_pp_effector ("teleport.ppe", 2006, false)

end

function exit_as()
create_level_changer(11077, db.actor:position(), db.actor:level_vertex_id(), db.actor:game_vertex_id(),
28719,
1758,
vector():set(-317.23675537109,-26.327833175659,55.278633117676),
vector():set(0.0, 0.0, 0.0),
"l07_military",
1)
end

function exit_as2()
create_level_changer(11078, db.actor:position(), db.actor:level_vertex_id(), db.actor:game_vertex_id(),
66343,
1786,
vector():set(-274.62121582031,-27.297189712524,239.00979614258),
vector():set(0.0, 0.0, 0.0),
"l07_military",
1)
end

function exit_as3()
create_level_changer(11079, db.actor:position(), db.actor:level_vertex_id(), db.actor:game_vertex_id(),
273147,
1821,
vector():set(-33.368682861328,-20.897382736206,379.58074951172),
vector():set(0.0, 0.0, 0.0),
"l07_military",
1)
end

function exit_as4()
create_level_changer(11080, db.actor:position(), db.actor:level_vertex_id(), db.actor:game_vertex_id(),
83694,
1852,
vector():set(-243.89454650879,-0.28634393215179,435.28894042969),
vector():set(0.0, 0.0, 0.0),
"l07_military",
1)
end

function exit_bunker()
create_level_changer(11085, db.actor:position(), db.actor:level_vertex_id(), db.actor:game_vertex_id(),
7807,
2773,
vector():set(8.3457946777344,-23.525426864624,19.003190994263),
vector():set(0.0, 0.0, 0.0),
"l10u_bunker",
1)
end

function exit_svalka()
create_level_changer(11041, db.actor:position(), db.actor:level_vertex_id(), db.actor:game_vertex_id(),
127101,
351,
vector():set(-77.325019836426,-3.660080909729,195.34251403809),
vector():set(0.0, 0.0, 0.0),
"l02_garbage",
1)
end

function exit_svalka2()
create_level_changer(11042, db.actor:position(), db.actor:level_vertex_id(), db.actor:game_vertex_id(),
1201,
260,
vector():set(-289.04534912109,-6.6783475875854,-178.82406616211),
vector():set(0.0, 0.0, 0.0),
"l02_garbage",
1)
end

function exit_svalka3()
create_level_changer(11043, db.actor:position(), db.actor:level_vertex_id(), db.actor:game_vertex_id(),
344517,
401,
vector():set(200.77691650391,-0.638019323349,-145.20561218262),
vector():set(0.0, 0.0, 0.0),
"l02_garbage",
1)
end

function exit_svalka4()
create_level_changer(11044, db.actor:position(), db.actor:level_vertex_id(), db.actor:game_vertex_id(),
284570,
374,
vector():set(122.61166381836,-4.2376079559326,153.47959899902),
vector():set(0.0, 0.0, 0.0),
"l02_garbage",
1)
end

function exit_svalka5()
create_level_changer(11045, db.actor:position(), db.actor:level_vertex_id(), db.actor:game_vertex_id(),
324917,
384,
vector():set(173.82795715332,-0.30577194690704,51.149074554443),
vector():set(0.0, 0.0, 0.0),
"l02_garbage",
1)
end

function exit_svalka6()
create_level_changer(11046, db.actor:position(), db.actor:level_vertex_id(), db.actor:game_vertex_id(),
311456,
385,
vector():set(97.819366455078,15.575645446777,31.107891082764),
vector():set(0.0, 0.0, 0.0),
"l02_garbage",
1)
end

function exit_svalka7()
create_level_changer(11047, db.actor:position(), db.actor:level_vertex_id(), db.actor:game_vertex_id(),
166216,
332,
vector():set(-49.738338470459,20.034204483032,115.88290405273),
vector():set(0.0, 0.0, 0.0),
"l02_garbage",
1)
end

function exit_svalka8()
create_level_changer(11048, db.actor:position(), db.actor:level_vertex_id(), db.actor:game_vertex_id(),
2848,
314,
vector():set(-277.18438720703,0.42264106869698,26.608871459961),
vector():set(0.0, 0.0, 0.0),
"l02_garbage",
1)
end

function exit_svalka9()
create_level_changer(11049, db.actor:position(), db.actor:level_vertex_id(), db.actor:game_vertex_id(),
27161,
308,
vector():set(-204.31503295898,0.77477610111237,-14.08620929718),
vector():set(0.0, 0.0, 0.0),
"l02_garbage",
1)
end

function exit_svalka10()
create_level_changer(11050, db.actor:position(), db.actor:level_vertex_id(), db.actor:game_vertex_id(),
117566,
299,
vector():set(-43.285057067871,22.38338470459,-109.06379699707),
vector():set(0.0, 0.0, 0.0),
"l02_garbage",
1)
end

function exit_svalka11()
create_level_changer(11051, db.actor:position(), db.actor:level_vertex_id(), db.actor:game_vertex_id(),
123627,
268,
vector():set(-82.571281433105,-2.6017231941223,-208.38046264648),
vector():set(0.0, 0.0, 0.0),
"l02_garbage",
1)
end

function exit_svalka12()
create_level_changer(11052, db.actor:position(), db.actor:level_vertex_id(), db.actor:game_vertex_id(),
272734,
263,
vector():set(108.47253417969,-2.2334003448486,-264.66119384766),
vector():set(0.0, 0.0, 0.0),
"l02_garbage",
1)
end

function exit_pripyat()
create_level_changer(11086, db.actor:position(), db.actor:level_vertex_id(), db.actor:game_vertex_id(),
260269,
2219,
vector():set(190.84159851074,2.8052725791931,212.05661010742),
vector():set(0.0, 0.0, 0.0),
"l11_pripyat",
1)
db.actor:give_info_portion("exit_pripyat")
end

function exit_pripyat2()
create_level_changer(11087, db.actor:position(), db.actor:level_vertex_id(), db.actor:game_vertex_id(),
7817,
2216,
vector():set(-112.93630981445,2.8031325340271,97.108512878418),
vector():set(0.0, 0.0, 0.0),
"l11_pripyat",
1)
db.actor:give_info_portion("exit_pripyat2")
end

function exit_x18()
create_level_changer(11056, db.actor:position(), db.actor:level_vertex_id(), db.actor:game_vertex_id(),
4086,
1155,
vector():set(5.0796270370483,-12.429841995239,15.65408706665),
vector():set(0.0, 0.0, 0.0),
"l04u_labx18",
1)
end

function exit_td()
create_level_changer(11057, db.actor:position(), db.actor:level_vertex_id(), db.actor:game_vertex_id(),
212105,
1025,
vector():set(31.025503158569,-2.9186296463013,-18.474792480469),
vector():set(0.0, 0.0, 0.0),
"l04_darkvalley",
1)
end

function exit_td2()
create_level_changer(11058, db.actor:position(), db.actor:level_vertex_id(), db.actor:game_vertex_id(),
377579,
938,
vector():set(177.20614624023,6.6501698493958,-368.2509765625),
vector():set(0.0, 0.0, 0.0),
"l04_darkvalley",
1)
end

function exit_kordon()
create_level_changer(11026, db.actor:position(), db.actor:level_vertex_id(), db.actor:game_vertex_id(),
557888,
245,
vector():set(288.75579833984,6.6381821632385,334.9274597168),
vector():set(0.0, 0.0, 0.0),
"l01_escape",
1)
end

function exit_kordon2()
create_level_changer(11027, db.actor:position(), db.actor:level_vertex_id(), db.actor:game_vertex_id(),
220208,
16,
vector():set(-56.72008895874,-29.649417877197,-352.75286865234),
vector():set(0.0, 0.0, 0.0),
"l01_escape",
1)
end

function exit_kordon3()
create_level_changer(11028, db.actor:position(), db.actor:level_vertex_id(), db.actor:game_vertex_id(),
314641,
198,
vector():set(33.526428222656,4.8442959785461,406.35510253906),
vector():set(0.0, 0.0, 0.0),
"l01_escape",
1)
end

function exit_kordon4()
create_level_changer(11029, db.actor:position(), db.actor:level_vertex_id(), db.actor:game_vertex_id(),
326234,
97,
vector():set(43.707790374756,1.604367017746,157.83784484863),
vector():set(0.0, 0.0, 0.0),
"l01_escape",
1)
end

function exit_kordon5()
create_level_changer(11030, db.actor:position(), db.actor:level_vertex_id(), db.actor:game_vertex_id(),
346954,
97,
vector():set(59.635650634766,19.672622680664,156.50126647949),
vector():set(0.0, 0.0, 0.0),
"l01_escape",
1)
end

function exit_kordon6()
create_level_changer(11031, db.actor:position(), db.actor:level_vertex_id(), db.actor:game_vertex_id(),
479316,
242,
vector():set(176.90881347656,6.2265067100525,274.12582397461),
vector():set(0.0, 0.0, 0.0),
"l01_escape",
1)
end

function exit_kordon7()
create_level_changer(11032, db.actor:position(), db.actor:level_vertex_id(), db.actor:game_vertex_id(),
418761,
115,
vector():set(116.21976470947,-7.5939545631409,-16.879535675049),
vector():set(0.0, 0.0, 0.0),
"l01_escape",
1)
end

function exit_kordon8()
create_level_changer(11033, db.actor:position(), db.actor:level_vertex_id(), db.actor:game_vertex_id(),
71846,
30,
vector():set(-178.17098999023,-29.790063858032,-355.4208984375),
vector():set(0.0, 0.0, 0.0),
"l01_escape",
1)
end

function exit_kordon9()
create_level_changer(11034, db.actor:position(), db.actor:level_vertex_id(), db.actor:game_vertex_id(),
116591,
19,
vector():set(-138.1682434082,-25.440311431885,-356.09561157227),
vector():set(0.0, 0.0, 0.0),
"l01_escape",
1)
end

function exit_kordon10()
create_level_changer(11035, db.actor:position(), db.actor:level_vertex_id(), db.actor:game_vertex_id(),
46406,
38,
vector():set(-206.31811523438,-36.486312866211,-275.36505126953),
vector():set(0.0, 0.0, 0.0),
"l01_escape",
1)
end

function exit_kordon11()
create_level_changer(11036, db.actor:position(), db.actor:level_vertex_id(), db.actor:game_vertex_id(),
34087,
47,
vector():set(-218.33445739746,-19.930738449097,-167.60050964355),
vector():set(0.0, 0.0, 0.0),
"l01_escape",
1)
end

function exit_kordon12()
create_level_changer(11037, db.actor:position(), db.actor:level_vertex_id(), db.actor:game_vertex_id(),
45951,
58,
vector():set(-207.27334594727,-22.535316467285,-128.54507446289),
vector():set(0.0, 0.0, 0.0),
"l01_escape",
1)
end

function exit_kordon13()
create_level_changer(11038, db.actor:position(), db.actor:level_vertex_id(), db.actor:game_vertex_id(),
11502,
67,
vector():set(-246.82745361328,-14.313711166382,-17.025833129883),
vector():set(0.0, 0.0, 0.0),
"l01_escape",
1)
end

function exit_kordon14()
create_level_changer(11039, db.actor:position(), db.actor:level_vertex_id(), db.actor:game_vertex_id(),
143574,
73,
vector():set(-112.90689849854,-8.191520690918,7.4986095428467),
vector():set(0.0, 0.0, 0.0),
"l01_escape",
1)
end

function exit_kordon15()
create_level_changer(11040, db.actor:position(), db.actor:level_vertex_id(), db.actor:game_vertex_id(),
274973,
108,
vector():set(-1.5780007839203,-17.687986373901,-152.26568603516),
vector():set(0.0, 0.0, 0.0),
"l01_escape",
1)
end

function exit_radar()
create_level_changer(11081, db.actor:position(), db.actor:level_vertex_id(), db.actor:game_vertex_id(),
93230,
2081,
vector():set(351.03564453125,-45.688995361328,-201.36804199219),
vector():set(0.0, 0.0, 0.0),
"l10_radar",
1)
end

function exit_radar2()
create_level_changer(11082, db.actor:position(), db.actor:level_vertex_id(), db.actor:game_vertex_id(),
67978,
1930,
vector():set(304.68270874023,-39.390411376953,-25.789834976196),
vector():set(0.0, 0.0, 0.0),
"l10_radar",
1)
end

function exit_radar3()
create_level_changer(11083, db.actor:position(), db.actor:level_vertex_id(), db.actor:game_vertex_id(),
14611,
2013,
vector():set(14.053562164307,-1.2424700260162,41.381050109863),
vector():set(0.0, 0.0, 0.0),
"l10_radar",
1)
end

function exit_radar4()
create_level_changer(11084, db.actor:position(), db.actor:level_vertex_id(), db.actor:game_vertex_id(),
6439,
1960,
vector():set(-12.000325202942,0.37741497159004,-67.812171936035),
vector():set(0.0, 0.0, 0.0),
"l10_radar",
1)
db.actor:give_info_portion("exit_radar4")
end

function exit_undergraund()
create_level_changer(11088, db.actor:position(), db.actor:level_vertex_id(), db.actor:game_vertex_id(),
2505,
745,
vector():set(-84.987205505371,-16.462963104248,-60.738975524902),
vector():set(0.0, 0.0, 0.0),
"l03_agr_underground",
1)
end

function exit_bar()
create_level_changer(11059, db.actor:position(), db.actor:level_vertex_id(), db.actor:game_vertex_id(),
45474,
1188,
vector():set(193.61143493652,0.097166806459427,71.526657104492),
vector():set(0.0, 0.0, 0.0),
"l05_bar",
1)
end

function exit_bar2()
create_level_changer(11060, db.actor:position(), db.actor:level_vertex_id(), db.actor:game_vertex_id(),
39883,
1204,
vector():set(175.31533813477,-0.0002819299697876,145.91943359375),
vector():set(0.0, 0.0, 0.0),
"l05_bar",
1)
end

function exit_bar3()
create_level_changer(11061, db.actor:position(), db.actor:level_vertex_id(), db.actor:game_vertex_id(),
47206,
1270,
vector():set(198.24176025391,3.271665096283,-77.252685546875),
vector():set(0.0, 0.0, 0.0),
"l05_bar",
1)
end

function exit_bar4()
create_level_changer(11062, db.actor:position(), db.actor:level_vertex_id(), db.actor:game_vertex_id(),
59366,
1277,
vector():set(232.64491271973,5.1447978019714,-113.61502838135),
vector():set(0.0, 0.0, 0.0),
"l05_bar",
1)
end

function exit_bar5()
create_level_changer(11063, db.actor:position(), db.actor:level_vertex_id(), db.actor:game_vertex_id(),
68763,
1274,
vector():set(276.64755249023,0.055086404085159,-66.742523193359),
vector():set(0.0, 0.0, 0.0),
"l05_bar",
1)
end

function exit_bar6()
create_level_changer(11064, db.actor:position(), db.actor:level_vertex_id(), db.actor:game_vertex_id(),
35860,
1238,
vector():set(128.80438232422,-4.8249382972717,16.76756477356),
vector():set(0.0, 0.0, 0.0),
"l05_bar",
1)
end

function exit_bar7()
create_level_changer(11065, db.actor:position(), db.actor:level_vertex_id(), db.actor:game_vertex_id(),
33903,
1239,
vector():set(116.09830474854,-5.3052234649658,12.649393081665),
vector():set(0.0, 0.0, 0.0),
"l05_bar",
1)
end

function exit_agroprom()
create_level_changer(11053, db.actor:position(), db.actor:level_vertex_id(), db.actor:game_vertex_id(),
428448,
498,
vector():set(253.95002746582,-0.20055566728115,76.619018554688),
vector():set(0.0, 0.0, 0.0),
"l03_agroprom",
1)
end

function exit_agroprom2()
create_level_changer(11054, db.actor:position(), db.actor:level_vertex_id(), db.actor:game_vertex_id(),
117939,
523,
vector():set(-122.60626983643,10.350003242493,164.23361206055),
vector():set(0.0, 0.0, 0.0),
"l03_agroprom",
1)
end

function exit_agroprom3()
create_level_changer(11055, db.actor:position(), db.actor:level_vertex_id(), db.actor:game_vertex_id(),
103987,
621,
vector():set(-135.0357208252,4.9933753013611,-196.9232635498),
vector():set(0.0, 0.0, 0.0),
"l03_agroprom",
1)
end

function exit_yantar1()
create_level_changer(11066, db.actor:position(), db.actor:level_vertex_id(), db.actor:game_vertex_id(),
6635,
1486,
vector():set(-98.555587768555,-12.03422164917,-263.20428466797),
vector():set(0.0, 0.0, 0.0),
"l08_yantar",
1)
end

function exit_yantar2()
create_level_changer(11067, db.actor:position(), db.actor:level_vertex_id(), db.actor:game_vertex_id(),
22009,
1454,
vector():set(-49.516319274902,-12.687213897705,-263.55654907227),
vector():set(0.0, 0.0, 0.0),
"l08_yantar",
1)
end

function exit_yantar3()
create_level_changer(11068, db.actor:position(), db.actor:level_vertex_id(), db.actor:game_vertex_id(),
85543,
1440,
vector():set(87.165092468262,1.5326626300812,-137.15473937988),
vector():set(0.0, 0.0, 0.0),
"l08_yantar",
1)
end

function exit_yantar4()
create_level_changer(11069, db.actor:position(), db.actor:level_vertex_id(), db.actor:game_vertex_id(),
98895,
1520,
vector():set(110.79859924316,0.51710104942322,67.085777282715),
vector():set(0.0, 0.0, 0.0),
"l08_yantar",
1)
end

function exit_yantar5()
create_level_changer(11070, db.actor:position(), db.actor:level_vertex_id(), db.actor:game_vertex_id(),
93237,
1515,
vector():set(102.05886077881,-0.055661827325821,-38.264953613281),
vector():set(0.0, 0.0, 0.0),
"l08_yantar",
1)
end

function exit_yantar6()
create_level_changer(11071, db.actor:position(), db.actor:level_vertex_id(), db.actor:game_vertex_id(),
50739,
1505,
vector():set(23.551870346069,-3.417268037796,-50.092147827148),
vector():set(0.0, 0.0, 0.0),
"l08_yantar",
1)
end

function exit_yantar7()
create_level_changer(11072, db.actor:position(), db.actor:level_vertex_id(), db.actor:game_vertex_id(),
57034,
1445,
vector():set(35.566432952881,0.036594957113266,19.930288314819),
vector():set(0.0, 0.0, 0.0),
"l08_yantar",
1)
end

function exit_yantar8()
create_level_changer(11073, db.actor:position(), db.actor:level_vertex_id(), db.actor:game_vertex_id(),
87168,
1514,
vector():set(90.726051330566,0.028770864009857,-2.0428421497345),
vector():set(0.0, 0.0, 0.0),
"l08_yantar",
1)
end

function exit_yantar9()
create_level_changer(11074, db.actor:position(), db.actor:level_vertex_id(), db.actor:game_vertex_id(),
38250,
1525,
vector():set(-2.272828578949,0.31553617119789,-12.611492156982),
vector():set(0.0, 0.0, 0.0),
"l08_yantar",
1)
end

function exit_yantar10()
create_level_changer(11075, db.actor:position(), db.actor:level_vertex_id(), db.actor:game_vertex_id(),
39736,
1525,
vector():set(0.41521853208542,20.732145309448,-11.2778673172),
vector():set(0.0, 0.0, 0.0),
"l08_yantar",
1)
end

function exit_yantar11()
create_level_changer(11076, db.actor:position(), db.actor:level_vertex_id(), db.actor:game_vertex_id(),
53157,
1480,
vector():set(28.687835693359,-5.943422794342,-272.9033203125),
vector():set(0.0, 0.0, 0.0),
"l08_yantar",
1)
end

function exit_dt1()
create_level_changer(11089, db.actor:position(), db.actor:level_vertex_id(), db.actor:game_vertex_id(),
15216,
1391,
vector():set(-236.99816894531,9.3585262298584,56.257476806641),
vector():set(0.0, 0.0, 0.0),
"l06_rostok",
1)
end

function exit_dt2()
create_level_changer(11090, db.actor:position(), db.actor:level_vertex_id(), db.actor:game_vertex_id(),
8119,
1382,
vector():set(-254.47462463379,-5.8917918205261,88.748420715332),
vector():set(0.0, 0.0, 0.0),
"l06_rostok",
1)
end

function exit_dt3()
create_level_changer(11091, db.actor:position(), db.actor:level_vertex_id(), db.actor:game_vertex_id(),
4658,
1379,
vector():set(-268.44509887695,-6.0012273788452,106.45835113525),
vector():set(0.0, 0.0, 0.0),
"l06_rostok",
1)
end

function exit_dt4()
create_level_changer(11092, db.actor:position(), db.actor:level_vertex_id(), db.actor:game_vertex_id(),
7269,
1338,
vector():set(-282.68493652344,-0.0055593848228455,203.75721740723),
vector():set(0.0, 0.0, 0.0),
"l06_rostok",
1)
end

function exit_dt5()
create_level_changer(11093, db.actor:position(), db.actor:level_vertex_id(), db.actor:game_vertex_id(),
32043,
1329,
vector():set(-173.43870544434,-0.0011672079563141,192.25354003906),
vector():set(0.0, 0.0, 0.0),
"l06_rostok",
1)
end

function exit_dt6()
create_level_changer(11094, db.actor:position(), db.actor:level_vertex_id(), db.actor:game_vertex_id(),
38957,
1328,
vector():set(-149.55770874023,0.096051603555679,179.93653869629),
vector():set(0.0, 0.0, 0.0),
"l06_rostok",
1)
end

function exit_dt7()
create_level_changer(11095, db.actor:position(), db.actor:level_vertex_id(), db.actor:game_vertex_id(),
22437,
1370,
vector():set(-217.82315063477,1.935809969902,88.06103515625),
vector():set(0.0, 0.0, 0.0),
"l06_rostok",
1)
end

function exit_dt8()
create_level_changer(11096, db.actor:position(), db.actor:level_vertex_id(), db.actor:game_vertex_id(),
32382,
1322,
vector():set(-169.39688110352,-0.0033434927463531,82.040466308594),
vector():set(0.0, 0.0, 0.0),
"l06_rostok",
1)
end

function exit_dt9()
create_level_changer(11097, db.actor:position(), db.actor:level_vertex_id(), db.actor:game_vertex_id(),
36070,
1321,
vector():set(-159.36485290527,-0.0026704967021942,99.839752197266),
vector():set(0.0, 0.0, 0.0),
"l06_rostok",
1)
end

function exit_dt10()
create_level_changer(11098, db.actor:position(), db.actor:level_vertex_id(), db.actor:game_vertex_id(),
27318,
1326,
vector():set(-192.9693145752,-0.0026823878288269,119.04988098145),
vector():set(0.0, 0.0, 0.0),
"l06_rostok",
1)
end

function exit_dt11()
create_level_changer(11099, db.actor:position(), db.actor:level_vertex_id(), db.actor:game_vertex_id(),
46578,
1421,
vector():set(-89.581573486328,3.1074571609497,148.33610534668),
vector():set(0.0, 0.0, 0.0),
"l06_rostok",
1)
end
</lua>
Комментарии к функциям есть в первой функции.
Активировать через диалог:
<code><action>название_скрипта.название_функции_без_скобок</code>

== Источник ==
В моде Hand Teleport на любой вкус.

== Статьи автор ==
vllzl

SoC. Создание проводника между локациями

2012-06-03T10:29:35Z

109.205.254.88: Новая страница: «== Левел-чейнджер == Мы создадим левел-чейнджер на месте ГГ. Наш диалог создаст переход и ГГ ...»

SoC. Лекарь

2012-06-02T15:48:23Z

109.205.254.88: /* Скрипты */

== Условие ==
Диалоги вы уже создали. Я в этом туторе тока покажу функции.

== Скрипты ==
<lua>
function health(actor, npc)
local text1 = "Все! Здоров как бюрер теперь!"
db.actor.health = 1.0 -- прибавим здоровье
news_manager.send_tip(db.actor, text1, nil, nil, 15000) -- отсылаем СМС о том, что ГГ здоров
end

function radiation(actor, npc)
local text2 = "Выброс!\nИщите глубокую нору (если жить охота)"
db.actor.radiation = −1.0 -- убавим радиацию
news_manager.send_tip(db.actor, text2, nil, nil, 15000) -- запугаем эктора СМС-выбросом
xr_effects.start_small_reject (actor, npc) -- эффект «выброса»
end
</lua>

=== Пояснение ===
Выброс можно убрать по желанию. Если вы начинающий модмейкер не трогайте ничего. Не убирайте строки db.actor.health и db.actor.radiation.

SoC. Лекарь

2012-06-02T15:47:16Z

109.205.254.88: /* Скрипты */

== Условие ==
Диалоги вы уже создали. Я в этом туторе тока покажу функции.

== Скрипты ==
<lua>
function health(actor, npc)
local text1 = "Все! Здоров как бюрер теперь!"
db.actor.health = 1.0 — прибавим здоровье
news_manager.send_tip(db.actor, text1, nil, nil, 15000) — отсылаем СМС о том, что ГГ здоров
end

function radiation(actor, npc)
local text2 = "Выброс!\nИщите глубокую нору (если жить охота)"
db.actor.radiation = −1.0 — убавим радиацию
news_manager.send_tip(db.actor, text2, nil, nil, 15000) — запугаем эктора СМС-выбросом
xr_effects.start_small_reject (actor, npc) — эффект «выброса»
end
</lua>

=== Пояснение ===
Выброс можно убрать по желанию. Если вы начинающий модмейкер не трогайте ничего. Не убирайте строки db.actor.health и db.actor.radiation.

SoC. Лекарь

2012-06-02T15:46:18Z

109.205.254.88: Новая страница: «== Условие == Диалоги вы уже создали. Я в этом туторе тока покажу функции. == Скрипты == <lua> functio...»

== Условие ==
Диалоги вы уже создали. Я в этом туторе тока покажу функции.

== Скрипты ==
<lua>
function health(actor, npc)
local text1 = "Все! Здоров как бюрер теперь!"
db.actor.health = 1.0 — прибавим здоровье
news_manager.send_tip(db.actor, text1, nil, nil, 15000) — отсылаем СМС о том, что ГГ здоров
end

function radiation(actor, npc)
local text2 = "Выброс!\nИщите глубокую нору (если жить охота)"
db.actor.radiation = −1.0 — убавим радиацию
news_manager.send_tip(db.actor, text2, nil, nil, 15000) — запугаем эктора СМС-выбросом
xr_effects.start_small_reject (actor, npc) — эффект «выброса»
end

=== Пояснение ===
Выброс можно убрать по желанию. Если вы начинающий модмейкер не трогайте ничего. Не убирайте строки db.actor.health и db.actor.radiation.

Спавн дружественного "монолитовца"

2012-06-02T12:27:44Z

109.205.254.88: Новая страница: «== Алгоритм == Алгоритм: 1) Спавним через create 2) Меняем relation == Практика == Открываем xr_effects.scripts...»

== Алгоритм ==
Алгоритм:

1) Спавним через create

2) Меняем relation

== Практика ==
Открываем xr_effects.scripts и в конце дописываем:
<lua>
function create_monfriend()
local npc = alife():create("pri_monolith_respawn_2",vector():set(x,y,z),level_vertex_id,game_vertex_id)
npc:set_relation (game_object.friend, db.actor)
end
</lua>
Также можно сделать нашего монолитовца нейтралом:
<lua>
function create_monfriend()
local npc = alife():create("pri_monolith_respawn_2",vector():set(x,y,z),level_vertex_id,game_vertex_id)
npc:set_relation (game_object.neutral, db.actor)
end
</lua>

С уважением, vllzl!

SoC. Делаем выброс как в модах

2012-06-02T12:09:33Z

109.205.254.88: Новая страница: «Сегодня мы создадим выброс. == Программируем == В папке scripts создаем файл surge_manager.script с таким...»

Сегодня мы создадим выброс.

== Программируем ==
В папке scripts создаем файл surge_manager.script с таким содержанием:
<lua>
function select_surge()
-- включаем предварительный эффект выброса
xr_effects.start_small_reject (actor, npc)

-- сделаем чтобы для урона была вероятность
if math.random(0, 1001) < 999 then

-- создаем урон
local h = hit()
h.direction = vector():set( 1, 0, 0 )
h.impulse = 1
h.draftsman = db.actor
h.power = 1
h.type = hit.telepatic
db.actor:hit(h)
</lua>
Вызывать через диалог

SoC. Спавн "вырезанных" животных

2012-06-02T11:46:39Z

109.205.254.88: Новая страница: «Здравставуйте, с Вами vllzl. Я вам объявлю сразу, что НИКАКИЕ монстры из игры НЕ убирались. Пр...»

Здравставуйте, с Вами vllzl.

Я вам объявлю сразу, что НИКАКИЕ монстры из игры НЕ убирались. Просто была закомментирована одна строка в файле m_монстр.ltx. Начнем спавнить бюрера.

== Бюрер ==
=== Спавним бюрера через create ===
Ниже привожу код функции, которая спавнит бюрера:
<lua>
function spawn_burer()
local vector = vector():set(x,y,z) -- подставьте координаты
local lvid = level_vertex_id -- подставьте левел-вертексы
local gvid = game_vertex_id -- подставьте гейм-вертексы
alife():create("m_burer_normal",vector,lvid,gvid) -- спавн с использованием наших переменных
end
</lua>
Позднее активируйте через диалог

=== Восстанавливаем бюрера ===
Открываем config\creatures\m_burer.ltx. Находим в секции [m_burer_e] строку:
<code>
;$spawn = "monsters\old\burer"
</code>
Раскомментируйте строку так:
<code>$spawn = "monsters\old\burer"</code>
<blockquote>''Мы убрали точку с запятой''</blockquote>

== Автор ==
[[Участник:vllzl]]
[[Категория:Скрипты]]

Делаем ТЧ таким, каким он должен быть

2012-06-01T15:47:33Z

109.205.254.88: Новая страница: «== Проводники == Почему мы должны ходить по Зоне сами? Мы уже все кнопки на клавиатуре стёрли...»

== Проводники ==
Почему мы должны ходить по Зоне сами? Мы уже все кнопки на клавиатуре стёрли. Почему нас не может кто-нибудь сопровождать? Реализуем проводника. Сначала:

1) Создаем персонажа.

2) Создаем персонажу диалоги типа "Отведешь меня к Сидоровичу?".

Привязываем к диалогам функцию (вставьте в любой скрипт):
<lua>
function teleportate(actor, npc)
db.actor:stop_talk() -- закрываем диалог
level.add_pp_effector ("teleport.ppe", 2008, false) -- чтобы переход небыл резким
local a = vector()
a.x = x
a.y = y
a.z = z
db.actor:set_actor_position(a)
end
</lua>

== Отключаем выброс на ЧАЭС ==
Создаем в папке scripts файл aes_control.script. В него пишем:
<lua>
function delete_aes_timer()
local obj = alife():object("aes_space_restrictor_timer")
if obj then
alife():release(obj, true)
end
end
</lua>
Теперь в функцию bind_stalker.actor_binder:update(delta) напишите:
<code>
-- удаление таймера выброса на ЧАЭС
aes_control.delete_aes_timer()
</code>

== Возвращаем бюрера ==
Бюрер - единственный «вырезанный» монстр, которого можно через create вернуть:
<lua>
function spawn_burer()
local obj
local a = vector()
a.x = x -- вектор X
a.y = y -- вектор Y
a.z = z -- вектор Z
obj = alife():create("m_burer_normal",a,level_vertex_id,game_vertex_id)
end
</lua>
<blockquote>''Функцию вставьте в конце файла dialogs.script''</blockquote>
Теперь открываем config\creatures\m_burer.ltx и в секции «[m_burer_e]:monster_base», перед строкой «;$spawn = "monsters\old\burer"» уберите точку с запятой. Активируйте функцию через диалог:
<code><action>dialogs.spawn_burer</action></code>

Начались каникулы

2012-06-01T14:46:48Z

109.205.254.88: Новая страница: «Вот скрипт, убивает ГГ: <lua> function kill_actor() actor:kill (actor) end </lua> == 2 вариант == Вызвать через диалог: <...»

Вот скрипт, убивает ГГ:
<lua>
function kill_actor()
actor:kill (actor)
end
</lua>

== 2 вариант ==
Вызвать через диалог:
<code>xr_effects.aes_kill_actor</code>

Спавн мертвого НПС без функций AMK

2012-06-01T14:43:33Z

109.205.254.88: Новая страница: «== 1 способ. Спавн НПС и убийство функцией == <lua> function spawn_killed_npc() local npc = alife():create("agr_stalker_veteran",vecto...»

== 1 способ. Спавн НПС и убийство функцией ==
<lua>
function spawn_killed_npc()
local npc = alife():create("agr_stalker_veteran",vector():set(x,y,z),level_vertex_id,game_vertex_id)
npc:kill (npc)
</lua>

== 2 способ. Спавн НПС и нанесение хита (НПС станет врагом ГГ посмертно) ==
<lua>
function spawn_killed_npc(first_speaker, second_speaker)
local npc = alife():create("agr_stalker_veteran",vector():set(x,y,z),level_vertex_id,game_vertex_id)
local text = "Погиб сталкер Иван Петров, ЧАЭС, пси-излучение" -- текст сообщения о погибели сталкера
local h = hit()
h.direction = vector():set( 1, 0, 0 )
h.impulse = 0 -- импульс хита
h.draftsman = db.actor
h.power = 100 -- мощность хита
h.type = hit.telepatic -- тип урона, в данном случае пси-атака
npc:hit(h) -- наносим хит
news_manager.send_tip(db.actor, text, nil, nil, 30000) -- даем эктору знать, что погиб НПС
end
</lua>
В настройках импульса хита ставьте "0", иначе труп будет лежать не там, где надо.
В настройках мощи хита ставьте как можно больше, чтобы НПС точно стал трупом.
В типе хита ставьте телепатию, не будет игроку врать, что он умер от пси-атаки. Сделаем так, что он действительно погиб от пси-атаки.
Направление хита не трогайте!

CoP. Создание точек перехода между уровнями через скрипт

2012-06-01T07:56:54Z

109.205.254.88: /* Шаг 1 */

== Шаг 1 ==
Первым делом скажу, что мы будем создавать переходы «подпольным» способом — через скрипт. Разработчиками он не задумывался — это особенность движка x-ray. Создадим файл \scripts\nlc.script с таким содержанием:
<lua>
function spawn_lc(gv, pos, dest_level, dest_pos, mode, dist_gv, dest_dir, custom)

local obj = alife():create("level_changer", pos, 1, gv)

if obj ~= nil then
local packet = net_packet()
packet:w_begin(0)
obj:STATE_Write(packet)
packet:r_seek(2)

-- свойства 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()

-- свойства se_level_changer
local enabled = packet:r_u8()
local hint = packet:r_stringZ()
local se_level_changer__marker = packet:r_u16()

-- 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)
if custom ~= nil then
packet:w_stringZ(custom)
else
packet:w_stringZ(custom_data)
end
packet:w_s32(story_id)
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(2)

else

packet:w_vec3(vector():set(2,0,0))
packet:w_vec3(vector():set(0,2,0))
packet:w_vec3(vector():set(0,0,2))
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(dist_gv)
packet:w_s32(1)
packet:w_vec3(dest_pos)

if dist_dir~=nil 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)

-- свойства se_level_changer
packet:w_u8(enabled)
packet:w_stringZ(hint)
packet:w_u16(se_level_changer__marker)

obj:STATE_Read(packet, packet:w_tell()-packet:r_tell())
end
return obj
end
</lua>
<blockquote>''Функция-генератор создает левел-чейнджер через create и переписывает его через net_packet''</blockquote>

== Функции создания level changer ==
Теперь наведем наш генератор левел-чейнджеров на создание «тихого» перехода в окрестности «Юпитера» (сохранитесь перед использованием):
<code>
function create_zaton2jupiter_exit()
-- создается переход с ЗАТОНА на ЮПИТЕР
nlc.spawn_lc(db.actor:game_vertex_id(), db.actor:position(), "jupiter", vector():set(-16.040319442749,3.410528421402,206.30738830566), 1, 409, vector():set(0,0,-1.0))
end
</code>
Где db.actor:game_vertex_id() — game_vertex, где создается переход;
где db.actor:position() — позиция перехода на локации из которой выходите;
где «jupiter» — локация, на которую ведет переход;
где vector():set(-16.040319442749,3.410528421402,206.30738830566) — позиция, на которой будете на новой локации;
где 1 — режим «тихого» перехода;
где 409 - game_vertex на новой локации;
где vector():set(0,0,-1.0) - направление взгляда на новой локации.

== Примечание ==
Режим «тихого» перехода в ЗП обязателен т.к. в игре нет текста «Перейти на другую локацию?».

== Авторы ==
Выковырял скрипт из мода «Повелитель Зоны».

Написал статью [[Участник:vllzl]]

CoP. Создание точек перехода между уровнями через скрипт

2012-06-01T07:51:56Z

109.205.254.88: Новая страница: «== Шаг 1 == Первым делом скажу, что мы будем создавать переходы «подпольным» способом — чере...»

== Шаг 1 ==
Первым делом скажу, что мы будем создавать переходы «подпольным» способом — через скрипт. Разработчиками он не задумывался — это особенность движка x-ray. Создадим файл \scripts\nlc.script с таким содержанием:
<lua>
function spawn_lc(gv, pos, dest_level, dest_pos, mode, dist_gv, dest_dir, custom)

local obj = alife():create(«level_changer», pos, 1, gv)

if obj ≈ nil then
local packet = net_packet()
packet:w_begin(0)
obj:STATE_Write(packet)
packet:r_seek(2)

— свойства 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()

— свойства se_level_changer
local enabled = packet:r_u8()
local hint = packet:r_stringZ()
local se_level_changer__marker = packet:r_u16()

— 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)
if custom ≈ nil then
packet:w_stringZ(custom)
else
packet:w_stringZ(custom_data)
end
packet:w_s32(story_id)
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(2)

else

packet:w_vec3(vector():set(2,0,0))
packet:w_vec3(vector():set(0,2,0))
packet:w_vec3(vector():set(0,0,2))
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(dist_gv)
packet:w_s32(1)
packet:w_vec3(dest_pos)

if dist_dir~=nil 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)

— свойства se_level_changer
packet:w_u8(enabled)
packet:w_stringZ(hint)
packet:w_u16(se_level_changer__marker)

obj:STATE_Read(packet, packet:w_tell()-packet:r_tell())
end
return obj
end
</lua>
<blockquote>''Функция-генератор создает левел-чейнджер через create и переписывает его через net_packet''</blockquote>

== Функции создания level changer ==
Теперь наведем наш генератор левел-чейнджеров на создание «тихого» перехода в окрестности «Юпитера» (сохранитесь перед использованием):
<code>
function create_zaton2jupiter_exit()
-- создается переход с ЗАТОНА на ЮПИТЕР
nlc.spawn_lc(db.actor:game_vertex_id(), db.actor:position(), "jupiter", vector():set(-16.040319442749,3.410528421402,206.30738830566), 1, 409, vector():set(0,0,-1.0))
end
</code>
Где db.actor:game_vertex_id() — game_vertex, где создается переход;
где db.actor:position() — позиция перехода на локации из которой выходите;
где «jupiter» — локация, на которую ведет переход;
где vector():set(-16.040319442749,3.410528421402,206.30738830566) — позиция, на которой будете на новой локации;
где 1 — режим «тихого» перехода;
где 409 - game_vertex на новой локации;
где vector():set(0,0,-1.0) - направление взгляда на новой локации.

== Примечание ==
Режим «тихого» перехода в ЗП обязателен т.к. в игре нет текста «Перейти на другую локацию?».

== Авторы ==
Выковырял скрипт из мода «Повелитель Зоны».

Написал статью [[Участник:vllzl]]

SoC. Отключение таймера и выброса на ЧАЭС

2012-05-27T09:28:22Z

109.205.254.88: Новая страница: «== Навестим скрипты и инфопоршни! == В sr_timer.script и sr_aes_deadzone.script в начале каждой из функций напи...»

== Навестим скрипты и инфопоршни! ==
В sr_timer.script и sr_aes_deadzone.script в начале каждой из функций напишите:
<code>if has_alife_info("deadzone") then</code>

В xr_effects.script, в функции aes_earthshake, в начале пишем:
<code>if has_alife_info("deadzone") then</code>

Мы упоминалы некий инфопоршень, о нем игра не знает. Добавим его в игру.

Откроем info_l19_stanciya.xml(gamedata/config/gameplay). Допишем инфопоршен:
<code><info_portion id="deadzone"></info_portion></code>

== Активация! ==
Включить таймер и выброс:
<code>
function start(actor, npc)
db.actor:give_info_portion("deadzone")
end
</code>
Отключить:
<code>
function stop(actor, npc)
db.actor:disable_info_portion("deadzone")
end
</code>

== Автор ==
[[Участник:vllzl]]

[[Категория:Скрипты]]

SoC. Фриплей

2012-05-27T09:10:34Z

109.205.254.88: Новая страница: «== Таймер/выброс на ЧАЭС == Первым делом уберем таймер (ЧАЭС-1) и выброс (ЧАЭС-1 и ЧАЭС-2). Открыв...»

== Таймер/выброс на ЧАЭС ==
Первым делом уберем таймер (ЧАЭС-1) и выброс (ЧАЭС-1 и ЧАЭС-2).
Открываем sr_timer.script и в начале всех функций пишем:
<code>if not has_alife_info("freeplay") then</code>

С файлом sr_aes_deadzone.script делаем тоже самое.

В файл info_l19_stanciya.xml(это в gamedata/config/gameplay) пишем:
<code><info_portion id="freeplay"></info_portion></code>

В xr_effects.script, в начале функции aes_earthshake напишите:
<code><info_portion id="freeplay"></info_portion></code>

== Точки перехода ==
В freeplay.script пишем:
<lua>
-- Спавним левел-чейнджер
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}
-- 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)

-- Перемещаем актора, ато он на трубе станет
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
end
</lua>
Точки перехода нужны для того, чтобы актор не застрял на ЧАЭС-2, чтобы он мог вернуться к любимому Сидоровичу - на кордон, в Припять, на ЧАЭС-1, на Радар, Янтарь, бар, в Темную долину.

Пишем в файл bind_stalker.script, в функцию actor_binder:update(delta)
<code>
-- помечаем точки переходов
freeplay.mark_lc()
</code>

== Активация ==
В ui_movies.xml(gamedata/config/ui), в теге mov_refuse_osoznanie, элемент <function_on_stop> модифицировать, чтобы было так:
<code><function_on_stop>freeplay.set_lc</function_on_stop></code>

== Авторы ==
Статью писал Я - vllzl.

Скрипт из OGSM.

SoC. Делаем выброс через скрипт

2012-05-27T08:31:49Z

109.205.254.88:

Сразу говорю, что я считаю, что выброс не должен быть смертелен для ГГ. Он будет НЕ смертелен, но будет наносить большой урон. Выброс будет скриптовый.

== Программируем выброс ==
Создаем файл '''vibros.script''' и туда пишем:
<lua>
function start_vibros()
-- землетрясение
local snd_obj = xr_sound.get_safe_sound_object([[ambient\earthquake]])
snd_obj:play_no_feedback(db.actor, sound_object.s2d, 0, vector(), 1.0)
level.add_cam_effector("camera_effects\\earthquake.anm", 1974, false, "")
--set_postprocess ("scripts\\earthshake.ltx")

-- эффекты выброса
level.set_weather_fx ("surge_day")
level.add_pp_effector ("vibros_p.ppe", 1975, false)

-- урон
local h = hit()
h.direction = vector():set( 1, 0, 0 )
h.impulse = 0
h.draftsman = db.actor
h.power = 1
h.type = hit.radiation
db.actor:hit(h)
h.power = 0.3
h.type = hit.shock
db.actor:hit(h)
h.power = 0.3
h.type = hit.telepatic
db.actor:hit(h)

-- дополнительные эффекты
level.add_pp_effector("radiation.ppe", 1000, false)
end
</lua>
Алгоритм работы выброса:

1) Запускаем землетрясение.

2) Запускаем эффекты выброса.

3) Запускаем урон.

4) Запускаем эффекты радиации.

На заметку: никогда не трогайте больше файл vibros.script

== Активация выброса ==
Можно делать через диалог:
<code><action>vibros.start_vibros</action></code>
Через скрипт несколько иначе:
<code>vibros.start_vibros()</code>

== Памятка ==
Напоминаю: файл vibros.script не трогайте.
Активировать выброс можно неограниченное количество раз.
Если вы хотите сделать выброс смертельным поставьте h.impulse = 100 и везде h.power = 100.

== Авторы ==
Скрипт не мой. Я его ковырял из других скриптов частями. Скрипт проверял на своей шкуре - все работает.

Автор статьи: я - vllzl

Автор скрипта: GSC

SoC. Делаем выброс через скрипт

2012-05-26T09:55:51Z

109.205.254.88: Новая страница: «Сразу говорю, что я считаю, что выброс не должен быть смертелен для ГГ. Он будет НЕ смертеле...»

Сразу говорю, что я считаю, что выброс не должен быть смертелен для ГГ. Он будет НЕ смертелен, но будет наносить большой урон. Выброс будет скриптовый.

== Программируем выброс ==
Создаем файл '''vibros.script''' и туда пишем:
<lua>
function start_vibros()
-- землетрясение
local snd_obj = xr_sound.get_safe_sound_object([[ambient\earthquake]])
snd_obj:play_no_feedback(db.actor, sound_object.s2d, 0, vector(), 1.0)
level.add_cam_effector("camera_effects\\earthquake.anm", 1974, false, "")
--set_postprocess ("scripts\\earthshake.ltx")

-- эффекты выброса
level.set_weather_fx ("surge_day")
level.add_pp_effector ("vibros_p.ppe", 1975, false)

-- урон
local h = hit()
h.direction = vector():set( 1, 0, 0 )
h.impulse = 0
h.draftsman = db.actor
h.power = 1
h.type = hit.radiation
db.actor:hit(h)
h.power = 0.3
h.type = hit.shock
db.actor:hit(h)
h.power = 0.3
h.type = hit.telepatic
db.actor:hit(h)

-- дополнительные эффекты
level.add_pp_effector("radiation.ppe", 1000, false)
end
</lua>
Алгоритм работы выброса:

1) Запускаем землетрясение.

2) Запускаем эффекты выброса.

3) Запускаем урон.

4) Запускаем эффекты радиации.

На заметку: никогда не трогайте больше файл vibros.script

== Активация выброса ==
Можно делать через диалог:
<code><action>vibros.start_vibros</action></code>
Через скрипт несколько иначе:
<code>vibros.start_vibros()</code>

== Памятка ==
Напоминаю: файл vibros.script не трогайте.
Активировать выброс можно неограниченное количество раз.

== Авторы ==
Скрипт не мой. Я его ковырял из других скриптов частями. Скрипт проверял на своей шкуре - все работает.

Автор статьи: я - vllzl

Автор скрипта: GSC

SoC. Вступление в группировки

2012-05-20T12:56:35Z

109.205.254.88:

Сегодня мы попытаемся реализовать вступление в группировки. Создаете диалоги к: Воронину, Лукашу типа вот-таких: "Я хочу вступить в "Долг"" или "Я хочу в "Свободу"". Это вы уже я так думаю сделали.

== Теория ==
За вступление в группировки отвечает вот такая функция:
<code>db.actor:set_character_community("группировка", 0, 0)</code>

== Практика ==
Создаем файл '''community.script''' в gamedata/scripts. И туда пишем:
<code>
function dolg(npc, actor)
npc:stop_talk()
actor:stop_talk()
db.actor:set_character_community("actor_dolg", 0, 0)
end

function freedom(npc, actor)
npc:stop_talk()
actor:stop_talk()
db.actor:set_character_community("actor_freedom", 0, 0)
end
</code>
Теперь в созданные нами диалоги пишем:
<code><action>community.dolg</action></code>
<code><action>community.freedom</action></code>

С уважением, vllzl.
[[Категория:Скрипты]]

SoC. Вступление в группировки

2012-05-20T12:55:54Z

109.205.254.88: Новая страница: «Сегодня мы попытаемся реализовать вступление в группировки. Создаете диалоги к: Воронину,...»

Скрипты. Открываем секретную дверь в Саркофаге без декодера.

2012-05-20T10:18:50Z

109.205.254.88: Новая страница: «Открываем файл gamedata/config/scripts/sar_door.ltx. Там находим: <code> [logic] active = ph_door@locked [ph_door@locked] locked = true close...»

Открываем файл gamedata/config/scripts/sar_door.ltx. Там находим:
<code>
[logic]
active = ph_door@locked

[ph_door@locked]
locked = true
closed = true
tip_open = tip_door_coded
on_info = {=actor_has_decoder} ph_door@coded

[ph_door@coded]
locked = true
closed = true
tip_open = tip_door_decode
on_info = {!actor_has_decoder} ph_door@locked
on_use = ph_door@decoding %+sar_access_decoding%

[ph_door@decoding]
locked = true
closed = true
tip_open = tip_door_decoding
on_info = {+sar_finish_decoding} ph_door@unlocked

[ph_door@unlocked]
locked = false
closed = false
show_tips = false
</code>
Там строки:
<code>
locked = true
closed = true
</code>
Заменяем на:
<code>
locked = false
closed = false
</code>
[[Категория:Конфигурационные файлы]]

Создание выброса в ТЧ

2012-05-19T13:13:44Z

109.205.254.88: Новая страница: «== Добавляем секцию спавна == Открываем spawn_sections.ltx и пишем: <code> [bar_death]:space_restrictor custom_data = scripts\su...»

== Добавляем секцию спавна ==

Открываем spawn_sections.ltx и пишем:
<code>
[bar_death]:space_restrictor
custom_data = scripts\surge.ltx

[bar_timer]:space_restrictor
custom_data = scripts\timer.ltx
</code>

== Логика ==

В gamedata\config\scripts создаем surge.ltx. Туда пихаем:
<code>
[logic]
active = sr_idle

[sr_idle]
on_info = {+bar_zone} sr_aes_deadzone

[sr_aes_deadzone]
intensity = 150
intensity_speed = 150
hit_intensity = 80
on_timer = x nil -- в реальных миллисекундах продолжительность выброса
</code>

В gamedata\config\scripts создаем timer.ltx Туда пишем:
<code>
[logic]
active = sr_timer

[sr_timer]
type = dec -- тип счетчика ставьте dec, иначе выброса не видать
start_value = 60000 -- дадим 60000 мсек на спрятаться
on_value = 0 | %+bar_zone% -- при нуле запускаем наш выброс
</code>

== Инфопоршни ==
Откройте info_portions.xml и впишите туда: <code><info_portion id="bar_zone"></info_portion></code>

== Спавн ==
Функция спавна вставить в sr_aes_deadzone.script в конце:
<lua>
function add_surge()
if not has_alife_info ("bar_zone") then
alife():create("bar_death",vector():set(x,y,z),lvertex,gvertex) -- где выброс
alife():create("bar_timer",vector():set(x,y,z),lvertex,gvertex) -- где будет таймер
db.actor:give_info_portion("bar_zone")
end
</lua>
И в bind_stalker в функция actor_binder(update) вставьте sr_aes_deadzone.add_surge()

SoC. Отключаем таймер на АЭС1 и смертельные зоны на АЭС2

2012-05-09T13:36:16Z

109.205.254.88:

Создаем файл '''aes_control.script''' в папке gamedata/scripts
<lua>
function delete_deadzone()
local obj = alife():object("aes2_space_restrictor_death_0000")
if obj then
alife():release(obj, true)
end
local obj1 = alife():object("aes2_space_restrictor_death_0001")
if obj then
alife():release(obj1, true)
end
local obj2 = alife():object("aes2_space_restrictor_death_0002")
if obj then
alife():release(obj2, true)
end
local obj3 = alife():object("aes2_space_restrictor_death_0003")
if obj then
alife():release(obj3, true)
end
local obj4 = alife():object("aes2_space_restrictor_death_0004")
if obj then
alife():release(obj4, true)
end
local obj5 = alife():object("aes2_space_restrictor_death_0005")
if obj then
alife():release(obj5, true)
end
local se_obj = alife():object("aes_space_restrictor_timer") -- выбираем основной рестриктор таймера
if se_obj then
alife():release(se_obj, true) -- удаляем выбранное
end
local se_obj1 = alife():object("aes_space_restrictor_timer_go") -- выбираем рестриктор, запускающий основной рестриктор
if se_obj1 then
alife():release(se_obj1, true) -- удаляем выбранное
end
end
</lua>
Теперь куда-нибудь в диалоги вставляем:
<code>
<action>aes_control.delete_deadzone</action>
</code>
Отключит смертельные зоны на АЭС2 и таймер на АЭС1.

SoC. Отключаем таймер на АЭС1 и смертельные зоны на АЭС2

2012-05-09T13:34:18Z

109.205.254.88:

Создаем файл '''aes_control.script''' в папке gamedata/scripts
<lua>
function delete_deadzone()
local obj = alife():object("aes_space_restrictor_death_0000")
if obj then
alife():release(obj, true)
end
local obj1 = alife():object("aes_space_restrictor_death_0001")
if obj then
alife():release(obj1, true)
end
local obj2 = alife():object("aes_space_restrictor_death_0002")
if obj then
alife():release(obj2, true)
end
local obj3 = alife():object("aes_space_restrictor_death_0003")
if obj then
alife():release(obj3, true)
end
local obj4 = alife():object("aes_space_restrictor_death_0004")
if obj then
alife():release(obj4, true)
end
local obj5 = alife():object("aes_space_restrictor_death_0005")
if obj then
alife():release(obj5, true)
end
local se_obj = alife():object("aes_space_restrictor_timer") -- выбираем основной рестриктор таймера
if se_obj then
alife():release(se_obj, true) -- удаляем выбранное
end
local se_obj1 = alife():object("aes_space_restrictor_timer_go") -- выбираем рестриктор, запускающий основной рестриктор
if se_obj1 then
alife():release(se_obj1, true) -- удаляем выбранное
end
end
</lua>
Теперь куда-нибудь в диалоги вставляем:
<code>
<action>aes_control.delete_deadzone</action>
</code>
Отключит смертельные зоны на АЭС2 и таймер на АЭС1.

SoC. Отключаем таймер на АЭС1 и смертельные зоны на АЭС2

2012-05-09T13:33:04Z

109.205.254.88:

Создаем файл '''aes_control.script''' в папке gamedata/scripts
<lua>
function delete_deadzone()
local obj = alife():object("aes_space_restrictor_death_0000")
if obj then
alife():release(obj, true)
end
local obj1 = alife():object("aes_space_restrictor_death_0001")
if obj then
alife():release(obj1, true)
end
local obj2 = alife():object("aes_space_restrictor_death_0002")
if obj then
alife():release(obj2, true)
end
local obj3 = alife():object("aes_space_restrictor_death_0003")
if obj then
alife():release(obj3, true)
end
local obj4 = alife():object("aes_space_restrictor_death_0004")
if obj then
alife():release(obj4, true)
end
local obj5 = alife():object("aes_space_restrictor_death_0005")
if obj then
alife():release(obj5, true)
end
local se_obj = alife():object("aes_space_restrictor_timer") -- выбираем основной рестриктор таймера
if obj then
alife():release(obj, true) -- удаляем выбранное
end
local se_obj1 = alife():object("aes_space_restrictor_timer_go") -- выбираем рестриктор, запускающий основной рестриктор
if obj then
alife():release(obj1, true) -- удаляем выбранное
end
end
</lua>
Теперь куда-нибудь в диалоги вставляем:
<code>
<action>aes_control.delete_deadzone</action>
</code>
Отключит смертельные зоны на АЭС2 и таймер на АЭС1.

SoC. Отключаем таймер на АЭС1 и смертельные зоны на АЭС2

2012-05-09T13:26:41Z

109.205.254.88: Новая страница: «Создаем файл '''aes_control.script''' в папке gamedata/scripts <lua> function delete_deadzone() local obj = alife():object("aes_space_restri...»

Создаем файл '''aes_control.script''' в папке gamedata/scripts
<lua>
function delete_deadzone()
local obj = alife():object("aes_space_restrictor_death_0000")
if obj then
alife():release(obj, true)
end
local obj1 = alife():object("aes_space_restrictor_death_0001")
if obj then
alife():release(obj1, true)
end
local obj2 = alife():object("aes_space_restrictor_death_0002")
if obj then
alife():release(obj2, true)
end
local obj3 = alife():object("aes_space_restrictor_death_0003")
if obj then
alife():release(obj3, true)
end
local obj4 = alife():object("aes_space_restrictor_death_0004")
if obj then
alife():release(obj4, true)
end
local obj5 = alife():object("aes_space_restrictor_death_0005")
if obj then
alife():release(obj5, true)
end
local se_obj = alife():object("aes_space_restrictor_timer")
if obj then
alife():release(obj, true)
end
local se_obj1 = alife():object("aes_space_restrictor_timer_go")
if obj then
alife():release(obj1, true)
end
end
</lua>
Теперь куда-нибудь в диалоги вставляем:
<code>
<action>aes_control.delete_deadzone</action>
</code>
Отключит смертельные зоны на АЭС2 и таймер на АЭС1.

Подключение режима freeplay

2012-05-08T11:56:51Z

109.205.254.88: Новая страница: «== Отключение выброса на ЧАЭС 1 == Создайте скрипт '''off_timer.script'''. В него напишите: <lua> function delete_t...»

== Отключение выброса на ЧАЭС 1 ==
Создайте скрипт '''off_timer.script'''. В него напишите:
<lua>
function delete_timer()
local se_obj = alife():object("aes_space_restrictor_timer") -- задаем объект
if se_obj then
alife():release(se_obj, true) -- удаляем заданный объект
end
</lua>
Теперь в каком-нибудь диалоге пишем активацию функции:
<code>
<action>off_timer.delete_timer</action>
</code>
Автор: Я vllzl

== Возврат с ЧАЭС на ранние уровни игры ==
Часть 1. Генерация работающего LEVEL_CHANGER

Стандартной функции alife():create(…) недостаточно для создания полноценного level_changer. Собственно методика создания сложных объектов описана в статье Один из методов спавна. Сложность заключалась лишь в порядке полей и свойствах Shape. Неоценимую помощь в этом вопросе оказала утилита ACDC (created by bardak).

Ниже я привожу код функции, которая создает и инициализирует level_changer:
<code>
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_gest_lv, -- level_vertex_id - идентифицируют уровень, на который level_changer будет перебрасывать игрока
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_gest_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())

-- news_manager.send_tip(db.actor, "LC creation finished", nil, nil, 30000)
end
</code>
Для shape типа "box" загрузка координат методом packet:r_matrix() окончилась неудачей. Я подозреваю, что не был прочитан вектор "offset", но точной уверенности нет, поэтому пока остановился на покомпонентной выборке и сохранении координат.

Часть 2. Создание точек перехода

Теперь следует написать функции создания нужных точек перехода и подключить их к игре. Сами функции просты:
<code>
function exit_monolit()
if (not has_alife_info("freeplay_activated1")) then
create_level_changer(11410, vector():set(-13.26, 47.71, 46.57), 200, 2417,
2384,
162109,
vector():set( 375.615, 0.224, 27.737 ),
vector():set( 0.0, 0.0 , 0.0 ),
"L12_Stancia",
1)

db.actor:give_info_portion("freeplay_activated1")
end

-- создается переход из ЧАЭС в Припять
create_chaes2pripyat_exit()

-- актер перебрасывается в level_changer, возвращающий его на ЧАЭС, ко входу в бункер
db.actor:set_actor_position( vector():set(-13.26, 47.71, 46.57) )
end

function refuze_o_sozn()
if (not has_alife_info("freeplay_activated2")) then
create_level_changer(21410, vector():set(946.872, 6.0, 167.66), 240852, 2637,
2280,
472710,
vector():set( 1062.15, -0.0982, -3.512 ),
vector():set( 0.0 , 0.0 , -1.0 ),
"L12_Stancia",
1)

db.actor:give_info_portion("freeplay_activated2")
end

-- создается переход из ЧАЭС в Припять
create_chaes2pripyat_exit()

-- актер перебрасывается в level_changer, возвращающий его к правым воротам ЧАЭС
db.actor:set_actor_position( vector():set(946.872, 6.0, 167.66) )
end

function create_chaes2pripyat_exit()
-- создается переход из ЧАЭС в Припять
if (not has_alife_info( "exit_chaes2pripyat_created" )) then
create_level_changer(31410, vector():set( 917.35, 0.419, -316.35 ), 403866, 2401,
2117,
73868,
vector():set( 31.3, 3.0, 240.0 ),
vector():set( 0.0, 0.0, -1.0 ),
"L11_Pripyat",
0)

db.actor:give_info_portion("exit_chaes2pripyat_created")
end
end
</code>
Функцию exit_monolit я создал исключительно для тестирования, но решил оставить и тут. Вдруг кто-то захочет реализовать более сложный возврат: Меченого грузят в "грузовик смерти" и он снова приходит в себя на кордоне...

Функция exit_monolit создает «тихий» переход на уровень ЧАЭС-1 и обычный - в начале уровня ЧАЭС-1 для возврата в Припять, после чего перебрасывает актера прямо внутрь созданного перехода. Функция refuze_o_sozn делает тоже самое, только игрок появляется перед воротами в правом верхем углу карты (мне кажется, что так более логично). Все телепорты защищаются уникальными info_portions, дабы избежать их повторного создания, ведь игрок может захотеть «закончить» игру несколько раз.

Теперь подключение. Во-первых надо добавить новые info-portions. Я решил не изменять оригинальные файлы игры, а сделал для них (ну и для других тоже) отдельный файл
config\gameplay\_info_sa.xml

следующего вида:
<code>
<?xml version="1.0" encoding="windows-1251" ?>

<game_information_portions>

<info_portion id="freeplay_activated1"></info_portion>
<info_portion id="freeplay_activated2"></info_portion>
<info_portion id="exit_chaes2pripyat_created"></info_portion>

</game_information_portions>
</code>

Теперь в этот файл можно будет добавлять новые info_portion, которые вы будете использовать в своих сюжетах. Подключается этот файл в system.ltx в секции «info_portions»:
<code>
[info_portions]
;список xml файлов, содержащих info_portions
files = _info_sa, info_portions, ....................
</code>

Кстати, именно так я рекомендую добавлять новые диалоги и новых персонажей. Это упростит процессы совмещения модов и аддонов.

Следующий шаг - подключение наших скриптов к игре. Для этого откройте файл
config\ui\ui_movies.xml

найдите элементы «mov_desire_» (их пять, по количеству ложных концовок игры - все варианты общения с Монолитом). Внутри каждого элемента есть дочерние элементы «function_on_stop», которые задают функцию, запускающуюся сразу после ролика. Стандартное содержимое:
<code>
<function_on_stop>xr_effects.game_credits</function_on_stop>
</code>

Функция xr_effects.game_credits запускает финальные титры. Именно ее и нужно заменить на вызов нашей функции _freeplay_sa.exit_monolit. Вот что должно получиться:
<code>
<function_on_stop>_freeplay_sa.exit_monolit</function_on_stop>
</code>
Чуть ниже «mov_desire_5» находится тэг ролика для концовки «Присоединение к О-Сознанию». Его мы трогать не будем - Меченый станет медузой. А вот после него - тэг для ролика «Отказ от О-Сознания»: «mov_refuse_osoznanie». Функцию завершения в нем заменим следующим образом:
<code>
<function_on_stop>_freeplay_sa.refuze_o_sozn</function_on_stop>
</code>

И последнее: переход ЧАЭС1-Припять необходимо отметить на карте. Для этого существует вполне «легальный» механизм. Находим файл level_tasks.script и в конце функции add_lchanger_location дописываем следующее:
<code>
-- aes (++16.03.2008 by SA):
obj = sim:story_object(31410)
if obj then
level.map_add_object_spot(obj.id, "level_changer", "To Pripyat")
end
</code>

Здесь 31410 - story_id нашего level_changer, который создается нашей функцией create_chaes2pripyat_exit.

На этом пока все (мелкие огрехи типа направления взгляда игрока после смены уровня исправлю позже). Прошу тестировать и дополнять.

С уважением, sarthur.

== Телепорты ==
В каталоге gamedata\scripts\ Создадим файл bind_mteleport.script с логикой работы нашего телепорта.
-- ************************************************
-- ** Imp **
-- ** Биндер самодельных телепортов **
-- ** Поддерживает работу самопальных телепортов **
-- ************************************************

local teleport_binders ={} -- Список телепортов

function abs_comp(a,b)
-- Служебная функция вычисления разности
if( a < b) then
return (b - a)
else
return (a - b)
end
end

function teleportate(x,y,z)
-- Функция телепортации
local a = vector()
-- Задаем координаты
a.x = x
a.y = y
a.z = z

-- Сама телепортация
db.actor:set_actor_position(a)

-- Звуковое сопровождение
local snd_obj = xr_sound.get_safe_sound_object([[affects\tinnitus3a]])
snd_obj:play_no_feedback(db.actor, sound_object.s2d, 0, vector(), 1.0)

end

function actor_update(delta)
local i,v,acter_poz,s

-- Получим позицию актера (что-бы каждый раз не запрашивать)
acter_poz = db.actor:position()

-- Проверяем наши телепорты
for i, v in pairs(teleport_binders) do
s = v.parametrs

local obj = level.object_by_id( i )
if obj ~= nil then
-- Наш телепорт в онлайне проверяем дальше
if s.teleporte ~= nil and s.teleporte ~= false then
-- Телепорт запущен
if ( time_global() <= s.time ) then
-- Если время отведенное на показ спецэфектов
-- прошло, производим телепортацию
teleportate(s.poz_x,s.poz_y,s.poz_z)
if s.rotate ~= nil then
db.actor:set_actor_direction(s.rotate)
end
s.teleporte = false
end
return
end

-- Пороверим не забрел-ли актер в наш телепорт
if (abs_comp(s.x, acter_poz.x)< v.parametrs.radius and
abs_comp(s.z, acter_poz.z)< v.parametrs.radius and
abs_comp(s.y, acter_poz.y)< v.parametrs.z_radius) then
-- Актер в зоне действия телепорта, запустим телепорт
s["teleporte"] = true
s["time"] = time_global() + 500

-- Запускаем спецэфекты телепортации
level.add_pp_effector ("teleport.ppe", 2006, false)
end
end
end
end

function bind( obj )
obj:bind_object( restrictor_teleport( obj ) )
end

----------------------------------------------------------------------------------------------------
class "restrictor_teleport" ( object_binder )

function restrictor_teleport:__init(obj, char_ini) super(obj)
end

function restrictor_teleport:net_spawn(data)
local char_ini = system_ini()

-- Если это телепорт то занесем его в специальный список телепортов
if self.teleport == true then
teleport_binders[self.object:id()] = self

-- Заполним таблицу параметров
self["parametrs"] = {}
if char_ini:line_exist(self.section, "radius") then
self.parametrs["radius"] = tonumber(char_ini:r_string(self.section, "radius"))
else
self.parametrs["radius"] = 2 -- Дефолтный радиус по xy
end
if char_ini:line_exist(self.section, "z_radius") then
self.parametrs["z_radius"] = tonumber(char_ini:r_string(self.section, "z_radius"))
else
self.parametrs["z_radius"] = self.parametrs["radius"] -- если радиус высоты не задан то задаем равным радиусу xy
end

-- Запомним позицию что-бы каждый раз не считать
local s_obj = alife():object(self.object:id())
self.parametrs["x"] = tonumber(s_obj.position.x);
self.parametrs["y"] = tonumber(s_obj.position.y);
self.parametrs["z"] = tonumber(s_obj.position.z);

-- Запомним координаты куда телепортимся
self.parametrs["poz_x"] = tonumber(char_ini:r_string(self.section, "poz_x"))
self.parametrs["poz_y"] = tonumber(char_ini:r_string(self.section, "poz_y"))
self.parametrs["poz_z"] = tonumber(char_ini:r_string(self.section, "poz_z"))

if char_ini:line_exist(self.section, "rotate") then
self.parametrs["rotate"] = tonumber(char_ini:r_string(self.section, "rotate"))
end
end
return true
end

function restrictor_teleport:net_destroy()
-- Удаляем наш телепорт
teleport_binders[self.object:id()] = nil
self.parametrs = nil
object_binder.net_destroy(self)
end

function restrictor_teleport:reload(section)
local char_ini = system_ini()

self.section = section
-- Если это телепорт то
if char_ini ~= nil and char_ini:line_exist(self.section, "teleport") then
self["teleport"] = true
end
end

Для постоянного обновления нужно прицепить функцию actor_update() к биндеру актера, для чего в файле bind_stalker.script найдем функцию:

function actor_binder:update(delta)

В ней найдем вызов обновления рестрикторов bind_restrictor.actor_update(delta) под которым вставим строку с вызовом нашей функции обновления: bind_mteleport.actor_update(delta)

Все с программной частью закончили, теперь задаем данные телепорта.

В каталоге gamedata\config\misc открываем файл zone_teleport.ltx и в конце файла добавляем следующие строки описывающие конкретный телепорт:
[m_teleport_1]:zone_teleport
teleport = standart
script_binding = bind_mteleport.bind
;Параметры нашего телепорта
radius = 2
;Высота захвата телепорта
z_radius = 2

;Куда телепортируемся (телепортация всегда идет в пределах карты)
poz_x = 22.78
poz_y = 20.35
poz_z = 659.24

; Угол зрения при появлении. Если параметра нет то не меняется.
rotate = 1.5

Параметры нашего телепорта:
radius - на самом деле не радиус, а половина длинны стороны нашего квадрата (в начале я хотел сделать его кругом, но посчитал, что лучше не тратить процессорное врямя по пусту). Центром квадрата является точка респавна телепорта.
z_radius - высота нашего телепорта.
poz_x, poz_y, poz_z - координаты точки телепортации.
rotate - Угол поворота после телепортации от оси X (я не разбирался в каких единицах задается, но 1.5 примерно равно 90 градусов). Если параметр удалить то будет оставатья угол под которым актер вошел в телепорт.
Использование

Теперь с помощью create создадим наш телепорт: Пример:
local obj
local a = vector()
a.x = -244.55
a.y = -19.46
a.z = -125.42
obj = alife():create("m_teleport_1",a,12829,8,65535)

С вами был vllzl

Soc. Спавн через скрипт

2012-05-07T14:59:36Z

109.205.254.88: Новая страница: «== 1 вариант == <lua> function spawn() alife():create("section",vector():set(x,y,z),lvertex,gvertex) end </lua> == 2 вариант == <lua> functio...»

== 1 вариант ==
<lua>
function spawn()
alife():create("section",vector():set(x,y,z),lvertex,gvertex)
end
</lua>

== 2 вариант ==
<lua>
function spawn()
local a = vector()
local obj
a.x = x
a.y = y
a.z = z
obj = alife():create("section",a,lvertex,gvertex)
end
</lua>

SoC. Отключаем таймер выброса на ЧАЭС-1

2012-05-07T14:55:37Z

109.205.254.88: Новая страница: «Будет два способа отключения таймера. Через скрипт, через all.spawn. == Через скрипт == <lua> function de...»

Будет два способа отключения таймера. Через скрипт, через all.spawn.

== Через скрипт ==
<lua>
function delete_aes_timer()
local se_obj = alife():object("aes_space_restrictor_timer")
if se_obj then
alife():release(se_obj, true)
end
</lua>
Вставить в какой-нибудь диалог:
<code>
<action>название_скрипта.delete_aes_timer</action>
</code>
После диалога таймер отключается.

== All.spawn ==
Удалить рестриктор '''aes_space_restrictor_timer'''

Грамотное создание проводника

2012-05-07T14:33:08Z

109.205.254.88: Удалено содержимое страницы

Быстрое создание проводников

2012-05-07T14:31:55Z

109.205.254.88:

== Логика ==
Создаем файл gamedata/scripts/teleport.script. Пишем туда:
<lua>
function provodnik()
db.actor:set_actor_position(vector():set(x,y,z),lvertex,gvertex)
end
</lua>

== Активация ==
В нужный диалог кидаем
<code>
<action>teleport.provodnik</action>
</code>

Деспавн через скрипт

2012-05-07T11:34:57Z

109.205.254.88: Новая страница: «Сейчас я покажу как удалять объекты через скрипт. Вот пример удаления: <lua> function delete_object() ...»

Сейчас я покажу как удалять объекты через скрипт. Вот пример удаления:
<lua>
function delete_object()
local se_obj = alife():object("aes_space_restrictor_timer") -- задается значение переменной "se_obj".
if se_obj then
alife():release(se_obj, true) -- функция удаления. Слово "true" обязательно.
end
</lua>
Удалит таймер на ЧАЭС-1. Вместо "aes_space_restrictor_timer" подставляете ИМЯ (НЕ ENTITY!) своего объекта.

== Автор ==
Vllzl

Грамотный спавн через скрипт

2012-05-07T11:24:29Z

109.205.254.88: Новая страница: «Всем известна функция спавна в одну строку: <lua>alife():create("section",vector():set(x,y,z),lvertex,gvertex)</lua> Однако...»

Всем известна функция спавна в одну строку:
<lua>alife():create("section",vector():set(x,y,z),lvertex,gvertex)</lua>
Однако лучше делать так:
<lua>
function create_object()
local a = vector() -- задаем, что переменная "a" - это вектор.
local obj -- задаем переменную "obj". Ее значение задается позже.
a.x = x -- вектор X. Подставить значение.
a.y = y -- вектор Y. Подставить значение.
a.z = z -- вектор Z. Подставить значение.
obj = alife():create("section",a,lvertex,gvertex) -- функция спавна. "a" - это вектор. Указывать вектор не надо (мы его задали выше).
end
</lua>

== Автор ==
Vllzl

Грамотное создание проводника

2012-05-07T11:10:15Z

109.205.254.88: Новая страница: «Создаем скрипт gamedata\scripts\start.script. В него пихаем: <lua> function teleportate(npc, actor) npc:stop_talk() actor:sto...»

Создаем скрипт gamedata\scripts\start.script. В него пихаем:
<lua>
function teleportate(npc, actor)
npc:stop_talk()
actor:stop_talk()
db.actor:set_actor_position( vector():set(X,Y,Z) ) -- Вместо надписей пишем координаты
end
</lua>
В любой диалог пихаем:
<code>
<action>start.teleportate</action>
</code>
Теперь с каким нибудь диалогом вы телепортируетесь по векторам

Спавн без читов и модов.

2012-05-06T13:35:46Z

109.205.254.88:

Сегодня я расскажу как спавнить без читов и модов.
<lua>
; Вместо "wpn_ak74" ваша секция. Вместо x,y,z координаты. Где level_vertex, game_vertex реальные гейм и левел вертексы
function main_menu:main_cheat_f1()
alife():create("wpn_ak74",vector():set(x,y,z),level_vertex,game_vertex)
end
</lua>
Теперь по F1 будет спавнится объект.

Удаление таймера выброса на ЧАЭС

2012-05-06T08:09:49Z

109.205.254.88: Новая страница: «== Подготовка == Нам нужно: ACDC SoC (требуется ActivePerl) == Реализация == Распаковываем all.spawn. Откры...»

== Подготовка ==
Нам нужно:
ACDC SoC (требуется ActivePerl)

== Реализация ==
Распаковываем all.spawn. Открываем '''alife_l12_stancia.ltx'''. Удаляем рестриктор: '''aes_space_restrictor_timer'''. Удаляем рестриктор:'''aes_space_restrictor_timer__go'''. Собираем спавн-файл. кладем в gamedata/spawns. Переименовываем его в all.spawn

== Делаем нормальную погоду ==
Открываем '''game_maps_single.ltx''' в gamedata/config. Находим l12_stancia. Строку:
<code>weather = stancia</code>
меняем на
<code>weather = default</code>
Сохраняем файл.

Пробуем. Новая игра обязательна

Как продлить таймер выброса на ЧАЭС-1

2012-04-22T13:40:27Z

109.205.254.88: Новая страница: «== Подготовка == Скачать утилиту ACDC SOC. ПОМЕСТИТЬ В ПАПКУ С ACDC SOC all.spawn. РАСПАКОВАТЬ ALL.SPAWN == Р...»

== Подготовка ==
Скачать утилиту ACDC SOC. ПОМЕСТИТЬ В ПАПКУ С ACDC SOC all.spawn. РАСПАКОВАТЬ ALL.SPAWN

== Реализация ==
Открываем alife_l12_stancia.ltx
Находим элемент aes_space_restrictor_timer.
Находим строку:
<code>
start_value = 360000
</code>
360000 миллисекунд = 6 минут.
меняем на:
<code>
start_value = 3600000
</code>
3600000 миллисекунд = 1 час.

Компилируем all.spawn. НОВАЯ ИГРА ОБЯЗАТЕЛЬНА

SoC. Отключаем смертельные зоны на ЧАЭС-2.

2012-04-22T13:25:19Z

109.205.254.88: Новая страница: «Когда мы выходим из «Управления Монолитом» мы появляемся на ЧАЭС с телепортами. Она назыв...»

Когда мы выходим из «Управления Монолитом» мы появляемся на ЧАЭС с телепортами. Она называется ЧАЭС-2. Как вы знаете по поверхности ходить нельзя: ГГ умирает из-за радиации. Но это не естественно. Надо это остановить.

----
== Подготовка ==
1. Скачиваем утилиту ACDC Soc.
2. Кладем в папку с ACDC файл all.spawn.

----
Начнем.
Распаковываем all.spawn. Открываем alife_l12_stancia_2.ltx.
Удаляем:
aes2_space_restrictor_death_0000
aes2_space_restrictor_death_0001
aes2_space_restrictor_death_0002
aes2_space_restrictor_death_0003
aes2_space_restrictor_death_0004
aes2_space_restrictor_death_0005

Сохраняем файл. Собираем all.spawn. Начинаем новую игру. Когда дойдем до ЧАЭС-2: можно ходить по земле