romegames 1
romegames
noisiv 1
noisiv
Manwe Work 1
Manwe Work
Best Studio 1
Best Studio
kralhakan2009 1
kralhakan2009
Vahsi Uzman 1
Vahsi Uzman
InfernoShade 1
InfernoShade
BlackFullMoon 1
BlackFullMoon
Agora Metin2 1
Agora Metin2
PrimeAC 1
PrimeAC
ShadowFon 1
ShadowFon
Hikaye Ekle
Reklam vermek için turkmmo@gmail.com
Kaynak ikonu

Konum Kaydetme Sistemi[LUA] 1

indirmek için izniniz yok
  • Konuyu başlatan Konuyu başlatan thenemne0032
  • Başlangıç tarihi Başlangıç tarihi
  • Cevaplar Cevaplar 71
  • Görüntüleme Görüntüleme 10K
teşekkürler dostum
 
Merhabalar,


Konum Kaydetme Sistemi nedir?


Oyuncular 30.seviyeden sonra "40004" kodlu yüzükten sistemi kullanabilirler. Dileyen oyuncu bulunduğu yerin koordinatlarını kaydeder ve dilediğin zaman kaydettiği koordinata ışınlanabilir. Bir nevi oyuncu kendi ışınlanma yüzüğünü yaratmış olur. Eşya ile girilen özel haritaların ya da bossların olduğu haritaların bir kısmını kendim engelledim fakat sizlerde aşağıda anlatacağım şekilde dilediğiniz haritayı engelleyebilirsiniz. Böylelikle oyuncu o haritada herhangi bir konum kaydetme işlemi gerçekleştiremez. Ayrıca oyuncu en fazla 10 adet konum kaydedebilir ve konum kaydederken, konumun ismini kendisi belirler. Dilediğin zaman konumun ismini yeniden değiştirebilir ya da kaydettiği konumu silebilir. Detayla aşağıdaki resimlerde mevcuttur:



6kX977.jpg


3aq7B2.jpg


kgWb3A.jpg


N41p65.jpg


0kB1XZ.jpg



Konum Kaydetme Sistemi - DOSYALAR







Kodları indirmeden kontrol etmek isteyenler için:

PHP:
quest konum_kayit begin
    state start begin
        when 40004.use begin
            -----------------------------------
            oyuncu_kimlik = pc.get_player_id()
            oyuncu_isim = pc.get_name()
            oyuncu_x_koordinat = pc.get_x()
            oyuncu_y_koordinat = pc.get_y()
            oyuncu_harita = pc.get_map_index()
            oyuncu_konum_sayisi = pc.getqf("konum_sayisi")
            -----------------------------------
            if pc.get_level() < 30 then
                say_title("Uyarı:")
                say("")
                say_reward("Sistemi kullanabilmek için en az 30.seviye olmanız lazım.")
                say("")
                return
            end
            say_title("[WINDOW_SIZE width;350|height;400]Bilgilendirme")
            say("")
            say("Konum kayıt sistemine hoş geldiniz oyuncu, "..oyuncu_isim)
            say("")
            say("Şuan ki konum bilgileriniz: ")
            say("")
            say_reward("X Koordinatı: "..oyuncu_x_koordinat)
            say_reward("Y Koordinatı: "..oyuncu_y_koordinat)
            say_reward("Harita Kimlik Numarası: "..oyuncu_harita)
            say("")
            say_reward("Toplam kayıtlı konum: "..oyuncu_konum_sayisi)
            say("")
            say_reward("Ne yapmak istersiniz?")
            say("")
            konum_kayit_sec = select("Konum Kaydet","Kayıtlı Konumlar","Kapat")
            if konum_kayit_sec == 1 then
                harita_kontrol = konum_kayit.yasakli_bolge(oyuncu_harita)
                if not harita_kontrol then
                    say_title("Uyarı:")
                    say("")
                    say_reward("Bu haritada konum kaydetme engellenmiştir.")
                    say("")
                    return
                end
                if pc.getqf("konum_sayisi") > 9 then
                    say_title("Uyarı:")
                    say_reward("En fazla 10 adet konum kaydedebilirsiniz.")
                    say("")
                    return
                end
                say_title("Bilgilendirme:")
                say("")
                say_reward("Lütfen konumunuza bir isim verin:")
                oyuncu_konum_adi = tostring(input())
                if oyuncu_konum_adi == nil or oyuncu_konum_adi == "" then
                    say_title("Uyarı:")
                    say("")
                    say_reward("Geçersiz giriş yaptınız! İşlemler sıfırlandı.")
                    say("")
                else
                    konum_kaydet = mysql_query("insert into konum_kayit(oyuncu_kimlik,oyuncu_isim,oyuncu_x_koordinat,oyuncu_y_koordinat,oyuncu_harita,oyuncu_konum_adi)values('"..oyuncu_kimlik.."','"..oyuncu_isim.."','"..oyuncu_x_koordinat.."','"..oyuncu_y_koordinat.."','"..oyuncu_harita.."','"..oyuncu_konum_adi.."')")
                    if konum_kaydet then
                        pc.setqf("konum_sayisi",pc.getqf("konum_sayisi")+1)
                        say_title("Bilgilendirme:")
                        say("")
                        say("Konumunuz başarı ile kaydedilmiştir.")
                        say("")
                    else
                        say_title("Uyarı:")
                        say("")
                        say_reward("Konum kaydedilemedi! İşlemler sıfırlandı.")
                        say("")
                    end
                end
            elseif konum_kayit_sec == 2 then
                konum_kimlik_dizi = {}
                oyuncu_x_koordinat_dizi = {}
                oyuncu_y_koordinat_dizi = {}
                oyuncu_harita_kimlik_dizi = {}
                oyuncu_harita_konum_adi_dizi = {}
                konumlari_cek = mysql_query("select * from player.konum_kayit where oyuncu_kimlik='"..oyuncu_kimlik.."' and oyuncu_isim='"..oyuncu_isim.."' ")
                konumlari_cek_say = tonumber(table.getn(konumlari_cek))
                if konumlari_cek_say < 1 then
                    say_title("Uyarı:")
                    say("")
                    say_reward("Kayıtlı konum bulunamadı.")
                    say("")
                    return
                end
                for i=1,konumlari_cek_say,1 do
                    oyuncu_x_koordinat_dizi[i] = konumlari_cek.oyuncu_x_koordinat[i]
                    oyuncu_y_koordinat_dizi[i] = konumlari_cek.oyuncu_y_koordinat[i]
                    oyuncu_harita_kimlik_dizi[i] = konumlari_cek.oyuncu_harita[i]
                    oyuncu_harita_konum_adi_dizi[i] = konumlari_cek.oyuncu_konum_adi[i]
                    konum_kimlik_dizi[i] = konumlari_cek.id[i]
                end
                oyuncu_konum_adi_say = tonumber(table.getn(oyuncu_harita_konum_adi_dizi))
                oyuncu_harita_konum_adi_dizi[oyuncu_konum_adi_say + 1] = "Kapat"
                oyuncu_konum_adi_sec = select_table(oyuncu_harita_konum_adi_dizi)
                for m=1,konumlari_cek_say,1 do
                    if oyuncu_konum_adi_sec == oyuncu_konum_adi_say + 1 then
                        return
                    end
                    if oyuncu_konum_adi_sec == m then
                        o_x_koordinat = oyuncu_x_koordinat_dizi[m]
                        o_y_koordinat = oyuncu_y_koordinat_dizi[m]
                        o_harita_kimlik = oyuncu_harita_kimlik_dizi[m]
                        o_konum_kimlik = konum_kimlik_dizi[m]
                        say_title("[WINDOW_SIZE width;350|height;400]Bilgilendirme")
                        say("")
                        say("Merhaba oyuncu, "..oyuncu_isim)
                        say("Buradan kaydettiğin konumuna ışınlanabilir, konumunu[ENTER]silebilir ya da konum ismini düzenleyebilirsin.")
                        say("")
                        say_title("Konum bilgileri: ")
                        say("")
                        say_reward("X Koordinatı: "..o_x_koordinat)
                        say_reward("Y Koordinatı: "..o_y_koordinat)
                        say_reward("Harita Kimlik Numarası: "..o_harita_kimlik)
                        say("")
                        say_reward("Ne yapmak istiyorsun?")
                        say("")
                        konum_ne_yapilacak = select("Konuma Işınlan","Konum Adı Düzenle","Konum Sil","Kapat")
                        if konum_ne_yapilacak == 1 then
                            pc.warp((o_x_koordinat*100),(o_y_koordinat*100))
                        elseif konum_ne_yapilacak == 2 then
                            say_title("Bilgilendirme:")
                            say("")
                            say_reward("Lütfen yeni konum adını giriniz: ")
                            oyuncu_konum_adi = tostring(input())
                            if oyuncu_konum_adi == nil or oyuncu_konum_adi == "" then
                                say_title("Uyarı:")
                                say("")
                                say_reward("Geçersiz giriş yaptınız! İşlemler sıfırlandı.")
                                say("")
                            else
                                konum_adi_guncelle = mysql_query("UPDATE player.konum_kayit SET oyuncu_konum_adi='"..oyuncu_konum_adi.."' where oyuncu_kimlik='"..oyuncu_kimlik.."' and id='"..o_konum_kimlik.."'")
                                if konum_adi_guncelle then
                                    say_title("Bilgilendirme:")
                                    say("")
                                    say("Konum adı başarı ile güncellendi.")
                                    say("")
                                end
                            end
                        elseif konum_ne_yapilacak == 3 then
                            konum_sil =    mysql_query("DELETE FROM player.konum_kayit WHERE id='"..o_konum_kimlik.."' and oyuncu_kimlik='"..oyuncu_kimlik.."'")
                            if konum_sil then
                                pc.setqf("konum_sayisi",pc.getqf("konum_sayisi")-1)
                                say_title("Bilgilendirme:")
                                say("")
                                say("Konum başarı ile silindi.")
                                say("")
                            end
                        elseif konum_ne_yapilacak == 4 then
                            return
                        end
                    end
                end
            elseif konum_kayit_sec == 3 then
                return
            end -- if konum_kayit_sec == 1 then endi
        end -- when 40004.use begin  endi
        
        function yasakli_bolge(gelen_harita_kimlik) 
            harita_kimlik_f = gelen_harita_kimlik
            yasakli_bolgeD =  {
                66, -- Şeytan kulesi
                72, -- Sürgün mağarası 1.kat
                73, -- Sürgün mağarası 2.kat
                79, -- Sürgün Mağarası Boss odası
                103, -- Özel GM haritası
                206, -- Şeytan Katakombu
                660000 -- Şeytan kulesi 3 ve 9.kat arası
            }
            yasakli_bolgeD_Say = tonumber(table.getn(yasakli_bolgeD))
            for i=1,yasakli_bolgeD_Say,1 do
                if harita_kimlik_f == yasakli_bolgeD[i] then
                    return false
                end
            end
            return true
        end --function yasakli_bolge(gelen_harita_kimlik)
        
    end -- state start begin endi
end -- quest konum_kayit begin endi



Engellemek istediğiniz haritaların kimlik numarasını buraya düzgün şekilde ekleyin:


PHP:
yasakli_bolgeD =  
{
  66, -- Şeytan kulesi
  72, -- Sürgün mağarası 1.kat
  73, -- Sürgün mağarası 2.kat
  79, -- Sürgün Mağarası Boss odası
  103, -- Özel GM haritası
  206, -- Şeytan Katakombu
  660000 -- Şeytan kulesi 3 ve 9.kat arası
}

eyv adamın dıbısın dıbı :D
 
Teşekkürler,konunuz sabitlendi.
 
yararlı birşey teşekkürler
 

Şu an konuyu görüntüleyenler (Toplam : 0, Üye: 0, Misafir: 0)

Geri
Üst