Скриптование

[Svoboда 3]

Тема для обсуждения скриптов всего и всех в серии игр STALKER.

Задавая вопрос (!):
1. Внимательно изучите суть вопроса. Вопрос должен соответствовать выбранной Вами темы. Это поможет сохранить порядок и читабельность темы, а также облегчит поиск и понимание сего;
2. Изучите то, что уже есть в теме (пролистайте "руками", воспользуйтесь поиском на форуме);
3. Изучите информацию которая может вам помочь:

  Информация (Показать)

  Общая (Показать)

Stalkerin. Там есть много хороших статей касательно данной темы.
Уроки по модостроению. Есть рабочие примеры готовых скриптов различного назначения.

  Скрипты (Показать)

Справочное руководство по языку Lua 5.1
https://www.mediawiki.org/wiki/Extension:Scribunto/Lua_reference_manual/ru
Справочник по функциям и классам. Собрано много информации по функциям и классам, не всем, но по основные сведения предоставлены.

  Логика (Показать)

Логика со вступлением и четырьмя частями:

  Просмотр (Показать)

Вступление
Часть первая
Часть вторая
Часть третья
Часть четвертая.

Smart_terrain (в простонароде - гулаг)
Интересный способ настроики логики для гулагов
Скриптовая часть игровой логики

4. Дабы не превращать обсуждение в "кашу" разной информативной направленности, задавайте несколько вопросов по порядку (в разных постах) после того, как получите ответ на предыдущий вопрос;
5. "Спасибо" и тому подобное - будьте так любезны в ПМ. Если не любите писать в ПМ, в конце вопроса напишите фразу: "Заранее спасибо!" - или что-то в этом духе;
6. ПОЖАЛУЙСТА! Указывайте, для какой игры Вам необходима информация (ТЧ, ЧН, ЗП), если стоит мод - укажите название мода;
7. Если Вы что-то сделали и результат не такой, какой Вами задумывался, то, пожалуйста, приводите коды которые Вы изменяли/писали целиком! Это поможет другим правильно ответить на Ваш вопрос, а также оградит Вас от лишней писанины.
8. Оформляйте сообщение. Пользуйтесь тегами для того, чтобы отделить код от текста. Пишите грамотно - ПОЛЬЗУЙТЕСЬ ЗНАКАМИ ПРЕПИНАНИЯ.
9. И помните: «Правильно заданный вопрос – половина ответа».

 

Какие вопросы следует задавать, а какие нет...

  Читать рекомендуется. (Показать)

Задавайте вопросы, которые касаются непосредственно скриптов и их работы, т.е. Вы что-то делаете, а у Вас что-то не получается, при этом у Вас на руках должен быть хотя бы какой-то код, свидетельствующий о Вашей причастности к вопросу.

 

Вопросы которые будут удалятся, следовательно их задавать не нужно:
-- Где находится та или иная функция?
Для ответа используем поиск по словам среди файлов оригинальной игры или мода, если объект поиска относится к нему, при помощью программы, которая Вам наиболее симпатизирует;
-- Как сделать что-то/то-то?
С подобными вопросами, либо в "ковырялки", где Вам вероятнее всего так же не ответят, либо выдвигаем мысли, подкреплённые теорией, практикой (идеальный вариант) и здравым рассудком;
-- Вопросы со смыслом: "сделайте", "совместите" и подобными глаголами повелительного наклонения.
-- К тому же удалению будут подвергаться вопросы, в которых масштабно не используются теги, для отделения кода и цитат от основного текста, а также не вписан в спойлер код размером превышающие семь строк.
Ответ на возможно возникший вопрос: В какую тему можно обратиться по поводу логики и спавна объектов?
В тему "ковырялок" соответствующей версии игры, для которой Вы задаёте вопрос.

И последнее: очень рекомендовано к прочтению Правила форума
 

---

[Nazgool 250]

@Kober(BRUC), 

