Servicii de gazduire la calitate superioara! http://www.clever-host.ro

Loterie

Avatar utilizator

Topic author
Lucifer
Membru Clever-Host
Membru Clever-Host
Mesaje: 20
Membru din: 15 Iul 2017 22:04
Multumiri primite: 1 time
Vârsta: 23

Loterie

Mesaj de Lucifer » 16 Iul 2017 17:01

Imagini :

Imagine

Imagine

Imagine

Cod: Selectaţi tot

quest gdv_entry  begin
   state start begin
      when 20094.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

Înapoi la “Quest-uri”

Cine este conectat

Utilizatori ce ce navighează pe acest forum: Niciun utilizator înregistrat și 0 vizitatori