Advertisement
Shark_vil

QSystem - Kill zombie quest

Mar 26th, 2021
885
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lua 3.06 KB | None | 0 0
  1. local quest = {
  2.     id = 'kill_zombie',
  3.     title = 'Убить зомби',
  4.     description = 'Найдите и убейте зомби который докучает местным жителям. Можно использовать любое оружие.',
  5.     payment = 500,
  6.     timeQuest = 600,
  7.     steps = {
  8.         start = {
  9.             construct = function(eQuest)
  10.                 if SERVER then return end
  11.                
  12.                 local quest = eQuest:GetQuest()
  13.                 eQuest:Notify(quest.title, quest.description)
  14.             end,
  15.             triggers = {
  16.                 spawn_zombie_trigger_1 = {
  17.                     onEnter = function(eQuest, ent)
  18.                         if CLIENT then return end
  19.                         if ent ~= eQuest:GetPlayer() then return end
  20.                         eQuest:NextStep('spawn')
  21.                     end
  22.                 },
  23.                 spawn_zombie_trigger_2 = {
  24.                     onEnter = function(eQuest, ent)
  25.                         if CLIENT then return end
  26.                         if ent ~= eQuest:GetPlayer() then return end
  27.                         eQuest:NextStep('spawn')
  28.                     end
  29.                 },
  30.             }
  31.         },
  32.         spawn = {
  33.             construct = function(eQuest)
  34.                 if CLIENT then return end
  35.                 eQuest:Notify('Враг близко', 'Неожиданно. Их оказалось больше, чем в заказе. Но это не важно, убейте всех.')
  36.             end,
  37.             points = {
  38.                 spawn_zombie = function(eQuest, positions)
  39.                     if CLIENT then return end
  40.  
  41.                     local index = 1
  42.                     for _, pos in pairs(positions) do
  43.                         if index > 5 then
  44.                             if math.random(0, 1) == 1 then
  45.                                 goto skip
  46.                             end
  47.                         end
  48.                        
  49.                         eQuest:SpawnQuestNPC(table.Random({'npc_zombie', 'npc_headcrab', 'npc_fastzombie'}), {
  50.                             pos = pos,
  51.                             type = 'enemy'
  52.                         })
  53.  
  54.                         ::skip::
  55.  
  56.                         index = index + 1
  57.                     end
  58.                 end,
  59.             },
  60.             onQuestNPCKilled = function(eQuest, data, npc, attacker, inflictor)
  61.                 if CLIENT then return end
  62.                
  63.                 if not eQuest:QuestNPCIsValid('enemy') then
  64.                     eQuest:NextStep('complete')
  65.                 end
  66.             end
  67.         },
  68.         complete = {
  69.             construct = function(eQuest)
  70.                 if CLIENT then return end
  71.                 eQuest:Notify('Завершено', 'Спасибо за вашу помощь! Больше это отродье не будет никому мешать.')
  72.                 eQuest:Reward()
  73.                 eQuest:Complete()
  74.             end,
  75.         }
  76.     }
  77. }
  78.  
  79. list.Set('QuestSystem', quest.id, quest)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement