Metin2 - Катакомбы Дьявола квест

[ Новые сообщения · Участники · Правила форума · Поиск · RSS ]

Страница 1 из 1
1

Архив - только для чтения

Катакомбы Дьявола квест (*icon-0*)

Катакомбы Дьявола квест

xBORLANDx

Дата: Вторник, 17.07.2012, 14:49 | Сообщение # 1

Сообщений: 219

[215]

Статус: Не на сайте

[spoiler="Квест, собственно"]quest catacomb begin
state start begin
when 1093.kill with pc.get_map_index() == 66 begin
d.notice("The Devils catacomb going")
d.new_jump_all(MAPINDEX , x , y)
end

when 20092.chat."The Devils Catacomb Login" with pc.get_map_index() == 713 begin
say_title("Guard")
say("")
say("The Devils Catacomb have to be 75 to enter")
wait()
if pc.get_level() < 75 then
say("I'm Sorry Level is not enough")
end
if pc.get_level() >= 75 then
say("Ok now you go")
pc.warp(307200,1203200)
end
end

when login with pc.get_map_index() == 712 begin
d.jump_all(81,58)
say_title("The Devils Catacomb Stone 1")
say("")
say("60 Minute there is careful")
say("Go to the holy place and the stone sculpture")
pc.give_item2("seal",1)
end

when sculpture.chat."1 Floor" with pc.get_map_index() == 712 begin
say_title("The Devils Catacomb Stone 1")
say("You Are Going to")
d.jump_all(544,42)
end

when login with pc.get_map_index() == 712 begin
d.notice("Find the statue and to talk")
end

when sculpture1.chat."2 Floor" with pc.get_map_index() == 712 begin
say_title("Sacred Sculpture")
say("")
say("Hi do you get out of that floor after ")
say("")
wait()
local s = select("Yes I'm On", "No Exit")
if 1 == s then
d.jump_all(1380,250)
end
if 2 == s then
d.exit_all()
end
end

when login with pc.get_map_index() == 712 begin
d.notice("The Goal is to find the correct text")
end

function get_3floor_stone_pos()
local positions = {
{1249,343}
{1353,351}
{1249,250}
{1249,153}
{1349,150}
{1149,252}
{1152,148}
{1148,347}
}
for i = 1, 6 do
local j = number(i,8)
if i != j then
local t = positions[i];
positions[i] = positions[j];
positions[j] = t;
end
end
-- for i = 1, 8 do
-- positions[i][1] = positions[i][1] * 100
-- positions[i][2] = positions[i][2] * 100
end

when 8019.kill with pc.get_map_index() == 712 begin
local positions = catacombstone.get_3floor_stone_pos()
for i = 1, 8 do
chat(positions[i][1], positions[i][2])
d.set_unique("fake" .. i , d.spawn_mob(8017, positions[i][1], positions[i][2]))
end
chat(positions[7][1], positions[7][2])
local vid = d.spawn_mob(8017, positions[7][1], positions[7][2])
chat(vid)
d.set_unique("real", vid)
server_loop_timer('catacomb_stone3_update', 10, pc.get_map_index())
server_timer('catacomb_stone3_fail1', 5*60, pc.get_map_index())

d.notice("3. Floor option door.");
d.notice("Most of the fake stone text here");
d.notice("Find the real one in 15 minutes");
d.notice("and Destroyer !.. ")
d.notice("The is the only way to move to the front door");
end
when catacomb_stone3_fail1.server_timer begin
if d.select(get_server_timer_arg()) then
d.notice("10 Minute Remaining.")
server_timer('catacomb_stone3_fail2', 5*60, get_server_timer_arg())
end
end

when catacomb_stone3_fail2.server_timer begin
if d.select(get_server_timer_arg()) then
d.notice("5 Minute Remaining")
server_timer('catacomb_stone4_fail', 5*60, get_server_timer_arg())
end
end

when catacomb_stone3_fail.server_timer begin
if d.select(get_server_timer_arg()) then
d.notice("Time Expired")
d.exit_all()
clear_server_timer('catacomb_stone3_update', get_server_timer_arg())
end
end

