Cod: Selectaţi tot

quest loterie begin
    state start begin
        when 9010.chat."Loterie" begin
            say_title("Jin Joo")
                say_verde("Salut ".. pc.get_name())
                say_verde("Salut , ai auzit de loterie?")
                say_verde("Eu ma ocup de asta... Daca ai un Loz la loterie")
                say_item("Loz la loterie", 50027, "")
                wait()
                say_verde("Poti sa mi-l dai si eu iti spun ce ai castigat")
                say("")
            say_reward("Sa vedem ...")
                wait()
                say_verde("Te tin in suspans .")
                local s3 = select("Am un Loz", "Nu am")
                if s3 == 2 then
                return
                else
                if pc.count_item(50027) < 1 then
            say_verde("Imi pare rau dar nu ai bilet la loterie.")
         say_item("Bilet la loterie", 50027, "")
            return
            end
                    say_title("Jin Joo") 
                    say_verde("Sa vad ce ai castigat :")
               say("tine ...")
                    wait()
                    local beutel = number(1, 9)
                    if beutel == 1 then
                        say_verde("Ce frumos ! Ai primit cutie safir misterioasa ")
                        pc.give_item2(50134, 1)
                        pc.remove_item(50027, 1)
                    elseif beutel == 2 then
                        say_verde("Ce frumos ! Ai primit Lingou de 100kk ")
                        pc.give_item2(80003, 1)
                        pc.remove_item(50027, 1) 
                    elseif beutel == 3 then
                        say_verde("Ce frumos ! Ai primit Lingou de 500kk ")
                        pc.give_item2(80004, 1)
                        pc.remove_item(50027, 1) 
                    elseif beutel == 4 then
                        say_verde("Ce frumos ! Ai primit Gheara Dragonului")
                        pc.give_item2(71129, 1)
                        pc.remove_item(50027, 1)
                    elseif beutel == 5 then
                        say_verde("Ce frumos ! Ai primit Balanta Dragonului")
                        pc.give_item2(71123, 1)
                        pc.remove_item(50027, 1)
                    elseif beutel == 6 then
                        say_verde("Ce frumos ! Ai primit Pamflet Scrima")
                        pc.give_item2(70031, 1)
                        pc.remove_item(50027, 1)
                    elseif beutel == 7 then
                        say_verde("Ce frumos ! Ai primit  minereu de aur")
                        pc.give_item2(50606, 50)
                        pc.remove_item(50027, 1) 
                    elseif beutel == 8 then
                        say_verde("Ce frumos ! Ai primit Inel exp 3 ore")
                        pc.give_item2(72003, 1)
                        pc.remove_item(50027, 1) 
                    elseif beutel == 9 then
                        say_verde("Ce frumos ! Ai primit 200 CL ")
                        pc.give_item2(50011, 200)
                        pc.remove_item(50027, 1)
                    end
                end
            end
         end
    end
end

Cod: Selectaţi tot

quest gdv_entry  begin
   state start begin
      when 20091.chat."Loteria Metin2" begin
         
         if 20 > get_global_time() - pc . getqf ( "lottery_last_play" ) then 
      say ("Trebuie s? astep?i 20 secunde ca s? po?i juca din nou,pentru a se evita spawnul") 
      return
   end 
   say_title ( "Casier:" )
   say ("Pentru a te juca trebuie s-? pl?testi un pre? în valoare de 3kk")
   say_reward ("Pret: 3.000.000 Yang")
   say ("Continu?m?")
   local scelta = select ( "Da","Nu" )
   if scelta == 1 then
      if pc . gold >= 5000 then
         pc . changegold ( - 3000000 )
         local k
         repeat
            say_title ( "Casier:" )
            say ( "Introduce?i un num?r de la 1 la 20" )
            say ("În cazul în care num?rul corespunde cu")
            say ("numarul ales de dumneavoastr? pute?i castiga")
            say ("suma de 50.000.000 Yang!!")
            k = tonumber(input())
            if k == nil then
               say_title("Casier:")
               say("Trebuie s-? introduce?i un num?r!")
               local s = select("Continu?", "Anuleaz?")
               if s == 2 then
                  return
               end
            else
               if k <= 0 then
                  say_title("Casier:")
                  say("Trebuie s-? introduce?i un num?r mai mare decât 0")
                  local s = select("Continu?", "Anuleaz?")
                  if s == 2 then
                     return
                  end
               else
                  if k > 20 then
                     say_title("Casier:")
                     say("Trebuie s-? introduce?i un num?r între 1 si 20")
                     local s = select("Continu?", "Anuleaz?")
                     if s == 2 then
                        return
                     end
                  else
                     break
                  end
               end
            end
         until false
         say("Introduce?i un num?r " .. k )
         wait ()
         say ("?i acum vom continua cu extragerea!")
         local random_number = tostring(number(1,20))
         say("Num?rul extras: " .. random_number)
         if random_number == tostring(k) then
            say ("Felicit?ri, ai câ?tigat potul cel mare de 100.000.000. yang!")
            say_reward ("Ai primit 50.000.000. Yang")
            pc.changegold ( 50000000 )
         else 
            say ("Se pare ca ai gresit num?rul,mai incerca :(")
         end
      end
      pc.setqf("lottery_last_play" , get_global_time()) 
      return
            end
         end
      end   
   end
end