*#*BANKA LUA'SI ILE KARŞINIZDAYIM*#*
KODLARI INCELEMEK ISTEYEN BUYURSUN
KODLARI INCELEMEK ISTEYEN BUYURSUN
Kod:
quest banka begin
state start begin
when 20094.chat."Banka" begin
say_title("Merhaba "..pc.get_name()..",")
if pc.getqf("banka_ilk") == 0 then
say("Bankaya hoş geldin.")
say("İlk defa geldiğin için bir şifre ")
say("oluşturmalısın.")
say("")
say_reward("Şifre sadece rakamlardan oluşmalıdır.")
local sifre = tonumber(input(''))
if sifre == "" or sifre == nil then
say("Şifre kısmı boş geçilemez.")
return
else
say("")
say("")
say("Şifren "..sifre.." olsun mu ?")
say("")
local karar = select(locale.yes,locale.no)
if karar == 2 then
return
else
say_title("Banka :")
say("")
say("Banka şifren "..sifre.." olmuştur.")
say("Bu şifre ile artık bankanı kullanabiliceksin.")
pc.setqf("banka_ilk",1)
banka.sifre_kayit(sifre)
end
end
else
say("Bankaya hoş geldin.")
say("İşlem yapabilmek için şifreni gir.")
say("")
local sifrem = banka.sifrem()
local bakiye = banka.bakiye()
local sifre = tonumber(input(''))
if sifre == "" or sifre == nil then
say("Şifre kısmı boş geçilemez.")
return
elseif sifre == sifrem then
say("Şifre doğru...")
say("Menüye yönlendiriliyorsunuz...")
wait()
say_title("Tekrar hoşgeldin "..pc.get_name()..",")
say("Bakiyen : "..bakiye.." Yang")
say("Ne yapmak istiyorsun?")
say("")
local menu = select("Para Yatır ","Para Çek ","Şifre Değiştir ","Kapat ")
if menu == 4 then
return
elseif menu == 1 then
say("")
say("Ne kadar yatırmak istiyorsun ?")
say("")
local yatir = tonumber(input(''))
if yatir == "" or yatir == nil then
say("Para kısmı boş geçilemez!")
return
elseif pc.get_gold < yatir then
say("Yeterli paranız yok.")
return
else
say("")
say(yatir.." Yang yatırmak istediğinize ")
say("emin misiniz?")
say("")
local secim = select(locale.yes,locale.no)
if secim == 2 then
return
elseif secim == 1 then
say("")
say("Hesabınıza "..yatir.." gold yatırıldı.")
banka.yatir(yatir)
end
end
elseif menu == 2 then
say("")
say("Ne kadar para çekmek istiyorsunuz?")
say("")
local cek = tonumber(input(''))
if cek == "" or cek == nil then
say("Para kısmı boş geçilemez.")
return
elseif bakiye < cek then
say("Hesabınızda o kadar para yok.")
return
else
say("")
say("Hesabınızdan "..cek.." Yang çekildi.")
pc.change_gold(cek)
banka.cek(cek)
end
elseif menu == 3 then
say("")
say("Yeni şifrenizi girin.")
say("")
say_reward("Sadece rakam!")
say("")
local yeni_sifre = tonumber(input(''))
if yeni_sifre == "" or yeni_sifre == nil then
say("Şifre kısmı boş geçilemez.")
return
else
say("")
say("Şifreniz "..yeni_sifre.." olsun mu?")
say("")
local kabul = select(locale.yes,locale.no)
if kabul == 2 then
return
else
say("")
say("Şifreniz "..yeni_sifre.." olmuştur.")
banka.sifre_degis(yeni_sifre)
end
end
end
end
end
end
function sifre_kayit(sifre)
os.execute("mysql -u root account --execute=\"UPDATE account SET bankasifre =('"..sifre.."') where id = ('".. pc.get_account_id() .."')\"")
end
function sifrem()
mysql_query('select bankasifre from account.account where id = \\"'..pc.get_account_id()..'\\"').bankasifre[1]
end
function bakiye()
mysql_query('select param from account.account where id = \\"'..pc.get_account_id()..'\\"').param[1]
end
function yatir(yatir)
local param = mysql_query('select param from account.account where id = \\"'..pc.get_account_id()..'\\"')
local para = yatir + param[1]
os.execute("mysql -u root account --execute=\"UPDATE account SET param =('"..para.."') where id = ('".. pc.get_account_id() .."')\"")
end
function cek(cek)
local param = mysql_query('select param from account.account where id = \\"'..pc.get_account_id()..'\\"')
local para = (param[1] - cek)
os.execute("mysql -u root account --execute=\"UPDATE account SET param =('"..para.."') where id = ('".. pc.get_account_id() .."')\"")
end
function sifre_degis(yeni_sifre)
os.execute("mysql -u root account --execute=\"UPDATE account SET bankasifre =('"..yeni_sifre.."') where id = ('".. pc.get_account_id() .."')\"")
end
end
endILK ONCE FILEZILLA'YA GIRIYORUZ DAHA SONRA /usr/game/share/locale/turkey/quest bölümüne lua dosyamızı atıyoruz daha sonra PUTTY AMCA'da login oluyoruz ve cd /usr/game/share/locale/turkey/quest entır yapıyoruz sonrasında ise ./qc banka.lua yapıyoruz ve oyundan GM çar ile /reload q çekiyoruz hayırlı olsun
Moderatör tarafında düzenlendi:
