Cod: Selectaţi tot

must start with 'quest'
aimaldecompanie.quest:127:Abort (core dumped)

Cod: Selectaţi tot

quest adopta_pet begin
   state start begin
      when login or levelup with pc.get_level() >= 25 begin -- Incepand cu level 15
         set_state(informatie)
      end
   end

   state informatie begin
      when letter begin
         send_letter("Adoptă propriul animăluţ")
      end

      when button or info begin
         say_title("Salut:")
         say("Hey!")
         say("Ai nevoie de un animal de companie?")
         say("Dute şi vorbeşte cu grăjdarul şi el")
         say("te va îndruma.")
         set_state(grajdar)
      end
   end

   state grajdar begin
      when 20349.chat."Adoptă un animal de companie" begin
         say_title("Grăjdar:")
         say("Salut!")
         say("Vreau să ştii că acum ai ocazia să îţi")
         say("adopţi propriul animal de companie de la mine.")
         say("Aceste animale nu sunt niste animale obişnuite.")
         say("Ele te ajuta în luptă, dar sunt şi o companie")
         say("placută.")
         say("Dar nu le poţi obţine pe gratis.. Trebuie să")
         say("îndeplineşti o sarcină pentru mine..")
         say("Eşti de acord?")
         local s = select("Da, sunt.", "Nu.")
         if 1 == s then
            say_title("Grăjdar:")
            say("Ucide 50 Soldaţi V. Negru şi întoarcete la grăjdar.")
            say_reward("Informaţie: Ucide 50 Soldaţi Vânt Negru.")
            say("")
            pc.setqf("state", 50)
            q.set_counter("Soldat V. Negru:", 50)
         elseif 2 == s then
            say_title("Grajdar:")
            say("Când te răzgândeşti mă găseşti tot aici.")
         end
      end

      when 401.kill begin
         local numara = pc.getqf("state") - 1
         local item = 50027 -- Loz de loterie
         if numara <= 50 then
            pc.setqf("state", numara)
            q.set_counter("Soldat V. Negru:", numara)
         end

         if numara == 0 then
            say_title("Soldat V. Negru. Complet!")
            say("")
            say("Ai îndeplinit cu succes sarcina dată de grăjdar.")
            say("Întoarcete la el şi alege-ţi un animăluţ.")
            say("")
            say_reward("Ai primit:")
            say_reward("- Loz de loterie")
            pc.give_item2(item, 1)
            clear_letter()
            set_state(techeama) -- scrisoare cum ca grajdarul te cheama
         end
      end
   end

   state techeama begin
      when letter begin
         send_letter("Adoptă propriul animăluţ")
      end

      when button or info begin
         say_title("Salut:")
         say("Grăjdarul te aşteaptă la el!")
         say("Vino cât mai repede cu lozul de loterie.")
         set_state(alegepet) -- Alege animalutul
      end
   end

   state alegepet begin
      when 20349.chat."Adoptă un animal de companie" begin
         local item = 50027 -- Loz de loterie
         if pc.countitem(item) < 0 then -- Verificare daca lozul nu exista
            say_title("Grăjdar:")
            say("Îmi pare rău, dar îţi lipseşte Lozul.")
         elseif pc.countitem(item) > 0 then -- Daca autorizatia exista
            say_title("Grăjdar:")
            say("Se pare că ai îndeplinit sarcina dată de mine")
            say("cu succes şi ai primit un loz de loterie.")
            say("Un animăluţ este pregătit să îl adopţi, acum")
            say("alegerea e a ta.")
            say("Îţi voi afişa o listă cu toate animalele disponibile.")
            wait()
            say_title("Alege:")
            say(" ")
            clear_letter() -- Stergem scrisoarea
            local s = select("Leonidas.", "Rufus.", "Azrael.", "Khan.", "Bambi.", "Phoenix de foc.")
            if 1 == s then
               pc.remove_item(item, 1)
               pc.give_item2(53010, 1) -- Leonidas x1
            elseif 2 == s then
               pc.remove_item(item, 1)
               pc.give_item2(53013, 1) -- Rufus x1
            elseif 3 == s then
               pc.remove_item(item, 1)
               pc.give_item2(53005, 1) -- Azrael x1
            elseif 4 == s then
               pc.remove_item(item, 1)
               pc.give_item2(53011, 1) -- Khan x1
            elseif 5 == s then
               pc.remove_item(item, 1)
               pc.give_item2(53007, 1) -- Bambi x1
            end
            elseif 6 == s then
               pc.remove_item(item, 1)
               pc.give_item2(53001, 1) -- Phoenix de foc x1
            end
            set_state(complete) -- Incheiem misiunea
         end
      end
   end
   state complete begin
   end
