say_title ( "Teleportar: " )
say ( "Eu Levo-te Para Onde Desejares" )
say ( "como é lógico precisas de pagar" )
say ( "entre outras coisas..." )
say ( "Sempre queres viajar?" )
local main_set = select ( "Sim" , "Não" )
if main_set == 2 then
return
end
if pc . get_level ( ) <= 10 then
say_title ( "Teleportador: " )
say ( "Não Podes Viajar Tens De Ser" )
say ( "Do LvL 10 Para Cima." )
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_title ( "Teleportar:" )
say ( "Para Onde Desejas Ir?" )
say_reward ( string . format ( "Custa %d Yang" , cost ) )
if map == 1 or map == 3 or map == 21 or map == 23 or map == 41 or map == 43 then
local guild_map_names = {
"Área Jungrang" ,
"Área Waryong" ,
"Área Imha" ,
}
guild_map_name = guild_map_names [ empire ]
local empire_castle = {
"Área Do Reino" ,
"Área Do Reino" ,
"Área Do Reino" ,
}
empire_castle = empire_castle [ empire ]
local sub_set = 0
if level < 60 then
sub_set = select ( guild_map_name , "Vale Seungryong" , "Deserto Yongbi" , "Montanha Sohan" , empire_castle , "Fechar" )
if sub_set == 6 then
return
end
else
sub_set = select ( guild_map_name , "Vale Seungryong" , "Deserto Yongbi" , "Montanha Sohan" , empire_castle , "Página Seguinte" )
if sub_set == 6 then
say_title ( "Teleportador: " )
say ( "Agora Que és Level 60 para cima podes ir para outros mapas" )
say ( "Mais adequados para o teu Level." )
say_reward ( string . format ( "Custa %d Yang." , cost ) )
sub_set = select ( "Terra Do Fogo" , "Entrada Da Torre Dos Demónios" , "Floresta Dos Fantasmas" , "Bosque Rubro" , "Voltar Atrás" , "Sair" ) + 5
if sub_set == 11 then
return
end
if sub_set == 10 then
say_title ( "Teleportador:" )
say ( "Volta A Escolher Para onde desejas ir." )
say ( "estás há vontade demora o tempo que que for preciso." )
say_reward ( string . format ( "Custa %d Yang" , cost ) )
say ( "Escolhe O Destino A Tomar." )
sub_set = select ( guild_map_name , "Vale Seungryong" , "Deserto Yongbi" , "Montanha Sohan" , empire_castle , "Página Seguinte" )
if sub_set == 6 then
say_title ( "Teleportador:" )
say ( "Agora És de Level 60 Para Cima," )
say ( "Podes Escolher Novos Caminhos" )
say ( "Novos Mapas Para Upar." )
say ( "Achas que estás preparado?" )
say ( "Descobre por Ti mesmo..." )
say_reward ( string . format ( "Custa %d Yang" , cost ) )
sub_set = select ( "Terra Do Fogo" , "Entrada Da Torre Dos Demónios" , "Floresta Dos Fantasmas" , "Bosque Rubro" , "Sair" ) + 5
if sub_set == 10 then
return
end
end
end
end
end
if pc . gold < cost then
say_title ( "Teleportador: " )
say ( "Desculpa Não Te Vou Poder Teleportar " )
say ( "Estás Falido aqui no KimiMT2." )
say ( "Vai Matar Bichinhos ;)" )
say ( "Até Mais Tarde." )
say_reward ( string . format ( "Precisas De: %d Yang Para Te Teleportares." , cost ) )
return
end
pc . changegold ( - cost )
local warp = {
{
{ 135600 , 4300 } ,
{ 179500 , 1000 } ,
{ 271800 , 13000 } ,
} ,
{
{ 402100 , 673900 } ,
{ 270400 , 739900 } ,
{ 321300 , 808000 } ,
} ,
{
{ 217800 , 627200 } ,
{ 221900 , 502700 } ,
{ 344000 , 502500 } ,
} ,
{
{ 434200 , 290600 } ,
{ 375200 , 174900 } ,
{ 491800 , 173600 } ,
} ,
{
{ 975200 , 133000 } ,
{ 977200 , 185000 } ,
{ 923900 , 183600 } ,
} ,
{
{ 599400 , 756300 } ,
{ 597800 , 622200 } ,
{ 730700 , 689800 } ,
} ,
{
{ 590500 , 110500 } ,
{ 590500 , 110500 } ,
{ 590500 , 110500 } ,
} ,
{
{ 288700 , 5700 } ,
{ 288700 , 5700 } ,
{ 288700 , 5700 } ,
} ,
{
{ 1.1199e+06 , 70800 } ,
{ 1.1199e+06 , 70800 } ,
{ 1.1199e+06 , 70800 } ,
} ,
}
test_chat ( warp [ sub_set ] [ empire ] [ 1 ] .. warp [ sub_set ] [ empire ] [ 2 ] )
say_title ( "Teleportar Com Sucesso: " )
say ( "Boa Sorte Vais Ser Teleportado" )
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_title ( "Iþýnlayýcý: " )
say ( "Seni ücretsizde ýþýnlayabilirim," )
say ( "fakat büyük bir ailem var." )
say ( "Onlara bakabilmek için" )
say ( "para kazanmalýyým." )
say_reward ( string . format ( "Precisas De: %d Yang Para Te Teleportares." , cost ) )
else
if sub_set2 == 1 then
say_title ( "Teleportador: " )
say ( "Vais Ser Teleportado." )
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_title ( "Teleportador: " )
say ( "Vais Ser Teleportado." )
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
