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

local time_delay = 0
local tbl_bomb = {}
local flag = false

function kamik()
local actor = db.actor
local apos = actor:position()
for k,v in pairs (tbl_bomb) do
local obj = level.object_by_id(tbl_bomb[k]) --\ или здесь надо local obj = level.object_by_id(v)
if actor == nil or obj == nil then
return
end
if obj:position():distance_to_sqr(apos) < 225 then
time_delay = time_global()
flag = true
end
if flag and time_global() - time_delay > 5000 then --\ делаем задержку на 5 сек
local h = hit()
h.direction = vector():set(0,0,0)
h.impulse = 15
h.draftsman = obj
h.power = 10
h.type = hit.fire_wound
obj:hit(h) -- \взрываем
table.remove(tbl_bomb, к) --\ удаляем ее айди из таблицы
flag = false
time_delay = time_global()
end
end
end

пойду выпью кофию - может пойму...

http://evil-zone-mods.ifolder.ru/14604991

function check_boom()
if #ids ~= 0 then
return
else
if start_flag then
start_flag = false
end
end
end

то есть в конце функции подрыва - после отыгрыша последнего партикла пишем
table.remove(ids, 1) и дальше все енды - и когда длина таблицы станет нулевой - флаг апдейта тут же вырубается и функция больше не читается.

function bada_boom()
local boom_obj = level.object_by_id(ids[1])
if not start_flag then
return
else
а дальше блоки со звуками и партиклами

да вот еще - у меня были проблемы переменной pos которой назначалось при взводе таймера = boom_obj:position() а в конце функции она обнулялась - и происходили нерегулярные вылеты по стеку, я перенес ее обнуление в функцию переспавна бомбы из рюкзака на землю. вот теперь думаю - там же это дело оставлять....или еще как то мудрить...
и почему все таки вылетало - получается что партиклы не успевали отыграться , когда позиция для них становилась вдруг нулевой? причем у тех кто тестил мою бомбу по разному было - у кого вообще вылетов не было, у кого сразу был вылет после взрыва...

elseif flag6 then
if time_global() - time0 > 2000 then
particles_object("anomaly\\marevo"):play_at_pos(pos) --\ и еще один партикл
particles_object("industrial_particles\\exhaust_isparenie_white_down"):play_at_pos(pos) --\ и еще один партикл
flag6 = false
flag_boom = false
flag_snd = false
start_flag = false
pos = 0
end
end
end
end
может тут и из-за порядка выключения флагов и переменных все дело было?
я думал что потому что эти два последние партикла не успевали отыграться...

С днём рождения!!!