when catacomb_stone3_update.server_timer begin
if d.select(get_server_timer_arg()) then
if not d.is_unique_dead("real") then
for i = 1, 8 do
if d.getf("fakedead" .. i) == 0 then
if d.unique_get_hp_perc("fake" .. i) < 50 then
d.purge_unique("fake" .. i)
d.setf("fakedead" .. i, 1)
d.notice("");
end
end
end
else
server_timer("catacomb_stone3_end", 5, get_server_timer_arg())
d.notice("Hearing ability and interior motives ")
d.notice("")
d.notice("Great text stone destroy");
d.notice("4. How come the floor")
d.jump_all(500,717)
clear_server_timer('catacomb_stone3_fail1', get_server_timer_arg())
clear_server_timer('catacomb_stone3_fail2', get_server_timer_arg())
clear_server_timer('catacomb_stone3_fail', get_server_timer_arg())
end
else
server_timer('catacomb_stone3_stop_timer', 1, get_server_timer_arg())
end
end

when catacomb_stone3_stop_timer.server_timer begin
clear_server_timer('catacomb_stone3_update', get_server_timer_arg())
end

when login with pc.get_map_index() == 712 begin
d.notice("Boss Destroy !")
d.spawn_mob(mobid , 500,787)
end

when 2526.kill with pc.get_map_index() == 712 begin
d.jump_all(846,907)
end

when login with pc.get_map_index() == 712 begin
d.notice("This is the seal room")
d.notice("Find and place the seal")
end

when 2322.kill with pc.in_dungeon() begin
game.drop_item("seal",1)
end

when stone.take with item.vnum == seal and pc.get_map_index() == 712 begin
d.notice("Next Floor")
item.remove();
npc.purge();
d.jump_all(1300,704)
end

when login with pc.get_map_index() == 712 begin
d.notice("Boss Destroy")
end

when boss.kill with pc.in_dungeon() begin
say_title("The Devils Catacomb Stone 6")
say("")
say("Hi want resumed ?")
local s = select(locale.yes , locale.no)
if 1 == s then
d.jump_all(74,1158)
end
if 2 == s then
local reward_alchemist = {20074, 20075, 20076}
d.spawn_mob(reward_alchemist[number(1,3)], 425, 216);
d.setqf("can_refine", 5)
timer("catacombs_times",120)
end
end

when catacombs_times.timer with pc.get_map_index() == 712 begin
d.notice("Time Expired")
d.exit_all()
end

when login with pc.get_map_index() == mapindex begin
d.notice("Dr.House Destroy !")
end

when 5290.kill with pc.in_dungeon() begin
wait()
say_title("The Devils Catacomb Stone 7")
say("")
say("Mission Complete !")
say("")
d.exit_all()
end
end
end [/spoiler]

Добавлено (17.07.2012, 13:49)
---------------------------------------------
Квест не переведён happy

Сообщение[spoiler="Квест, собственно"]quest catacomb begin
state start begin
when 1093.kill with pc.get_map_index() == 66 begin
d.notice("The Devils catacomb going")
d.new_jump_all(MAPINDEX , x , y)
end

when 20092.chat."The Devils Catacomb Login" with pc.get_map_index() == 713 begin
say_title("Guard")
say("")
say("The Devils Catacomb have to be 75 to enter")
wait()
if pc.get_level() < 75 then
say("I'm Sorry Level is not enough")
end
if pc.get_level() >= 75 then
say("Ok now you go")
pc.warp(307200,1203200)
end
end

when login with pc.get_map_index() == 712 begin
d.jump_all(81,58)
say_title("The Devils Catacomb Stone 1")
say("")
say("60 Minute there is careful")
say("Go to the holy place and the stone sculpture")
pc.give_item2("seal",1)
end

when sculpture.chat."1 Floor" with pc.get_map_index() == 712 begin
say_title("The Devils Catacomb Stone 1")
say("You Are Going to")
d.jump_all(544,42)
end

when login with pc.get_map_index() == 712 begin
d.notice("Find the statue and to talk")
end

when sculpture1.chat."2 Floor" with pc.get_map_index() == 712 begin
say_title("Sacred Sculpture")
say("")
say("Hi do you get out of that floor after ")
say("")
wait()
local s = select("Yes I'm On", "No Exit")
if 1 == s then
d.jump_all(1380,250)
end
if 2 == s then
d.exit_all()
end
end

when login with pc.get_map_index() == 712 begin
d.notice("The Goal is to find the correct text")
end

function get_3floor_stone_pos()
local positions = {
{1249,343}
{1353,351}
{1249,250}
{1249,153}
{1349,150}
{1149,252}
{1152,148}
{1148,347}
}
for i = 1, 6 do
local j = number(i,8)
if i != j then
local t = positions[i];
positions[i] = positions[j];
positions[j] = t;
end
end
-- for i = 1, 8 do
-- positions[i][1] = positions[i][1] * 100
-- positions[i][2] = positions[i][2] * 100
end

