Суббота, 04.05.2024, 12:42


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


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

  • Страница 1 из 1
  • 1
Форум » Metin2 » Руководства для серверов » Руководства (старые) » [Release]Квест на убивание мобов. (*icon-0*)
[Release]Квест на убивание мобов.
Bancaq™ Дата: Четверг, 05.01.2012, 19:27 | Сообщение # 1

Сообщений: 564
[763]

Статус: Не на сайте
Ещё раз здрасти всем. Не так давно я изменил квест 2 лвл стражника на убивание собак, и получилась очень интересно.

quest main_quest_lv80 begin
state start begin
end
state run begin
when login or levelup or enter with pc.get_level() >= 80 begin
set_state( gotoyrii43 )
end
when 20011.chat." Что вы сдесь делаете? " with pc.get_level() < 80 begin
say(" Уриил: ")
say(" Жду пока вы выполните задание! ")
say(" Вы достигли 80 уровня? ")
say(" Нет? Живо качаться! ")
say(" Я жду вас. ")
say("")
end
end
state gotoyrii43 begin
when letter begin
send_letter(" Возвращайтесь к Уриилу! ")
local v=find_npc_by_vnum(20011)
if 0==v then
else
target.vid("__TARGET__", v, " Возвращайтесь к Уриилу! ")
end
end
when button or info begin
say_title(" Возвращайтесь к Уриилу! ")
say("")
say_reward(" Вы поднялись и теперь, ")
say_reward(" Вы готовы к заданию. ")
say_reward(" Вперёд! ")
say_reward(" Идите к Уриилу. ")
say_reward(" Он даст вам задание! ")
say("")
end
when __TARGET__.target.click begin
target.delete("__TARGET__")
say_title(" Уриил: ")
say("")
say(" Вы должны убить 300 Потусторонний лед. голем ")
say(" Как закончите приходите. Жду. ")
say("")
wait()
say_title(" Уриил: ")
say("")
say(" пауки поселились поселились в Гроте изгнаников. ")
say(" Идите, убейте их! ")
say(" Удачи! ")
wait()
say_title(" Информация о награде: ")
say("")
say_reward(" Опыту: 15.000.000 ")
say_reward(" Золота: 200.000.000 ")
say_reward(" Ракушки: 500х ")
say_reward(" Сундук с латами 5х. ")
say_reward(" Сундук с оружием 5х. ")
say_reward(" Сундук с бижутерией 5х. ")
say_reward(" Сундук с инграми 5х. ")
say_item(item_name(50129),50129,"")
say("")
set_state( killfantom )
pc.setqf("state", 0)
q.set_counter(" Потусторонний лед. голем: ", 0)
end
end
state killfantom begin
when letter begin
send_letter(" Квест охоты 80 (Уриил) ")
end
when button or info begin
say_title(" Квест охоты 80 (Уриил) ")
say("")
say_reward(" Убейте 300 Потусторонний лед. голем ")
say_reward(string.format(" Вы убили %d Потусторонний лед. голем ", pc.getqf("state")))
say("")
end
when 1137.kill begin
local count = pc.getqf("state") + 1
if count <= 300 then
pc.setqf("state", count)
q.set_counter(" Осталось ", 300 - count)
if count == 200 then
say_title(" Задание выполнено. ")
say("")
say_reward(" Вы убили 300 Потусторонний лед. голем ")
say_reward(" Возвращайтесь к Уриилу. ")
set_state(gotoyrii44)
say("")
end
end
end
when 20011.chat." Квест охоты (Уриил) " with pc.getf("main_quest_lv80","state") < 300 begin
say_title(" Уриил: ")
say("")
say(" Вы должны убить 300 Потусторонний лед. голем ")
say(" Это ваше задание. ")
say("")
say("")
if pc.is_gm() then
wait()
say_title(" Ваше задание: ")
say("")
say(" Вы хотите выполнить его?" )
local s = select(" Да ", " Нет ")
if s == 1 then
set_state(gotoyrii44)
end
end
end
when 20011.chat." Квест охоты (Уриил) " with pc.getf("main_quest_lv80","state") < 300 begin
say_title(" Уриил: ")
say("")
say(" Ах! Вы вернулись. ")
say(" Вы хорошо потрудились. ")
say(" Вы выполнили задание. ")
say("")
set_state()
end
end
state gotoyrii44 begin
when letter begin
local v=find_npc_by_vnum(20011)
if 0==v then
else
target.vid("__TARGET__", v, " Возвращайтесь к Уриилу. ")
end
end
when letter begin
send_letter(" Задание выполнено. ")
end
when button or info begin
say_title(" Задание выполнено. ")
say("")
say_reward(" Вы убили 300 Потусторонний лед. голем ")
say_reward(" Возвращайтесь к Уриилу. ")
say("")
end
when __TARGET__.target.click begin
target.delete("__TARGET__")
say_title(" Уриил: ")
say("")
say(" Вы справились. ")
say(" Слудующие задание будет доступно на 85 уровне. ")
say("")
wait()
say_title(" Вот ваша награда. ")
say("")
say_reward(" Опыту: 15.000.000 ")
say_reward(" Золота: 200.000.000 ")
say_reward(" Ракушки: 500х ")
say_reward(" Сундук с латами 5х. ")
say_reward(" Сундук с оружием 5х. ")
say_reward(" Сундук с бижутерией 5х. ")
say_reward(" Сундук с инграми 5х. ")
say_item(item_name(50129),50129,"")
say("")
pc.give_exp2( 15000000 )
pc.change_money( 200000000 )
pc.give_item2( 27987 ,200 )
pc.give_item2( 27987 ,200 )
pc.give_item2( 27987 ,100 )
pc.give_item2( 50129, 5 )
pc.give_item2( 50130, 5 )
pc.give_item2( 50128, 5 )
pc.give_item2( 50127, 5 )
pc.setqf("state", 0)
clear_letter()
set_state(__COMPLETE__)
set_quest_state("main_quest_lv85","run")
end
end
state __COMPLETE__ begin
end
end

