Quest Fehler
Habe mir mal ne Quest ei epvp gesucht und sie bissl abgeändert nach meine wünschen und jetzt spackt sie rum und
bei sh make.sh kommt :
tausch.quest:2:must start with ´quest´
Error occured on compile tausch.quest
tausch.quest
quest tausch begin
state start begin
when 9010.chat."Eintauschen" begin
say_title("Eintauschen")
say("Hallo lieber user von GreenLight2!")
say("Ich bin ein Händler,")
say("Ich brauche Perlen für meine Oma")
say("Gegen ein paar Perlen kann ich dir Wertvolles EQ anbieten")
say("Falls du etwas hast bitte ich dich darum es bei")
say("mir einzutauschen und das wenn möglich zügig...")
say("Viele meiner Freunde behaupten ich sei ein Spinner,")
say("weil ich mich mit Perlen")
say("beschäftige aber ein wahrer Mann steht zu seinen")
say("vorlieben. Wenn du nun was eintschauen möchtest....,")
wait()
say("Ich habe noch ein paar Dinge zu erledigen")
say("deswegen Entscheide dich bitte schnell.")
say("Du kannst desöfteren zu mir um deine Sachen")
say("einzutauschen denn das würde mich sehr freuen,")
say("da ich ein sehr erfreuter Perlen Händler bin.")
say("")
say("")
say("")
say("")
wait()
say("Also was möchtest du tauschen für 5 Weiße Perlen?")
local v = select ("Drachenzahnklinge", "Fünf-Elemte-Klinge", "Phönix-Bogen", "Drachen-Geistglocke", "Runen-Sword", "Weiter Blaue Perle x5")
if v == 1 then
if pc.count_item(27992, 5) >= 1 then
pc.remove_item(27992, 5)
pc.give_item2(479, 1)
say("Ich freue mich das wir ein Geschäft")
say("machen konnten. Lass dich mal wieder")
say("bei mir blicken falls du etwas")
say("eintauschen möchtest")
say("")
say("")
say_reward("Drachenzahnklinge")
else
return
end
elseif v == 2 then
if pc.count_item(27992, 5) >= 1 then
pc.remove_item(27992, 5)
pc.give_item2(1349, 1)
say("Ich freue mich das wir ein Geschäft")
say("machen konnten. Lass dich mal wieder")
say("bei mir blicken falls du etwas")
say("eintauschen möchtest")
say("")
say("")
say_reward("Fünf-Elemte-Klinge")
else
return
end
elseif v == 3 then
if pc.count_item(27992, 5) >= 1 then
pc.remove_item(27992, 5)
pc.give_item2(2379, 1)
say("Ich freue mich das wir ein Geschäft")
say("machen konnten. Lass dich mal wieder")
say("bei mir blicken falls du etwas")
say("eintauschen möchtest")
say("")
say("")
say_reward("Phönix-Bogen")
else
return
end
elseif v == 4 then
if pc.count_item(27992, 5) >= 1 then
pc.remove_item(27992, 5)
pc.give_item2(5349, 1)
say("Ich freue mich das wir ein Geschäft")
say("machen konnten. Lass dich mal wieder")
say("bei mir blicken falls du etwas")
say("eintauschen möchtest")
say("")
say("")
say_reward("Drachen-Geistglocke")
else
return
end
elseif v == 5 then
if pc.count_item(27992, 5) >= 1 then
pc.remove_item(27992, 5)
pc.give_item2(469, 1)
say("Ich freue mich das wir ein Geschäft")
say("machen konnten. Lass dich mal wieder")
say("bei mir blicken falls du etwas")
say("eintauschen möchtest")
say("")
say("")
say_reward("Runen-Sword")
else
return
end
elseif v == 6 then
local a = select ("Blauerdrachenanzug", "Kleidung des Drachen", "Auraplattenpanzer", "Blaustahl-Panzer", "Weiter Blaue Perlen x5")
if a == 1 then
if pc.count_item(27993, 5) >= 1 then
pc.remove_item(27993, 5)
pc.give_item2(12019, 1)
say("Ich freue mich das wir ein Geschäft")
say("machen konnten. Lass dich mal wieder")
say("bei mir blicken falls du etwas")
say("eintauschen möchtest")
say("")
say("")
say_reward("Blauerdrachenanzug")
else
return
end
elseif a == 2 then
if pc.count_item(27993, 5) >= 1 then
pc.remove_item(27993, 5)
pc.give_item2(12029, 1)
say("Ich freue mich das wir ein Geschäft")
say("machen konnten. Lass dich mal wieder")
say("bei mir blicken falls du etwas")
say("eintauschen möchtest")
say("")
say("")
say_reward("Kleidung des Drachen")
else
return
end
elseif a == 3 then
if pc.count_item(27993, 5) >= 1 then
pc.remove_item(27993, 5)
pc.give_item2(12039, 1)
say("Ich freue mich das wir ein Geschäft")
say("machen konnten. Lass dich mal wieder")
say("bei mir blicken falls du etwas")
say("eintauschen möchtest")
say("")
say("")
say_reward("Auraplattenpanzer")
else
return
end
elseif a == 4 then
if pc.count_item(27993, 5) >= 1 then
pc.remove_item(27993, 5)
pc.give_item2(12049, 1)
say("Ich freue mich das wir ein Geschäft")
say("machen konnten. Lass dich mal wieder")
say("bei mir blicken falls du etwas")
say("eintauschen möchtest")
say("")
say("")
say_reward("Blaustahl-Panzer")
else
return
end
elseif v == 5 then
local a = select ("Krieger-King", "Ninja-King", "Sura-King", "Shamane-King", "Weiter Blauen Perlen x5")
if a == 1 then
if pc.count_item(27993, 5) >= 1 then
pc.remove_item(27993, 5)
pc.give_item2(11971, 1)
say("Ich freue mich das wir ein Geschäft")
say("machen konnten. Lass dich mal wieder")
say("bei mir blicken falls du etwas")
say("eintauschen möchtest")
say("")
say("")
say_reward("Krieger-King")
else
return
end
elseif a == 2 then
if pc.count_item(27993, 5) >= 1 then
pc.remove_item(27993, 5)
pc.give_item2(11972, 1)
say("Ich freue mich das wir ein Geschäft")
say("machen konnten. Lass dich mal wieder")
say("bei mir blicken falls du etwas")
say("eintauschen möchtest")
say("")
say("")
say_reward("Ninja-King")
else
return
end
elseif a == 3 then
if pc.count_item(27993, 5) >= 1 then
pc.remove_item(27993, 5)
pc.give_item2(11973, 1)
say("Ich freue mich das wir ein Geschäft")
say("machen konnten. Lass dich mal wieder")
say("bei mir blicken falls du etwas")
say("eintauschen möchtest")
say("")
say("")
say_reward("Sura-King")
else
return
end
elseif a == 4 then
if pc.count_item(27993, 5) >= 1 then
pc.remove_item(27993, 5)
pc.give_item2(11974, 1)
say("Ich freue mich das wir ein Geschäft")
say("machen konnten. Lass dich mal wieder")
say("bei mir blicken falls du etwas")
say("eintauschen möchtest")
say("")
say("")
say_reward("Shamane-King")
else
return
end
elseif a == 5 then
local a = select ("Kriegsmeister-Helm", "Spinnen-Kapuze", "Magischer-Helm", "Seelensplitter-Hut", "Weiter Blauen Perlen x5")
if a == 1 then
if pc.count_item(27993, 5) >= 1 then
pc.remove_item(27993, 5)
pc.give_item2(12289, 1)
say("Ich freue mich das wir ein Geschäft")
say("machen konnten. Lass dich mal wieder")
say("bei mir blicken falls du etwas")
say("eintauschen möchtest")
say("")
say("")
say_reward("Kriegsmeister-Helm")
else
return
end
elseif a == 2 then
if pc.count_item(27993, 5) >= 1 then
pc.remove_item(27993, 5)
pc.give_item2(12549, 1)
say("Ich freue mich das wir ein Geschäft")
say("machen konnten. Lass dich mal wieder")
say("bei mir blicken falls du etwas")
say("eintauschen möchtest")
say("")
say("")
say_reward("Spinnen-Kapuze")
else
return
end
elseif a == 3 then
if pc.count_item(27993, 5) >= 1 then
pc.remove_item(27993, 5)
pc.give_item2(11973, 1)
say("Ich freue mich das wir ein Geschäft")
say("machen konnten. Lass dich mal wieder")
say("bei mir blicken falls du etwas")
say("eintauschen möchtest")
say("")
say("")
say_reward("Magischer-Helm")
else
return
end
elseif a == 4 then
if pc.count_item(27993, 5) >= 1 then
pc.remove_item(27993, 5)
pc.give_item2(12689, 1)
say("Ich freue mich das wir ein Geschäft")
say("machen konnten. Lass dich mal wieder")
say("bei mir blicken falls du etwas")
say("eintauschen möchtest")
say("")
say("")
say_reward("Seelensplitter-Hut")
else
return
end
elseif a == 5 then
local a = select ("Falkenschild", "Tiegerschild", "Löwenkantenschild", "Drachenschuppenschild", "Weiter Blutroten Perlen x5")
if a == 1 then
if pc.count_item(27993, 5) >= 1 then
pc.remove_item(27993, 5)
pc.give_item2(13069, 1)
say("Ich freue mich das wir ein Geschäft")
say("machen konnten. Lass dich mal wieder")
say("bei mir blicken falls du etwas")
say("eintauschen möchtest")
say("")
say("")
say_reward("Falkenschild")
else
return
end
elseif a == 2 then
if pc.count_item(27993, 5) >= 1 then
pc.remove_item(27993, 5)
pc.give_item2(13089, 1)
say("Ich freue mich das wir ein Geschäft")
say("machen konnten. Lass dich mal wieder")
say("bei mir blicken falls du etwas")
say("eintauschen möchtest")
say("")
say("")
say_reward("Tiegerschild")
else
return
end
elseif a == 3 then
if pc.count_item(27993, 5) >= 1 then
pc.remove_item(27993, 5)
pc.give_item2(13109, 1)
say("Ich freue mich das wir ein Geschäft")
say("machen konnten. Lass dich mal wieder")
say("bei mir blicken falls du etwas")
say("eintauschen möchtest")
say("")
say("")
say_reward("Löwenkantenschild")
else
return
end
elseif a == 4 then
if pc.count_item(27993, 5) >= 1 then
pc.remove_item(27993, 5)
pc.give_item2(13129, 1)
say("Ich freue mich das wir ein Geschäft")
say("machen konnten. Lass dich mal wieder")
say("bei mir blicken falls du etwas")
say("eintauschen möchtest")
say("")
say("")
say_reward("Drachenschuppenschild")
else
return
end
elseif a == 5 then
local a = select ("HTO", "HTH", "HTA", "Euphorieschuhe", "Glorienstiefel", "Qilinschuhe", "Eisvogelschuhe", "zurück")
if a == 1 then
if pc.count_item(27994, 5) >= 1 then
pc.remove_item(27994, 5)
pc.give_item2(17209, 1)
say("Ich freue mich das wir ein Geschäft")
say("machen konnten. Lass dich mal wieder")
say("bei mir blicken falls du etwas")
say("eintauschen möchtest")
say("")
say("")
say_reward("HTO")
else
return
end
elseif a == 2 then
if pc.count_item(27994, 5) >= 1 then
pc.remove_item(27994, 5)
pc.give_item2(16209, 1)
say("Ich freue mich das wir ein Geschäft")
say("machen konnten. Lass dich mal wieder")
say("bei mir blicken falls du etwas")
say("eintauschen möchtest")
say("")
say("")
say_reward("HTH")
else
return
end
elseif a == 3 then
if pc.count_item(27993, 5) >= 1 then
pc.remove_item(27993, 5)
pc.give_item2(14209, 1)
say("Ich freue mich das wir ein Geschäft")
say("machen konnten. Lass dich mal wieder")
say("bei mir blicken falls du etwas")
say("eintauschen möchtest")
say("")
say("")
say_reward("HTA")
else
return
end
elseif a == 4 then
if pc.count_item(27993, 5) >= 1 then
pc.remove_item(27993, 5)
pc.give_item2(15379, 1)
say("Ich freue mich das wir ein Geschäft")
say("machen konnten. Lass dich mal wieder")
say("bei mir blicken falls du etwas")
say("eintauschen möchtest")
say("")
say("")
say_reward("Euphorieschuhe")
else
return
end
elseif a == 5 then
if pc.count_item(27993, 5) >= 1 then
pc.remove_item(27993, 5)
pc.give_item2(15399, 1)
say("Ich freue mich das wir ein Geschäft")
say("machen konnten. Lass dich mal wieder")
say("bei mir blicken falls du etwas")
say("eintauschen möchtest")
say("")
say("")
say_reward("Glorienstiefel")
else
return
end
elseif a == 6 then
if pc.count_item(27993, 5) >= 1 then
pc.remove_item(27993, 5)
pc.give_item2(15419, 1)
say("Ich freue mich das wir ein Geschäft")
say("machen konnten. Lass dich mal wieder")
say("bei mir blicken falls du etwas")
say("eintauschen möchtest")
say("")
say("")
say_reward("Qilinschuhe")
else
return
end
elseif a == 7 then
if pc.count_item(27993, 5) >= 1 then
pc.remove_item(27993, 5)
pc.give_item2(15439, 1)
say("Ich freue mich das wir ein Geschäft")
say("machen konnten. Lass dich mal wieder")
say("bei mir blicken falls du etwas")
say("eintauschen möchtest")
say("")
say("")
say_reward("Eisvogelschuhe")
else
return
end
elseif a == 8 then
else
return
end
end
end
end
end
dazu habe ich von einen user denn tipp bekommen
:Füg diese Funktion in der questlib.lua hinzu und in die quest_functions schreibste select3
function select3(...)
arg.n = nil
local tp,max = arg,5
if type(tp[1]) == 'number' then
max = tp[1]
if type(tp[2]) == 'table' then
tp = tp[2]
else
table.remove(tp,1)
end
elseif type(tp[1]) == 'table' then
tp = tp[1]
end
local str = '{'
local tablen,act,incit = table.getn(tp),0,0
table.foreach(tp,function(i,l)
act = act + 1
if act == 1 then
str = str .. '{'..string.format('%q',l)
elseif act == max+1 and tablen > act+incit then
if tablen ~= act+incit+1 then
str = str..'},{'..string.format('%q',l)
else
str=str..','..string.format('%q',l)
end
incit = incit + max
act = 1
else
str=str..','..string.format('%q',l)
end
end)
local px = loadstring('return '..str ..'}}')()
local function copy_tab(t) local p= {} for i = 1,table.getn(t) do p[i] = t[i] end return p end
local pe = {}
for i = 1,table.getn(px) do pe [i] = copy_tab(px[i]) end
local function init(i,ip)
pe[i] = copy_tab(px[i])
local next,back,exit = 0,0,0
if i < table.getn(pe) and table.getn(pe) ~=1 then table.insert(pe[i],table.getn(pe[i])+1,'Weiter zu Seite '..(i+1)); next = table.getn(pe[i]) end
if i > 1 then table.insert(pe[i],table.getn(pe[i])+1,'Zurück zu Seite '..(i-1)); back = table.getn(pe[i]) end
table.insert(pe[i],table.getn(pe[i])+1,'Schließen'); exit = table.getn(pe[i])
if table.getn(pe) > 1 then
say('Seite '..i..' von '..table.getn(pe))
end
local e = select_table(pe[i])
if e == next then return init(i+1,ip+max)
elseif e == back then return init(i-1,ip-max)
elseif e == exit then return -1
else return e+ip,pe[i][e] end
end
return init(1,0) or -1
end
dazu noch deine Quest:
quest tausch begin
state start begin
when 9010.chat."Eintauschen" begin
say_title("Eintauschen")
say("Hallo lieber user von GreenLight2!")
say("Ich bin ein Händler,")
say("Ich brauche Perlen für meine Oma")
say("Gegen ein paar Perlen kann ich dir Wertvolles EQ anbieten")
say("Falls du etwas hast bitte ich dich darum es bei")
say("mir einzutauschen und das wenn möglich zügig...")
say("Viele meiner Freunde behaupten ich sei ein Spinner,")
say("weil ich mich mit Perlen")
say("beschäftige aber ein wahrer Mann steht zu seinen")
say("vorlieben. Wenn du nun was eintschauen möchtest....,")
wait()
say("Ich habe noch ein paar Dinge zu erledigen")
say("deswegen Entscheide dich bitte schnell.")
say("Du kannst desöfteren zu mir um deine Sachen")
say("einzutauschen denn das würde mich sehr freuen,")
say("da ich ein sehr erfreuter Perlen Händler bin.")
say("")
say("")
say("")
say("")
wait()
say("Also was möchtest du tauschen für 5 Weiße Perlen?")
obj_item = 27992
items = { 479, 1349, 2379, 5349, 469, 12019, 12029, 12039, 12049, 11971, 11972, 11973, 11974, 12289, 12549, 11973, 12689, 13069, 13089, 13109, 13129, 17209, 16209, 14209, 15379, 15399, 15419, 15439 }
namen = {}
for i=1, table.getn(items), 1 do
table.insert(namen, item_name(items[i]))
end
s = select3(namen)
if s<1 then return end
if pc.count_item(obj_item) >= 5 then
pc.remove_item(obj_item, 5)
pc.give_item2(items[s], 1)
say("Ich freue mich das wir ein Geschäft")
say("machen konnten. Lass dich mal wieder")
say("bei mir blicken falls du etwas")
say("eintauschen möchtest")
say("")
say("")
say_reward(namen[s])
else
return
end
end
end
end
alle schon und gut gemacht aber der fehler ist trotzdem noch da helft mir bitte