Quest:
PHP Code:
quest map_warp begin
state start begin
when 9012.chat."Teleportieren" begin
-- Variablen Start
local map = pc.get_map_index()
local empire = pc.get_empire()
local level = pc.get_level()
local cost = math.floor(level / 5) * 1000
local guild_map_names = {"Jungrang","Waryong","Imha",}
guild_map_name = guild_map_names[empire]
local empire_castle={"Rote Burg","Gelbe Burg","Blaue Burg",}
empire_castle = empire_castle[empire]
local warp = {
-- guild_map
{
{ 128500, 1000 },
{ 179500, 1000 },
{ 271800, 13000 },
},
-- 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
{
{ 599400, 756300 },
{ 597800, 622200 },
{ 730700, 689800 },
},
-- devil_tower
{
{ 590500, 110500 },
{ 590500, 110500 },
{ 590500, 110500 },
},
-- red_forest
{
{ 1119900, 70800 },
{ 1119900, 70800 },
{ 1119900, 70800 },
},
--tempel
{
{ 553600, 143600 },
{ 553600, 143600 },
{ 553600, 143600 },
},
-- spider
{
{ 85000, 525000 },
{ 85000, 525000 },
{ 85000, 525000 },
},
--sd2
{
{ 665600, 435200 },
{ 665600, 435200 },
{ 665600, 435200 },
},
--sd3
{
{ 123456700, 123456700 },
{ 123456700, 123456700 },
{ 123456700, 123456700 },
},
}
local sub_set = 0
--Veriablen End
say_title("Teleportieren")
if map == 1 or map == 3 or map == 21 or map == 23 or map == 41 or map == 43 then
say("Hier gibt es keine Starken Monster..")
say("Jedoch gibt es viele andere Regionen,")
say("in denen es viele, neue und starke")
say("Monster gibt..")
say("")
say_reward("Nungut, soll ich dich teleportieren?")
else
say("Anscheinend sind die Monster zustark")
say("für dich..")
say("Oder du möchtest dir einfach neue Tränke kaufen..")
say("")
say_reward("Nungut, möchtest du zurück in die Stadt?")
end
local s = select("Teleportieren","Schließen")
if s == 2 then
return
end
say_title("Teleportieren")
if map == 1 or map == 3 or map == 21 or map == 23 or map == 41 or map == 43 then
if level < 60 then
say("Da dein Level noch sehr niedrig ist,")
say("kannst du erst in einige Gebiete Reisen..")
say_reward("Eine Reise kostet" ..cost.." Gold!")
sub_set = select(guild_map_name, "Orktal","Wüste", "Eisland","Abbrechen")
if sub_set == 5 then
return
end
else
say("Da dein Level schon recht hoch ist,")
say("kann ich dich auch auf neue Regionen")
say("Teleportieren..")
say_reward("Eine Reise kostet" ..cost.." Gold!")
sub_set = select(guild_map_name, "Orktal", "Wüste", "Eisland","Weiter", "Abbrechen")
if sub_set == 6 then
return
end
if sub_set == 5 then
say_title("Teleportieren")
say("Dies sind die schweren Regionen..")
say_reward("Eine Reise kostet" ..cost.." Gold!")
if is_test_server() then
sub_set = select("Feuerland", "Dämonenturm","Roter Wald", "Tempel", "Spinnendungeon", "Spinnendungeon2", "Spinnendungeon3", "Abbrechen") + 4
if sub_set == 14 then
return
end
end
end
end
if pc.get_gold() < cost then
say_title("Teleportiern")
say_reward("Du hast zuwenig Gold!")
return
end
pc.changegold(-cost)
pc.warp(warp[sub_set][empire][1], warp[sub_set][empire][2])
else
if empire== 1 then
sub_set3 = select("Yongan","Jayang", "Abbrechen")
if sub_set3 == 1 then
if pc.get_gold() < cost then
say_title("Teleportiern")
say_reward("Du hast zuwenig Gold!")
return
end
pc.changegold(-cost)
pc.warp(474300,954800)
end
if sub_set3 == 2 then
if pc.get_gold() < cost then
say_title("Teleportiern")
say_reward("Du hast zuwenig Gold!")
return
end
pc.changegold(-cost)
pc.warp(353100,882900)
end
if sub_set3 == 3 then
return
end
elseif empire == 2 then
local sub_set3 = select("Joan","Bokjung", "Abbrechen")
if sub_set3 == 1 then
if pc.get_gold() < cost then
say_title("Teleportiern")
say_reward("Du hast zuwenig Gold!")
return
end
pc.changegold(-cost)
pc.warp(63800,166400)
end
if sub_set3 == 2 then
if pc.get_gold() < cost then
say_title("Teleportiern")
say_reward("Du hast zuwenig Gold!")
return
end
pc.changegold(-cost)
pc.warp(145500,240000)
end
if sub_set3 == 3 then
return
end
elseif empire == 3 then
local sub_set3 = select("Pyungmoo","Bakra", "Abbrechen")
if sub_set3 == 1 then
if pc.get_gold() < cost then
say_title("Teleportiern")
say_reward("Du hast zuwenig Gold!")
return
end
pc.changegold(-cost)
pc.warp(959900,269200)
end
if sub_set3 == 2 then
if pc.get_gold() < cost then
say_title("Teleportiern")
say_reward("Du hast zuwenig Gold!")
return
end
pc.changegold(-cost)
pc.warp(863900,246000)
end
if sub_set3 == 3 then
return
end
end
end
end
end
end