Metin2 Sorunsuz İsim İzi .Lua

quest change_name begin    state start begin
    when 27987.use begin
        say_title("İsim izi ")
            if pc.is_married() then
            say("Evli olduğun için isim değiştiremezsin.")
            say("")
            return
            end


            if pc.is_polymorphed() then
            say("Dönüşmüş halde isim değiştiremezsin.")
            say("")
            return
            end


            if pc.has_guild() then
            say("Bir loncanın üyesiyken isim değiştiremezsin.")
            say("")
            return
            end


            if party.is_party() then
            say("İsim değiştirmek için gruptan çıkmalısın.")
            say("")
            return
            end


            if pc.get_level() < 80 then
                say("İsim değiştirmek için yeterli seviyede değilsin.")
                say("80. seviyeye ulaştığında tekrar dene.")
                return
            end


            if get_time() < pc.getqf("next_time") then
            say("Henüz isim değiştiremezsin.")
            say("")
            say_reward("Tekrar isim değiştirebileceğin tarih:")
            say_reward(string.format("%s", time_to_str(pc.getqf("next_time"))))


            if is_test_server() == true then
            say("Test serverdayken bu süre sıfırlanır.")
            say("")
            else
            return
            end
            end


            say("Yeni ismini aşağıdaki kutuya yaz.")


            local name = pc.name
            local str = input()


            local ret = pc.change_name(str)
          
            if string.len(str) > 30 then
                say_title("İsim izi")
                say("İsim çok uzun.")
                return
            end
          
            if ret == 0 then
            say_title("İsim izi")
            say("İsim geçerli değil. Başka bir isim")
            say("yaz. Türkçe veya özel karakter kullanma.")
            say("Lütfen oyuna tekrar giriş yap.")


            char_log(0, "CHANGE_NAME", "HAVE NOT RE-LOGIN")
            elseif ret == 1 then
            say_title("İsim izi")
            say("Bir sorun var.")
            say("Daha sonra tekrar dene.")
            say("")

            char_log(0, "CHANGE_NAME", "ITEM USE PROBLEM")
            elseif ret == 2 then
            say_title("İsim izi")
            say("İsim geçerli değil. Başka bir isim")
            say("yaz. Türkçe veya özel karakter kullanma.")
            say("")


            char_log(0, "CHANGE_NAME", "CAN NOT USE NAME")
            elseif ret == 3 then
            say_title("İsim izi")
            say("Bu ismi başka bir oyuncu kullanıyor.")
            say("Kendine başka bir isim bul.")
            say("")


            char_log(0, "CHANGE_NAME", "ALREADY USING NAME")
            elseif ret == 4 then
            say_title("İsim izi")
            say("İsim değiştirme gerçekleşti.")
            say("Oyuna tekrar giriş yap.")
            say("")


            pc.remove_item("27987",1)


            pc.setqf("next_time", get_time() + time_hour_to_sec(1*1))

            char_log(0, "CHANGE_NAME", "SUCCESS: from "..name.." to "..str)
            else
            say("Bir hata oluştu.")


            char_log(0, "CHANGE_NAME", "UNKNOWN NAME")
            end
        end
    end
end