end

Cod: Selectaţi tot

quest adopta_pet begin
   state start begin
      when login or levelup with pc.get_level() >= 25 begin -- Incepand cu level 15
         set_state(informatie)
      end
   end

   state informatie begin
      when letter begin
         send_letter("Adoptă propriul animăluţ")
      end

      when button or info begin
         say_title("Salut:")
         say("Hey!")
         say("Ai nevoie de un animal de companie?")
         say("Dute şi vorbeşte cu grăjdarul şi el")
         say("te va îndruma.")
         set_state(grajdar)
      end
   end

   state grajdar begin
      when 20349.chat."Adoptă un animal de companie" begin
         say_title("Grăjdar:")
         say("Salut!")
         say("Vreau să ştii că acum ai ocazia să îţi")
         say("adopţi propriul animal de companie de la mine.")
         say("Aceste animale nu sunt niste animale obişnuite.")
         say("Ele te ajuta în luptă, dar sunt şi o companie")
         say("placută.")
         say("Dar nu le poţi obţine pe gratis.. Trebuie să")
         say("îndeplineşti o sarcină pentru mine..")
         say("Eşti de acord?")
         local s = select("Da, sunt.", "Nu.")
         if 1 == s then
            say_title("Grăjdar:")
            say("Ucide 50 Soldaţi V. Negru şi întoarcete la grăjdar.")
            say_reward("Informaţie: Ucide 50 Soldaţi Vânt Negru.")
            say("")
            pc.setqf("state", 50)
            q.set_counter("Soldat V. Negru:", 50)
         elseif 2 == s then
            say_title("Grajdar:")
            say("Când te răzgândeşti mă găseşti tot aici.")
         end
      end

      when 401.kill begin
         local numara = pc.getqf("state") - 1
         local item = 50027 -- Loz de loterie
         if numara <= 50 then
            pc.setqf("state", numara)
            q.set_counter("Soldat V. Negru:", numara)
         end
	

         if numara == 0 then
            say_title("Soldat V. Negru. Complet!")
            say("")
            say("Ai îndeplinit cu succes sarcina dată de grăjdar.")
            say("Întoarcete la el şi alege-ţi un animăluţ.")
            say("")
            say_reward("Ai primit:")
            say_reward("- Loz de loterie")
            pc.give_item2(item, 1)
            clear_letter()
            set_state(techeama) -- scrisoare cum ca grajdarul te cheama
         end
      end
   end

   state techeama begin
      when letter begin
         send_letter("Adoptă propriul animăluţ")
      end

      when button or info begin
         say_title("Salut:")
         say("Grăjdarul te aşteaptă la el!")
         say("Vino cât mai repede cu lozul de loterie.")
         set_state(alegepet) -- Alege animalutul
      end
   end

   state alegepet begin
      when 20349.chat."Adoptă un animal de companie" begin
         local item = 50027 -- Loz de loterie
         if pc.countitem(item) < 0 then -- Verificare daca lozul nu exista
            say_title("Grăjdar:")
            say("Îmi pare rău, dar îţi lipseşte Lozul.")
         elseif pc.countitem(item) > 0 then -- Daca autorizatia exista
            say_title("Grăjdar:")
            say("Se pare că ai îndeplinit sarcina dată de mine")
            say("cu succes şi ai primit un loz de loterie.")
            say("Un animăluţ este pregătit să îl adopţi, acum")
            say("alegerea e a ta.")
            say("Îţi voi afişa o listă cu toate animalele disponibile.")
            wait()
            say_title("Alege:")
            say(" ")
            clear_letter() -- Stergem scrisoarea
            local s = select("Leonidas.", "Rufus.", "Azrael.", "Khan.", "Bambi.", "Phoenix de foc.")
            if 1 == s then
               pc.remove_item(item, 1)
               pc.give_item2(53010, 1) -- Leonidas x1
            elseif 2 == s then
               pc.remove_item(item, 1)
               pc.give_item2(53013, 1) -- Rufus x1
            elseif 3 == s then
               pc.remove_item(item, 1)
               pc.give_item2(53005, 1) -- Azrael x1
            elseif 4 == s then
               pc.remove_item(item, 1)
               pc.give_item2(53011, 1) -- Khan x1
            elseif 5 == s then
               pc.remove_item(item, 1)
               pc.give_item2(53007, 1) -- Bambi x1
            end
            elseif 6 == s then
               pc.remove_item(item, 1)
               pc.give_item2(53001, 1) -- Phoenix de foc x1
            end
            set_state(complete) -- Incheiem misiunea
         end
      end

   state complete begin
   end

Cod: Selectaţi tot