when 8019.kill with pc.get_map_index() == 712 begin
local positions = catacombstone.get_3floor_stone_pos()
for i = 1, 8 do
chat(positions[i][1], positions[i][2])
d.set_unique("fake" .. i , d.spawn_mob(8017, positions[i][1], positions[i][2]))
end
chat(positions[7][1], positions[7][2])
local vid = d.spawn_mob(8017, positions[7][1], positions[7][2])
chat(vid)
d.set_unique("real", vid)
server_loop_timer('catacomb_stone3_update', 10, pc.get_map_index())
server_timer('catacomb_stone3_fail1', 5*60, pc.get_map_index())

d.notice("3. Floor option door.");
d.notice("Most of the fake stone text here");
d.notice("Find the real one in 15 minutes");
d.notice("and Destroyer !.. ")
d.notice("The is the only way to move to the front door");
end
when catacomb_stone3_fail1.server_timer begin
if d.select(get_server_timer_arg()) then
d.notice("10 Minute Remaining.")
server_timer('catacomb_stone3_fail2', 5*60, get_server_timer_arg())
end
end

when catacomb_stone3_fail2.server_timer begin
if d.select(get_server_timer_arg()) then
d.notice("5 Minute Remaining")
server_timer('catacomb_stone4_fail', 5*60, get_server_timer_arg())
end
end

when catacomb_stone3_fail.server_timer begin
if d.select(get_server_timer_arg()) then
d.notice("Time Expired")
d.exit_all()
clear_server_timer('catacomb_stone3_update', get_server_timer_arg())
end
end

when catacomb_stone3_update.server_timer begin
if d.select(get_server_timer_arg()) then
if not d.is_unique_dead("real") then
for i = 1, 8 do
if d.getf("fakedead" .. i) == 0 then
if d.unique_get_hp_perc("fake" .. i) < 50 then
d.purge_unique("fake" .. i)
d.setf("fakedead" .. i, 1)
d.notice("");
end
end
end
else
server_timer("catacomb_stone3_end", 5, get_server_timer_arg())
d.notice("Hearing ability and interior motives ")
d.notice("")
d.notice("Great text stone destroy");
d.notice("4. How come the floor")
d.jump_all(500,717)
clear_server_timer('catacomb_stone3_fail1', get_server_timer_arg())
clear_server_timer('catacomb_stone3_fail2', get_server_timer_arg())
clear_server_timer('catacomb_stone3_fail', get_server_timer_arg())
end
else
server_timer('catacomb_stone3_stop_timer', 1, get_server_timer_arg())
end
end

when catacomb_stone3_stop_timer.server_timer begin
clear_server_timer('catacomb_stone3_update', get_server_timer_arg())
end

when login with pc.get_map_index() == 712 begin
d.notice("Boss Destroy !")
d.spawn_mob(mobid , 500,787)
end

when 2526.kill with pc.get_map_index() == 712 begin
d.jump_all(846,907)
end

when login with pc.get_map_index() == 712 begin
d.notice("This is the seal room")
d.notice("Find and place the seal")
end

when 2322.kill with pc.in_dungeon() begin
game.drop_item("seal",1)
end

when stone.take with item.vnum == seal and pc.get_map_index() == 712 begin
d.notice("Next Floor")
item.remove();
npc.purge();
d.jump_all(1300,704)
end

when login with pc.get_map_index() == 712 begin
d.notice("Boss Destroy")
end

when boss.kill with pc.in_dungeon() begin
say_title("The Devils Catacomb Stone 6")
say("")
say("Hi want resumed ?")
local s = select(locale.yes , locale.no)
if 1 == s then
d.jump_all(74,1158)
end
if 2 == s then
local reward_alchemist = {20074, 20075, 20076}
d.spawn_mob(reward_alchemist[number(1,3)], 425, 216);
d.setqf("can_refine", 5)
timer("catacombs_times",120)
end
end

when catacombs_times.timer with pc.get_map_index() == 712 begin
d.notice("Time Expired")
d.exit_all()
end

when login with pc.get_map_index() == mapindex begin
d.notice("Dr.House Destroy !")
end

when 5290.kill with pc.in_dungeon() begin
wait()
say_title("The Devils Catacomb Stone 7")
say("")
say("Mission Complete !")
say("")
d.exit_all()
end
end
end [/spoiler]

Добавлено (17.07.2012, 13:49)
---------------------------------------------
Квест не переведён happy

Автор - xBORLANDx
Дата добавления - 17.07.2012 в 14:49

::Killer::5::

Дата: Среда, 18.07.2012, 01:11 | Сообщение # 2