Cod: Selectaţi tot

quest betiv begin
   state start begin
      -- Cand alegem sa jucam
      when 20094.chat."Loterie Speciala Iteme" begin   
         -- Replicile betivului
            say_title("Loterie by [TEH]SnaKe:")            
            say("Eiii...Stai...aaa. Am ceva pentru tine.")
            say("Aa..Vezi ce vreme minunata e afara?")
            say("Hai sa jucam un joc pe bani..")
            wait()
            say_title("Loterie by [TEH]SnaKe: ")
            say("Te va costa doar 65.000.000 yang si 5 bilete tombola!")
            say("Poti castiga diverse iteme up, costume,frizuri,esarfe,etc.")
            say("sau chiar nimic.")
            say("Garantez ca iteme furate de mine sunt")
            say("de cea mai inalta calitate.")
            say("Accepti?")
            local s = select("Bine.", "Nu acum.")
            if s == 2 then
               say_title("Loterie by [TEH]SnaKe:")
               say("Esti..  un las!.")
               say("Te voi astepta.")
               return
            end
         -- Discutie incheiata
         -- 0 = fara cadou
         local items = {
            0, 80004, 30204, 0, 71123, 71129, 0, 30192, 30193, 0, 30194,
            30195, 0, 30196, 30197, 30198, 0, 0, 30199, 0, 30518, 31039, 
            0, 30502, 0, 45015, 30505, 31024, 31023, 0, 31026, 0,31026,
	    0, 81001, 999100, 0, 999101, 0, 999102, 0, 999103,
            0, 0, 999104, 999105, 0, 999106, 70031, 0, 0, 85001, 85005, 
            70005, 900507, 900508,  45014, 50513         
         } --ultimul element intotdeauna sa fie piatra spiritului 50513
         
         max_items = table.getn(items)         
         random_n = number(1, max_items)
         pc.changegold(-65000000)
         pc.remove_item(31012, 5)

         if items[random_n] == 0 then
            say_title("Betivul: ")
            say("Ai pierdut.")
            say("Toate astea raman la mine..")
            say_reward("Ai pierdut 65.000.000 yang si 5 Bilete Tombola.")
            return
         end
         
         if random_n == max_items then
            random_n = number(1, 4)
            if random_n == 7 then
               item_vnum = items[max_items]
               size = number(1, 2)
            else
               item_vnum = items[number(1, max_items - 1)]
            end
         else
            item_vnum = items[random_n]
            size = number(1, 4)
         end
         
         for variable = 1, size, 1 do
            pc.give_item2(item_vnum)
         end
      end
   end            
end

Cod: Selectaţi tot

quest tombola begin
   state start begin
      when VNUM_NPC.chat."Tombola" begin -- INLOCUIESTE VNUM_NPC CU NPCUL DORIT 
         local item_necesar = 50055 -- VNUM item necesar
         
         local tabel = { -- tabel cu ce iteme sa fie distribuite in mod aleator
            [1] = 27003,
            [2] = 27006 -- ultima linie o lasi fara virgula(,) la final
            -- exemplu
           --[1] = 50055,
           --[2] = 50055,
           --[3] = 50055,
           --[4] = 50055,
           --[5] = 50055,
           --[6] = 50055,
           --[7] = 50055,
           --[8] = 50055
            --
            -- Poti pune cate linii doresti, trebuie doar sa modifici aici sa pui cate costume vrei, unul dupa altul in ordine crescatoare
         }
         --

         say("test")
         say("text")
         say("text")
         say("text")

         local alege = select("Inscrie-ma la tombola", "Anulare")

         if alege == 1 then
            if pc.count_item(item_necesar) > 0 then
               local rand = math.random(1, table.getn(tabel))

               pc.removeitem(item_necesar, 1)      
               pc.give_item2(tabel[rand], 1)
            else
               say("Nu ai materialele necesare pentru a face schimbul,")
               say("revino cand vei avea urmatorul material:")
               say_item_vnum(item_necesar)
            end
         else
            return
         end -- if
      end -- when
   end -- state
end -- quest