assertion failure : nested==0
aimaldecompanie.quest:129:Abort (core dumped)

Cod: Selectaţi tot

quest adopta_pet begin
   state start begin
      when login or levelup with pc.get_level() >= 25 begin -- Incepand cu level 15
         set_state(informatie)
      end
   end

   state informatie begin
      when letter begin
         send_letter("Adoptă propriul animăluţ")
      end

      when button or info begin
         say_title("Salut:")
         say("Hey!")
         say("Ai nevoie de un animal de companie?")
         say("Dute şi vorbeşte cu grăjdarul şi el")
         say("te va îndruma.")
         set_state(grajdar)
      end
   end

   state grajdar begin
      when 20349.chat."Adoptă un animal de companie" begin
         say_title("Grăjdar:")
         say("Salut!")
         say("Vreau să ştii că acum ai ocazia să îţi")
         say("adopţi propriul animal de companie de la mine.")
         say("Aceste animale nu sunt niste animale obişnuite.")
         say("Ele te ajuta în luptă, dar sunt şi o companie")
         say("placută.")
         say("Dar nu le poţi obţine pe gratis.. Trebuie să")
         say("îndeplineşti o sarcină pentru mine..")
         say("Eşti de acord?")
         local s = select("Da, sunt.", "Nu.")
         if 1 == s then
            say_title("Grăjdar:")
            say("Ucide 50 Soldaţi V. Negru şi întoarcete la grăjdar.")
            say_reward("Informaţie: Ucide 50 Soldaţi Vânt Negru.")
            say("")
            pc.setqf("state", 50)
            q.set_counter("Soldat V. Negru:", 50)
         elseif 2 == s then
            say_title("Grajdar:")
            say("Când te răzgândeşti mă găseşti tot aici.")
         end
      end

      when 401.kill begin
         local numara = pc.getqf("state") - 1
         local item = 50027 -- Loz de loterie
         if numara <= 50 then
            pc.setqf("state", numara)
            q.set_counter("Soldat V. Negru:", numara)
         end
	

         if numara == 0 then
            say_title("Soldat V. Negru. Complet!")
            say("")
            say("Ai îndeplinit cu succes sarcina dată de grăjdar.")
            say("Întoarcete la el şi alege-ţi un animăluţ.")
            say("")
            say_reward("Ai primit:")
            say_reward("- Loz de loterie")
            pc.give_item2(item, 1)
            clear_letter()
            set_state(techeama) -- scrisoare cum ca grajdarul te cheama
         end
      end
   end

   state techeama begin
      when letter begin
         send_letter("Adoptă propriul animăluţ")
      end

      when button or info begin
         say_title("Salut:")
         say("Grăjdarul te aşteaptă la el!")
         say("Vino cât mai repede cu lozul de loterie.")
         set_state(alegepet) -- Alege animalutul
      end
   end

   state alegepet begin
      when 20349.chat."Adoptă un animal de companie" begin
         local item = 50027 -- Loz de loterie
         if pc.countitem(item) < 0 then -- Verificare daca lozul nu exista
            say_title("Grăjdar:")
            say("Îmi pare rău, dar îţi lipseşte Lozul.")
         elseif pc.countitem(item) > 0 then -- Daca autorizatia exista
            say_title("Grăjdar:")
            say("Se pare că ai îndeplinit sarcina dată de mine")
            say("cu succes şi ai primit un loz de loterie.")
            say("Un animăluţ este pregătit să îl adopţi, acum")
            say("alegerea e a ta.")
            say("Îţi voi afişa o listă cu toate animalele disponibile.")
            wait()
            say_title("Alege:")
            say(" ")
            clear_letter() -- Stergem scrisoarea
            local s = select("Leonidas.", "Rufus.", "Azrael.", "Khan.", "Bambi.", "Phoenix de foc.")
            if 1 == s then
               pc.remove_item(item, 1)
               pc.give_item2(53010, 1) -- Leonidas x1
            elseif 2 == s then
               pc.remove_item(item, 1)
               pc.give_item2(53013, 1) -- Rufus x1
            elseif 3 == s then
               pc.remove_item(item, 1)
               pc.give_item2(53005, 1) -- Azrael x1
            elseif 4 == s then
               pc.remove_item(item, 1)
               pc.give_item2(53011, 1) -- Khan x1
            elseif 5 == s then
               pc.remove_item(item, 1)
               pc.give_item2(53007, 1) -- Bambi x1
            elseif 6 == s then
               pc.remove_item(item, 1)
               pc.give_item2(53001, 1) -- Phoenix de foc x1
            end
            set_state(complete) -- Incheiem misiunea
         end
      end

   state complete begin
   end

Cod: Selectaţi tot

