local timer = game.get_game_time()
timer = timer + <число>

stack trace:

0023:039D45C0 luabind.beta7-devel.rc4.dll, luabind::detail::object_rep::crep
0023:05C98E47 xrGame.dll, CDialogHolder::CDialogHolder()
0023:039A2EA3 lua.JIT.1.1.4.dll, luaopen_io()

local timer = hours*3600
    if has_alife_info("tp_actor_give_zvonar_grif_pda") and not has_alife_info("tp_zvonar_unlock_grif_pda_compl") then
  otstypnik_dialogs.force_grif_pda_timer(timer)
    end
    
    if has_alife_info("tp_actor_give_zvonar_provodnik_vasil_pda") and not has_alife_info("tp_zvonar_unlock_provodnik_vasil_pda_compl") then
  otstypnik_dialogs.force_vasil_pda_timer(timer)
    end
    
    if has_alife_info("tp_actor_give_zvonar_killer_ydav_pda") and not has_alife_info("tp_zvonar_unlock_killer_ydav_pda_compl") then
  otstypnik_dialogs.force_ydav_pda_timer(timer)
    end
    
    if has_alife_info("tp_actor_give_zvonar_monolitovec_pda") and not has_alife_info("tp_zvonar_unlock_monolitovec_pda_compl") then
  otstypnik_dialogs.force_monolitovec_pda_timer(timer)
    end

function zvonar_unlocking_pda()
    if has_alife_info("tp_actor_give_zvonar_grif_pda") and not has_alife_info("tp_zvonar_unlock_grif_pda_compl") and not has_alife_info("tp_zvonar_unlock_one_pda") then
  give_info("tp_zvonar_unlock_one_pda")
  if grif_pda_timer == nil then
   grif_pda_timer = game.get_game_time()
  end
    end
    if grif_pda_timer ~= nil then    
  if game.get_game_time():diffSec(grif_pda_timer) > 10800 then
   grif_pda_timer = nil
   give_info("tp_zvonar_unlock_grif_pda")
   give_info("tp_zvonar_unlock_grif_pda_compl")
   disable_info("tp_zvonar_unlock_one_pda")
   xr_effects.send_message(nil,nil,{"ПДА Грифа взломан. Можешь забирать.","tp_zvonar","tp_zvonar",7000})
  end
    end
    if has_alife_info("tp_actor_give_zvonar_provodnik_vasil_pda") and not has_alife_info("tp_zvonar_unlock_provodnik_vasil_pda_compl") and not has_alife_info("tp_zvonar_unlock_one_pda") then
  give_info("tp_zvonar_unlock_one_pda")
  if vasil_pda_timer == nil then
   vasil_pda_timer = game.get_game_time()
  end
    end
    if vasil_pda_timer ~= nil then
  if game.get_game_time():diffSec(vasil_pda_timer) > 10800 then
   vasil_pda_timer = nil
   give_info("tp_zvonar_unlock_provodnik_vasil_pda")
   give_info("tp_zvonar_unlock_provodnik_vasil_pda_compl")
   disable_info("tp_zvonar_unlock_one_pda")
   xr_effects.send_message(nil,nil,{"ПДА Василя взломан. Можешь забирать.","tp_zvonar","tp_zvonar",7000})
  end
    end
    if has_alife_info("tp_actor_give_zvonar_killer_ydav_pda") and not has_alife_info("tp_zvonar_unlock_killer_ydav_pda_compl") and not has_alife_info("tp_zvonar_unlock_one_pda") then
  give_info("tp_zvonar_unlock_one_pda")
  if ydav_pda_timer == nil then
   ydav_pda_timer = game.get_game_time()
  end
    end
    if ydav_pda_timer ~= nil then
  if game.get_game_time():diffSec(ydav_pda_timer) > 10800 then
   ydav_pda_timer = nil
   give_info("tp_zvonar_unlock_killer_ydav_pda")
   give_info("tp_zvonar_unlock_killer_ydav_pda_compl")
   disable_info("tp_zvonar_unlock_one_pda")
   xr_effects.send_message(nil,nil,{"ПДА Удава взломан. Можешь забирать.","tp_zvonar","tp_zvonar",7000})
  end
    end
    if has_alife_info("tp_actor_give_zvonar_monolitovec_pda") and not has_alife_info("tp_zvonar_unlock_monolitovec_pda_compl") and not has_alife_info("tp_zvonar_unlock_one_pda") then
  give_info("tp_zvonar_unlock_one_pda")
  if monolitovec_pda_timer == nil then
   monolitovec_pda_timer = game.get_game_time()
  end
    end
    if monolitovec_pda_timer ~= nil then
  if game.get_game_time():diffSec(monolitovec_pda_timer) > 10800 then
   monolitovec_pda_timer = nil
   give_info("tp_zvonar_unlock_monolitovec_pda")
   give_info("tp_zvonar_unlock_monolitovec_pda_compl")
   disable_info("tp_zvonar_unlock_one_pda")
   xr_effects.send_message(nil,nil,{"ПДА монолитовца взломан. Можешь забирать.","tp_zvonar","tp_zvonar",7000})
  end
    end
end

function force_grif_pda_timer(timer)
    if grif_pda_timer ~= nil then
  local t = game.CTime()
  local Y, M, D, h, m, s, ms = 0, 0, 0, 0, 0, 0, 0
  t:set( Y + 2000, M, D, h, m, grif_pda_timer + timer, ms)
  grif_pda_timer = game.get_game_time():diffSec(t)
    end    
end

str = package:r_stringZ()
    if(str~="nil") then
  actor_statistic.favorite_weapon_sect = str
    end
    weapons_table = {}
    local n = package:r_u8()
    for i = 1,n do
  local k = package:r_stringZ()
  local v = package:r_float()
  weapons_table[k] = v
    end

weapons_table = {
         "wpn_abakan"   = 0,
         "wpn_ak74"   = 0,
         "wpn_ak74u"   = 0,
         "wpn_beretta"   = 0,
         "wpn_bm16"   = 0,
         "wpn_colt1911"  = 0,
         "wpn_desert_eagle"   = 0,
         "grenade_f1"    = 0,
         "wpn_fn2000"   = 0,
         "wpn_fort"   = 0,
         "wpn_g36"    = 0,
         "wpn_gauss"   = 0,
         "wpn_groza"   = 0,
         "wpn_hpsa"   = 0,
         "wpn_knife"   = 0,
         "wpn_l85"    = 0,
         "wpn_lr300"   = 0,
         "wpn_mp5"    = 0,
         "wpn_pb"    = 0,
         "wpn_pkm"    = 0,
         "wpn_pm"    = 0,
         "wpn_protecta"  = 0,
         "wpn_rg-6"    = 0,
         "grenade_rgd5"   = 0,
         "wpn_rpg7"   = 0,
         "wpn_sig220"   = 0,
         "wpn_sig550"   = 0,
         "wpn_spas12"   = 0,
         "wpn_svd"    = 0,
         "wpn_svu"    = 0,
         "wpn_toz34"   = 0,
         "wpn_usp45"   = 0,
         "wpn_val"    = 0,
         "wpn_vintorez"  = 0,
         "wpn_walther"   = 0,
         "wpn_wincheaster1300"    = 0,
         "wpn_pm_actor"   = 0,
         "wpn_fort_snag"   = 0,
         "wpn_sig220_nimble"   = 0,
         "wpn_usp_nimble"   = 0,
         "wpn_desert_eagle_nimble"   = 0,
         "wpn_wincheaster1300_trapper"   = 0,
         "wpn_spas12_nimble"   = 0,
         "wpn_protecta_nimble"   = 0,
         "wpn_ak74u_snag"   = 0,
         "wpn_mp5_nimble"   = 0,
         "wpn_sig550_luckygun"   = 0,
         "wpn_groza_nimble"   = 0,
         "wpn_vintorez_nimble"   = 0,
         "wpn_svu_nimble"   = 0,
         "wpn_svd_nimble"   = 0,
         "wpn_g36_nimble"   = 0,
         "wpn_fn2000_nimble"   = 0,
         "wpn_pkm_zulus"   = 0,
    }

function set_best_weapon( hit_amount )
    local active_item = db.actor:active_item()
    if active_item then
  local section = active_item:section()
  if weapons_table[ section ] then
   weapons_table[ section ] = weapons_table[ section ] + hit_amount
  local amount = 0
  for k,v in pairs( weapons_table ) do
   if( v > amount ) then
    amount = v
    actor_statistic.favorite_weapon_sect = k
    end
   end
  end
    end
end