![[NEW-VERSION]Multi-Language System](https://www.elitepvpers.com/forum/iconimages/metin2-pserver-guides-strategies/new-version-multi-language-system_ltr.gif){kind=small}
[NEW-VERSION]Multi-Language System
Multi-Language V3
I re-write and i hope you like it.
Features:
- Added pc.get_lang(),pc.set_lang(),pc.lang_status(),pc.re member_lang()
- Added multi-dialog
- Quest
PHP Code:
----------------------------------------------------------------
-- Date : 19.01.2014
-- FileName : multilanguage.quest
-- Author : HaveBeen™
-- Description : -
----------------------------------------------------------------
quest mlanguage begin
state start begin
when login begin
set_state(information)
end
end
-- Select or Change Language
state information begin
when login begin
pc.remember_lang()
end
when letter begin
if(pc.get_lang_status() != 0) then
send_letter("Change language")
else
send_letter("Select language")
end
end
when button or info begin
if(pc.get_lang_status() != 0) then
say_title(locale.mLanguage.title2[pc.get_lang()])
say("")
---
say(locale.mLanguage_say1[pc.get_lang()])
say(locale.mLanguage.say2[pc.get_lang()])
say("")
local s = select_table(locale.mLanguage.list[pc.get_lang()])
if(s == 8) then
return
end
pc.set_lang(s)
if(locale.mLanguage.list[pc.get_lang()][s] >= "Turkish" or locale.mLanguage.list[pc.get_lang()][s] >= "Türkçe" or locale.mLanguage.list[pc.get_lang()][s] >= "터키의" or locale.mLanguage.list[pc.get_lang()][s] >= "土耳其" or locale.mLanguage.list[pc.get_lang()][s] >= "Turc" or locale.mLanguage.list[pc.get_lang()][s] >= "Türkisch") then
say_title(locale.mLanguage.list[pc.get_lang()][s]..locale.mLanguage.title1[s])
else
say_title(locale.mLanguage.title1[s]..locale.mLanguage.list[pc.get_lang()][s])
end
say("")
---
say(locale.mLanguage.say3[pc.get_lang()])
else
say_title("Select language")
say("")
---
say("Please select a new language.")
say("You can freely choose the language you want to see in")
say("the game.")
say("")
local s = select_table(locale.mLangauge.list["en"])
if(s == 8) then
return
end
pc.set_lang_status(1)
pc.set_lang(s)
if(locale.mLanguage.list[pc.get_lang()][s] >= "Turkish" or locale.mLanguage.list[pc.get_lang()][s] >= "Türkçe" or locale.mLanguage.list[pc.get_lang()][s] >= "터키의" or locale.mLanguage.list[pc.get_lang()][s] >= "土耳其" or locale.mLanguage.list[pc.get_lang()][s] >= "Turc" or locale.mLanguage.list[pc.get_lang()][s] >= "Türkisch") then
say_title(locale.mLanguage.list[pc.get_lang()][s]..locale.mLanguage.title1[s])
else
say_title(locale.mLanguage.title1[s]..locale.mLanguage.list[pc.get_lang()][s])
end
say("")
--
say(locale.mLanguage.say3[pc.get_lang()])
end
end
end
end
PHP Code:
----------------------------------------------------------------
-- Date : 19.01.2014
-- FileName : locale.lua
-- Author : HaveBeen™
-- Description : -
----------------------------------------------------------------
locale.mLanguage = {}
locale.mLanguage.say1 = {
["en"] = "Please select a new language.",
["tr"] = "Lütfen yeni bir dil seçiniz.",
["kr"] = "새로운 언어를 선택하세요.",
["cn"] = "请选择一种新的语言。",
["ro"] = "Vă rugăm să selectați o limbă nouă.",
["fr"] = "S'il vous plaît sélectionner une nouvelle langue.",
["de"} = "Bitte wählen Sie eine neue Sprache.",
}
locale.mLanguage.say2 = {
["en"] = "You can freely choose the language you want to see in the game.",
["tr"] = "Oyunda görmek istediğiniz dili özgürce seçebilirsiniz.",
["kr"] = "당신은 자유롭게 당신이 게임에 표시 할 언어를 선택할 수 있습니다.",
["cn"] = "你可以自由选择你想在游戏中看到的语言。",
["ro"] = "Puteți alege în mod liber limba în care doriți să vedeți în joc.",
["fr"] = "Vous pouvez librement choisir la langue que vous voulez voir dans le jeu.",
["de"} = "Sie können frei wählen Sie die Sprache im Spiel sehen wollen.",
}
locale.mLanguage.say3 = {
["en"] = "Now you can see your language freely in the game.",
["tr"] = "Artık oyunda özgürce dilinizi görebileceksiniz.",
["kr"] = "지금 당신은 게임에서 자유롭게 언어를 볼 수 있습니다.",
["cn"] = "现在，您可以看到您的语言自由地在游戏中。",
["ro"] = "Acum puteți vedea limba în mod liber în joc.",
["fr"] = "Maintenant, vous pouvez voir votre langue librement dans le jeu.",
["de"] = "Jetzt können Sie Ihre Sprache frei im Spiel sehen.",
}
locale.mLanguage.list = {
["en"] = {"English","Turkish","Korean","Chinese","Romanian","French","German","Close"},
["tr"] = {"Ingilizce","Türkçe","Korece","Çince","Romanca","Fransızca","Almanca","Kapat"},
["kr"] = {"영어","터키의","한국의","중국의","루마니아어","프랑스의","독일의","가까운"},
["cn"] = {"英语"，"土耳其"，"韩国"，"中国的"，"罗马尼亚"，"法国人","德国","关闭"},
["ro"] = {"Englez","Turc","Coreean","Chinez","Român","Franceză","German","închide"},
["fr"] = {"Anglais","Turc","Coréen","Chinois","Roumain","Français","Allemand","Proche"},
["de"] = {"Englisch","Türkisch","Chinesisch","Rumänisch","Französisch","Deutsch","Schließen"},
}
locale.mLanguage.title2 = {
["en"] = "Change the langauge",
["tr"] = "Dilini değiştir",
["kr"] = "언어를 변경합니다.",
["cn"] = "改变语言。",
["ro"] = "A schimba limba.",
["fr"] = "Changer la langue.",
["de"] = "Ändern Sie die Sprache.",
}
locale.mLanguage.title1 = {
[1] = "You picked the ",
[2] = " Seçtiniz.",
[3] = "당신이 고른 ",
[4] = "你挑 ",
[5] = "Tu ai ales ",
[6] = "Vous avez choisi le",
[7] = "Sie nahm die ",
}
PHP Code:
----------------------------------------------------------------
-- Date : 19.01.2014
-- FileName : questlib.lua
-- Author : HaveBeen™
-- Description : -
----------------------------------------------------------------
local pc = pc or {}
function pc.get_lang_status()
return pc.getf("mlanguage","languagestatus")
end
function pc.set_lang_status(a)
pc.setf("mlanguage","languagestatus",a)
end
function pc.set_lang(lang)
local file,err = io.open("locale/english/language/"..pc.get_name()..".txt","w")
if(err) then
local file = io.output(io.open("locale/english/language/"..pc.get_name()..".txt","w"))
end
pc.setf("mlanguage","lang",lang)
file:write(lang)
file:flush()
file:close()
return true
end
function pc.remember_lang()
local file,err = io.open("locale/english/language/"..pc.get_name()..".txt","rb")
if(err) then
return false
end
for line in file:lines() do
return line
end
if(line == "1") then
if(pc.getf("mlanguage","lang") == 0) then
pc.setf("mlanguage","lang",line)
else
return
end
elseif(line == "2") then
if(pc.getf("mlanguage","lang") == 0) then
pc.setf("mlanguage","lang",line)
else
return
end
elseif(line == "3") then
if(pc.getf("mlanguage","lang") == 0) then
pc.setf("mlanguage","lang",line)
else
return
end
elseif(line == "4") then
if(pc.getf("mlanguage","lang") == 0) then
pc.setf("mlanguage","lang",line)
else
return
end
elseif(line == "5") then
if(pc.getf("mlanguage","lang") == 0) then
pc.setf("mlanguage","lang",line)
else
return
end
elseif(line == "6") then
if(pc.getf("mlanguage","lang") == 0) then
pc.setf("mlanguage","lang",line)
else
return
end
elseif(line == "7") then
if(pc.getf("mlanguage","lang") == 0) then
pc.setf("mlanguage","lang",line)
else
return
end
end
end
function pc.get_lang()
local file,err = io.open("locale/english/language/"..pc.get_name()..".txt","rb")
if(err) then
return -2
end
for line in file:lines() do
return line
end
if(line == "1") then
return "en"
elseif(line == "2") then
return "tr"
elseif(line == "3") then
return "kr"
elseif(line == "4") then
return "cn"
elseif(line == "5") then
return "ro"
elseif(line == "6") then
return "fr"
elseif(line == "7") then
return "de"
else
return false
end
end
- Step 2 : Just reload q
Mfg HaveBeen™
