quest warpring begin
state start begin
when 70058.use begin
local warp = {--koord Pflicht, rest optional!
{--Map1
name = "Map 1",
{--Rotes Reich
name = "Rotes Reich",
koord = {965784, 275242},
minlevel = 1,
},
goldneed = 1000
},
{--Gelbes Reich
name = "Gelbes Reich",
koord = {965784, 275242},
minlevel = 1,
},
goldneed = 1000
},
{--Blaues Reich
name = "Blaues Reich",
koord = {965784, 275242},
minlevel = 1,
},
goldneed = 1000
},
},
{--Levelmaps
name = "Levelmaps",
{--Spinnendungeon
name = "Spinnendungeon",
koord = {600, 4970},
minlevel = 60,
},
goldneed = 100000
},
{--Spinnendungeon 2
name = "Spinnendungeon 2",
koord = {6656, 4352},
minlevel = 80,
},
goldneed = 200000
},
{--Grotte
name = "Grotte",
koord = {1536, 12032},
minlevel = 100,
},
goldneed = 300000
},
{--Donnerberge
name = "Donenrberge",
koord = {11345, 16546},
minlevel = 120,
},
goldneed = 400000
},
{--Nephritbucht
name = "Nephritbucht",
koord = {10869, 16558},
minlevel = 140,
},
goldneed = 500000
},
{--Gautamakliff
name = "Gautamakliff",
koord = {12263, 16811},
minlevel = 160,
},
goldneed = 7500000
},
{--Kap
name = "Kap",
koord = {11043, 17885},
minlevel = 180,
},
goldneed = 10000000
},
},
}
warpring.showwarps(warp)
end
function warp(tbl)
local level = pc.get_level()
if tbl.minlevel and level < tbl.minlevel then
say("Dein Level ist zu niedrig, um diese Map zu betreten.")
say("Minimal Level: "..tbl.minlevel)
select("Abbrechen")
return
elseif tbl.maxlevel and level > tbl.maxlevel then
say("Dein Level ist zu hoch, um diese Map zu betreten.")
say("Maximal Level: "..tbl.maxlevel)
select("Abbrechen")
return
end
while not pc.can_warp() do
say("Du kannst dich noch nicht teleportieren, da du in")
say("den letzten 10 Sekunden gehandelt hast.")
if select("Erneut versuchen", "Abbrechen") == 2 then return end
end
local warpneedstrings = warpring.get_warpneedstrings(tbl)
if table.getn(warpneedstrings) > 0 then
say("Um diese Map zu betreten benötigst du folgende")
say("Dinge:")
for _,v in ipairs(warpneedstrings) do
say(v)
end
say("")
say("Möchtest du trotzdem fortfahren?")
if select("Teleportieren", "Abbrechen") == 2 then return end
end
if not warpring.check_and_remove_warpneeds(tbl) then
say("Dir fehlt mindestens eins der benötigten Dinge.")
select("Abbrechen")
return
end
pc.warp(tbl.koord[1], tbl.koord[2])
end
function get_warpneedstrings(tbl)
local warpneeds = {}
if tbl.itemneed and table.getn(tbl.itemneed) > 0 then
for _,v in ipairs(tbl.itemneed) do
table.insert(warpneeds, "- "..v[2].."x "..item_name(v[1]))
end
end
if tbl.goldneed and tbl.goldneed > 0 then
table.insert(warpneeds, "- "..tbl.goldneed.." Yang")
end
return warpneeds
end
function check_warpneeds(tbl)
if tbl.itemneed and table.getn(tbl.itemneed) > 0 then
for _,v in ipairs(tbl.itemneed) do
if pc.count_item(v[1]) < v[2] then
return false
end
end
end
if tbl.goldneed and tbl.goldneed > 0 then
if pc.get_gold() < tbl.goldneed then
return false
end
end
return true
end
function remove_warpneeds(tbl)
if tbl.itemneed and table.getn(tbl.itemneed) > 0 then
for _,v in ipairs(tbl.itemneed) do
pc.remove_item(v[1], v[2])
end
end
if tbl.goldneed and tbl.goldneed > 0 then
pc.change_gold(-tbl.goldneed)
end
end
function check_and_remove_warpneeds(tbl)
if not warpring.check_warpneeds(tbl) then
return false
end
warpring.remove_warpneeds(tbl)
return true
end
function get_warpnames(tbl)
local level = pc.get_level()
local names = {}
for _,v in ipairs(tbl) do
if v.minlevel and level < v.minlevel then
v.name = v.name.." (ab Lv. "..v.minlevel..")"
elseif v.maxlevel and level > v.maxlevel then
v.name = v.name.." (bis Lv. "..v.maxlevel..")"
end
table.insert(names, v.name)
end
return names
end
function showwarps(tbl)
local warpnames = warpring.get_warpnames(tbl)
local s = tbl[select3(warpnames)] or false
if not s then return end
if s.koord then
warpring.warp(s)
return
end
warpring.showwarps(s)
end
end
end
Beim compilen kommt aber dieser Fehler, ka woran es liegt oder ich bin gerade einfach nur Blind
[Kleines Release] Quest-Background 11/13/2015 - Metin2 PServer Designs, Websites & Scripts - 13 Replies Abend epvp ^_^ hier habt ihr einen Quest Background
http://prntscr.com/82pq8y
Screen: Screenshot by Lightshot
Kleines Problem mit LUA (Quest) 04/09/2015 - Metin2 Private Server - 9 Replies Guten Abend ^_^
Also, ich habe letztens einen Ostern Event-Quest hinzugefügt.
Wenn ich aber das Event starten möchte
/e easterspawn 1
kommt es zu einen Fehler; mein Server schließt sich, und dann steht in der syserr
SYSERR: Mar 31 17:17:01 :: RunState: LUA_ERROR: :4: attempt to index global `easterevent' (a nil value)
[HILFE] Kleines Quest Problem 07/29/2012 - Metin2 Private Server - 3 Replies Hi comm,
ich will das die andern Spieler Erfahren wenn ein Boss gekillt wurde. Hier ein Besipiel:
quest 591_kill begin
state start begin
when 591.kill begin
notice_all(pc.get_name().. " hat den Brutalen Hauptmann getötet!")
end
end
Kleines Quest Problem 01/29/2012 - Metin2 Private Server - 4 Replies Hallo liebe Com. wie man schon lesen konnte habe ich ein kleines quest problem.
Und zwar habe ich die SF von .Howan jedoch weis ich nicht wie man die quest installiation bei den 2011er Files ausführt ich denke eigentlich wie bei den 2010er /usr/... und dan sh make.sh
aber das geht nicht >.< kann es mir jemand erklären oder mir ne lösung schicken?
Danke im voraus