Форумы Архив » Свалка Как сделать свой мод? (по 09.08.09)

escape_vodka_bazar_5 \фраза NPC
6 \ здесь этот escape_dialog.have_not_5vodka
7 \ а здесь этот escape_dialog.have_5vodka

Arguments : LUA error: ...\s.t.a.l.k.e.r\gamedata\scripts\escape_dialog.script:91: attempt to call method 'object' (a nil value)
Строка 91 - это как раз функция по проверки наличия предмета: return stalker:object("vodka") ~=nil
ТО есть получается, что две функции как то конфликтуют друг с другом.

function give_5vodka(actor, npc)
for i=1, 5 do
dialogs.relocate_item_section(npc, "vodka", "out")
end
end

function have_n_items(section,number)
-- printf("have_n_items:sec=[%s],n=[%s]:[%s]", section, number, ">") --/#~#
local actor = db.actor
if actor then
local cnt = 0
actor:iterate_inventory( function (dummy, item)
if item:section() == section then cnt = cnt + 1 end
end, nil)
return cnt >= number
end
return false
end

function relocate_n_item_section(victim, section, n, type)
-- printf("relocate_n_item_section:section=[%s],n=[%s],type=[%s]:[%s]", section, n, type, ">") --/#~#
local num = n
local type_rel = type
if not num then num = 1 end
if not type_rel then type_rel = "out" end
local actor = db.actor
if actor then
if type_rel == "in" then
local pos = actor:position()
local lvid = actor:level_vertex_id()
local gvid = actor:game_vertex_id()
local aid = actor:id()
for i=1,num do
alife():create(section, pos, lvid, gvid, aid)
end
elseif victim then
-- printf("relocate_n_item_section:npc=[%s]:[%s]", victim:name(), "i") --/#~#
actor:iterate_inventory(function (dummy,item)
if item:section() == section and num > 0 then
actor:transfer_item(item, victim)
num = num - 1
end
end, nil)
end
news_manager.relocate_item(actor, type_rel, section)
end
end

function out_n_items(section, num)
if not num then num = 1 end
local actor = db.actor
if actor then
-- printf("out_n_items:[%s]", "i") --/#~#
actor:iterate_inventory(function (dummy,item)
if item:section() == section and num > 0 then
remove_item_from_inventory(item,actor)
num = num - 1
end
end, nil)
news_manager.relocate_item(actor, "out", section)
end
end

function drink2_have()
return _f.have_n_items("energy_drink",2) \ проверка наличия двух дринков
end


function give_2drink()
_f.out_n_items("energy_drink",2) \ отъем двух дринков у ГГ
end

function give_chimera_kogot(fs, ss)
_f.relocate_n_item_section(ss,"mutant_chimera_claw",7)
end

\ вот здесь я не понял кто кому отдает?

Зайди в файл spawn_sections (в папке creatures)
Найди секцию
;--------Escape--------------
;--------neutrals------------
И там в каждой секции NPC
типа такой
[esc_stalker_respawn_1]:stalker
$spawn = "respawn\esc_stalker_respawn_1"
character_profile = sim_stalker_novice
spec_rank = novice
community = stalker

в строчке spec_rank напиши так
spec_rank = experienced
если напишешь veteran будет ветераном и т.д.
Правда это изменение коснется только обычных сталкеров. А квестовых надо наверно в all.spawn
править.