e4s-sdk/gamedata/scripts/sr_timer.script
2026-06-17 23:06:51 +03:00

121 lines
No EOL
4 KiB
Text

----------------------------------------------------------------------------------------------------
-- Òàéìåð ñ âûâîäîì èçîáðàæåíèÿ íà ýêðàí.
----------------------------------------------------------------------------------------------------
local k,v = 0,0
class "action_timer"
function action_timer:__init(obj, storage)
self.object = obj
self.st = storage
end
function action_timer:update(delta)
local actor = db.actor
if xr_logic.try_switch_to_another_section(self.object, self.st, actor) then
return
end
-- Âûñ÷èòûâàåì ñêîëüêî âðåìåíè óæå ðàáîòàåò ñ÷åò÷èê
local nn = time_global() - db.storage[self.object:id()].activation_time
-- Èçìåíÿåì çíà÷åíèå ñ÷åò÷èêà
local value_time = 0
if self.st.type == "inc" then
value_time = self.st.start_value + nn
else
value_time = self.st.start_value - nn
end
if value_time <= 0 then
value_time = 0
end
-- Ôîðìèðóåì ñòðîêó ñ÷åò÷èêà
local hours = math.floor(value_time/3600000)
local minutes = math.floor(value_time/60000 - hours*60)
local seconds = math.floor(value_time/1000 - hours*3600 - minutes*60)
local str = tostring(hours)..":"..sr_timer.time2str(minutes)..":"..sr_timer.time2str(seconds)
self.st.timer:TextControl():SetTextST(str)
-- Îïðåäåëÿåì íóæíî ëè êóäà òî ïåðåõîäèòü.
for k,v in pairs(self.st.on_value) do
if (self.st.type == "dec" and value_time <= v.dist) or
(self.st.type == "inc" and value_time >= v.dist)
then
-- Îáðàáîòêà çíà÷åíèÿ.
xr_logic.switch_to_section(self.object, self.st.ini, xr_logic.pick_section_from_condlist(db.actor, self.object, v.state))
end
end
end
function action_timer:deactivate(delta)
self.st.ui:RemoveCustomStatic(self.st.timer_id)
if self.st.string ~= nil then
self.st.ui:RemoveCustomStatic("hud_timer_text")
end
end
--function action_timer:save()
-- xr_logic.pstor_store( self.object, "timer_value", self.state )
--end
function time2str(n)
if n >= 10 then
return tostring(n)
else
return "0"..tostring(n)
end
end
---------------------------------------------------------------------------------------------------------------------
function add_to_binder(obj, ini, scheme, section, storage)
local action = action_timer(obj, storage)
xr_logic.subscribe_action_for_events(obj, storage, action)
end
function set_scheme(obj, ini, scheme, section, gulag_name)
local st = xr_logic.assign_storage_and_bind(obj, ini, scheme, section)
st.logic = xr_logic.cfg_get_switch_conditions(ini, section, obj)
st.type = utils.cfg_get_string( ini, section, "type", obj, false, "", "inc")
if st.type ~= "inc" and st.type ~= "dec" then
abort("ERROR: wrong sr_timer type. Section [%s], Restrictor [%s]", section, obj:name())
end
if st.type == "dec" then
st.start_value = utils.cfg_get_number(ini, section, "start_value", obj, true)
else
st.start_value = utils.cfg_get_number(ini, section, "start_value", obj, false, 0)
end
-- Âû÷èòûâàåì çíà÷åíèÿ ïåðåõîäà.
st.on_value = parse_data(obj, utils.cfg_get_string(ini, section, "on_value", obj, false, ""))
st.timer_id = utils.cfg_get_string( ini, section, "timer_id", obj, false, "", "hud_timer")
st.string = utils.cfg_get_string( ini, section, "string", obj, false, "")
st.ui = get_hud()
st.ui:AddCustomStatic(st.timer_id, true)
st.timer = st.ui:GetCustomStatic(st.timer_id):wnd()
if st.string ~= nil then
st.ui:AddCustomStatic("hud_timer_text", true)
local timer_text = st.ui:GetCustomStatic("hud_timer_text"):wnd()
timer_text:TextControl():SetTextST(st.string)
end
end
function parse_data(npc,s)
local t = {}
if s then
for name in string.gfind( s, "(%|*%d+%|[^%|]+)%p*" ) do
local dat = { dist = nil,
state = nil}
local t_pos = string.find( name, "|", 1, true )
local dist = string.sub( name, 1, t_pos - 1 )
local state = string.sub( name, t_pos + 1)
dat.dist = tonumber(dist)
if state then
dat.state = xr_logic.parse_condlist(npc, dist, state, state)
end
table.insert(t, dat)
end
end
return t
end