(Lua) Güvenlik Sistemi

[DevSheen]

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!

Çok yetersiz bu haliyle hiç bir şeye yaramaz zamanında şöyle birşeyler karaladım belki birilerinin işine yarar

quest GuvenlikSistemi begin
    state start begin
        when login begin
            set_state(ilkkontrol)
        end
    end
    
    state ilkkontrol begin
        when letter begin
            say_title("Güvenlik Sistemi")
            say("Merhaba, "..pc.get_name().." güvenlik sistemi aktif.")
            say("Hesap çalınmalarını engellemek için yapılmış bir sistemdir")
            say("Hesabını daha güvenli hale getirmek için ikinci bir şifre girmen gerekiyor")
            say("Bu şifreyi seçerken dikkatli ol!")
            say("Şifren sadece 1 ve 999999 arasında numara olabilir")
            
            local sifreakit=input()
            
            say_title("Şifreni onaylaman gerekiyor")
            say("Lütfen tekrar gir")
            local sifreesitle=input()
            
            if sifreakit!=sifreesitle then
                say_title("Güvenlik Sistemi")
                say("Şifreler eşleşmedi ")
                say("Güvenlik sistemini kullanabilmek için tekrar deneyin")
                set_state(kontrolet)
            end
            
            if sifreakit <= 999999 and sifreakit >= 1 then
                pc.setqf("guvenliksifresi", sifreakit)
                pc.setqf("guvenlikkontrol", 1)
                wait()
                
                say_title("Güvenlik Sistemi")
                say("Şifren: "..sifreakit)
                say("Karaktere ilk girdiğinde gelecek olan güvenlik penceresine bu şifreyi girmen gerekiyor")
                set_state(kontrolet)
            else
                say_title("Güvenlik Sistemi")
                say("Şifreni 1 ve 999999 arasında ve sayı olmasını gerektiğini söyledim kontrol et !")
                say("Şimdi oyundan atılıyorsun yeniden girdiğinde tekrar dene")
                while true do
                    cmdchat("exit")
                end 
            end
        end
    end
    
    state kontrolet begin
        when login begin
            send_letter("Ikinci Sifre")
            if pc.getqf("guvenlikkontrol")==1 then
                say_title("Güvenlik Sistemi")
                say("Güvenlik şifrenizi girin")
                
                local simdikixd = input()
                local oncekixd = pc.getqf("guvenliksifresi")
                if simdikixd == oncekixd then
                    say_title("Aferim")
                    say("Şifre Doğru, Oyuna devam edebilirsin")
                    say("Iyi Eğlenceler")
                    return
                else
                    say_title("Güvenlik sistemi 2.Hak")
                    say("Bu son hakkın, "..pc.get_name().."")
                    local simdiki2 = input()
                    local onceki2 = pc.getqf("guvenliksifresi")
                    
                    if simdiki2 == onceki2 then
                        say_title("Nihayet")
                        say("Şifre Doğru, Oyuna devam edebilirsin")
                        say("Iyi Eğlenceler")
                        return
                    else
                        say_title("UYARI")
                        say("Çok fazla deneme yaptın")
                        say("Şimdi oyunan atılıyorsun")    
                        
                        while true do
                            cmdchat("exit")
                        end 
                    end
                end
            end
        end
        
        when button or info begin
            say_title("Güvenlik Sistemi")
            say("Burdan şifreni değiştirebilirsin")
            say("veya sistem kontrolünü açıp kapatabilirsin")
            
            local seceneklerialalim = select("Kontrolü aç", "Kontrolü kapat", "Kontrol Durumu", "Şifre Değiştir", "Çıkış")
            
            if seceneklerialalim == 1 then
                say_title("Güvenlik Sistemi")
                say("Oyuna girişte güvenlik kontroünü aktif etmek istiyormusun?")
                local ilksorugelsin = select("Tabii Önce Güvenlik", "Vazgeçtim")
            
                if ilksorugelsin==1 then
                    say_title("Güvenlik Sistemi")
                    say("Lütfen bir şifre belirle")
                    say("Ama unutma: Bu şifre 1 ve 999999 arasında bir rakam olmalı")
                    local sifreburaya = input()
                    
                    if sifreburaya <= 999999 and sifreburaya >= 1 then
                        pc.setqf("guvenliksifresi", sifreburaya)
                        pc.setqf("guvenlikkontrol", 1)
                        wait()
                        say_title("Güvenlik Sistemi")
                        say("Bravo !")
                        say("Artık güvenlik şifren: "..sifreburaya)
                        say("Karaktere ilk girdiğinde gelecek olan güvenlik penceresine bu şifreyi girmen gerekiyor")
                    else
                        say_title("Güvenlik Sistemi")
                        say("Şifren kriterlere uygun değil, üzgünüm tekrar dene")
                        return
                    end
                else
                    return
                end
                
            elseif seceneklerialalim==2 then
                say_title("Güvenlik Sistemi")
                say("Güvenlik sistemini kapatmak mu istiyorsun?")
                local s = select("Evet", "Vazgeçtim")
                if s==1 then
                    pc.setqf("guvenlikkontrol", 0)
                    syschat("Güvenlik sistemin kapatıldı")
                    syschat("Bundan sonra hesap güvenliğinden sadece kendin sorumlusun")
                else
                    return
                end
                
            elseif seceneklerialalim==3 then
                local kontrolcek = pc.getqf("guvenlikkontrol")
                if kontrolcek==1 then
                    say_title("Güvenlik Sistemi")
                    say("Güvenlik sistemi aktif")
                else
                    say_title("Güvenlik Sistemi")
                    say("Güvenlik sistemi pasif")
                end
                
            elseif seceneklerialalim==4 then
                say_title("Güvenlik Sistemi")
                say("Demek şifreni değiştirmek istiyorsun.")
                say("Ama bundan önce eski şifreni girmen gerekiyor")
                
                local eskiyiver = pc.getqf("guvenliksifresi")
                local yeniyial = input()
                
                if not eskiyiver==yeniyial then
                    say_title("Güvenlik Sistemi")
                    say("Üzgünüm eski şifren bu değil.")
                    return
                end
                
                say("Uyarı: Bu şifre 1 ve 999999 arasında bir rakam olmalı")
                
                local yenisifrepls = input()
                say_title("Şifreyi onayla")
                say("Lütfen yeni şifreni yeniden yaz")
                local yenisifredogrumuacaba = input()
                
                if not yenisifrepls==yenisifredogrumuacaba then
                    say_title("Güvenlik Sistemi")
                    say("Üzgünüm şifreler aynı değil, bidahaki sefere artık")
                    return
                end
                
                if yenisifrepls <= 999999 and yenisifrepls >= 1 then
                    pc.setqf("guvenliksifresi", yenisifrepls)
                    pc.setqf("guvenlikkontrol", 1)
                    wait()
                    
                    say_title("Güvenlik Sistemi")
                    say("Bravo !")
                    say("Artık güvenlik şifren: "..yenisifrepls)
                    say("Karaktere ilk girdiğinde gelecek olan güvenlik penceresine bu şifreyi girmen gerekiyor")

                    set_state(kontrolet)
                else
                    say_title("Güvenlik Sistemi")
                    say("Şifren kriterlere uygun değil, üzgünüm tekrar dene")
                    return
                end
            else
                return
            end
        end
    end
