quest map_warp begin
state start begin
when 9012.chat." Хотите путешествовать? " begin
-- Variablen Start
local map = pc.get_map_index()
local empire = pc.get_empire()
local level = pc.get_level()
local cost = math.floor(level / 5) * 1000
local guild_map_names = {" Земля гильдий. " ," Земля гильдий. " ," Земля гильдий. "}
guild_map_name = guild_map_names[empire]
local empire_castle={" Красная империя. " ," Жёлтая империя. " ," Синия империя. "}
empire_castle = empire_castle[empire]
local warp = {
-- guild_map
{
{ 128500, 1000 },
{ 179500, 1000 },
{ 271800, 13000 },
},
-- 64 map_n_threeway
{
{ 402100, 673900 },
{ 270400, 739900 },
{ 321300, 808000 },
},
-- 63 metin2_map_n_desert_01
{
{ 217800, 627200 },
{ 221900, 502700 },
{ 344000, 502500 },
},
-- 61 map_n_snowm_01
{
{ 333000, 745000 },
{ 333000, 745000 },
{ 333000, 745000 },
},
--empire_castle
{
{ 975200, 133000 },
{ 977200, 185000 },
{ 923900, 183600 },
} ,
-- 62 metin2_map_n_flame_01
{
{ 83200, 0 },
{ 83200, 0 },
{ 83200, 0 },
},
-- devil_tower
{
{ 0, 25600 },
{ 0, 25600 },
{ 0, 25600 },
},
-- red_forest
{
{ 1119900, 70800 },
{ 1119900, 70800 },
{ 1119900, 70800 },
},
-- spider
{
{ 591000, 111000 },
{ 591000, 111000 },
{ 591000, 111000 },
},
--tempel
{
{ 705000, 465000 },
{ 705000, 465000 },
{ 705000, 465000 },
},
}
local sub_set = 0
--Veriablen End
say_title(" Телепортёр: ")
if map == 1 or map == 3 or map == 21 or map == 23 or map == 41 or map == 43 then
say(" Здравствуйте, ".. pc.get_name( ).. ". ")
say(" Я могу помочь тебе отправится на новые земли.. ")
say(" Но там может ожидать тебя опасность, ")
say(" но такому храброму человеку, ")
say(" как ты, я думаю будет всё по силам.. ")
say(" Готов ли ты испытать свою судьбу? ")
say(" Если Да, то я отправлю тебя, ")
say(" но за не большую оплату.. ")
local s = select(" Телепортировать. ", " Закрыть. ")
if s == 2 then
return
end
say_title(" Телепортёр: ")
if map == 1 or map == 3 or map == 21 or map == 23 or map == 41 or map == 43 then
if level < 60 then
say(" Ваш уровень ещё не очень велик, ")
say(" поэтому Вы можете путешествовать не во всех областях.. ")
say_reward(" Потребуется: " ..cost.." янг. ")
sub_set = select(guild_map_name, " Долина орков. " , " Пустыня. " , " Храм. " , " Закрыть. ")
if sub_set == 5 then
return
end
else
say("Da dein Level schon recht hoch ist,")
say("kann ich dich auch auf neue Regionen")
say("Teleportieren..")
say_reward(" Потребуется: " ..cost.." янг. ")
sub_set = select(guild_map_name, " Долина орков. " , " Пустыня. " , " Храм. " , " Далее. " , " Закрыть. ")
if sub_set == 6 then
return
end
if sub_set == 5 then
say_title(" Телепортёр: ")
say(" Я отправлю тебя в другие регионы.. ")
say_reward(" Потребуется: " ..cost.." янг. ")
if is_test_server() then
sub_set = select(" Долина метинов. " , " Локация фарма. " , " Красный лес. " , " Башня Демона. " , " Сд2. " , " Закрыть. ") + 4
if sub_set == 12 then
return
end
if pc.get_gold() < cost then
say_title(" Телепортёр: ")
say_reward(" Не хватает янг. ")
return
end
pc.changegold(-cost)
pc.warp(warp[sub_set][empire][1], warp[sub_set][empire][2])
else
if empire== 1 then
sub_set3 = select(" Йонган. " , " Яянг. " , " Закрыть. ")
if sub_set3 == 1 then
if pc.get_gold() < cost then
say_title(" Телепортёр: )
say_reward(" Не хватает янг. ")
return
end
pc.changegold(-cost)
pc.warp(474300 , 954800)
end
if sub_set3 == 2 then
if pc.get_gold() < cost then
say_title(" Телепортёр: ")
say_reward(" Не хватает янг. ")
return
end
pc.changegold(-cost)
pc.warp(353100 , 882900)
end
if sub_set3 == 3 then
return
end
elseif empire == 2 then
local sub_set3 = select(" Йоан. " , " Второй город. " , " Закрыть. ")
if sub_set3 == 1 then
if pc.get_gold() < cost then
say_title(" Телепортёр: ")
say_reward(" Не хватает янг. ")
return
end
pc.changegold(-cost)
pc.warp(63800 , 166400)
end
if sub_set3 == 2 then
if pc.get_gold() < cost then
say_title(" Телепортёр: ")
say_reward(" Не хватает янг. ")
return
end
pc.changegold(-cost)
pc.warp(145500 , 240000)
end
if sub_set3 == 3 then
return
end
elseif empire == 3 then
local sub_set3 = select(" Пуингмо. " , " Бакра. " , " Закрыть. ")
if sub_set3 == 1 then
if pc.get_gold() < cost then
say_title(" Телепортёр: ")
say_reward(" Не хватает янг. ")
return
end
pc.changegold(-cost)
pc.warp(959900 , 269200)
end
if sub_set3 == 2 then
if pc.get_gold() < cost then
say_title(" Телепортёр: ")
say_reward(" Не хватает янг. ")
return
end
pc.changegold(-cost)
pc.warp(863900 , 246000)
end
if sub_set3 == 3 then
return
end
end
end