elite*gold: 0 
Join Date: Oct 2008
Posts: 538
Received Thanks: 158
|
Neuer-Tele-Script
Kann mir einer mal kurz helfen ...
Ich will ein neuen Port beim tele porter hinzufügen aber ich mach immer was falsch ...
danach kann man den teleporter nicht mehr anklicken ....
Was und wo muss ich eingeben wenn ich den port 832,0 (83200,0) einfügen will ?
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 ( "Gildenzone" )
say ( "Orktal" )
say ( "Wueste" )
say ( "Eisland" )
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 = {
"Rote Burg" ,
"Chunjo Burg" ,
"Jinno Burg" ,
}
empire_castle = empire_castle [ empire ]
local sub_set = 0
if level < 60 then
sub_set = select ( guild_map_name , "Test1" , "Test2" , "Test3" , empire_castle , "Ãö³¬" )
if sub_set == 6 then
return
end
else
sub_set = select ( guild_map_name , "Orktal" , "Wueste" , "Eisland" , "Burg" , "Weiter" )
if sub_set == 6 then
say ( "Wenn du Level 60 erreicht hast kannst ich doch in folgende Gebiete teleportieren:" )
say_reward ( string . format ( "Das kostet dich, 3k-19k Gold." ) )
say ( "" )
sub_set = select ( "Feuerland" , "Daemonen-Turm" , "Zurueck" , "Ende" ) + 5
if sub_set == 9 then
return
end
if sub_set == 8 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" , "Burg-Chunjo" , "Weiter" )
if sub_set == 6 then
say ( "Wenn du Level 60 erreicht hast kannst ich doch in folgende Gebiete teleportieren:" )
say ( "" )
say_reward ( string . format ( "Das kostet dich, 3k-19k Gold." ) )
say ( "" )
sub_set = select ( "Feuerland" , "Daemonen-Turm" , "Ende" ) + 5
if sub_set == 8 then
return
end
end
end
end
end
if pc . gold < cost then
say ( "Weitere Orte:" )
say ( "Orktal" )
say ( "Test" )
say ( "Test2" )
say ( "¥@¬É¤W¥ô¦óªº¨Æ±¡³£»Ý*n¥I¿ú§a." )
say_reward ( string . format ( "²¾°Ê¶O¥Î¬O %d ¨â" , 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 } ,
} ,
{
{ 975200 , 133000 } ,
{ 977200 , 185000 } ,
{ 923900 , 183600 } ,
} ,
{
{ 599400 , 756300 } ,
{ 597800 , 622200 } ,
{ 730700 , 689800 } ,
} ,
{
{ 590500 , 110500 } ,
{ 590500 , 110500 } ,
{ 590500 , 110500 } ,
} ,
}
test_chat ( warp [ sub_set ] [ empire ] [ 1 ] .. warp [ sub_set ] [ empire ] [ 2 ] )
say ( "ªÅ¶¡²¾°Ê³N®v:" )
say ( "§Ú²{¦b´N¶Ç°e§A." )
say ( "¦ý¬O§A²¾°Ê¨ì¾Ô±Nªº¤¤¶¡.." )
say ( "§A*n«O*«...¦A¨£.." )
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 ( "Willst du mit mir reden?" , "Zurueck" , locale . cancel )
elseif empire == 2 then
sub_set2 = select ( "Willst du mit mir reden?", "Zurueck" , locale . cancel )
elseif empire == 3 then
sub_set2 = select ( "Willst du mit mir reden?" , "Zurueck" , locale . cancel )
end
if sub_set2 ~= 3 then
if pc . gold < cost then
say ( "ªÅ¶¡²¾°Ê³N®v:" )
say ( "§Ú¤]·QÀ°§A§K¶O²¾°Ê" )
say ( "¦ý¬O§Ú*n¾i§Úªº®a¤H." )
say ( "©Ò¥H§Ú¥²¶·*n¦¬²¾°Ê¶O" )
say ( "¥@¬É¤W¥ô¦óªº¨Æ±¡³£»Ý*n¥I¿ú§a." )
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
|
