Notes

state start begin
when 40001.use begin
say("Merhaba "..pc.get_name()..". ")
say("Aşağıdan işlem butonlarına tıklayarak ayar yapabilirsin.")
say("Yaptığın işlemler anlık olarak oyun yansıyacaktır.")
say("Reload işlemi yapmanıza gerek yoktur.")
say("|cff07eb96Gm Komut(Sistem Aç): (/e bot_sure_open 1)")
say("|cffff9999Gm Komut(Sistem Kapa): (/e bot_sure_open 0)")
say("")
local gmayar = select("Sistem Bilgi","Sistem Aç/Kapat","Bot Süre","Ceza Ayarlari","Dönüşüm Ayar","Kapat")
if gmayar == 1 then
local bot_bilgiler = game.get_event_flag("bot_sure_open")
if bot_bilgiler == 1 and pc.getqf("clientkapat") == 0 then
say("Sistem Bilgi: |cff07eb96Açık!")
say("Ayarlı Süre: |cff07eb96"..bot_sure_giris.."dk. ")
say("Dönüşülen Mob Vnum:|cff07eb96"..bot_donusum_mob.."")
say("Şifre Giriş Süresi: |cff07eb96"..bot_sure_ceza.."dk. ")
say("Hapis Ceza: |cff07eb96"..bot_hapis_ceza.."dk. ")
say("Client Kapat: |cff07eb96Kapalı!")
elseif bot_bilgiler == 1 and pc.getqf("clientkapat") != 0 then
say("")
say("Sistem Bilgi: |cff07eb96Açık!")
say("Ayarlı Süre: |cff07eb96"..bot_sure_giris.."dk. ")
say("Dönüşülen Mob Vnum:|cff07eb96"..bot_donusum_mob.."")
say("Şifre Giriş Süresi: |cff07eb96"..bot_sure_ceza.."dk. ")
say("Hapis Ceza: |cff07eb96Kapalı! ")
say("Client Kapat: |cff07eb96Açık!")
elseif bot_bilgiler == 0 then
say("Sistem Bilgi: |cffff9999Kapalı!")
say("Ayarlı Süre: |cff07eb96"..bot_sure_giris.."dk. ")
say("Dönüşülen Mob Vnum:|cff07eb96"..bot_donusum_mob.."")
say("Şifre Giriş Süresi: |cff07eb96"..bot_sure_ceza.."dk. ")
say("Hapis Ceza: |cff07eb96"..bot_hapis_ceza.."dk. ")
end
end
if gmayar == 2 then
local bot_bilgiler = game.get_event_flag("bot_sure_open")
if bot_bilgiler == 1 then
say("Merhaba "..pc.get_name().." ")
say("Sistem durumu: |cff07eb96Açık!")
say("")
say("Sistemi Kapatmak İster misiniz ?")
local sistem_kapa = select("Evet","Hayır")
if sistem_kapa == 1 then
game.set_event_flag("bot_sure_open", 0)
syschat("Bot Control: |cffff9999Kapatıldı!")
end
elseif bot_bilgiler == 0 then
say("Sitem durumu: |cffff9999Kapalı!")
say("Sistemi Açmak İster misiniz ?")
local sistem_ac = select("Evet","Hayır")
if sistem_ac == 1 then
game.set_event_flag("bot_sure_open", 1)
syschat("Bot Control:|cff07eb96 Açıldı!")
end
end
end
if gmayar == 3 then
say("Hoşgeldin.")
say("")
say("Bot girdi süresini değiştirmek istiyorsanız.")
say("Bigileri eksiksiz doldurunuz.")
say("")
say("|cff07eb96Bot şifre giriş süresi dk. olarak rakam giriniz.")
bot_sure_giris = tonumber(input()) or nil
if bot_sure_giris == 0 then
say("Boşluk veya özel karakter kullanamazsın.")
return
end
say(" Şifre girmek için verilicek süre ayarı(Dakika). ")
say("|cff07eb96 Şifre seçme süresi dakika(Rakam)")
say("|cff07eb96Tercih edilen 1dk.")
bot_sure_ceza = tonumber(input()) or nil
if bot_sure_ceza == 0 then
say("Boşluk veya özel karakter kullanamazsın.")
return
end
syschat("Bot CTRL Süre: |cff07eb96"..bot_sure_giris.."dk. ")
syschat("Bot CTRL Şifre Giriş Süresi: |cff07eb96"..bot_sure_ceza.."dk. ")
end
if gmayar == 4 then
say("Belirlenen sürede şifereyi girmiyen oyuncuya ne yapılsın ?")
local oyuncuayar = select("Hapis Cezası ver","Client Kapansin","İptal")
if oyuncuayar == 1 then
say("Hoşgeldin.")
say("")
say("Hapis cezası için gerekli süre ayarla!")
say("Bigileri eksiksiz doldurunuz.")
say("")
say("Ceza için beklenilicek Süre(Dakika)")
bot_hapis_ceza = tonumber(input()) or nil
if bot_hapis_ceza == 0 then
say("Boşluk veya özel karakter kullanamazsın.")
return
end
pc.setqf("clientkapat",0)
syschat("Bot Control: |cff07eb96Hapis ceza süre: "..bot_hapis_ceza.." |cffffffffdk. ")
syschat("Bot Control: Client Kapat Kapalı!")
end
if oyuncuayar == 2 then
say("Oyuncu verilen sürede, şifreyi seçmezise")
say("Clienti kapatılıcaktır.")
say("Client kapat emri verilsin mi ?")
local emirver = select("Evet","İptal")
if emirver == 1 then
syschat("Bot Control:Client Kapat Akitf!")
syschat("Bot control:Hapis cezası Kapalı!")
pc.setqf("clientkapat",1)
end
end
end
if gmayar == 5 then
say("Oyuncu bot kontrolüne takıldığı zaman")
say("Dönüşmesi gereken Dönüşülen Mob Vnum yazınız.")
say("Tavsiye edilen Dönüşülen Mob Vnum(20035)")
bot_donusum_mob = tonumber(input()) or nil
if bot_donusum_mob == 0 then
say("Boşluk veya özel karakter kullanamazsın.")
return
end
syschat("Dönüşülen Mob Vnum:|cff07eb96"..bot_donusum_mob.."")
end
end
when login with game.get_event_flag("bot_sure_open") == 1 begin
pc.setqf("bot_gonder", get_time() + 60*bot_sure_giris)-----oyuncu bot şifre gelmesi için gerekli süre
set_state("newstate")
end
end
state newstate begin
when 40001.use begin
say("Merhaba "..pc.get_name()..". ")
say("Aşağıdan işlem butonlarına tıklayarak ayar yapabilirsin.")
say("Yaptığın işlemler anlık olarak oyun yansıyacaktır.")
say("Reload işlemi yapmanıza gerek yoktur.")
say("|cff07eb96Gm Komut(Sistem Aç): (/e bot_sure_open 1)")
say("|cffff9999Gm Komut(Sistem Kapa): (/e bot_sure_open 0)")
say("")
local gmayar = select("Sistem Bilgi","Sistem Aç/Kapat","Bot Süre","Ceza Ayarlari","Dönüşüm Ayar","Kapat")
if gmayar == 1 then
local bot_bilgiler = game.get_event_flag("bot_sure_open")
if bot_bilgiler == 1 and pc.getqf("clientkapat") == 0 then
say("Sistem Bilgi: |cff07eb96Açık!")
say("Ayarlı Süre: |cff07eb96"..bot_sure_giris.."dk. ")
say("Dönüşülen Mob Vnum:|cff07eb96"..bot_donusum_mob.."")
say("Şifre Giriş Süresi: |cff07eb96"..bot_sure_ceza.."dk. ")
say("Hapis Ceza: |cff07eb96"..bot_hapis_ceza.."dk. ")
say("Client Kapat: |cff07eb96Kapalı!")
elseif bot_bilgiler == 1 and pc.getqf("clientkapat") != 0 then
say("")
say("Sistem Bilgi: |cff07eb96Açık!")
say("Ayarlı Süre: |cff07eb96"..bot_sure_giris.."dk. ")
say("Dönüşülen Mob Vnum:|cff07eb96"..bot_donusum_mob.."")
say("Şifre Giriş Süresi: |cff07eb96"..bot_sure_ceza.."dk. ")
say("Hapis Ceza: |cff07eb96Kapalı! ")
say("Client Kapat: |cff07eb96Açık!")
elseif bot_bilgiler == 0 then
say("Sistem Bilgi: |cffff9999Kapalı!")
say("Ayarlı Süre: |cff07eb96"..bot_sure_giris.."dk. ")
say("Dönüşülen Mob Vnum:|cff07eb96"..bot_donusum_mob.."")
say("Şifre Giriş Süresi: |cff07eb96"..bot_sure_ceza.."dk. ")
say("Hapis Ceza: |cff07eb96"..bot_hapis_ceza.."dk. ")
end
end
if gmayar == 2 then
local bot_bilgiler = game.get_event_flag("bot_sure_open")
if bot_bilgiler == 1 then
say("Merhaba "..pc.get_name().." ")
say("Sistem durumu: |cff07eb96Açık!")
say("")
say("Sistemi Kapatmak İster misiniz ?")
local sistem_kapa = select("Evet","Hayır")
if sistem_kapa == 1 then
game.set_event_flag("bot_sure_open", 0)
syschat("Bot Control: |cffff9999Kapatıldı!")
end
elseif bot_bilgiler == 0 then
say("Sitem durumu: |cffff9999Kapalı!")
say("Sistemi Açmak İster misiniz ?")
local sistem_ac = select("Evet","Hayır")
if sistem_ac == 1 then
game.set_event_flag("bot_sure_open", 1)
syschat("Bot Control:|cff07eb96 Açıldı!")
end
end
end
if gmayar == 3 then
say("Hoşgeldin.")
say("")
say("Bot girdi süresini değiştirmek istiyorsanız.")
say("Bigileri eksiksiz doldurunuz.")
say("")
say("|cff07eb96Bot şifre giriş süresi dk. olarak rakam giriniz.")
bot_sure_giris = tonumber(input()) or nil
if bot_sure_giris == 0 then
say("Boşluk veya özel karakter kullanamazsın.")
return
end
say(" Şifre girmek için verilicek süre ayarı(Dakika). ")
say("|cff07eb96 Şifre seçme süresi dakika(Rakam)")
say("|cff07eb96Tercih edilen 1dk.")
bot_sure_ceza = tonumber(input()) or nil
if bot_sure_ceza == 0 then
say("Boşluk veya özel karakter kullanamazsın.")
return
end
syschat("Bot CTRL Süre: |cff07eb96"..bot_sure_giris.."dk. ")
syschat("Bot CTRL Şifre Giriş Süresi: |cff07eb96"..bot_sure_ceza.."dk. ")
end
if gmayar == 4 then
say("Belirlenen sürede şifereyi girmiyen oyuncuya ne yapılsın ?")
local oyuncuayar = select("Hapis Cezası ver","Client Kapansin","İptal")
if oyuncuayar == 1 then
say("Hoşgeldin.")
say("")
say("Hapis cezası için gerekli süre ayarla!")
say("Bigileri eksiksiz doldurunuz.")
say("")
say("Ceza için beklenilicek Süre(Dakika)")
bot_hapis_ceza = tonumber(input()) or nil
if bot_hapis_ceza == 0 then
say("Boşluk veya özel karakter kullanamazsın.")
return
end
pc.setqf("clientkapat",0)
syschat("Bot Control: |cff07eb96Hapis ceza süre: "..bot_hapis_ceza.." |cffffffffdk. ")
syschat("Bot Control: Client Kapat Kapalı!")
end
if oyuncuayar == 2 then
say("Oyuncu verilen sürede, şifreyi seçmezise")
say("Clienti kapatılıcaktır.")
say("Client kapat emri verilsin mi ?")
local emirver = select("Evet","İptal")
if emirver == 1 then
syschat("Bot Control:Client Kapat Akitf!")
syschat("Bot control:Hapis cezası Kapalı!")
pc.setqf("clientkapat",1)
end
end
end
if gmayar == 5 then
say("Oyuncu bot kontrolüne takıldığı zaman")
say("Dönüşmesi gereken Dönüşülen Mob Vnum yazınız.")
say("Tavsiye edilen Dönüşülen Mob Vnum(20035)")
bot_donusum_mob = tonumber(input()) or nil
if bot_donusum_mob == 0 then
say("Boşluk veya özel karakter kullanamazsın.")
return
end
syschat("Dönüşülen Mob Vnum:|cff07eb96"..bot_donusum_mob.."")
end
end
when login or disconnect or logout with pc.getqf("guvendeyim") == 1 begin
if pc.get_map_index() == 256 then
pc.polymorph(0)
local hapiscik = ("Hapisten cıkmak icin Ceza Muhafızı ile görüşün.")
pc.pm_gonder(""..hapiscik.."")
else
local bot10sn = ("Bot doğrulaması yapmadan kasılamazsın.10sn. Süren var.")
pc.pm_gonder(""..bot10sn.."")
pc.tagver(359,60)
timer("beklebot",10)
end
end
when kill with not npc.is_pc() and game.get_event_flag("bot_sure_open") == 1 begin
local botSorguSure2 = pc.getqf("bot_suregir")
local botSorguSure = pc.getf("grv_panel_04","bot_gonder")
local botDogruladi = pc.getqf("guvendeyim")
--pc.setqf("bot_gonder", get_time() +1)------bot tag sonrasında yüzük şifre için verilen süre