expecting 'when' or 'function'
aimaldecompanie.quest:127:Abort (core dumped)

Cod: Selectaţi tot

quest adopta_pet begin
   state start begin
      when login or levelup with pc.get_level() >= 25 begin -- Incepand cu level 15
         set_state(informatie)
      end
   end

   state informatie begin
      when letter begin
         send_letter("Adoptă propriul animăluţ")
      end

      when button or info begin
         say_title("Salut:")
         say("Hey!")
         say("Ai nevoie de un animal de companie?")
         say("Dute şi vorbeşte cu grăjdarul şi el")
         say("te va îndruma.")
         set_state(grajdar)
      end
   end

   state grajdar begin
      when 20349.chat."Adoptă un animal de companie" begin
         say_title("Grăjdar:")
         say("Salut!")
         say("Vreau să ştii că acum ai ocazia să îţi")
         say("adopţi propriul animal de companie de la mine.")
         say("Aceste animale nu sunt niste animale obişnuite.")
         say("Ele te ajuta în luptă, dar sunt şi o companie")
         say("placută.")
         say("Dar nu le poţi obţine pe gratis.. Trebuie să")
         say("îndeplineşti o sarcină pentru mine..")
         say("Eşti de acord?")
         local s = select("Da, sunt.", "Nu.")
         if 1 == s then
            say_title("Grăjdar:")
            say("Ucide 50 Soldaţi V. Negru şi întoarcete la grăjdar.")
            say_reward("Informaţie: Ucide 50 Soldaţi Vânt Negru.")
            say("")
            pc.setqf("state", 50)
            q.set_counter("Soldat V. Negru:", 50)
         elseif 2 == s then
            say_title("Grajdar:")
            say("Când te răzgândeşti mă găseşti tot aici.")
         end
      end

      when 401.kill begin
         local numara = pc.getqf("state") - 1
         local item = 50027 -- Loz de loterie
         if numara <= 50 then
            pc.setqf("state", numara)
            q.set_counter("Soldat V. Negru:", numara)
         end

         if numara == 0 then
            say_title("Soldat V. Negru. Complet!")
            say("")
            say("Ai îndeplinit cu succes sarcina dată de grăjdar.")
            say("Întoarcete la el şi alege-ţi un animăluţ.")
            say("")
            say_reward("Ai primit:")
            say_reward("- Loz de loterie")
            pc.give_item2(item, 1)
            clear_letter()
            set_state(techeama) -- scrisoare cum ca grajdarul te cheama
         end
      end
   end

   state techeama begin
      when letter begin
         send_letter("Adoptă propriul animăluţ")
      end

      when button or info begin
         say_title("Salut:")
         say("Grăjdarul te aşteaptă la el!")
         say("Vino cât mai repede cu lozul de loterie.")
         set_state(alegepet) -- Alege animalutul
      end
   end

   state alegepet begin
      when 20349.chat."Adoptă un animal de companie" begin
         local item = 50027 -- Loz de loterie
         if pc.countitem(item) < 0 then -- Verificare daca lozul nu exista
            say_title("Grăjdar:")
            say("Îmi pare rău, dar îţi lipseşte Lozul.")
         elseif pc.countitem(item) > 0 then -- Daca autorizatia exista
            say_title("Grăjdar:")
            say("Se pare că ai îndeplinit sarcina dată de mine")
            say("cu succes şi ai primit un loz de loterie.")
            say("Un animăluţ este pregătit să îl adopţi, acum")
            say("alegerea e a ta.")
            say("Îţi voi afişa o listă cu toate animalele disponibile.")
            wait()
            say_title("Alege:")
            say(" ")
            clear_letter() -- Stergem scrisoarea
            local s = select("Leonidas.", "Rufus.", "Azrael.", "Khan.", "Bambi.", "Phoenix de foc.")
            if 1 == s then
               pc.remove_item(item, 1)
               pc.give_item2(53010, 1) -- Leonidas x1
            elseif 2 == s then
               pc.remove_item(item, 1)
               pc.give_item2(53013, 1) -- Rufus x1
            elseif 3 == s then
               pc.remove_item(item, 1)
               pc.give_item2(53005, 1) -- Azrael x1
            elseif 4 == s then
               pc.remove_item(item, 1)
               pc.give_item2(53011, 1) -- Khan x1
            elseif 5 == s then
               pc.remove_item(item, 1)
               pc.give_item2(53007, 1) -- Bambi x1
            end
            elseif 6 == s then
               pc.remove_item(item, 1)
               pc.give_item2(53001, 1) -- Phoenix de foc x1
            end
            set_state(complete) -- Incheiem misiunea
         end
      end
   state complete begin
   end
end