HTML-Kodu:
if 4320 > get_global_time() - pc . getqf ( "lottery_last_play" ) then
say ("Kumari son kullandigindan 3 gün sonra tekrar kullabilirsiniz.")
return
end
say_title ( "Kumar masasi:" )
say ("Bunu yapman icin belirli bir ücret ödemen gerekir.")
say_reward ("Fiyatı: 50.000 Yang") <--Userden Nekadar Alacağını..
say ("Devam edecek mi?")
local scelta = select ( "Evet","Hayır" )
if scelta == 1 then
if pc . gold >= 50000 then <--Nekadar yapıcaksanız burayada yazın
pc . changegold ( - 50000 )<--User Kabul Ederse Giden Para
local k
repeat
say_title ( "Kumar masasi:" )
say ( "1 ve 3 arasinda bir sayi secin" )
say ("Benim elimdeki sayi ile uyarsa")
say ("ikramiye kazanacaksin")
say ("150.000.000 ikramiye Yang!!")<---Userin Nekedar Kazanacağı
k = tonumber(input())
if k == nil then
say_title("Kumar masasi:")
say("Bir sayı girmelisiniz!")
local s = select("Devam etmek", "iptal")
if s == 2 then
return
end
else
if k <= 0 then
say_title("Kumar masasi:")
say("Lütfen belirttigim sayilar secin!")
local s = select("Devam", "Vazgec")
if s == 2 then
return
end
else
if k > 20 then
say_title("Kumar masasi:")
say("Sen 1 ve 3 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 şimdi işlemine devam!")
local random_number = tostring(number(1,3))
say("Benim numaram: " .. random_number)
if random_number == tostring(k) then
say ("Tebrikler, İkramiye kazandin150kk!")
say_reward ("Aldigin 150.000.000 Yang") <--Userin Kazandığı
pc.changegold ( 150000000 ) <--Değiştirirseniz burayıda değiştirin
else
say ("Üzgünüm olmadi.Yeniden dene!")
end
end
pc.setqf("lottery_last_play" , get_global_time())
return
end
REP'i Çok Görmeyin ve Esirgemeyin By Mussti