["Berg Sohan#1"] = {["x"] = 4342, ["y"] = 2906, ["empire"] = 1},
["Berg Sohan#2"] = {["x"] = 3752, ["y"] = 1749, ["empire"] = 2},
["Berg Sohan#3"] = {["x"] = 4918, ["y"] = 1736, ["empire"] = 3},
},
},
["Dungeons"] = {
["minlvl"] = 40,
["subs"] = {
["Doyyumhwaji#1"] = {["x"] = 5994, ["y"] = 7563, ["empire"] = 1},
["Doyyumhwaji#2"] = {["x"] = 5978, ["y"] = 6222, ["empire"] = 2},
["Doyyumhwaji#3"] = {["x"] = 7307, ["y"] = 6898, ["empire"] = 3},
["Geisterwald"] = {["x"] = 2887, ["y"] = 57, ["minlvl"] = 60},
["Roter Wald"] = {["x"] = 11199, ["y"] = 708, ["minlvl"] = 80},
["Land der Riesen"] = {["x"] = 8451, ["y"] = 7459},
["Daemonenturm"] = {["x"] = 5905, ["y"] = 1105, ["empire"] = 3},
["Spinnendungeon"] = {["x"] = 600, ["y"] = 4960},
},
},
}
-- Ab hier nichts mehr Ändern.
local wp = {}
-- Kategorien
local function create_list(nm,index)
table.foreach((index or warptab),
function(i,l)
local x = (nm or '')..'#/'..i
--print(i,x)
if l.subs ~= nil then
create_list(x,l.subs)
wp[x] = {["type"] = "kat"}
else
wp[x] = l
wp[x]["type"] = "warp"
wp[x]["kat"] = (nm or '')
end
end
)
end
--Erstelle Liste der vorhandenen Warps
create_list()
local function show_menu(id,kat)
local index = id or 1
-- Funktionen START
local function count(str,del)
local out = 0
for i in string.gfind(str,del) do
out = out+1
end
return out
end
local function trim(str)
str = string.gsub(str,'.-#/','',index)
return str
end
-- Funktionen ENDE
-- Erstellen der Warpliste f??elect2
local wl,co = {
["list"] = {},
["data"] = {},
},1
table.sort(wp)
table.foreach(wp,
function(i,l)
if count(i,'.-#/') == index then
local function cc()
-- Da es viele If's sind, nicht extra eingerückt
if l.empire == nil or l.empire == pc.get_empire() then
if l.maxlvl == nil or pc.get_level() <= l.maxlvl then
if l.minlvl == nil or pc.get_level() >= l.minlvl then
if l.minalign == nil or pc.get_real_alignment() >= l.minalign then
if l.maxalign == nil or pc.get_real_alignment() <= l.maxalign then
if l.eventflag == nil or game.get_event_flag(l.eventflag) == 1 then
if l.is_gm == nil or pc.is_gm() == l.is_gm then
if l.type == "kat" then
local str = '> '..(string.gsub(trim(i),'#%d+',''))..' <'
wl.list[co] = str
wl.data[str] = l
wl.data[str]["name"] = i
else
local str = (string.gsub(trim(i),'#%d+',''))
wl.list[co] = str
wl.data[str] = l
end
co = co+1
end -- gamemaster
end -- eventflag
end -- maxalign
end -- minalign
end -- minlvl
end -- maxlvl
end -- empire
-- if Block ende
end
if index == 1 then
cc()
elseif kat ~= nil and string.sub(i,1,string.len(kat)) == kat then
cc()
end
end
end
)
-- Ausgabe
table.sort(wl.list)
table.insert(wl.list,1,8)
if index ~= 1 then
table.insert(wl.list,'Zurück')
end
table.insert(wl.list,'Abbrechen')
local sel = select2(wl.list)
if sel == table.getn(wl.list) then return end
if index ~= 1 and sel == table.getn(wl.list)-1 then
local nextkat = function()
local t,out = split(kat,'#/'),''
table.foreach(t,
function(i,l)
if i < table.getn(t) and i > 1 then
out = out..'#/'..l
end
end
)
return out
end
show_menu(index-1,nextkat())
return
end
if wl.data[wl.list[sel]]["type"] == "kat" then
show_menu(index+1, wl.data[wl.list[sel]]["name"],kat or nil)
return
else
pc.warp(wl.data[wl.list[sel]]["x"]*100,wl.data[wl.list[sel]]["y"]*100)
end
end
show_menu()
end
end
end
make and say sh make.sh and now can't open item 70042?
teleport ring 10/07/2010 - Metin2 Private Server - 1 Replies how I create a ring wich can teleport me? like the old man
Teleport Ring 07/17/2010 - Metin2 PServer Guides & Strategies - 14 Replies moin ,
ich hab mal den Tele ring der einen zur Safe zone bringt erweitert.
Ist man auf map1/2 werden die Gebiete wie auf bild "unbenannt1/unbenannt2" angezeigt .Ist man auf einer anderen Map werden die gebiete wie auf bild "unbenannt4" angezeigt.Ab Level 60 kann man "Andere Gebiete" auswählen. Das porten kostet kein yang.
Item Id : 80009
move_ring.quest :
Metin2 teleport ring 04/03/2010 - Metin2 Private Server - 5 Replies Ich suche ein guid zum Teleport ring.
Ich habe 2 stück auf elitepvpers. aber beide funktionieren leider nicht!
Vielleicht kann ja hier einer die FUNKTIONIERENDE quest posten.
Gibt thanks. Danke jetzt schon.
WTS Barom Ring / Guardimesh Neck / Blode Ring / Pargon Ring 06/18/2009 - Archlord Trading - 9 Replies Im thinking about selling my Barom/Blode/Pargon Ring and my Guardimesh Neck.
Please leave your offers here or write me a PM.
All on Evengarda