Изменяем кого убивать, награду и воаля квест охоты готов.
Ах ещё один начало цепочки этих квестов.

quest main_quest_lv1 begin
state start begin
when login or levelup with pc.get_level() == 1 begin
set_state( gotoinfomation )
end
end
state gotoinfomation begin
when letter begin
send_letter(" Добро пожаловать в Metin 2. ")
end
when button or info begin
say_blue2(" Добро пожаловать в Metin 2. ")
say("")
----"12345678901234567890123456789012345678901234567890"|
say_red(" Добро пожаловать в прекрасный мир Метин2! ")
say_gold(" Вас ждёт городской стражник. ")
say_gold(" Он вам даст начальную информацию. ")
say_gold(" И вы должны помочь ему. ")
say_green(" Идите, вперёд на встречу к приключениям! ")
say("")
wait()
say_blue2(" Добро пожаловать в Metin 2. ")
say("")
say_gold(" Этот мир перекрасен. ")
say_gold(" Он населён множеством животных. ")
say_gold(" И местными жителями, всем им необходима помощь. ")
say_red(" И только вы можете помочь им. ")
say_red(" Убивайте диких псов, ")
say_red(" И вы станите сильнее. ")
say_gold(" Удачи! ")
say("")
set_state( gototeacher )
end
end

state gototeacher begin
when letter begin
local v=find_npc_by_vnum(20354)
if 0==v then
else
target.vid("__TARGET__", v, " Поиски городского стражника. ")
end
end

when button or info begin
say_title(" Поиски городского стражника. ")
say("")
-----------"12345678901234567890123456789012345678901234567890"|
say_gold(" Поговорите с городским стражником. ")
say_gold(" Все жители деревни нуждаються в помощи. ")
say_gold(" Их вы можете найти на карте. ")
say("")
end
when __TARGET__.target.click begin
target.delete("__TARGET__")
say_red(" Городской стражник: ")
say("")
----"12345678901234567890123456789012345678901234567890"|
say_blue(" Кто вы? Я вас не знаю.. ")
say_blue(" Ах вы искатель приключений. ")
say_blue(" Хотите чтобы я обучил вас? ")
say_blue(" Тогда для начала вам надо оружие! ")
say_blue(" У вас уже есть оружие? ")
say_green(" Тогда слушайте! ")
say_blue2(" Вы должны будете помагать мне, чтобы быть сильнее ")
say_blue2(" До 10 уровня я буду обучать вас. ")
say_blue2(" Ну чтож вперёд! ")
say("")
wait()
say_red(" Городской стражник: ")
say("")
----"12345678901234567890123456789012345678901234567890"|
say_gold(" Приходите когда подниметесь до 2 уровня! Жду. ")
say("")

clear_letter()
set_state(__COMPLETE__)
set_quest_state("find_squareguard","find")
set_quest_state("main_quest_lv2","run")

end
end
state __COMPLETE__ begin
end
end

Редактируем его и получиться цепочка квестов.tags-zB11[Release]Квест, на, убивание, мобов.


 
СообщениеЕщё раз здрасти всем. Не так давно я изменил квест 2 лвл стражника на убивание собак, и получилась очень интересно.

