-- ?? ??? 1?
quest neutral_warp begin
state start begin
when old_man.click begin
say_title(" Старец: ")
say(" Здравствуйте! ")
say(" Я знаю, как отсюда добраться в другие земли. ")
say(" Если вы дадите мне немного денег то ")
say(" я с удовольствием телепортирую вас. ")
say("")
local s = select(" Телепортировать ", " Не телепортировать ")

if s == 1 then
local cost = 1000
local m = pc.get_map_index()

say_title(" Старец: ")
say(" Куда вы хотите отправиться? ")
say(" Это будет стоить вам ".. cost .." Янг. ")
local e = pc.empire
if m == 1 or m == 3 then
e = 1
elseif m == 21 or m == 23 then
e = 2
elseif m == 41 or m == 43 then
e = 3
end

if m == 1 or m == 21 or m == 41 then
local s = select(" Долина ", " Гора Сохан ", " Отмена ")
if s!=3 then
if pc.gold < cost then
say(" Вам не хватает Янг. ")
else
if s == 1 then
-- ??? = 1
pc.warp(special.warp_to_pos[1][e][1], special.warp_to_pos[1][e][2])
else
-- ??? = 4
pc.warp(special.warp_to_pos[4][e][1], special.warp_to_pos[4][e][2])
end
pc.changegold(-cost)
end
end
elseif m == 3 or m == 23 or m == 43 then
local s = select(" Огненная земля ", " Пустыня Йонгби ", " Отмена ")

if s != 3 then
-- ???? = 2
-- ???? = 3
if pc.gold < cost then
say(" Вам не хватает Янг. ")
else
pc.warp(special.warp_to_pos[s+1][e][1], special.warp_to_pos[s+1][e][2])
pc.changegold(-cost)
end
end
end
end
end
end
end