Arkadaş Sistemi[LUA] 1

[misterregue]

HERAKLES Otomatik Avlı kalıcı sunucu. 19 Haziran'da açılıyor. Atius & Wizard güvencesiyle hemen kayıt ol, ön kayıt ödülleri aktif. HEMEN TIKLA!

sağolasın teşekkürler

 

[1SecreT]

teşekkürler ellerine sağlık

 

[brhmgl]

Teşekkürler yararlı paylaşım

 

[Bekir.CANPOLAT]

Merhabalar,

Arkadaş Sistemi, arkadaş listenizde ekli olan arkadaşlarınızın seviye atladıklarında anlık olarak yeni seviyesini görmenizi sağlar.

Arkadaş Sistemi - Tanıtım





Arkadaş Sistemi - Dosyalar

Linkleri görebilmek için Turkmmo Forumuna ÜYE olmanız gerekmektedir.

Linkleri görebilmek için Turkmmo Forumuna ÜYE olmanız gerekmektedir.

Kodları incelemek isteyenler için:

quest arkadas_sistemi begin
    state start begin
        when login begin
            loop_timer("arkadas_kontrol_et",1)
        end -- when login begin endi
     
        when levelup begin
            pc.setqf("seviye_aldim",1)
            seviye_oyuncu_isim = pc.get_name()
            seviye_arkadas_ara = mysql_query("select * from player.messenger_list where account='"..seviye_oyuncu_isim.."' ")
            seviye_arkadas_ara_say = tonumber(table.getn(seviye_arkadas_ara))
        end
     
        when logout begin
            cleartimer("arkadas_kontrol_et")
        end -- when logout begin  endi
     
        when arkadas_kontrol_et.timer begin
            oyuncu_isim = pc.get_name()
            arkadas_ara = mysql_query("select * from player.messenger_list where account='"..oyuncu_isim.."' ")
            oyuncu_arkadas_dizi = { }
            seviye_arkadas_dizi = { }
            arkadas_ara_say = tonumber(table.getn(arkadas_ara))
            if arkadas_ara_say > 0 then
                for i=1,arkadas_ara_say,1 do
                    oyuncu_arkadas_dizi[i] = arkadas_ara[i][2]
                    arkadas_isim = oyuncu_arkadas_dizi[i]
                    arkadas_oyunda_mi = find_pc_by_name(arkadas_isim)
                    if arkadas_oyunda_mi != 0 then
                        arkadas_id = pc.select(arkadas_oyunda_mi)
                            if seviye_arkadas_ara_say > 0 then
                                seviye_atladim = pc.getqf("seviye_aldim")
                                if seviye_atladim == 1 then
                                    arkadas_seviye = pc.get_level()
                                    for z=1,seviye_arkadas_ara_say,1 do
                                        seviye_arkadas_dizi[z] = seviye_arkadas_ara[z][2]
                                        seviye_arkadas_isim = seviye_arkadas_dizi[z]
                                        seviye_arkadas_oyunda_mi = find_pc_by_name(seviye_arkadas_isim)
                                        if seviye_arkadas_oyunda_mi != 0 then
                                            s_a_id = pc.select(seviye_arkadas_oyunda_mi)
                                                syschat("Sistem: "..seviye_oyuncu_isim.." isimli arkadaşınız seviye atlamıştır. Yeni seviyesi: "..arkadas_seviye..".Seviye")
                                            pc.select(s_a_id)
                                        end -- if seviye_arkadas_oyunda_mi != 0 then endi
                                    end -- for z=1,seviye_arkadas_ara_say,1 do endi
                                        pc.setqf("seviye_aldim",0)
                                end --    if seviye_atladim == 1 then endi
                            end -- if seviye_arkadas_ara_say > 0 then endi
                        pc.select(arkadas_id)
                    end -- if arkadas_oyunda_mi != 0 then endi
                end -- for i=1,arkadas_ara_say,1 do endi
            end -- if arkadas_ara_say > 0 then endi
        end -- when arkadas_kontrol_et.timer begin endi
     
    end -- state start begin endi
end -- quest arkadas_sistemi begin endi

NOT: Sistem şuanlık sadece arkadaşın seviye atlayışını gösteriyor. Boş vaktim olmadığı için devam edemedim. Boş vaktim olur ve geliştirebilirsem, arkadaşın lonca kurup kurmadığını, loncaya girip girmediğini ya da bayrağını değiştirip değiştirmediğini gösteren özellikler de ekleyeceğim.

Kırık olan indirme linki tarafımca güncellendi ve kaynağa dönüştürüldü

 

[yenilmezbjk]

Elinize Sağlık