--' Схема: детектор на опасную зону: граница уровня.
--' dead_zone.ppe

local start_time = 0 --'Время, с которого начинается возрастание интенсивности
local max_time = 100 --'Время, в которое интенсивность станет максимальной
local threshold = 0.2 --'Порог, с которого начинается заражение
local idle_time = 10 --'Время между хитами. В игровых секундах.

class "actor_detector"
function actor_detector:__init()
self.init_time = -1
end
function actor_detector:actor_enter()
--' Игрок покидает опасную территорию (входит в разрешенную границу уровня)
self.init_time = -1
level.remove_pp_effector(1001)
xr_sound.set_actor_sound("")

printf("LEVEL BORDER EXIT")
end
function actor_detector:actor_exit()
--' Игрок входит на опасную территорию (покидает разрешенную границу уровня)
self.init_time = game.get_game_time()

level.add_pp_effector("dead_zone.ppe", 1001, true)
level.set_pp_effector_factor(1001, 0.01)

xr_sound.set_actor_sound("level_border_detector")
xr_sound.set_actor_sound_factor(10)

self.last_update_time = game.get_game_time()

printf("LEVEL BORDER ENTER")
end
function actor_detector:update()
--' Апдейтим игрока и устанавливаем действия.
if self.init_time == -1 then
return
end

if game.get_game_time():diffSec(self.last_update_time) < idle_time then
return
end
self.last_update_time = game.get_game_time()

--' В зависимости от времени нахождения игрока внутри возрастает интенсивность.
--' Интенсивность возрастает от 0 до 1. При достижении порога начинает хитовать радиация.
local intence = math.min(1,math.max(0.01,game.get_game_time():diffSec(self.init_time)/(max_time - start_time)))

level.set_pp_effector_factor(1001, intence, 0.3)
xr_sound.set_actor_sound_factor(10 - intence*9)

printf("INTENCE %s", intence)

if intence > threshold then
local h = hit()
h.draftsman = db.actor
h.type = hit.radiation
h.power = 0.05
db.actor:hit(h)
end
end
function actor_detector:save(packet)
if self.init_time == -1 then
packet:w_u8(0)
else
packet:w_u8(1)
utils.w_CTime(packet, self.init_time)
utils.w_CTime(packet, self.last_update_time)
end
end
function actor_detector:load(packet)
local flag = packet:r_u8()
if flag == 1 then
self.init_time = utils.r_CTime(packet)
self.last_update_time = utils.r_CTime(packet)
else
self.init_time = -1
end
end

[logic]
active = remark1
trade = misc\trade_gosha.ltx -- ссылка на файл торговли в ппке misc
inv_max_weight = 10000
danger = danger_ignore
meet = meet

[remark1]
anim = guard_rac
no_move = true
target = actor
meet = meet

[meet]
meet_state = 5|wait@esc_fanat_dialog
meet_state_wpn = 5|wait@cit_doctor_start_dlg
victim = 5|actor
victim_wpn = 5|actor
use = true
use_wpn = true
meet_dialog = escape_lager_guard_start_dialog

[danger_ignore]
ignore_distance = 20