if botSorguSure != 0 and get_time() > botSorguSure then
local snyazi = ("Bot doğrulaması yapmalısınız.Afk modu açıldı. Çözülmek için şifre giriniz.")
pc.pm_gonder(""..snyazi.."")
pc.tagver(359,86400)
pc.setqf("guvendeyim",1)
timer("beklebot",1)
pc.polymorph(bot_donusum_mob,3600)
end---botSorguSure
end--when kill
when beklebot.timer with pc.getqf("guvendeyim") == 1 begin
timer("bekle2",60*bot_sure_ceza)
end
when bekle2.timer with pc.getqf("guvendeyim") == 1 begin
local cezaaldik = ("Hapis cezası aldınız.")
if pc.getqf("clientkapat") == 1 then
cmdchat("quit")---client kapattık.
else---client emir verilmemişse hapis verdirdik.
syschat("Hapis cezası aldınız.Lütfen doğrulamayı yaptıktan sonra oynamaya devam ediniz.")
pc.hapiset(bot_hapis_ceza)
pc.tagver(359,0)
end--if pc.getqf("clientkapat") end
end
when 40003.use with pc.getqf("guvendeyim") == 0 begin
if game.get_event_flag("bot_sure_open") != 1 then
local sistemoff = ("|cffff9999Sistem devredışı!")
pc.pm_gonder(""..sistemoff.."")
else
syschat("Bot doğrulamasını zaten yaptın. Neyin peşindesin ?")
end
end
when 40003.use with pc.getqf("guvendeyim") == 1 begin
if pc.get_map_index() == 256 then
syschat("Bu haritada bot doğrulaması yasaklıdır.")
else
local kontrolSure = pc.getqf("bot_control")
pc.setqf("bot_control", get_time()+60) ----- şifre giriş süresi
say_size(300, 350)
say_title("Bot Kontrol:")
local sifre1 = number(1000,99999)
local sifre2 = number(1000,99999)
local sifre3 = number(1000,99999)
local sifre4 = number(1000,99999)
local sifre5 = number(1000,99999)
local sifre6 = number(1000,99999)
local kontrolsifre = number(2,7)
local sifre
if kontrolsifre == 2 then
sifre = sifre1
elseif kontrolsifre == 3 then
sifre = sifre2
elseif kontrolsifre == 4 then
sifre = sifre3
elseif kontrolsifre == 5 then
sifre = sifre4
elseif kontrolsifre == 6 then
sifre = sifre5
elseif kontrolsifre == 7 then
sifre = sifre6
end
local fakesifre1 = number(1000,99999)
local fakesifre2 = number(1000,99999)
local fakesifre3 = number(1000,99999)
local fakesifre4 = number(1000,99999)
local fakesifre5 = number(1000,99999)
local fakesifre6 = number(1000,99999)
local kontrolfakesifre = number(2,7)
local fakesifre
if kontrolfakesifre == 2 then
fakesifre = fakesifre1
elseif kontrolfakesifre == 3 then
fakesifre = fakesifre2
elseif kontrolfakesifre == 4 then
fakesifre = fakesifre3
elseif kontrolfakesifre == 5 then
fakesifre = fakesifre4
elseif kontrolfakesifre == 6 then
fakesifre = fakesifre5
elseif kontrolfakesifre == 7 then
fakesifre = fakesifre6
end

