==========================================================================--
--' Ясная погода(как с Идолом Монолита)
--=========================================================================--==========================================================================--
local __set_weather = _G["level"]["set_weather"]
_G["level"]["set_weather"] = function(str, force)
-- log("~ level.set_weather")
do __set_weather("default",true)end
--

-- Так надо дождаться смены погоды менеджером
local __set_weather = _G["level"]["set_weather"]
_G["level"]["set_weather"] = function(str, force) __set_weather("default",true)end

-- Если добавить эту строчку
do __set_weather("default",true)end
-- Установим сразу нужную, не дожидаясь стандартной смены погоды

-- Так надо дождаться смены погоды
local __set_weather = _G["level"]["set_weather"]
_G["level"]["set_weather"] = function(str, force) __set_weather("default",true)end

-- Если добавить эту строчку
do __set_weather("default",true)end
-- Установим сразу нужную.
-- Потом она будет обновляться на нужную менеджером погоды.

==========================================================================--
--' Ясная погода(как с Идолом Монолита)
--=========================================================================--==========================================================================--

==========================================================================--
--' Ясная погода(как с Идолом Монолита)
--=========================================================================--==========================================================================--
-- Так надо дождаться смены погоды
local __set_weather = _G["level"]["set_weather"]
_G["level"]["set_weather"] = function(str, force) __set_weather("default",true)end

-- Если добавить эту строчку
do __set_weather("default",true)end
-- Установим сразу нужную.
-- Потом она будет обновляться на нужную менеджером погоды.—

-- Генераторы описания для script_description и script_briefinfo
-- вывод информации на худ о текущем итеме (аля патроны, иконка, название)
-- параметры стволов
local zoom = {
[100] = 1,
[93] = 1.2,
[75] = 1.5,
[70] = 1.6,
[65] = 1.8,
[56] = 2,
[45] = 2.5,
[37] = 3,
[32] = 3.5,
[28] = 4,
[25] = 4.5,
[22] = 5,
[20] = 5.5,
[18] = 6,
[16] = 7,
[14] = 8,
[12] = 9,
[11] = 10,
[10] = 11,
[9] = 12,
[8] = 14,
[7] = 16,
[6] = 18,
[5] = 22
}
local slots = {
[1] = translate("ui_slot_0"),
[2] = translate("ui_slot_1"),
[13]= translate("ui_slot_2"),
}

local swap_params={
["wpn_ognemet"]=true,
["wpn_ognemet_m1"]=true,
["wpn_kriss_super_v"]=true,
["wpn_kriss_m1"]=true,
["wpn_sw"]=true,
["wpn_hostel"]=true
}

function ammo(obj,input_section)
local section = obj and obj:section() or input_section
if not config:line_exist(section,"buck_shot") then
return ""
end
local txt = "%c[255,255,255,255]"
txt = txt.."\\n • "..translate("ui_inv_hit_3").." "
if config:r_string(section, "buck_shot") == "1" then
txt = txt..config:r_string(section, "k_hit").." (hit)"
else
txt = txt..string.format("%.2f (hit)", config:r_float(section, "buck_shot") * config:r_float(section, "k_hit"))
end
txt = txt.."%c[default] \\n"
return txt
end

function knife(obj,input_section)
local section = obj and obj:section() or input_section
local txt = "%c[255,255,255,255]"

txt = txt.."\\n • "..translate("ui_inv_hit_1").." "..config:r_string(section, "hit_power").."/"..txt..config:r_string(section, "hit_power_2").." (hit)"
txt = txt.."\\n • "..translate("ui_inv_hit_4").." "..config:r_string(section, "fire_distance").." м"
txt = txt.."\\n • "..translate("ui_inv_hit_5").." "..config:r_string(section, "hit_type")

txt = txt.."%c[default] \\n"
return txt
end

function weapon(obj,input_section)
local section = obj and obj:section() or input_section
local slot=config:r_u32(section, "slot")
if slot==0 then --пропускаем сразу все что в 0-й слот лезет
return ""
end
local txt = "%c[255,255,255,255]"
local value

txt = txt.."%c[ui_clr_3]"..translate("ui_ammunition").."%c[default] "
value = string.explode(config:r_string(section, "ammo_class"), ",", true)
for _, ammo in ipairs(value) do
txt = txt.."\\n • "..translate(config:r_string(ammo, "inv_name"))
end