quest main_quest_lv80 begin
state start begin
end
state run begin
when login or levelup or enter with pc.get_level() >= 80 begin
set_state( gotoyrii43 )
end
when 20011.chat." Что вы сдесь делаете? " with pc.get_level() < 80 begin
say(" Уриил: ")
say(" Жду пока вы выполните задание! ")
say(" Вы достигли 80 уровня? ")
say(" Нет? Живо качаться! ")
say(" Я жду вас. ")
say("")
end
end
state gotoyrii43 begin
when letter begin
send_letter(" Возвращайтесь к Уриилу! ")
local v=find_npc_by_vnum(20011)
if 0==v then
else
target.vid("__TARGET__", v, " Возвращайтесь к Уриилу! ")
end
end
when button or info begin
say_title(" Возвращайтесь к Уриилу! ")
say("")
say_reward(" Вы поднялись и теперь, ")
say_reward(" Вы готовы к заданию. ")
say_reward(" Вперёд! ")
say_reward(" Идите к Уриилу. ")
say_reward(" Он даст вам задание! ")
say("")
end
when __TARGET__.target.click begin
target.delete("__TARGET__")
say_title(" Уриил: ")
say("")
say(" Вы должны убить 300 Потусторонний лед. голем ")
say(" Как закончите приходите. Жду. ")
say("")
wait()
say_title(" Уриил: ")
say("")
say(" пауки поселились поселились в Гроте изгнаников. ")
say(" Идите, убейте их! ")
say(" Удачи! ")
wait()
say_title(" Информация о награде: ")
say("")
say_reward(" Опыту: 15.000.000 ")
say_reward(" Золота: 200.000.000 ")
say_reward(" Ракушки: 500х ")
say_reward(" Сундук с латами 5х. ")
say_reward(" Сундук с оружием 5х. ")
say_reward(" Сундук с бижутерией 5х. ")
say_reward(" Сундук с инграми 5х. ")
say_item(item_name(50129),50129,"")
say("")
set_state( killfantom )
pc.setqf("state", 0)
q.set_counter(" Потусторонний лед. голем: ", 0)
end
end
state killfantom begin
when letter begin
send_letter(" Квест охоты 80 (Уриил) ")
end
when button or info begin
say_title(" Квест охоты 80 (Уриил) ")
say("")
say_reward(" Убейте 300 Потусторонний лед. голем ")
say_reward(string.format(" Вы убили %d Потусторонний лед. голем ", pc.getqf("state")))
say("")
end
when 1137.kill begin
local count = pc.getqf("state") + 1
if count <= 300 then
pc.setqf("state", count)
q.set_counter(" Осталось ", 300 - count)
if count == 200 then
say_title(" Задание выполнено. ")
say("")
say_reward(" Вы убили 300 Потусторонний лед. голем ")
say_reward(" Возвращайтесь к Уриилу. ")
set_state(gotoyrii44)
say("")
end
end
end
when 20011.chat." Квест охоты (Уриил) " with pc.getf("main_quest_lv80","state") < 300 begin
say_title(" Уриил: ")
say("")
say(" Вы должны убить 300 Потусторонний лед. голем ")
say(" Это ваше задание. ")
say("")
say("")
if pc.is_gm() then
wait()
say_title(" Ваше задание: ")
say("")
say(" Вы хотите выполнить его?" )
local s = select(" Да ", " Нет ")
if s == 1 then
set_state(gotoyrii44)
end
end
end
when 20011.chat." Квест охоты (Уриил) " with pc.getf("main_quest_lv80","state") < 300 begin
say_title(" Уриил: ")
say("")
say(" Ах! Вы вернулись. ")
say(" Вы хорошо потрудились. ")
say(" Вы выполнили задание. ")
say("")
set_state()
end
end
state gotoyrii44 begin
when letter begin
local v=find_npc_by_vnum(20011)
if 0==v then
else
target.vid("__TARGET__", v, " Возвращайтесь к Уриилу. ")
end
end
when letter begin
send_letter(" Задание выполнено. ")
end
when button or info begin
say_title(" Задание выполнено. ")
say("")
say_reward(" Вы убили 300 Потусторонний лед. голем ")
say_reward(" Возвращайтесь к Уриилу. ")
say("")
end
when __TARGET__.target.click begin
target.delete("__TARGET__")
say_title(" Уриил: ")
say("")
say(" Вы справились. ")
say(" Слудующие задание будет доступно на 85 уровне. ")
say("")
wait()
say_title(" Вот ваша награда. ")
say("")
say_reward(" Опыту: 15.000.000 ")
say_reward(" Золота: 200.000.000 ")
say_reward(" Ракушки: 500х ")
say_reward(" Сундук с латами 5х. ")
say_reward(" Сундук с оружием 5х. ")
say_reward(" Сундук с бижутерией 5х. ")
say_reward(" Сундук с инграми 5х. ")
say_item(item_name(50129),50129,"")
say("")
pc.give_exp2( 15000000 )
pc.change_money( 200000000 )
pc.give_item2( 27987 ,200 )
pc.give_item2( 27987 ,200 )
pc.give_item2( 27987 ,100 )
pc.give_item2( 50129, 5 )
pc.give_item2( 50130, 5 )
pc.give_item2( 50128, 5 )
pc.give_item2( 50127, 5 )
pc.setqf("state", 0)
clear_letter()
set_state(__COMPLETE__)
set_quest_state("main_quest_lv85","run")
end
end
state __COMPLETE__ begin
end
end

