Вторник, 02.12.2025, 06:11


Приветствую Вас Гость | RSS


Главная | [QUEST] телепорт в виде квеста! - Форум | Регистрация | Вход
Metin2 сервера, руководства, гайды, читы, боты
[ Новые сообщения · Участники · Правила форума · Поиск · RSS ]

  • Страница 1 из 1
  • 1
Архив - только для чтения
Форум » Разное » Архив » [QUEST] телепорт в виде квеста! (*icon-0*)
[QUEST] телепорт в виде квеста!
BENEFIST Дата: Суббота, 26.05.2012, 23:54 | Сообщение # 1

Сообщений: 812
[40]

Статус: Не на сайте
quest shop_info begin
state start begin
when login begin
send_letter(" ТЕЛЕПОРТАТОР ")
end
when button or info begin
say_title(" Телепорт ")
say(" хочешь отправиться в путешествия? ")
say(" тогда ты обратился по адресу! ")
say(" я могу отправить тебя куда угодно ")
say(" платить даже не надо! всего 1 янг и что бы ты был 20 lvl ")
say(" как вам это? ")
say("")

local main_set = select(" телепортируй меня "," нет не надо ")
if main_set == 2 then
return
end

if pc.get_level() <= 20 then
say_title(" Неизвестный маг ")
say(" Ваш уровень ")
say(" слишком низок. ")
say(" Наберите 20 лвл и возвращайтесь. ")
return
end

local map = pc.get_map_index()
local empire = pc.get_empire()
local level = pc.get_level()
local cost = math.floor(level / 5) * 1

-- ?? ????
if cost < 1 then
cost = 1
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 ", " Лунгсам ", " Красный Лес ", " Not_teleport ", " ", " Вернуться ", " Отмена ") + 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

pc.changegold(-cost)

local warp = {
-- guild_map
{
{ 553600, 144200 },
{ 553600, 144200 },
{ 553600, 144200 },
},
-- 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
{
{ 434200, 290600 },
{ 375200, 174900 },
{ 491800, 173600 },
},
{--empire_castle
{975200, 133000},
{977200, 185000},
{923900, 183600},

} ,
-- 62 metin2_map_n_flame_01
{
{ 0, 1203200 },
{ 0, 1203200 },
{ 0, 1203200 },
},
-- 104 metin2_map_spiderdungeon
{
{ 665600, 435200 },
{ 665600, 435200 },
{ 665600, 435200 },
},
-- 67 metin2_map_trent
{
{ 288700, 5700 },
{ 288700, 5700 },
{ 288700, 5700 },
},
-- 68 metin2_map_trent02
{
{ 1119900, 70800 },
{ 1119900, 70800 },
{ 1119900, 70800 },
},
-- 70 metin2_map_nusluck01
{
{ 845100, 745900 },
{ 845100, 745900 },
{ 845100, 745900 },
},
}
test_chat(warp[sub_set][empire][1]..warp[sub_set][empire][2])
say_title(" Телепортер ")
say(" Сейчас вы будете ")
say(" телепортированы в выбранную локацию. ")
say(" Удачи! ")
wait()
pc.warp(warp[sub_set][empire][1], warp[sub_set][empire][2])


else -- ? ?? 1,2 ? ??? ?????? ? ?? 1,2 ? ??? ?? ??
local sub_set2 = 3

--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

ЕСЛИ ЕСТЬ УДАЛИТЕ!!!


 
Сообщениеquest shop_info begin
state start begin
when login begin
send_letter(" ТЕЛЕПОРТАТОР ")
end
when button or info begin
say_title(" Телепорт ")
say(" хочешь отправиться в путешествия? ")
say(" тогда ты обратился по адресу! ")
say(" я могу отправить тебя куда угодно ")
say(" платить даже не надо! всего 1 янг и что бы ты был 20 lvl ")
say(" как вам это? ")
say("")

local main_set = select(" телепортируй меня "," нет не надо ")
if main_set == 2 then
return
end

if pc.get_level() <= 20 then
say_title(" Неизвестный маг ")
say(" Ваш уровень ")
say(" слишком низок. ")
say(" Наберите 20 лвл и возвращайтесь. ")
return
end

local map = pc.get_map_index()
local empire = pc.get_empire()
local level = pc.get_level()
local cost = math.floor(level / 5) * 1

-- ?? ????
if cost < 1 then
cost = 1
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 ", " Лунгсам ", " Красный Лес ", " Not_teleport ", " ", " Вернуться ", " Отмена ") + 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

pc.changegold(-cost)

local warp = {
-- guild_map
{
{ 553600, 144200 },
{ 553600, 144200 },
{ 553600, 144200 },
},
-- 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
{
{ 434200, 290600 },
{ 375200, 174900 },
{ 491800, 173600 },
},
{--empire_castle
{975200, 133000},
{977200, 185000},
{923900, 183600},

} ,
-- 62 metin2_map_n_flame_01
{
{ 0, 1203200 },
{ 0, 1203200 },
{ 0, 1203200 },
},
-- 104 metin2_map_spiderdungeon
{
{ 665600, 435200 },
{ 665600, 435200 },
{ 665600, 435200 },
},
-- 67 metin2_map_trent
{
{ 288700, 5700 },
{ 288700, 5700 },
{ 288700, 5700 },
},
-- 68 metin2_map_trent02
{
{ 1119900, 70800 },
{ 1119900, 70800 },
{ 1119900, 70800 },
},
-- 70 metin2_map_nusluck01
{
{ 845100, 745900 },
{ 845100, 745900 },
{ 845100, 745900 },
},
}
test_chat(warp[sub_set][empire][1]..warp[sub_set][empire][2])
say_title(" Телепортер ")
say(" Сейчас вы будете ")
say(" телепортированы в выбранную локацию. ")
say(" Удачи! ")
wait()
pc.warp(warp[sub_set][empire][1], warp[sub_set][empire][2])


else -- ? ?? 1,2 ? ??? ?????? ? ?? 1,2 ? ??? ?? ??
local sub_set2 = 3

--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

ЕСЛИ ЕСТЬ УДАЛИТЕ!!!
Автор - BENEFIST
Дата добавления - 26.05.2012 в 23:54
Форум » Разное » Архив » [QUEST] телепорт в виде квеста! (*icon-0*)
  • Страница 1 из 1
  • 1
Поиск:

Загрузка..

Яндекс.Метрика
Copyright Necromancers © 2025 Сайт основан на мотивах Метин-2


Все права на некоторые элементы дизайна принадлежат официальному сайту www.metin-2.ru