local secim = math.random(1,4) --- random şifre sorgu
if secim == 1 then ----random1
say("|cff91e40f Yeşil |cffffffff renk şifreyi seç!")
say("Doğru olan şifre: |cff7eed1a"..sifre.." ")
say("Doğru olan şifre: |cff1aedd3"..fakesifre.."1 ")
say("Doğru olan şifre: |cff2807fd"..fakesifre.."3 ")
say("|cffffffffŞifre süre:|cffec882760Sn.|cffffffff")
local sifre = select("Vazgeç ",sifre1,sifre2,sifre3,sifre4,sifre5,sifre6)
if get_time() > pc.getqf("bot_control") then
say_title("Bot Kontrol:")

say("Sana doğru şifreyi seçmen için")
say("20 saniye vermiştim!")
pc.setqf("bot_control",get_time()+0)
return
end
if sifre == kontrolsifre then
say_title("Bot Kontrol:")
say("|cff1ec908Doğru şifreyi seçtin!")
pc.setqf("guvendeyim",0)
pc.setqf("bot_gonder",get_time() +60)
pc.polymorph(0)
pc.tagver(359,0)
say("")
else
say_title("Bot Kontrol:")
say("|cffff0000Şifre Hatalı. Hapis cezası alıyorsunuz.")
if pc.getqf("clientkapat") == 1 then
cmdchat("quit")---client kapattık.
else---client emir verilmemişse hapis verdirdik.
syschat("Hapis cezası aldınız.Lütfen doğrulamayı yaptıktan sonra oynamaya devam ediniz.")
pc.hapiset(bot_hapis_ceza)
pc.tagver(359,0)
pc.setqf("guvendeyim",1)
end--if pc.getqf("clientkapat") end
end
elseif secim == 2 then ----random2
say("|cfffd07bd Pembe|cffffffffrenk şifreyi seç!")
say("Doğru olan şifre: |cffffffff"..fakesifre.."3 ")
say("Doğru olan şifre: |cff1aedd3"..fakesifre.."1 ")
say("Doğru olan şifre: |cfffd07bd"..sifre.." ")
say("2.deneme")
say("|cffffffffŞifre süre:|cffec882760Sn.|cffffffff")
local sifre = select("Vazgeç ",sifre1,sifre2,sifre3,sifre4,sifre5,sifre6)
if get_time() > pc.getqf("bot_control") then
say_title("Bot Kontrol:")
say("Sana doğru şifreyi seçmen için")
say("20 saniye vermiştim!")
if pc.getqf("clientkapat") == 1 then
cmdchat("quit")---client kapattık.
else---client emir verilmemişse hapis verdirdik.
syschat("Hapis cezası aldınız.Lütfen doğrulamayı yaptıktan sonra oynamaya devam ediniz.")
pc.setqf("bot_control",get_time()+0)
pc.setqf("guvendeyim",1)
pc.polymorph(0)
pc.hapiset(bot_hapis_ceza)
pc.tagver(359,0)
end--if pc.getqf("clientkapat") end
return
end
if sifre == kontrolsifre then
say_title("Bot Kontrol:")

