hier die quest
die map soll heißen Farm Map und kordis sind 400 650
Code:
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 = {
{
{ 128500 , 1000 } ,
{ 179500 , 1000 } ,
{ 271800 , 13000 } ,
} ,
{
{ 402100 , 673900 } ,
{ 270400 , 739900 } ,
{ 321300 , 808000 } ,
} ,
{
{ 217800 , 627200 } ,
{ 221900 , 502700 } ,
{ 344000 , 502500 } ,
} ,
{
{ 434200 , 290600 } ,
{ 375200 , 174900 } ,
{ 491800 , 173600 } ,
} ,
{
{ 599400 , 756300 } ,
{ 597800 , 622200 } ,
{ 730700 , 689800 } ,
} ,
{
{ 590500 , 110500 } ,
{ 590500 , 110500 } ,
{ 590500 , 110500 } ,
} ,
{
{ 1.1199e+06 , 70800 } ,
{ 1.1199e+06 , 70800 } ,
{ 1.1199e+06 , 70800 } ,
} ,
{
{ 51200 , 486400 } ,
{ 51200 , 486400 } ,
{ 51200 , 486400 } ,
} ,
{
{ 553600 , 143600 } ,
{ 553600 , 143600 } ,
{ 553600 , 143600 } ,
} ,
{
{ 480800 , 1.0696e+06 } ,
{ 480800 , 1.0696e+06 } ,
{ 480800 , 1.0696e+06 } ,
} ,
{
{ 5.5555e+06 , 5.5555e+06 } ,
{ 5.5555e+06 , 5.5555e+06 } ,
{ 5.5555e+06 , 5.5555e+06 } ,
} ,
{
{ 665600 , 435200 } ,
{ 665600 , 435200 } ,
{ 665600 , 435200 } ,
} ,
{
{ 1.23457e+08 , 1.23457e+08 } ,
{ 1.23457e+08 , 1.23457e+08 } ,
{ 1.23457e+08 , 1.23457e+08 } ,
} ,
}
local sub_set = 0
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 .. " yang!" )
sub_set = select ( guild_map_name , "Tal von Seungryong" , "Yongbi-Wüste" , "Berg Sohan" , "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 .. " yang!" )
sub_set = select ( guild_map_name , "Tal von Seungryong" , "Yongbi-Wüste" , "Berg Sohan" , "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 .. " yang!" )
if is_test_server ( ) then
sub_set = select ( "Feuerland" , "Dämonenturm" , "Roter Wald" , "Spinnendungeon" , "Tempel" , "Feuerland 2" , "Weiter" , "Abbrechen" ) + 4
if sub_set == 12 then
return
end
if sub_set == 11 then
say_reward ( "Eine Reise kostet" .. cost .. " yang!" )
sub_set = select ( "Dämonenturm2" , "Weiter" , "Abbrechen" ) + 10
if sub_set == 19 then
return
end
if sub_set == 18 then
say_reward ( "Eine Reise kostet" .. cost .. " yang!" )
sub_set = select ( "Spinnendungeon2" , "Spinnendungeon3" , "Abbrechen" ) + 17
if sub_set == 24 then
return
end
end
end
else
say_reward ( "Eine Reise kostet" .. cost .. " yang!" )
sub_set = select ( "Feuerland" , "Dämonenturm" , "Roter Wald" , "Spinnendungeon" , "Tempel" , "Feuerland 2" , "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 yang!" )
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 yang!" )
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 yang!" )
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 yang!" )
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 yang!" )
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 yang!" )
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 yang!" )
return
end
pc . changegold ( - cost )
pc . warp ( 863900 , 246000 )
end
if sub_set3 == 3 then
return
end
end
end
