ich hab gerade eine quest umgeschrieben, Userpanel quest. Hab sie auf dem server hochgeladen doch es funktioniert nicht.. in Virtual box steht dann :
error occured on compile user.quest ..
ich habs bewusst nicht in der quest konrolle geschrieben da ich nicht weiß, was hierdran falsch sein soll bzw wieso vbox den fehler anzeigt
PHP Code:
quest user begin
state start begin
when 70028.use begin
say_title("Kontrollzentrum")
say("")
say_reward("Willkommen im Kontrollzentrum")
say_reward(Hi "..pc.get_name().." , wie kann ich dir weiterhelfen?")
say("")
local main_set = select("Pferde-Tool","Teleport-Tool","Verwandlungs-Tool","Afk gehen","Team-Liste","Weiter","Garnicht")
if main_set == 7 then
say("Nagut, dann vielleicht beim nächsten mal!")
return
end
if main_set == 1 then
say("Hier ist die Pferdeabteilung")
say("Was möchtest du tun?")
local b = select("Reiten","Absitzen","Pferd rufen","Pferd wegschicken","Pferd füttern","Pferd wiederbeleben","Pferde-Daten","Zurück")
if b == 8 then
return
end
if b == 1 then
say("Möchtest du mit deinem Pferd reiten?")
local c = select("Ja","Nein")
if c == 1 then
horse.ride()
end
if c == 2 then
return
end
end
if b == 2 then
say("Du möchtest echt vom Pferd absitzen?")
local d = select("Ja","Nein")
if d == 1 then
horse.unride()
end
if d == 2 then
return
end
end
if b == 3 then
say("Möchtest du dein Pferd rufen?")
local e = select("Ja","Nein")
if e == 1 then
horse.summon()
end
if e == 2 then
return
end
end
if b == 4 then
say("Möchtest du dein Pferd echt wegschicken?")
local f = select("Ja","Nein")
if f == 1 then
horse.unsummon()
end
if f == 2 then
return
end
end
if b == 5 then
say("Möchtest du dein Pferd füttern")
local g = select("Ja","Nein")
if g == 1 then
horse.feed()
end
if g == 2 then
return
end
end
if b == 6 then
say("Möchtest du dein Pferd wiederbeleben?")
local h = select("Ja","Nein")
if h == 1 then
horse.revive()
end
if h == 2 then
return
end
end
if b == 7 then
say("Du willst also Informationen über dein Pferd bekommen")
say("Hier sind deine Infos:")
say("Pferdeleben: "..horse.get_health_pct().."")
say("Ausdauer: "..horse.get_stamina_pct().."")
say("Pferdelevel: "..horse.get_level().."")
local i = select("Beenden")
if i == 1 then
return
end
end
end
if main_set == 2 then
say("Du willst dich also Teleportieren?")
say("")
local j = select("Ja","Nein")
if j == 2 then
return
end
if j == 1 then
say_reward("Wo möchtest du hin:")
local k = select("Map1-Rot","Map1-Blau","Map1-Gelb","Zurück")
if k == 4 then
return
end
if k == 1 then
pc.warp(469300, 964200)
end
if k == 2 then
pc.warp(969600, 278400)
end
if k == 3 then
pc.warp (55700, 157900)
end
end
end
if main_set == 3 then
say("In was möchtest du dich Verwandeln?")
say("5 Minuten kosten dich 2500.000 Yang!")
local u = select("Wildhund","Wolf","Ork","Spinne","Monster-Wahl","Zurückverwandeln")
if u == 1 then
if pc.money>=2500000 then
say("Du wirst in einen Wildhund verwandelt!")
pc.polymorph(101, 300)
pc.change_money(-2500000)
else
say("Du hast nicht genug Yang")
say("Du benötigst 2.500.000 Yang")
end
end
if u == 2 then
if pc.money>=2500000 then
say("Du wirst in einen Wolf verwandel!t")
pc.polymorph(102, 300)
pc.change_money(-2500000)
else
say("Du hast nicht genug Yang")
say("Du benötigst 2.500.000 Yang")
end
end
if u == 3 then
if pc.money>=2500000 then
say("Du wirst in einen Ork verwandelt!")
pc.polymorph(601, 300)
pc.change_money(-2500000)
else
say("Du hast nicht genug Yang")
say("Du benötigst 2.500.000 Yang")
end
end
if u == 4 then
if pc.money>=2500000 then
say("Du wirst in eine Spinne verwandelt!")
pc.polymorph(2001, 300)
pc.change_money(-2500000)
else
say("Du hast nicht genug Yang")
say("Du benötigst 2.500.000 Yang")
end
end
if u == 5 then
say_title("Hier musst du die Value von dem")
say_title("Monster eingeben, in welches du")
say_title("dich verwandeln willst.")
say_reward("Es kostet 10.000.000 Yang für 10 Minuten!")
local y = input()
if pc.money>=10000000 then
say("Alles klar, ich verwandle dich für")
say("10 Minuten in einen")
say_reward(" "..mob_name( y ).." ")
pc.polymorph(y, 600)
pc.change_money(-1000000)
else
say("Du hast nicht genug Yang")
say("Du benötigst 10.000.000 Yang!")
end
end
if u == 6 then
say("Willst du dich echt zurückverwandeln?")
local v = select("Ja","Nein")
if v == 2 then
say("Dann bleibst du noch Verwandelt!")
return
end
if v == 1 then
say("Du wirst nun zurück verwandelt!")
pc.remove_polymorph()
end
end
end
if main_set == 4 then
say("Möchtest du AFK gehen oder einen Shop eröffnen?")
say("")
local w = select("Ja","Wieder da","Nein")
if w == 1 then
say("Viel erfolg beim verkaufen!")
pc.polymorph(30000, 2000000)
end
if w == 2 then
say("Schön, dass du wieder da bist!")
pc.remove_polymorph()
end
if w == 3 then
say("Wer nicht will, der hat schon..")
return
end
end
if main_set == 5 then
say_reward("Hier siehst du alle Teammitglieder")
say("")
say_reward("Der ServerLeiter [SL]:")
say("[SA]HaTe")
say_reward("ServerAdministratoren [SA] :")
say("")
say_reward("Die GameAdmininistratoren [GA] :")
say("")
say("")
say_reward("Die GameMaster[GM] :")
say("")
say("")
say("Ziemlich Leer was? du kannst gerne eine ausführliche")
say("GameMaster Bewerbung im Forum schreiben.")
say("Viel Glück dabei!")
return
end
if main_set == 6 then
say_title("Hier ist das Kontrollzentrum")
say_title("Willkommen "..pc.get_name().." , wie kann ich dir weiterhelfen?")
local aa = select("Reittiere","Einkaufen",Rang erkaufen","Lager öffnen","GM-Tool","Zurück")
if aa == 6 then
say("Dann halt nicht, ich bin mir sicher,")
say("dass du mich irgendwann gebrauchen wirst!")
return
end
if aa == 1 then
say_title("Ich bin der Reittier-Händler:")
say_title("Was möchtest du für ein Reittier??")
local bb = select("Lowe","Kailer","Feuer-Tiger","Wolf","Keinen")
if bb == 5 then
say("Dann halt nicht, dann hebe ich meine")
say("Kraft zum Beschwören fürs nächste mal auf!")
return
end
if bb == 1 then
say("Du bekommst meinen Löwen ausgeliehen?")
say("Bist du dir sicher?")
say_reward("5 Minuten kosten dich 5.000.000 Yang!")
local bc = select("Ja","Nein")
if bc == 2 then
say("Dann halt nicht, pech gehabt!")
return
end
if bc == 1 then
if pc.money>=5000000 then
say("Hier hast du meinen Löwen für")
say("5 Minuten!")
pc.mount(39912, 300)
pc.change_money(-5000000)
else
say("Du hast nicht genug Yang")
say("Du benötigst 5.000.000 Yang")
end
end
end
if bb == 2 then
say("Du möchtest meinen Keiler ausgeliehen?")
say("Bist du dir sicher?")
say_reward("5 Minuten kosten 5.000.000 Yang!")
local cc = select("Ja","Nein")
if cc == 2 then
say("Dann halt nicht, pech gehabt!")
return
end
if cc == 1 then
if pc.money>=5000000 then
say("Hier hast du meinen Keiler für")
say("5 Minuten!")
pc.mount(39913, 300)
pc.change_money(-5000000)
else
say("Du hast nicht genug Yang")
say("Du benötigst 5.000.000 Yang")
end
end
end
if bb == 3 then
say("Du möchtest meinen Feuer-Tiger ausgeliehen?")
say("Bist du dir sicher?")
say_reward("5 Minuten kosten 5.000.000 Yang!")
local cc = select("Ja","Nein")
if cc == 2 then
say("Dann halt nicht, pech gehabt!")
return
end
if cc == 1 then
if pc.money>=5000000 then
say("Hier hast du meinen Feuer-Tiger für")
say("5 Minuten!")
pc.mount(39914, 300)
pc.change_money(-5000000)
else
say("Du hast nicht genug Yang")
say("Du benötigst 5.000.000 Yang")
end
end
end
if bb == 4 then
say("Du bekommst meinen Wolf ausgeliehen?")
say("Bist du dir sicher?")
say_reward("5 Minuten kosten 5.000.000 Yang!")
local cc = select("Ja","Nein")
if cc == 2 then
say("Dann halt nicht, pech gehabt!")
return
end
if cc == 1 then
if pc.money>=5000000 then
say("Hier hast du meinen Wolf für")
say("5 Minuten!")
pc.mount(39915, 300)
pc.change_money(-5000000)
else
say("Du hast nicht genug Yang")
say("Du benötigst 5.000.000 Yang")
end
end
end
end
if aa == 2 then
say_title("Einkaufszentrum:")
say("Hier kannst du jeden Shop öffnen")
say_reward("Welchen Shop möchtest du öffnen?")
local dd = select("Gemischwaren","Saft des Lebens","Itemshop","Keinen")
if dd == 4 then
say("Dann halt nicht, schönen Tag noch")
return
end
if dd == 1 then
say("Möchtest du echt den Shop der Gemischwaren öffnen?")
local de = select("Ja","Nein")
if de == 2 then
say("Pff, du Geizkragen!!")
return
end
if de == 1 then
say("Der Shop der Gemischwaren wird geöffnet")
npc.open_shop()
end
end
if dd == 2 then
say("Möchtest du echt den Shop des Betrunkenen")
say("Bürger öffnen?")
local ee = select("Ja","Nein")
if ee == 2 then
say("Dann halt nicht!")
return
end
if ee == 1 then
say("Der Shop des Betrunkenen Bürgers wird geöffnet")
npc.open_shop()
end
end
end
if aa == 3 then
say_title("Heyho, ich bin der Gott der Ränge")
say_title("Für etwas Yang gebe ich dir jeweils 1.000 Rangpunkte")
say_reward("Du benötigst 10.000.000 Yang")
say("Willst du nun deinen Rang erhöhen? , Dann wähle:")
local ff = select("Ja, Natürlich","Nein, lieber nicht")
if ff == 2 then
say("Dann nicht, vielleicht kommst du ja später!")
return
end
if ff == 1 then
say("Wenn du deinen Rang um 1.000 erhöhen willst,")
say("Und 10.000.000 Yang dafür ausgeben willst, dann klicke")
say("nun auf Ja")
local fg = select("Ja","Nein")
if fg == 2 then
return
end
if fg == 1 then
if pc.money>=10000000 then
say("Schön, du hast deine Rangpunkte um 1.000 erhöht!")
say("Nun hast du es nicht mehr lang, bis zum Rang 'Gott' ! ")
say("Viel spaß noch!")
pc.changemoney(-10000000)
pc.change_alignment(1000)
else
say("Du hast nicht genug Yang")
say("Du benötigst 10.000.000 Yang!")
end
end
end
end
if aa == 4 then
say_title("Bankangestellter:")
say("Hey, ich kann auch von weit weg")
say("dein Lager öffnen..willst du")
say("das ich das ich es öffne?")
local gg = select("Lager öffnen","Itemshop-Lager öffnen","Zurück")
if gg == 3 then
say("Dann halt nicht,lager deinen mist in Zukunft woanders!")
return
end
if gg == 1 then
say("Ich öffne dir nun dein Lager!")
say("Beachte: Du kannst dein Lager nur")
say("alle 10 Sekunden neu aufrufen!")
game.open_safebox()
chat("Lager geöffnet")
end
if gg == 2 then
say("Ich öffne dir nun dein Itemshop-Lager")
say("Beachte: Du kannst dein Itemshop-Lager")
say("alle 10 Sekunden öffnen")
game.open_mall()
chat("Lager geöffnet")
end
end
if aa == 5 then
if pc.is_gm() then
say_title("Ohh...hoher Besuch,")
say_title(""..pc.get_name().." , wie kann ich dir weiterhelfen?")
local s = select("Gm-Notiz senden","Garnicht")
if s == 2 then
say("Ciao!")
say("Wir sehen uns nächstes mal!")
return
end
if s == 1 then
say("Gib Nachrricht ein, die an alle Reiche")
say("gesendet werden soll!")
local y = input()
notice_all(y)
end
end
end
end
end
end
end