say("|cff1ec908Doğru şifreyi seçtin!")
pc.tagver(359,0)
pc.setqf("guvendeyim",0)
pc.setqf("bot_gonder",get_time() +60)
pc.polymorph(0)
say("")
else
say_title("Bot Kontrol:")
say("|cffff0000Şifre Hatalı. Hapis cezası alıyorsunuz.")
if pc.getqf("clientkapat") == 1 then
cmdchat("quit")---client kapattık.
else---client emir verilmemişse hapis verdirdik.
syschat("Hapis cezası aldınız.Lütfen doğrulamayı yaptıktan sonra oynamaya devam ediniz.")
pc.hapiset(bot_hapis_ceza)
pc.tagver(359,0)
pc.setqf("guvendeyim",1)
end--if pc.getqf("clientkapat") end
end
elseif secim == 3 then ----random3
say("|cfffd07bd Pembe|cffffffffrenk şifreyi seç!")
say("Doğru olan şifre: |cffffffff"..fakesifre.."3 ")
say("Doğru olan şifre: |cff1aedd3"..fakesifre.."1 ")
say("Doğru olan şifre: |cfffd07bd"..sifre.." ")
say("3.deneme")
say("|cffffffffŞifre süre:|cffec882760Sn.|cffffffff")
local sifre = select("Vazgeç ",sifre1,sifre2,sifre3,sifre4,sifre5,sifre6)
if get_time() > pc.getqf("bot_control") then
say_title("Bot Kontrol:")