end

Senin Düşüncenle Bir İşe Yaramaz Başkasına Yarayabilir Belki.

 

[ismailapa42]

virus total sonuçları:

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

indirme linki:

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

quest'in kaynak kodları:

-- Turkmmo: Sorts --
quest guvenlik begin
    state start begin
        when 20087.chat."Karakter Güvenlik Hizmeti" begin
        local name = pc.get_name
        say_title("Safety System ")
        say("Merhaba "..name.."")
        say("Demek Karakterine Güvenlik Hizmeti")
        say("Almak İstiyorsun Pekala")
        say("Unutma Her Işınlanmada bu Şifre Sorulur.")
        local miktar = 10000000 --Gold Miktari Giriniz--
        say("Bu İşlemin Ücreti "..miktar.." Yang")
        say("Kabul Ediyor Musun ?")
        local sorgu = select(locale.yes,locale.no)
        if sorgu == 2 then
        say_title("Safety System ")
        say("Pekala "..name.."")
        say("Sana Bu Hizmeti Sunabilirdim Ama Sen İstemedin.")
        elseif sorgu == 1 then
        say_title("Safety System")
        say("Pekala "..name.."")
        say("Şimdi İşlemlere Başlayalım.")
        say("İlk Önce Yapman Gereken")
        say("Güvenlik Şifresi Belirlemek. Kutuyu Doldur")
        say("NOT: Sadece Rakamlardan Oluşmalı.")
        local guvenliksifre = tonumber(input())
        if guvenliksifre == nil then
        say_title("Safety System")
        say("Malesef Güvenlik Şifresini Boş Bırakamazsın.")
        say("Üzgünüm Gerekli Alanları Doldurmalısın !")
        else
        pc.setqf("guvenlik",1)
        pc.setqf("guvenliksifre",guvenliksifre)
        say_title("Safety System")
        say("Tamam "..name.."")
        say_reward("Belirlediğin Şifre "..guvenliksifre.." Olmuştur.")
        say("İyi Oyunlar Dileriz.")
        pc.change_gold( -miktar )
            end
        end
    end
        when login with pc.getqf("guvenlik") == 1 begin
        say_title("Safety System")
        say("Karakterine Güvenlik Hizmeti Aldığın")
        say("İçin Güvenlik Şifreni Gir.")
        local benimsifrem = pc.getqf("guvenliksifre")
        local girilen = tonumber(input())
        if girilen != benimsifrem
        say_title("Safety System")
        say("Üzgünüm "..pc.get_name().."")
        say("Şifreyi Yanlış Girdiğin İçin.")
        say("Seni Oyundan Atıyorum.")
        pc.disconnect_with_delay(3)
        else
        say_title("Safety System")
        say("Tebrikler "..pc.get_name().."")
        say("Şifreni Dogru Girdiğin İçin")
        say("Karakterini Kontrol Edebilirsin.")
                end
            end
        end
    end
end

fonksiyon: 10 milyon yang'a karşılık karakterinize aldığınız güvenlik hizmeti. Işınlanırken belirlemiş olduğunuz kodu girmeniz halinde oyuna devam edebilirsiniz, eğer girmezseniz yada yanlış yanlış girerseniz oyundan atılırsınız.

ilgili dosyayı ftp'den qust dizinine attıktan sonra,
putty'den login olup:
cd /usr/game/share/locale/turkey/quest && ./qc guvenlik_sistemi.lua
girmeniz yeterlidir.

keyifli oyunlar.

[B]for DevSheeN[/B]

Link Kırık GÜncellermisiniz

 

[ulubey4242]

Link kırık olduğu için kapatıldı