say ( "Hallo, " )
say ( "Ich bin der Teleporter, ich kann dich an ferne Orte teleportieren. Diese Moeglichkeit birgt allerdings auch einige Gefahren und kostet dich ein wenig Gold. Willst du dich von mir an einen anderen Ort bringen lassen?" )
local main_set = select ( "Ja" , "Nein" )
if main_set == 2 then
return
end
if pc . get_level ( ) <= 10 then
say ( "Es tut mir leid, aber mit deinem" )
say ( "derzeitigen Level würdest du die" )
say ( "Reise durch Raum und Zeit nicht überstehen." )
say ( "Komm wieder wenn du Level 10 erreicht hast." )
say ( "" )
return
end
local map = pc . get_map_index ( )
local empire = pc . get_empire ( )
local level = pc . get_level ( )
local cost = math . floor ( level / 5 ) * 1000
if cost < 1000 then
cost = 1000
end
say ( "Wohin willst du?" )
say_reward ( string . format ( "Das kostet dich, 3k-19k Gold!" ) )
say ( "" )
if map == 1 or map == 3 or map == 21 or map == 23 or map == 41 or map == 43 then
local guild_map_names = {
"Gildenzone" ,
"Gildenzone" ,
"Gildenzone" ,
}
guild_map_name = guild_map_names [ empire ]
local empire_castle = {
"Land der Zombies" ,
"Land der Zombies" ,
"Land der Zombies" ,
}
empire_castle = empire_castle [ empire ]
local sub_set = 0
if level < 60 then
sub_set = select ( guild_map_name , "Orktal" , "Wueste" , "Eisland" , empire_castle , "Ãö³¬" )
if sub_set == 6 then
return
end
else
sub_set = select ( guild_map_name , "Orktal" , "Wueste" , "Eisland" , "Land der Zombies" , "Weiter" )
if sub_set == 6 then
say ( "Wenn du Level 60 erreicht hast kannst du dich in folgende Gebiete teleportieren:" )
say_reward ( string . format ( "Das kostet dich, 3k-19k Gold." ) )
say ( "" )
sub_set = select ( "Feuerland" , "Daemonen-Turm" , "Roter Wald" , "Zin-Grotte" , "Zurueck" , "Ende" ) + 5
if sub_set == 11 then
return
end
if sub_set == 10 then
say ( "Waehle einen Ort: " )
say_reward ( string . format ( "Das kostet dich, 3k-19k Gold." ) )
say ( "" )
sub_set = select ( guild_map_name , "Orktal" , "Wueste" , "Eisland" , "Land der Zombies" , "Weiter" )
if sub_set == 6 then
say ( "Wenn du Level 60 erreicht hast kannst du dich in folgende Gebiete teleportieren:" )
say ( "" )
say_reward ( string . format ( "Das kostet dich, 3k-19k Gold." ) )
say ( "" )
sub_set = select ( "Feuerland" , "Daemonen-Turm" , "Roter Wald" , "Zin-Grotte" , "Ende" ) + 5
if sub_set == 11 then
return
end
end
end
end
end
if pc . gold < cost then
say ( "Es tut mir lied," )
say ( "aber ich kann dich" )
say ( "nicht umsonst teleportieren." )
say ( "Bring bitte mehr Yang mit," )
say ( "wenn du reisen möchtest." )
say_reward ( string . format ( "Du benötigst mindestens %d Yang" , cost ) )
say ( "" )
return
end
pc . changegold ( - cost )
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 } ,
} ,
{
{ 977200 , 185000 } ,
{ 977200 , 185000 } ,
{ 977200 , 185000 } ,
} ,
{
{ 599400 , 756300 } ,
{ 597800 , 622200 } ,
{ 730700 , 689800 } ,
} ,
{
{ 590500 , 110500 } ,
{ 590500 , 110500 } ,
{ 590500 , 110500 } ,
} ,
{
{ 1119700 , 70000 } ,
{ 1119700 , 70000 } ,
{ 1119700 , 70000 } ,
} ,
{
{ 10000 , 1207800 } ,
{ 10000 , 1207800 } ,
{ 10000 , 1207800 } ,
} ,
}
test_chat ( warp [ sub_set ] [ empire ] [ 1 ] .. warp [ sub_set ] [ empire ] [ 2 ] )
say ( "Vielen Dank," )
say ( "es hat mich gefreut mit dir zu verhandeln." )
say ( "Bitte warte einen Augenblick..." )
say ( "Ich hoffe wir sehen uns wieder." )
wait ( )
pc . warp ( warp [ sub_set ] [ empire ] [ 1 ] , warp [ sub_set ] [ empire ] [ 2 ] )
else
local sub_set2 = 3
if empire == 1 then
sub_set2 = select ( "Yongan" , "Jayang" , locale . cancel )
elseif empire == 2 then
sub_set2 = select ( "Joan" , "Bokjung" , locale . cancel )
elseif empire == 3 then
sub_set2 = select ( "Pyungmoo" , "Bakra" , locale . cancel )
end
if sub_set2 ~= 3 then
if pc . gold < cost then
say ( "Es tut mir Leid," )
say ( "aber ich kann dich nicht für umsonst" )
say ( "teleportieren." )
say ( "Schließlich muss ich auch von etwas leben." )
say ( "Bring bitte mehr Geld mit." )
say_reward ( string . format ( "²¾°Ê¶O¥Î¬O %d ¨â" , cost ) )
say ( "" )
else
if sub_set2 == 1 then
say ( "ªÅ¶¡²¾°Ê³N®v:" )
say ( "§Ú²{¦b´N¶Ç°e§A." )
wait ( )
if empire == 1 then
pc . warp ( 474300 , 954800 )
elseif empire == 2 then
pc . warp ( 63800 , 166400 )
elseif empire == 3 then
pc . warp ( 959900 , 269200 )
end
elseif sub_set2 == 2 then
say ( "Test" )
say ( "§Ú²{¦b´N¶Ç°e§A." )
say ( "" )
say ( "" )
wait ( )
if empire == 1 then
pc . warp ( 353100 , 882900 )
elseif empire == 2 then
pc . warp ( 145500 , 240000 )
elseif empire == 3 then
pc . warp ( 863900 , 246000 )
end
end
pc . changegold ( - cost )
end
end
end
Bitteschön