say("Sana doğru şifreyi seçmen için")
say("20 saniye vermiştim!")
if pc.getqf("clientkapat") == 1 then
cmdchat("quit")---client kapattık.
else---client emir verilmemişse hapis verdirdik.
syschat("Hapis cezası aldınız.Lütfen doğrulamayı yaptıktan sonra oynamaya devam ediniz.")
pc.setqf("bot_control",get_time()+0)
pc.setqf("guvendeyim",1)
pc.polymorph(0)
pc.hapiset(bot_hapis_ceza)
pc.tagver(359,0)
return
end--if pc.getqf("clientkapat") end
end
if sifre == kontrolsifre then
say_title("Bot Kontrol:")

say("|cff1ec908Doğru şifreyi seçtin!")
pc.tagver(359,0)
pc.setqf("guvendeyim",0)
pc.setqf("bot_gonder",get_time() +60)
pc.polymorph(0)
say("")
else
say_title("Bot Kontrol:")
say("|cffff0000Şifre Hatalı. Hapis cezası alıyorsunuz.")
if pc.getqf("clientkapat") == 1 then
cmdchat("quit")---client kapattık.
else---client emir verilmemişse hapis verdirdik.
syschat("Hapis cezası aldınız.Lütfen doğrulamayı yaptıktan sonra oynamaya devam ediniz.")
pc.setqf("guvendeyim",1)
pc.tagver(359,0)
pc.hapiset(bot_hapis_ceza)
end--if pc.getqf("clientkapat") end
end
elseif secim == 4 then ----random4
say("|cfffd07bd Pembe|cffffffffrenk şifreyi seç!")
say("Doğru olan şifre: |cffffffff"..fakesifre.."3 ")
say("Doğru olan şifre: |cff1aedd3"..fakesifre.."1 ")
say("Doğru olan şifre: |cfffd07bd"..sifre.." ")
say("234.deneme")
say("|cffffffffŞifre süre:|cffec882760Sn.|cffffffff")
local sifre = select("Vazgeç ",sifre1,sifre2,sifre3,sifre4,sifre5,sifre6)
if get_time() > pc.getqf("bot_control") then
say_title("Bot Kontrol:")

