Nature Winter v2.3 "Black Edition"

--Invisibility in the costume
local idle_time
local range = 60
 
function set_invisible()
        if db.invisible == true then
             
                local outfit_act = db.actor:item_in_slot(6)           
                local hud = get_hud()
                local cs = hud:GetCustomStatic("cs_inviz")           
                if cs == nil then
                        hud:AddCustomStatic("cs_inviz", true)
                        cs = hud:GetCustomStatic("cs_inviz")
                end
             
 
                if (outfit_act == nil) then                           
                        if db.not_inviz == false then                 
                                idle_time = 1                         
                                range = 60                           
                                db.game_time = game.get_game_time()
                                local msg = string.format("You wear no suit") 
                                if cs ~= nil then     
                                        cs:wnd():SetText(msg) 
                                        cs = nil
                                end
                                bind_stalker.restore_weapon()         
                                level.remove_pp_effector(1111)       
                                db.not_inviz = true                   
                                db.make_inviz = false                 
                        end
                else
                        if outfit_act:section()=="meceniy_outfit_new"  then   
                                if db.make_inviz == false then               
                                        range = 2
                                        idle_time = 27*60
                                        db.game_time = game.get_game_time()
                                        local msg = string.format("Your wear the camouflage suit and you are invisible")
                                        if cs ~= nil then     
                                                cs:wnd():SetText(msg) 
                                                cs = nil
                                        end
                                        bind_stalker.hide_weapon()
                                        level.add_pp_effector ("teleport.ppe", 1111, false)
                                        level.set_pp_effector_factor(1111, 1.0)
                                        db.make_inviz = true
                                        db.not_inviz = false
                                        db.tell_90_inviz = false
                                        db.tell_finish_inviz = false
                                end
                        else
                                if db.not_inviz == false then
                                        idle_time = 1
                                        range = 60
                                        db.game_time = game.get_game_time()
                                        local msg = string.format("You wear a suit other than the camouflage suit")
                                        if cs ~= nil then     
                                                cs:wnd():SetText(msg) 
                                                cs = nil
                                        end
                                        bind_stalker.restore_weapon()
                                        level.remove_pp_effector(1111)
                                        db.not_inviz = true
                                        db.make_inviz = false
                                end
                        end
                end
             
 
                if (db.make_inviz and not db.tell_finish_inviz and not db.not_inviz) then
                        local diff_sec = game.get_game_time():diffSec(db.game_time)
                     
                        if not db.tell_90_inviz and diff_sec >= idle_time*0.9 then
                                local msg = string.format("In 90 seconds, you will again be visible.")
                                if cs ~= nil then      cs:wnd():SetText(msg)  end
                                db.tell_90_inviz = true
                        end
 
                        if db.tell_90_inviz and diff_sec >= idle_time then
                                range = 60
                                local msg = string.format("You are visible again")
                                if cs ~= nil then      cs:wnd():SetText(msg)  end
                                cs = nil
                                db.tell_finish_inviz = true
                                bind_stalker.restore_weapon()
                                level.remove_pp_effector(1111)
                        end
                end
                     
                db.tormoz = db.tormoz + 1
 
                if db.tormoz >= 500 then
                        --[[local object_all
                        for id = 0,65534,1 do
                                object_all = level.object_by_id(id)
                                if object_all ~= nil and (IAmAStalker[object_all:clsid()] or IAmAMonster[object_all:clsid()]) then
                                        object_all:set_range(range)
                                end
                        end]]
                        local object_all
                        for k, v in pairs (db.storage) do
                                object_all = level.object_by_id(k)
                                --if object_all and (IAmAMonster[object_all:clsid()] or IAmAStalker[object_all:clsid()] and object_all:alive() then
                                if object_all and (IAmAMonster[object_all:clsid()] or IAmAStalker[object_all:clsid()]) and object_all:alive() then
                                        object_all:set_range(range)
                                end
                        end
                        db.tormoz = 0
                end
        end
end