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

86 lines
3 KiB
Text

----------------------------------------------------------------------------------------------------
-- Code Pad
----------------------------------------------------------------------------------------------------
-- Author: Jim
-- Äîðàáîòêà: 2006 @ Oleg Kreptul (Haron) okreptul@yahoo.com
----------------------------------------------------------------------------------------------------
function printf() end
class "codepad"
function codepad:__init(obj, storage)
self.object = obj
self.st = storage
end
function codepad:reset_scheme()
self.object:set_nonscript_usable(false)
--self.object:set_callback(callback.use_object, self.use_callback, self)
end
function codepad:update(delta)
end
function codepad:use_callback(obj, who)
local numpad = ui_numpad.numpad(self)
numpad:ShowDialog(true)
end
function codepad:OnNumberReceive(text)
if self.st.code then
if tonumber(text) == self.st.code then
if self.st.on_code then
printf("ph_code <OnNumberReceive>: on_code [%s]", text)
xr_logic.pick_section_from_condlist(db.actor, self.object, self.st.on_code.condlist)
end
end
else
local condlist = self.st.on_check_code[text]
if condlist then
printf("ph_code <OnNumberReceive>: on_check_code [%s]", text)
xr_logic.pick_section_from_condlist(db.actor, self.object, condlist)
end
end
end
function codepad:deactivate()
self.object:set_tip_text("")
end
---------------------------------------------------------------------------------------------------------------------
function add_to_binder(npc, ini, scheme, section, storage)
local new_action = codepad(npc, storage)
-- Çàðåãèñòðèðîâàòü âñå actions, â êîòîðûõ äîëæåí áûòü âûçâàí ìåòîä reset_scheme ïðè èçìåíåíèè íàñòðîåê ñõåìû:
xr_logic.subscribe_action_for_events(npc, storage, new_action)
end
function set_scheme(npc, ini, scheme, section, gulag_name)
printf("ph_code <set_scheme>: START [%s]", npc:name())
local st = xr_logic.assign_storage_and_bind(npc, ini, scheme, section)
st.logic = xr_logic.cfg_get_switch_conditions(ini, section, npc)
st.tips = utils.cfg_get_string(ini, section, "tips", npc, false, "", "st_codelock")
npc:set_tip_text(st.tips)
st.code = utils.cfg_get_number(ini, section, "code", npc, false)
if st.code then
st.on_code = xr_logic.cfg_get_condlist(ini, section, "on_code", npc)
printf("ph_code <set_scheme>: on_code [%d]", st.code)
else
st.on_check_code = {}
local i = 1
local cc = xr_logic.cfg_get_string_and_condlist(ini, section, "on_check_code" .. i, npc)
while cc do
st.on_check_code[cc.v1] = cc.condlist
printf("ph_code <set_scheme>: on_check_code [%s]", cc.v1)
i = i + 1
cc = xr_logic.cfg_get_string_and_condlist(ini, section, "on_check_code" .. i, npc)
end
end
printf("ph_code <set_scheme>: END [%s]", npc:name())
end