say("Sana doğru şifreyi seçmen için")
say("20 saniye vermiştim!")
if pc.getqf("clientkapat") == 1 then
cmdchat("quit")---client kapattık.
else---client emir verilmemişse hapis verdirdik.
syschat("Hapis cezası aldınız.Lütfen doğrulamayı yaptıktan sonra oynamaya devam ediniz.")
pc.setqf("bot_control",get_time()+0)
pc.setqf("guvendeyim",1)
pc.polymorph(0)
pc.hapiset(bot_hapis_ceza)
pc.tagver(359,0)
return
end--if pc.getqf("clientkapat") end
end
if sifre == kontrolsifre then
say_title("Bot Kontrol:")

say("|cff1ec908Doğru şifreyi seçtin!")
pc.tagver(359,0)
pc.setqf("guvendeyim",0)
pc.setqf("bot_gonder",get_time() +60)
pc.polymorph(0)
say("")
else
say_title("Bot Kontrol:")
say("|cffff0000Şifre Hatalı. Hapis cezası alıyorsunuz.")
if pc.getqf("clientkapat") == 1 then
cmdchat("quit")---client kapattık.
else---client emir verilmemişse hapis verdirdik.
syschat("Hapis cezası aldınız.Lütfen doğrulamayı yaptıktan sonra oynamaya devam ediniz.")
pc.setqf("guvendeyim",1)
pc.tagver(359,0)
pc.hapiset(bot_hapis_ceza)
end--if pc.getqf("clientkapat") end
end
end
end
end
end