Изменяем кого убивать, награду и воаля квест охоты готов.
Ах ещё один начало цепочки этих квестов.

quest main_quest_lv1 begin
state start begin
when login or levelup with pc.get_level() == 1 begin
set_state( gotoinfomation )
end
end
state gotoinfomation begin
when letter begin
send_letter(" Добро пожаловать в Metin 2. ")
end
when button or info begin
say_blue2(" Добро пожаловать в Metin 2. ")
say("")
----"12345678901234567890123456789012345678901234567890"|
say_red(" Добро пожаловать в прекрасный мир Метин2! ")
say_gold(" Вас ждёт городской стражник. ")
say_gold(" Он вам даст начальную информацию. ")
say_gold(" И вы должны помочь ему. ")
say_green(" Идите, вперёд на встречу к приключениям! ")
say("")
wait()
say_blue2(" Добро пожаловать в Metin 2. ")
say("")
say_gold(" Этот мир перекрасен. ")
say_gold(" Он населён множеством животных. ")
say_gold(" И местными жителями, всем им необходима помощь. ")
say_red(" И только вы можете помочь им. ")
say_red(" Убивайте диких псов, ")
say_red(" И вы станите сильнее. ")
say_gold(" Удачи! ")
say("")
set_state( gototeacher )
end
end

state gototeacher begin
when letter begin
local v=find_npc_by_vnum(20354)
if 0==v then
else
target.vid("__TARGET__", v, " Поиски городского стражника. ")
end
end

when button or info begin
say_title(" Поиски городского стражника. ")
say("")
-----------"12345678901234567890123456789012345678901234567890"|
say_gold(" Поговорите с городским стражником. ")
say_gold(" Все жители деревни нуждаються в помощи. ")
say_gold(" Их вы можете найти на карте. ")
say("")
end
when __TARGET__.target.click begin
target.delete("__TARGET__")
say_red(" Городской стражник: ")
say("")
----"12345678901234567890123456789012345678901234567890"|
say_blue(" Кто вы? Я вас не знаю.. ")
say_blue(" Ах вы искатель приключений. ")
say_blue(" Хотите чтобы я обучил вас? ")
say_blue(" Тогда для начала вам надо оружие! ")
say_blue(" У вас уже есть оружие? ")
say_green(" Тогда слушайте! ")
say_blue2(" Вы должны будете помагать мне, чтобы быть сильнее ")
say_blue2(" До 10 уровня я буду обучать вас. ")
say_blue2(" Ну чтож вперёд! ")
say("")
wait()
say_red(" Городской стражник: ")
say("")
----"12345678901234567890123456789012345678901234567890"|
say_gold(" Приходите когда подниметесь до 2 уровня! Жду. ")
say("")

clear_letter()
set_state(__COMPLETE__)
set_quest_state("find_squareguard","find")
set_quest_state("main_quest_lv2","run")

end
end
state __COMPLETE__ begin
end
end

Редактируем его и получиться цепочка квестов.tags-zB11[Release]Квест, на, убивание, мобов.
Автор - Bancaq™
Дата добавления - 05.01.2012 в 19:27
UltroDageR Дата: Четверг, 05.01.2012, 21:35 | Сообщение # 2

Сообщений: 38
[0]

Статус: Не на сайте
Довольно таки забавно, надо будет попробовать поставить))

 
СообщениеДовольно таки забавно, надо будет попробовать поставить))
Автор - UltroDageR
Дата добавления - 05.01.2012 в 21:35
Форум » Metin2 » Руководства для серверов » Руководства (старые) » [Release]Квест на убивание мобов. (*icon-0*)
  • Страница 1 из 1
  • 1
Поиск:

Загрузка..

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


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