if not has_alife_info("info") then
......
db.actor:give_info_portion("info")  
end

if not has_alife_info("trifon") then   
            local alc = db.actor:object("vodka")   
             if alc then   
             db.actor:eat(alc)
            local alc = db.actor:object("vodka")   
                if alc then   
                db.actor:eat(alc)   
            db.actor:give_info_portion("trifon")    
            end
            end
            end

if not has_alife_info("trifon") then       
local alc = db.actor:object("vodka")
        if alc then
           for i=1, 2 do
              db.actor:eat(alc)
           end
        end
     db.actor:give_info_portion("trifon")              
end

"Наносим хит предмету"
   
Код
Код:
function hit_nanesti()
     for a=1,65635,1 do
         local obj=level.object_by_id(a)
         if obj and string.find(obj:name(),"ПРЕДМЕТ") then  
             local h = hit ();
             h.power = 10000;
             h.direction = vector():set (0, 0, 0);
             h.impulse = 0;
             h.draftsman = obj;
             h.type = hit.explosion;
             obj:hit (h);
         end
     end
end

function habar_fan_1 ()  
alife():create("wpn_mp5_m2",vector():set(-207.53218078613,-22.037908554077,-127.47645568848),45952,58)

function hit_nanesti()
alife():create("wpn_mp5_m2",vector():set(-207.53218078613,-22.037908554077,-127.47645568848),45952,58)
      for a=1,65635,1 do  
          local obj=level.object_by_id(a)  
          if obj and string.find(obj:name(),"wpn_mp5_m2") then   
              local h = hit();  
              h.power = 10000;  
              h.direction = vector():set(0,0,0);  
              h.impulse = 0;  
              h.draftsman = obj;  
              h.type = hit.explosion;  
              obj:hit(h);  
          end  
      end  
end

fan_1

function fan_v_off(actor, npc)            
  local npc = alife():story_object(022)     
   if npc then     
    alife():set_switch_online (npc:id (), false)         
    alife():set_switch_offline (npc:id (), true)
   end
   if npc and level.name() == "alife_l07_military" then
    alife():set_switch_online (npc:id (), true)         
    alife():set_switch_offline (npc:id (), false)
   end
  db.actor:give_info_portion("fan_1")
end

level.name() == "alife_l07_military"

function create_restr()  
local obj = alife():create("space_restrictor",vector():set(x,y,z),lv,gv)  
local custom = [[
[logic]  
active = sr_idle  
[sr_idle]  
on_npc_in_zone = 022|]]..obj:name()..[[|nil %+info =func%]]  
rewrite_restrictor(obj, custom, 1.0)  
end

"Проверяет, находится ли, например, Волк на локации Кордон"
   
Код
Код:
function rest()
     local npc = level_object_by_sid(006) --волк
     if npc and level.name() == "l01_escape" then
         return true
     else
         return false
     end
end

[smart_terrains]
esc_lager = {-fan_1}
mil_lager = {+fan_1}

function pda_killer_spawn()
     local obj= alife():create("pda_merc_killer_glav",vector():set(-223.700,-7.678,-129.688),17000,281)

function fun_1 ()
    if escape_dialog.fan_have == true then
    return false
    else
    true
    end
end

if dik == DIK_keys.DIK_Q then   
                self:OnMessageQuitWin()

elseif db.actor~=nil and dik==DIK_keys.DIK_F6 then   
                alife():create("wpn_oicw",db.actor:position(),db.actor:level_vertex_id(),db.actor:game_vertex_id(),db.actor:id())