forked from metin-server/m2dev-server
issue-5: add teleport quest system
This commit is contained in:
server
@@ -53,6 +53,7 @@ collect_herb_lv25.quest
|
||||
collect_herb_lv4.quest
|
||||
collect_herb_lv7.quest
|
||||
biolog_system.quest
|
||||
teleport_system.quest
|
||||
couple_ring.quest
|
||||
cube.quest
|
||||
deviltower_zone.quest
|
||||
|
||||
336
share/locale/english/quest/teleport_system.quest
Normal file
336
share/locale/english/quest/teleport_system.quest
Normal file
@@ -0,0 +1,336 @@
|
||||
quest teleport_system begin
|
||||
state start begin
|
||||
function get_base_slot_count()
|
||||
return 3
|
||||
end
|
||||
|
||||
function get_vip_slot_count()
|
||||
return 5
|
||||
end
|
||||
|
||||
function get_cooldown_seconds()
|
||||
return 30
|
||||
end
|
||||
|
||||
function has_vip_slots()
|
||||
return pc.get_premium_remain_sec(PREMIUM_GOLD) > 0
|
||||
end
|
||||
|
||||
function get_max_slot_count()
|
||||
if teleport_system.has_vip_slots() then
|
||||
return teleport_system.get_vip_slot_count()
|
||||
end
|
||||
|
||||
return teleport_system.get_base_slot_count()
|
||||
end
|
||||
|
||||
function get_restricted_maps()
|
||||
return {
|
||||
[71] = true,
|
||||
[72] = true,
|
||||
[73] = true,
|
||||
[104] = true,
|
||||
[113] = true,
|
||||
[200] = true,
|
||||
[208] = true,
|
||||
[301] = true,
|
||||
}
|
||||
end
|
||||
|
||||
function is_map_restricted(map_index)
|
||||
if map_index == nil or map_index <= 0 then
|
||||
return true
|
||||
end
|
||||
|
||||
if map_index > 10000 then
|
||||
return true
|
||||
end
|
||||
|
||||
return teleport_system.get_restricted_maps()[map_index] == true
|
||||
end
|
||||
|
||||
function can_use_now()
|
||||
if false == pc.can_warp() then
|
||||
return false, "Teleport is blocked right now."
|
||||
end
|
||||
|
||||
local map_index = pc.get_map_index()
|
||||
if pc.in_dungeon() or teleport_system.is_map_restricted(map_index) then
|
||||
return false, "You cannot use teleport on this map."
|
||||
end
|
||||
|
||||
if pc.getqf("cooldown_end") > get_time() then
|
||||
return false, "Teleport is on cooldown."
|
||||
end
|
||||
|
||||
return true, ""
|
||||
end
|
||||
|
||||
function get_saved_map(slot)
|
||||
return pc.getqf("slot_" .. slot .. "_map")
|
||||
end
|
||||
|
||||
function get_saved_x(slot)
|
||||
return pc.getqf("slot_" .. slot .. "_x")
|
||||
end
|
||||
|
||||
function get_saved_y(slot)
|
||||
return pc.getqf("slot_" .. slot .. "_y")
|
||||
end
|
||||
|
||||
function has_saved_slot(slot)
|
||||
return teleport_system.get_saved_map(slot) > 0
|
||||
and teleport_system.get_saved_x(slot) > 0
|
||||
and teleport_system.get_saved_y(slot) > 0
|
||||
end
|
||||
|
||||
function get_saved_slot_count()
|
||||
local count = 0
|
||||
for slot = 1, teleport_system.get_vip_slot_count() do
|
||||
if teleport_system.has_saved_slot(slot) then
|
||||
count = count + 1
|
||||
end
|
||||
end
|
||||
|
||||
return count
|
||||
end
|
||||
|
||||
function clear_slot(slot)
|
||||
pc.setqf("slot_" .. slot .. "_map", 0)
|
||||
pc.setqf("slot_" .. slot .. "_x", 0)
|
||||
pc.setqf("slot_" .. slot .. "_y", 0)
|
||||
end
|
||||
|
||||
function get_empire_preset(id)
|
||||
local empire = pc.get_empire()
|
||||
local presets = {
|
||||
[1] = {
|
||||
name = "First Village",
|
||||
coords = {
|
||||
[1] = { x = 474300, y = 954800 },
|
||||
[2] = { x = 63800, y = 166400 },
|
||||
[3] = { x = 959900, y = 269200 },
|
||||
},
|
||||
},
|
||||
[2] = {
|
||||
name = "Second Village",
|
||||
coords = {
|
||||
[1] = { x = 353100, y = 882900 },
|
||||
[2] = { x = 145500, y = 240000 },
|
||||
[3] = { x = 863900, y = 246000 },
|
||||
},
|
||||
},
|
||||
[3] = {
|
||||
name = "Valley",
|
||||
coords = {
|
||||
[1] = { x = 402100, y = 673900 },
|
||||
[2] = { x = 270400, y = 739900 },
|
||||
[3] = { x = 321300, y = 808000 },
|
||||
},
|
||||
},
|
||||
[4] = {
|
||||
name = "Desert",
|
||||
coords = {
|
||||
[1] = { x = 217800, y = 627200 },
|
||||
[2] = { x = 221900, y = 502700 },
|
||||
[3] = { x = 344000, y = 502500 },
|
||||
},
|
||||
},
|
||||
[5] = {
|
||||
name = "Sohan",
|
||||
coords = {
|
||||
[1] = { x = 434200, y = 290600 },
|
||||
[2] = { x = 375200, y = 174900 },
|
||||
[3] = { x = 491800, y = 173600 },
|
||||
},
|
||||
},
|
||||
[6] = {
|
||||
name = "Fireland",
|
||||
coords = {
|
||||
[1] = { x = 599400, y = 756300 },
|
||||
[2] = { x = 597800, y = 622200 },
|
||||
[3] = { x = 730700, y = 689800 },
|
||||
},
|
||||
},
|
||||
[7] = {
|
||||
name = "Devil Tower",
|
||||
coords = {
|
||||
[1] = { x = 590500, y = 110500 },
|
||||
[2] = { x = 590500, y = 110500 },
|
||||
[3] = { x = 590500, y = 110500 },
|
||||
},
|
||||
},
|
||||
[8] = {
|
||||
name = "Heavens Cave",
|
||||
coords = {
|
||||
[1] = { x = 287800, y = 799700 },
|
||||
[2] = { x = 275500, y = 800000 },
|
||||
[3] = { x = 277000, y = 788000 },
|
||||
},
|
||||
},
|
||||
}
|
||||
|
||||
local preset = presets[id]
|
||||
if preset == nil then
|
||||
return nil
|
||||
end
|
||||
|
||||
local coords = preset.coords[empire]
|
||||
if coords == nil then
|
||||
return nil
|
||||
end
|
||||
|
||||
return {
|
||||
name = preset.name,
|
||||
x = coords.x,
|
||||
y = coords.y,
|
||||
}
|
||||
end
|
||||
|
||||
function start_cooldown()
|
||||
pc.setqf("cooldown_end", get_time() + teleport_system.get_cooldown_seconds())
|
||||
end
|
||||
|
||||
function refresh_tracker()
|
||||
send_letter("Teleport System")
|
||||
q.set_title("Teleport System")
|
||||
q.set_counter_name("Saved / " .. teleport_system.get_max_slot_count())
|
||||
q.set_counter_value(teleport_system.get_saved_slot_count())
|
||||
|
||||
local cooldown = pc.getqf("cooldown_end") - get_time()
|
||||
if cooldown > 0 then
|
||||
q.set_clock("Cooldown", cooldown)
|
||||
else
|
||||
q.set_clock_name("")
|
||||
end
|
||||
|
||||
q.start()
|
||||
end
|
||||
|
||||
function show_status_dialog()
|
||||
local cooldown = pc.getqf("cooldown_end") - get_time()
|
||||
if cooldown < 0 then
|
||||
cooldown = 0
|
||||
end
|
||||
|
||||
say_title("Teleport System")
|
||||
say("Use the HUD teleport button near the minimap.")
|
||||
say("")
|
||||
say_reward(string.format("Saved slots: %d / %d", teleport_system.get_saved_slot_count(), teleport_system.get_max_slot_count()))
|
||||
|
||||
if cooldown > 0 then
|
||||
say_reward(string.format("Cooldown: %d seconds", cooldown))
|
||||
else
|
||||
say_reward("Cooldown: Ready")
|
||||
end
|
||||
end
|
||||
|
||||
function handle_save(slot)
|
||||
if slot < 1 or slot > teleport_system.get_max_slot_count() then
|
||||
syschat("This slot is locked.")
|
||||
return
|
||||
end
|
||||
|
||||
local map_index = pc.get_map_index()
|
||||
if false == pc.can_warp() then
|
||||
syschat("Teleport is blocked right now.")
|
||||
return
|
||||
end
|
||||
|
||||
if pc.in_dungeon() or teleport_system.is_map_restricted(map_index) then
|
||||
syschat("This map cannot be saved.")
|
||||
return
|
||||
end
|
||||
|
||||
pc.setqf("slot_" .. slot .. "_map", map_index)
|
||||
pc.setqf("slot_" .. slot .. "_x", pc.get_x())
|
||||
pc.setqf("slot_" .. slot .. "_y", pc.get_y())
|
||||
syschat(string.format("Saved current position to slot %d.", slot))
|
||||
end
|
||||
|
||||
function handle_saved_warp(slot)
|
||||
if slot < 1 or slot > teleport_system.get_max_slot_count() then
|
||||
syschat("This slot is locked.")
|
||||
return
|
||||
end
|
||||
|
||||
if not teleport_system.has_saved_slot(slot) then
|
||||
syschat("This slot is empty.")
|
||||
return
|
||||
end
|
||||
|
||||
local can_use, err = teleport_system.can_use_now()
|
||||
if not can_use then
|
||||
syschat(err)
|
||||
return
|
||||
end
|
||||
|
||||
local map_index = teleport_system.get_saved_map(slot)
|
||||
if teleport_system.is_map_restricted(map_index) then
|
||||
syschat("This saved position is no longer available.")
|
||||
teleport_system.clear_slot(slot)
|
||||
return
|
||||
end
|
||||
|
||||
teleport_system.start_cooldown()
|
||||
pc.warp_local(map_index, teleport_system.get_saved_x(slot), teleport_system.get_saved_y(slot))
|
||||
end
|
||||
|
||||
function handle_preset_warp(preset_id)
|
||||
local preset = teleport_system.get_empire_preset(preset_id)
|
||||
if preset == nil then
|
||||
syschat("Unknown teleport preset.")
|
||||
return
|
||||
end
|
||||
|
||||
local can_use, err = teleport_system.can_use_now()
|
||||
if not can_use then
|
||||
syschat(err)
|
||||
return
|
||||
end
|
||||
|
||||
teleport_system.start_cooldown()
|
||||
pc.warp(preset.x, preset.y)
|
||||
end
|
||||
|
||||
function handle_remote_action()
|
||||
local action = pc.getqf("remote_action")
|
||||
local arg = pc.getqf("remote_arg")
|
||||
|
||||
pc.setqf("remote_action", 0)
|
||||
pc.setqf("remote_arg", 0)
|
||||
|
||||
if action == 1 then
|
||||
teleport_system.handle_save(arg)
|
||||
elseif action == 2 then
|
||||
teleport_system.handle_saved_warp(arg)
|
||||
elseif action == 3 then
|
||||
teleport_system.handle_preset_warp(arg)
|
||||
end
|
||||
end
|
||||
|
||||
when login or enter begin
|
||||
teleport_system.refresh_tracker()
|
||||
end
|
||||
|
||||
when letter begin
|
||||
teleport_system.refresh_tracker()
|
||||
end
|
||||
|
||||
when button begin
|
||||
if pc.getqf("remote_action") != 0 then
|
||||
teleport_system.handle_remote_action()
|
||||
teleport_system.refresh_tracker()
|
||||
return
|
||||
end
|
||||
|
||||
teleport_system.show_status_dialog()
|
||||
teleport_system.refresh_tracker()
|
||||
end
|
||||
|
||||
when info begin
|
||||
teleport_system.show_status_dialog()
|
||||
teleport_system.refresh_tracker()
|
||||
end
|
||||
end
|
||||
end
|
||||
Reference in New Issue
Block a user