Karakter Kilit Sistemi (Lua)

[tahaeksi]

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!

Merhaba Arkadaşlar, Bugün size Karakter Kilit questini paylaşacağım.​

Sistem Başarılı bir şekilde çalışıyor!​

Quest yüklemeyi bilmeyenler bu adımları takip etsinler,​

1.Adım : Filezillaya Bağlanıyoruz
2.Adım : /usr/game/share/locale/turkey/quest bölümüne hapishane.lua dosyasını atıyoruz
3.Adım : Putty'e Giriş yapıyoruz
4.Adım : cd /usr/game/share/locale/turkey/quest ENTER yapıyoruz
5.Adım : ./qc karakter_kilit.lua yazıyoruz başarıyla dosyamızı okutmuş oluyoruz.​

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

Rar Şifresi: tahaeksi
İSTEYEN KOD OLARAK DA ALABİLİR!

quest karakter_guvenligi begin
    state start begin
        when login begin
            cmdchat("karakter_guvenligi "..q.getcurrentquestindex())
        end

        when login begin
            if pc.getqf("block_items_register") == 1 then
                if pc.getqf("block_items_active") == 1 then
                    cmdchat("ManagerBlockItems BlockItems|")
                else
                    cmdchat("ManagerBlockItems UnBlockItems|")
                end
            end
        end
    
        when button or info begin
            if pc.getqf("block_items_register") == 0 then
                say_title("Karakter Güvenlik Sistemi: ")
                say("Merhaba "..pc.get_name())
                say("Karakterini güvene almak için ")
                say("bu işlemi mutlaka gerçekleştirmelisin. ")
                say("Şimdi hazır mısın? ")
                if select("Evet ","Hayır ") == 1 then
                    say("Parolanızı oluşturun. ")
                    say("NOT: Sadece rakam olmak zorundadır. ")
                    local pw = tonumber(input())
                    if pw == nil then say("Bu parola geçersizdir. ") return end
                    say("Parolanız oluşturuldu. ")
                    say("Karakteriniz artık güvendedir. ")
                    say_reward("Parolanız: "..pw)
                    say("")
                    pc.setqf("block_items_register" , 1)
                    pc.setqf("block_items_pw" , pw)
                end
                return
            end
            
            say("Tekrar hoşgeldiniz "..pc.get_name())
            say("Yapmak istediğiniz seçeneğe tıklayınız: ")
            local a = select("Güvenlik Ayarları ", "Parolamı unuttum ", "Pencereyi Kapat ")
            if a == 1 then
                say("Devam etmek için parolanızı giriniz: ")
                local pw = tonumber(input())
                if pw == nil then say("Bu parola geçersizdir. ") return end
                if pw != pc.getqf("block_items_pw") then say("Bu parola doğru değildir. ") return end
                say("Parolanız doğrulandı.")
                say("İşleme devam ediliyor..")
                wait()
                local estado
                if pc.getqf("block_items_active") == 1 then
                    estado = "Aktif "
                else
                    estado = "Kapalı "
                end
                say("Ayarlar bölümüne hoşgeldiniz "..pc.get_name())
                say("Karakter Güvenliği: "..estado)
                say("Ne yapmak istersin? ")
                local s = select("Karakter kilidini aç ", "Karakter kilidini kapat ", "Parola değiştir ", "Pencereyi Kapat ")
                if s == 1 then
                    if pc.getqf("block_items_active") == 1 then say("Karakter güvenliği zaten aktiftir. ") return end
                    cmdchat("ManagerBlockItems BlockItems|")
                    say("Karakter güvenliği başarıyla aktif edildi. ")
                    say("Şimdi seni köyüne yolluyorum.")
                    wait()
                    if pc.get_empire() == 1 then
                warp_to_village()
                elseif pc.get_empire() == 2 then
                warp_to_village()
                elseif pc.get_empire() == 3 then
                warp_to_village()
                end
                    affect.add_collect(apply.MOV_SPEED, -10000,60*60*24*250)
                    pc.setqf("block_items_active", 1)
                elseif s == 2 then
                    if pc.getqf("block_items_active") == 0 then say("Karakter güvenliği zaten kapalıdır. ") return end
                    cmdchat("ManagerBlockItems UnBlockItems|")
                    say("Karakter güvenliği başarıyla kapatıldı. ")
                    affect.remove_collect(apply.MOV_SPEED, -10000,60*60*24*250)
                    pc.setqf("block_items_active", 0)
                elseif s == 3 then
                    say("Parola değiştirmek için ")
                    say("aşağıdaki bölüme yeni parolanızı giriniz. ")
                    local pw = tonumber(input())
                    if pw == nil then say("Bu parola geçersizdir. ") return end
                    if pw == pc.getqf("block_items_pw") then say("Parola olan bir paroladan başka olmalıdır. ") return end
                    say("Parolanız başarıyla değiştirilmiştir.")
                    say_reward("Yeni parolanız: "..pw)
                    pc.setqf("block_items_pw" , pw)
                end
                
            elseif a == 2 then
                local email = mysql_query("SELECT email from account.account where id = "..pc.get_account_id()..";")[1][1]
                say("Parolanızı sıfırlamak için aşağıda ")
                say("bulunan yere e-posta adresinizi giriniz. ")
                local mail = input()
                if mail != email then say("E-Posta adresiniz yanlıştır. ") return end
                local new = number(10000, 99999)
                say("Yeni parolanız: "..new)
                say("Parolanızı bir yere not almanız önerilir. ")
                chat("Yeni parolanız: "..new)
                chat("Parolanızı bir yere not almanız önerilir. ")
                pc.setqf("block_items_pw" , new)
            end
        end
    end
end

​

 

[aydinu]

Alıntı mı?

 

[tahaeksi]

Kendi Filesimden paylaştım.

 

[aydinu]

Bunun phyton kısmıda var haberin olsun

 

[tahaeksi]