quest loto begin
state start begin
when 20092.chat."Sayısal Loto" begin
if 10 > get_global_time() - pc . getqf ( "lottery_last_play" ) then --10 second after
say ("Sayisal Loto'yu 10 saniye Sonra Kullabilirsiniz.")
return
end
say_title ( "Sayisal Loto:" )
say ("Bunu Yapman Icin Belirli Bir Ucret Odemen Gerekir.")
say_reward ("Fiyatı: 1.000.000 Yang")
say ("Devam edecek misin?")
local sec = select("Devam","Hayır yha bosver")
if sec = 2 then
say("Tamam sen bilirsin!")
elseif sec = 1 then
if 90 < pc.get_level then
say("Dostum daha "..pc.get_level.." level sin,")
say("Üzgünüm "..pc.get_name.." seni severim ama kurallari sende biliyorsun!")
--CALCULATE
local lev = pc.get_level
say(90-lev .. " kadar daha kasilman gerek!")
--CALCULATE
say("")
end --local lev
else --if lvl
if scelta == 1 then
if pc . gold >= 5000000 then
pc . changegold ( - 5000000 )
local k
repeat
say_title ( "Sayisal Loto :" )
say ( "1 ve 20 arasinda bir sayi secin" )
say ("Benim elimdeki sayi ile uyarsa")
say ("Supriz ikramiye senin olacak")
say ("")
k = tonumber(input())
if k == nil then
say_title("Sayisal Loto :")
say("Bir sayı girmelisiniz!")
local s = select("Devam Et", "iptal")
if s == 2 then
return
end
else
if k <= 0 then
say_title("Sayisal Loto :")
say("Lütfen Belirttigim Sayilari Yazınız!")
local s = select("Devam", "Vazgec")
if s == 2 then
return
end
else
if k > 11 then
say_title("Sayisal Loto :")
say("Sen 1 ve 20 Arasında Bir Sayı Girmelisiniz")
local s = select("Devam", "Vazgec")
if s == 2 then
return
end
else
break
end
end
end
until false
say("Numara sec: " .. k )
wait ()
say ("Ve Simdi Işlemine Devam!")
local random_number = tostring(number(1,5))
say("Benim numaram: " .. random_number)
if random_number == tostring(k) then
local calc = (pc.get_level * 80 + pc.get_align / horse.get_level)*1000000 --test 50lvl align 20000 ; (50*80+20000)/30*1000000 = 20M
command("/b "..pc.get_name.." arkdasimiz sayisal lotodan "..cal.." kazanmistir!")
say ("Tebrikler, Ikramiyeyi Kazandın!")
say_reward ("Aldigin "..calc)
pc.changegold ( calc )
end --calc local
else
say ("Üzgünüm olmadi.Yeniden dene!")
end
end
pc.setqf("lottery_last_play" , get_global_time())
return
end -- if lvl
else
say("Artik nereye nasil bastiysan kardes! Kafam karisti dogrusu")
end --if sec end
end --sec local
my quest and mob_drop_item.txt error? and my item error?