local fake_scope=false
if config:line_exist(section,"grenade_launcher_name") then
local gn_name=config:r_string(section,"grenade_launcher_name")
if config:section_exist(gn_name) and config:line_exist(gn_name,"scope_texture") and config:r_string(gn_name,"scope_texture")=="" then
fake_scope=true
end
end
if not fake_scope and config:line_exist(section, "grenade_class") and config:r_u32(section, "grenade_launcher_status") > 0 then
value = string.explode(config:r_string(section, "grenade_class"), ",", true)
for _, ammo in ipairs(value) do
txt = txt.."\\n • "..translate(config:r_string(ammo, "inv_name"))
end
end
txt = txt.."\\n • "..translate("ui_slot_name").." "..slots[slot]
if config:line_exist(section, "silencer_fire_distance") then
txt = txt.."\\n • "..translate("ui_effective_range").." "..
(swap_params[section]
and config:r_u32(section, "fire_distance")
or config:r_u32(section, "silencer_fire_distance"))
.." "..translate("ui_inv_m")
end
txt = txt.."\\n • "..translate("ui_shooting_range").." "..
(swap_params[section]
and config:r_u32(section, "silencer_fire_distance")
or config:r_u32(section, "fire_distance"))
.." "..translate("ui_inv_m")
txt = txt.."\\n • "..translate("ui_rate_of_fire").." "..config:r_u32(section, "rpm").." "..translate("ui_inv_rpm")
txt = txt.."\\n • "..translate("ui_mag_cap").." "..config:r_u32(section, "ammo_mag_size").." "..translate("ui_rounds")
txt = txt.."\\n%c[255,255,255,255] • "..translate("ui_inv_hit_1").." "..config:r_string(section, "hit_power").." (hit)"
if config:line_exist(section, "silencer_hit_power") then
txt = txt.."\\n • "..translate("ui_inv_hit_2").." "..config:r_string(section, "silencer_hit_power").." (hit)"
end
-- обвесы
local obves = ""
obves = obves..weapon_addon(section, "scope")..weapon_addon(section, "silencer")..weapon_addon(section, "grenade_launcher")
if obves ~= "" then
txt = txt.."\\n%c[ui_clr_3]"..translate("ui_attachments").."%c[default] "..obves
end

txt = txt.."%c[default] \\n"
return txt
end

--' Описание обвеса
function weapon_addon(section, addon_name)
local addon = config:r_u32(section, addon_name.."_status")
local txt = ""

if addon == 1 then -- интегрированный
txt = txt.."\\n • "..translate("ui_integrated").." "..translate(addon_name)

if addon_name == "scope" then
local zoom_factor = config:r_u32(section, "scope_zoom_factor")
txt = txt..(zoom[zoom_factor] and " "..zoom[zoom_factor].."x" or "")
end

elseif addon == 2 then -- съемный
--txt = txt.."\\n • "..translate("ui_"..addon_name).." "..translate(config:r_string(config:r_string(section, addon_name.."_name"), "inv_name"))
txt = txt.."\\n • "..translate(config:r_string(config:r_string(section, addon_name.."_name"), "inv_name"))
end

return txt
end

do
if has_info("enc_ctask_info") then disable_info("enc_ctask_info") end
give_info("enc_ctask_info")
__set_weather("default",true)
end
-- "Пустое" описание
-- function none(obj,input_section)
-- --local section = obj and obj:section() or input_section
-- return ""
-- end
--[[
TODO: Sleepless
]]

--==========================================================================--
--' Ясная погода(как с Идолом Монолита)
--==========================================================================--
local __set_weather = _G["level"]["set_weather"]
_G["level"]["set_weather"] = function(str, force)
-- log("~ level.set_weather")
__set_weather("default",true)
end
do
__set_weather("default",true)
end

if _G.Inventory:on_belt("af_idol_monolita") then
level.set_weather("default",true)
else
level.set_weather(self.cur_weather,false)
end

if _G.Inventory:on_belt("af_idol_monolita") then -- убираем условие, при котором, одетый на пояс Идол Монолита, улучшает погоду and has_info("snp_almaz3") then
level.set_weather("default",true)
else
level.set_weather("default",true)
end
end
end