Всё зависит от того, будешь ли ты использовать объекты созданных нпс и как.
Если нет (скорее всего пока не будешь ), то как вариант

-- тут таблица с координатами function spawn_z_escape_1(section, count) local data = math.random(#pos_tbl) count = count or 1 for i = 1, count do alife():create(section, vector():set(unpack(data.pos)), data.lvid, data.gvid) end end function r_zombie_1() spawn_z_escape_1("zombie_new_k_1", 2) end

-- тут таблица с координатами

function spawn_z_escape_1(section, count)
    local data = math.random(#pos_tbl)
    count = count or 1
    for i = 1, count do
        alife():create(section, vector():set(unpack(data.pos)), data.lvid, data.gvid)
    end
end

function r_zombie_1()
    spawn_z_escape_1("zombie_new_k_1", 2)
end 

Изменено 10 Июня 2016 пользователем Nazgool

[Zander_driver 10 343]

 

 

  Kober(BRUC) писал(а):

2) благодаря этой строчке:

О чем я говорил десяток постов назад.

У меня просто терпение кончается, глядя на такое. Снимаю шляпу перед терпеливостью @Nazgool,

[mole venomous 3 574]

Вопрос такой - существует ли код для определения типа патронов, заряженных в оружии? Если да, неплохо бы на него глянуть.

[Zander_driver 10 343]

@mole venomous, получить нетпакет оружия, взять из него ammo_type, прочитать из его конфига ammo_class, выбрать из списка боеприпасов тот, который указан в ammo_type.
Остались вопросы? Чтот народ совсем обленился, на каждую хотелку готовое решение просят.

 

 

  mole venomous писал(а):

потребует ли он кардинальной правки?

Не считая того что там нет даже попыток ковыряния нетпакетов. Я бы все равно переделал - непонятно зачем два раза писать одни и те же блоки кода для 1-го и для 2-го слота.

[UnLoaded 313]

  mole venomous писал(а):

код для определения типа патронов, заряженных в оружии?

function Get_ammo_type(wpn_id) -- wpn_id - id ствола -- local sobj = alife():object(wpn_id) if not sobj then return nil  end local np = net_packet() sobj:STATE_Write(np) local size = np:w_tell() np:r_seek(size - 1) return np:r_u8() -- 0 - 1-й тип боеприпасов, 1 - 2-й тип боеприпасов и т.д. (из конфига ствола) -- end

function Get_ammo_type(wpn_id) -- wpn_id - id ствола --
     local sobj = alife():object(wpn_id)
     if not sobj then
          return nil 
     end

     local np = net_packet()
     sobj:STATE_Write(np)
     local size = np:w_tell()
     np:r_seek(size - 1)
     return np:r_u8() -- 0 - 1-й тип боеприпасов, 1 - 2-й тип боеприпасов и т.д. (из конфига ствола) --
end

Это для ТЧ.

Изменено 10 Июня 2016 пользователем UnLoaded

[mole venomous 3 574]

Не, народ не обленился. Исправно и стабильно ищет выход из сложившейся непростой ситуации. Пытался я "поймать" ammo_type сам, защёл в тупик и только тогда обратился за советом. Однако же, спасибо.

[Zander_driver 10 343]

Ну пардон. Тогда вот так.

function get_wpn_ammotype(wpn_id, wpn_section) local sobj = alife():object(wpn_id)             if not sobj then return nil end             local packet = m_net_utils.Get_NetPacket(sobj)             local ammo_class = ui_wpn_params.GetAmmos(wpn_section) -- возвращает список боеприпасов этого ствола в виде таблицы             local ammo_type = packet.ammo_type             local used_ammo = ammo_class[ammo_type + 1] -- текущие БП             return used_ammo end

function get_wpn_ammotype(wpn_id, wpn_section)
local sobj = alife():object(wpn_id)
            if not sobj then return nil end
            local packet = m_net_utils.Get_NetPacket(sobj)
            local ammo_class = ui_wpn_params.GetAmmos(wpn_section) -- возвращает список боеприпасов этого ствола в виде таблицы
            local ammo_type = packet.ammo_type
            local used_ammo = ammo_class[ammo_type + 1] -- текущие БП
            return used_ammo
end

Если уж давать код, то я бы поостерегся ковыряния нетпакета "на коленке". а то человек же туда залезет и начнет там чего-то менять, не понимая.

Изменено 10 Июня 2016 пользователем Zander_driver

[naxac 2 501]

А если без левых функций, то можно так:

  Код (Показать)

function get_current_ammo(wpn) if not wpn then return nil end local sobj = alife():object(wpn:id()) if not sobj then return nil end local pk = net_packet() sobj:STATE_Write(pk) pk:r_seek(pk:w_tell() - 1) local ammo_type = pk:r_u8() local ammo = {} local str = system_ini():r_string(wpn:section(), "ammo_class") for s in string.gfind(str, "[%w%-%._]+") do ammo[#ammo+1] = s end return ammo[ammo_type+1] end

function get_current_ammo(wpn)
     if not wpn then return nil end

     local sobj = alife():object(wpn:id())
     if not sobj then return nil end

     local pk = net_packet()
     sobj:STATE_Write(pk)
     pk:r_seek(pk:w_tell() - 1)
     local ammo_type = pk:r_u8()

     local ammo = {}
     local str = system_ini():r_string(wpn:section(), "ammo_class")
     for s in string.gfind(str, "[%w%-%._]+") do
          ammo[#ammo+1] = s
     end

     return ammo[ammo_type+1]
end

 

[Wlad777 24]

Камрады, что-то я туплю.

Подскажите, как получить численное значение текущего cam_fov?

[cheeki breeki 9]

Здравствуйте. Можно ли сделать через спейсрестриктор (или по другому) изменение звука выстрела оружия. То есть на улице проигрывается по дефолту (например ak_shot_1), а в доме ak_shot_2. Хотелось бы продвинуть сталкер в данной теме. А то звуки сделал, а внедрить не получается). И еще как сделать стрео звук природы в ТЧ по примеру эмбиента (с каналами _l и _r).

Изменено 11 Июня 2016 пользователем BFG

[dsh 3 824]

 

 

  Wlad777 писал(а):

численное значение текущего cam_fov

 

А какое оно еще может быть? Возможно ты имеешь ввиду db.actor:get_camera_fov()

[TIGER_VLAD 361]

@cheeki breeki, Уже есть тема: Звуки и звуковое окружение.

[cheeki breeki 9]

 

 

  TIGER_VLAD писал(а):

Уже есть тема

это не то. Мне нужно принудительно изменение звука (уже заготовленного), а не изменение реверберацией. Так во всех шутерах.

[Wlad777 24]

 

 

  dsh писал(а):

Возможно ты имеешь ввиду db.actor:get_camera_fov()

 

Да, оно. Спасибо, камрад. Вылетело из головы совсем.

[Zander_driver 10 343]

 

 

  cheeki breeki писал(а):

Мне нужно принудительно изменение звука

Если я не ошибаюсь, без ковыряний в движке это никак не сделать.

[Romann 623]

Доброго времени суток, подскажите пожалуйста функцию увеличения скорости спринта ГГ.

[naxac 2 501]

@Romann, в чистой игре нет такого. Изменено 12 Июня 2016 пользователем naxac

[Romann 623]

 

 

  naxac писал(а):

в чистой игре нет такого.

Может тогда имеется функция подмены actor.ltx ?

[Max_Raf 35]

@Romann, может с помощью X-Ray Extensions, вроде там есть возможность "хакнуть" параметр бега.

[dsh 3 824]

С помощью XE можно, но особо не поувеличиваешь. Например, ту скорость, что стоит в ОП-2 по умолчанию, увеличивать уже и некуда. Максимум, на десяток процентов, а далее ГГ начинает стукаться о воздух.