["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() <= 255.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
quest warpring begin
state start begin
when 70007.use with pc.get_level() >= 10 begin
say_title("Ring:")
say("Möchtest du teleportiert werden?")
say("Es kostet dich 10000 Yang")
local main_set = select("Ja","Nein")
if main_set == 2 then
return
end
if main_set == 1 and pc.get_level() < 10 then
say_title("Ring:")
say("Hm… Mit deinem derzeitigen Level bist du noch")
say("zu schwach für die Reise durch Zeit und Raum.")
say("Komm wieder, wenn du höher als Level 10 bist.")
end
if main_set == 1 and pc.get_gold() < 10000 then
say_title("Ring":)
say("Du hast nicht genug Yang um teleportiert zu werden")
say("Komm wieder wenn du genug Yang hast")
end
if main_set == 1 and pc.get_gold() >= 10000 and pc.get_level() >= 10 then
local sub_set = select("Blaues Reich", "Rotes Reich", "Gelbes Reich","Abbrechen")
if sub_set == 4 then
return
end
elseif sub_set == 1 then
pc.warp(969600, 278400)
elseif sub_set == 2 then
pc.warp(469300, 964200)
elseif sub_set == 3 then
pc.warp(55700, 157900)
end
else
pc.remove_item(70007, 1)
pc.change_money(-10000)
end
end
end
end
end
oder
Code:
quest warpring begin
state start begin
when 70007.use begin
say_title("Warpring")
say("Wohin möchtest du Teleportiert werden?")
local empire = pc.get_empire()
local selectmap = select("Map1","Map2","Orktal","Wüste","Eisland","Tal der Verfluchten","Weiter","Abbrechen")
if selectmap == 8 then
return
elseif selectmap == 7 then
say_title("Warpring")
say("Wohin möchtest du Teleportiert werden?")
local selectmap2 = select("Dämonenturm","Geisterwald","Roter Wald","Spinnendungeon","Grotte der Verbannung","Farmmap2","Abbrechen")
if selectmap2 == 7 then
return
elseif selectmap2 == 1 then
say_title("Warpring")
say("Wohin möchtest du Teleportiert werden?")
pc.warp(590500,110800)
elseif selectmap2 == 2 then
say_title("Warpring")
say("Wohin möchtest du Teleportiert werden?")
local geisterselect = select("Anfang","Ende","Abbrechen")
if geisterselect == 3 then
return
elseif geisterselect == 1 then
pc.warp(290500,5700)
elseif geisterselect == 2 then
pc.warp(286400,44200)
end
elseif selectmap2 == 3 then
say_title("Warpring")
say("Wohin möchtest du Teleportiert werden?")
local roterselect = select("Anfang","Ende","Abbrechen")
if roterselect == 3 then
return
elseif roterselect == 1 then
pc.warp(1119900,70800)
elseif geisterselect == 2 then
pc.warp(1119100,7700)
end
elseif selectmap2 == 4 then
say_title("Warpring")
say("Wohin möchtest du Teleportiert werden?")
pc.warp(91700, 525300)
elseif selectmap2 == 5 then
say_title("Warpring")
say("Wohin möchtest du Teleportiert werden?")
pc.warp(10000, 1214200)
elseif selectmap2 == 6 then
say_title("Warpring")
say("Wohin möchtest du Teleportiert werden?")
pc.warp(819200, 716800)
end
elseif selectmap == 1 then
say_title("Warpring")
say("Wohin möchtest du Teleportiert werden?")
local map1select = select("Rotes Reich","Gelbes Reich","Blaues Reich","Abbrechen")
if map1select == 4 then
return
elseif map1select == 1 then
pc.warp(474300, 954800)
elseif map1select == 2 then
pc.warp(63800, 166400)
elseif map1select == 3 then
pc.warp(959900, 269200)
end
elseif selectmap == 2 then
say_title("Warpring")
say("Wohin möchtest du Teleportiert werden?")
local map2select = select("Rotes Reich","Gelbes Reich","Blaues Reich","Abbrechen")
if map2select == 4 then
return
elseif map2select == 1 then
pc.warp(353100, 882900)
elseif map2select == 2 then
pc.warp(145500, 240000)
elseif map2select == 3 then
pc.warp(863900, 246000)
end
elseif selectmap == 3 then
say_title("Warpring")
say("Wohin möchtest du Teleportiert werden?")
local otselect = select("Anfang","Mitte","Abbrechen")
if otselect == 3 then
return
elseif otselect == 1 then
if empire == 1 then
pc.warp(402100, 673900)
elseif empire == 2 then
pc.warp(270400, 739900)
elseif empire == 3 then
pc.warp(321300, 808000)
end
elseif otselect == 2 then
pc.warp(332800, 745600)
end
elseif selectmap == 4 then
say_title("Warpring")
say("Wohin möchtest du Teleportiert werden?")
local wuesteselect = select("Anfang","Mitte","Abbrechen")
if wuesteselect == 3 then
return
elseif wuesteselect == 1 then
if empire == 1 then
pc.warp(217800, 627200)
elseif empire == 2 then
pc.warp(221900, 502700)
elseif empire == 3 then
pc.warp(344000, 502500)
end
elseif wuesteselect == 2 then
pc.warp(296800, 547100)
end
elseif selectmap == 5 then
say_title("Warpring")
say("Wohin möchtest du Teleportiert werden?")
local eisselect = select("Anfang","Mitte","Abbrechen")
if eisselect == 3 then
return
elseif eisselect == 1 then
if empire == 1 then
pc.warp(491800, 173600)
elseif empire == 2 then
pc.warp(491800, 173600)
elseif empire == 3 then
pc.warp(491800, 173600)
end
elseif eisselect == 2 then
pc.warp(491800, 173600)
end
elseif selectmap == 6 then
say_title("Warpring")
say("Wohin möchtest du Teleportiert werden?")
local feuerselect = select("Anfang","Mitte","Abbrechen")
if feuerselect == 3 then
return
elseif feuerselect == 1 then
if empire == 1 then
pc.warp(2903400, 2905400)
elseif empire == 2 then
pc.warp(2903400, 2905400)
elseif empire == 3 then
pc.warp(2903400, 2905400)
end
elseif feuerselect == 2 then
pc.warp(2903400, 2905400)
end
end
end
end
end
Eine davon geht aufjedenfall.. weiß bloß nicht mehr welche(habe eine fehlerhafte und eine die geht ^^
Bei der Quest kann man leider viel falsch machen, was man nicht sofort sieht, ambesten noch mal die Original Quest nehmen und nach und nach Arbeiten, also abschnitt 1 fertig machen und testen, dann 2,3 usw. zur not Add mich in Skype und ich werd versuchen dir weiter zuhelfen, allerdings nicht mehr heute, komme gerade von arbeit und will nun nur noch entspannen, also morgen ab 8uhr oder so kannste dich melden
Warpring 09/03/2012 - Metin2 Private Server - 1 Replies Hallo,
weis einer warum mein Warpring nicht funktioniert ?
Hab in Navicat Type auf 18 gestellt.
Die Quest datei habe ich verändert den vorher
war ein Warpring da der nach den benutzen verschwunden ist.
Jetzt habe ich das dadrinnen stehen.
quest warpring begin
state start begin
when 70007.use with pc.get_level() >= 10 begin
Warpring 04/18/2012 - Metin2 Private Server - 5 Replies Ja habe es jetzt hinbekommen erfolgreich die Warpringquest hochzuladen ohne Probleme allerdings hat der Warpring keine Funktion ingame... Muss ich da noch irgendwas ändern das die Quest auf den Warpring übertragen kann? Also irgendwas in der Datenbank ändern das die Quest auf das Item zugreift?
Lg
Warpring 04/17/2012 - Metin2 Private Server - 5 Replies Hallo,
weis einer warum mein Warpring nicht funktioniert ?
Hab in Navicat Type auf 18 gestellt.
Die Quest datei habe ich verändert den vorher
war ein Warpring da der nach den benutzen verschwunden ist.
Jetzt habe ich das dadrinnen stehen.
[F] Warpring 04/12/2011 - Metin2 Private Server - 0 Replies Hey,ich wollte mal fragen ob man ein eigenen Warpring erstellen kann wie man zum biespiel auf den Eeks ring drückt das man dan in eine neue Map kommt?
Hoffe auf Hilfe
Mfg Brouse
[Frage] zu Warpring 04/05/2011 - Metin2 Private Server - 11 Replies Also Ich hätte da eine Kleine Frage :
"Wie mach ich es so Das man "Warpring" Aus Inventar net auf Boden Werfen Kann..?
€dit : Noch ne Frage :
Wie mach ich dass das man Warpring hat auch nach dem benutzen?!
Bitte Helfen :D
Warpring :O
