[zone_mine_simulator]:zone_mine_field
class   = [i][b]ZS_MBALD[/b][/i]
$spawn   = "zones\caxap\zone_mine_simulator"

%=barrel_explode(sid) =disable_anomaly(sid)%

function crete_sms(actor, npc, p)
    local text = p[1]
    local icon = p[2]
    local period = p[3]
    local sound = sound_object(p[4])
       
    if text == nil then
     text = "not_text_sms"
    end
       
    if period == nil then
     period = 5000
    end
       
    if sound == nil then
     sound = "device\\pda\\pda_news"
    end
       
    news_manager.send_tip(db.actor,text,0,icon,period,nil)
    sound:play(db.actor,0,sound_object.s2d)
end

%=crete_sms(new_level_map_spot_found)%

function crete_sms(actor, npc, p)
   local text = "not_text_sms"
   local icon = nil  
   local period = 5000
   local sound = "default"
      
   if p[1] then  
    text = p[1]  
   end  
     
   if p[2] then
     icon = p[2]
   end

   if p[3] and type(p[3]) == "number" then  
    period = p[3]
   end  
     
   if p[4] then  
    sound = p[4]
   end  
     
   news_manager.send_tip(db.actor,text,0,icon,period,nil,sound)  
    
  end

tips_sounds = {
  default = "pda_tips",
  alarm = "pda_alarm",
  news = "pda_news",
  task = "pda_task",
   
}

function send_tip(actor, news_id, timeout, sender, showtime, sender_id, sound_id)
  if news_id == nil then return false end

--    printf("try to send tips for [%s]", tostring(sender_id))
  if sender_id ~= nil then
   local sim = alife()
   if sim ~= nil then
    local npc = sim:object(get_story_object_id(sender_id))
    if npc ~= nil then
     if npc.online then
      --в онлайне проверяем на раненность
      if xr_wounded.is_heavy_wounded_by_id(npc.id) then
       printf("[PDA]Cannot send tips [%s], sender is heavy wounded", tostring(news_id))
       return false
      end
     end
     -- в других случаях только на смерть
     if npc:alive() == 1 then
      printf("[PDA]Cannot send tips [%s], sender is dead", tostring(news_id))
      return false
     end
    end
   end
  end

  if timeout == nil then timeout = 0 end
  if showtime == nil then showtime = 5000 end

  local sound_theme = tips_sounds["default"]
  if sound_id and tips_sounds[sound_id] then
   sound_theme = tips_sounds[sound_id]
  end
  xr_sound.set_sound_play(actor:id(), sound_theme)

  local texture = "ui_iconsTotal_grouping"
  if sender ~= nil then
   if type(sender) == "string" then
    if tips_icons[sender] then
     texture = tips_icons[sender]
    end
    elseif is_npc_stalker(sender:clsid()) then
    texture = sender:character_icon()
   end
  end
  local news_caption = game.translate_string("st_tip")
  local news_text = game.translate_string(news_id)

  actor:give_game_news(news_caption, news_text, texture, timeout*1000, showtime, 0)

  return true
end

local rewards = {  
   {"bandage", 6, "vodka", 4,},  
   {"medkit", 2, "vodka", 4,},  
   {"antirad", 3, "vodka", 4,},  
   {"helm_protective",},  
   {"drug_antidot", 2, "medkit_army", 2},  
   {"drug_antidot", 2, "medkit", 2},  
}  

function start()
  xr_s.register_callback("update", start, nil) --здесь записываем функцию в колбек  
   local reward = rewards[math.random(#rewards)]
   for item = 1, #reward, 2 do
    alife():create(reward[item], db.actor:position(), 0, 0, db.actor:id())
    xr_s.unregister_callback ("update", start) --здесь удаляем.
   end
end