[spoiler="Спойлер Кольцо"]-- Teleporter quest move_ring begin state start begin when 40003.use begin say_title(" Кольцо телепортации: ") say(" Я могу тебя отправить в новые неизведанные ") say(" земли, где царит страх и хаос. Готовы ли вы ") say(" рискнуть своей жизнью и испытать свои силы, ") say(" свою судьбу? Если да, то я неприменно за ") say(" умеренную плату предоставлю вам такую ") say(" возможность...")
local main_set = select(" Телепортировать "," Отмена ") if main_set == 2 then return end
if pc.get_level() <= 1 then say_title(" Телепортер ") say(" Ваш уровень ") say(" слишком низок. ") say(" Наберите 1 левел и возвращайтесь. ") return end
local map = pc.get_map_index() local empire = pc.get_empire() local level = pc.get_level() local cost = math.floor(level / 5) * 1000
-- ?? ???? if cost < 1000 then cost = 1000 end
say_title(" Телепортер ") say(" Хотите путешествовать? ") say_reward(string.format(" Это будет вам стоить %d Янг ", cost))
-- ?? ?? ???? ?? ?? (? ?? 1,2 ??) if map == 1 or map == 3 or map == 21 or map == 23 or map == 41 or map == 43 then
local guild_map_names = { " Храм тьмы ", " Храм тьмы ", " Храм тьмы ", }
guild_map_name = guild_map_names[empire] local empire_castle={ " Войны империй ", " Войны империй ", " Войны империй ", } empire_castle =empire_castle[empire] local sub_set = 0 if level < 40 then -- 40?? : ?????, ???, ????, ??? sub_set = select(guild_map_name, " Долина ", " Пустыня Йонгби ", " Гора Сохан ", empire_castle," Далее ") if sub_set == 6 then -- ?? return end
else -- 41?? : ????, ???, ????, ???? sub_set = select(guild_map_name, " Долина ", " Пустыня Йонгби ", " Гора Сохан ", empire_castle," Далее ") if sub_set == 6 then -- ?? say_title(" Телепортер ") say(" Хотите путешествовать? ") say_reward(string.format(" Это будет вам стоить %d Янг ", cost)) sub_set = select(" Грот изгнаников ", " Башня демонов ", " СД2 ", " Лунгсам ", " Красный лес ", " Земля гигантов ", " Вернуться ", " Отмена ") + 5 if sub_set == 13 then -- ?? return end if sub_set == 12 then -- ?? say_title(" Телепортер ") say(" Хотите путешествовать? ") --- l say_reward(string.format(" Это будет вам стоить %d Янг ", cost)) sub_set = select(guild_map_name, " Долина ", " Пустыня Йонгби ", " Гора Сохан ", empire_castle," Далее ") if sub_set == 6 then -- ?? say_title(" Телепортер ") say(" Хотите путешествовать? ") say_reward(string.format(" Это будет вам стоить %d Янг ", cost)) sub_set = select(" Грот изгнаников ", " Башня демонов ", " СД2 ", " Лунгсам ", " Красный лес ", " земля гигантов ", " Я передумал ") + 5 if sub_set == 12 then -- ?? return end end end end end
if pc.gold < cost then say(" Вам не хватает средств ") say_title(" Телепортер ") say(" Вам не хватает средств ") say(" на путешествие, ") say(" подкопите чуток и возвращайтесь ") say_reward(string.format(" Вам неоходимо %d Янг ", cost)) return end
--sub_set2 = select(locale.vileage1_name[empire], locale.vileage2_name[empire], locale.cancel) if empire==1 then sub_set2 = select(" Йонган "," Яянг " , locale.cancel) elseif empire ==2 then sub_set2 = select(" Первый город "," Второй город " , locale.cancel) elseif empire ==3 then sub_set2 = select(" Пуингмо "," Бакра " , locale.cancel) end if sub_set2 != 3 then if pc.gold < cost then say_title(" Телепортер ") say(" У вас не хватает денег ") say(" на перемещение ") say(" приходиет позже. ") say_reward(string.format(" Вам требуется %d Янг ", cost)) else if sub_set2 == 1 then say_title(" Телепортер ") say(" Я телепортирую вас ") wait()
if empire == 1 then pc.warp(474300,954800) elseif empire == 2 then pc.warp(63800,166400) elseif empire == 3 then pc.warp(959900,269200) end elseif sub_set2 == 2 then say_title(" Телепортер ") say(" Я телепортирую вас ")
wait() if empire == 1 then pc.warp(353100,882900) elseif empire == 2 then pc.warp(145500,240000) elseif empire == 3 then pc.warp(863900,246000) end end
pc.changegold(-cost) end end end end -- end_of_chat end -- end_of_state end -- end_of_quest[/spoiler]
