|
You last visited: Today at 09:13
Advertisement
[SERVICE] Die Questkontrolle
Discussion on [SERVICE] Die Questkontrolle within the Metin2 Private Server forum part of the Metin2 category.
09/03/2012, 12:54
|
#6706
|
elite*gold: 191 
Join Date: May 2009
Posts: 1,214
Received Thanks: 2,597
|
PHP Code:
if s==1 then
local a=pc.get_max_hp()-2000 -- (-2000tp/s³) ---|Nicht ganz eindeutig
local times = get_time() + 3 ---|
pc.get_hp(a, times) ---|
-- affect.add_collect(apply.HP_REGEN, -2000, 3) ---|Andere Beispielmöglichkeit
command("Unsichtbarkeitscode") ---|
-- cmdchat(" ") ---|
chat("Du wurdest Unsichtbar, verlierst aber jede 3te") ---|
chat("secunde TP") ---|
else ---|
return ---|
end ---|
if s==2 then ---|
command("Unsichtbarkeitscode") ---|
-- cmdchat(" ") ---|
chat("Du bist wieder Sichtbar") ---|Nicht ganz eindeutig
else
return
end
Du schließt die If-schleife mit einem Return, wenn die Angabe nicht 1 ist, und frägst darunter ab, ob die Angabe 2 ist.. Nicht sehr wirkungsvoll 
Benutze Elseif
|
|
|
|
09/03/2012, 14:52
|
#6707
|
elite*gold: 0
Join Date: Apr 2011
Posts: 44
Received Thanks: 39
|
[QUOTE=©by Noa;18555853]wo war mein fehler? bei den else?
Ich weis nicht ob die Funktion richtig ist, hab die aus lw geschrieben und möchte wissen ob es so geht
PHP Code:
--Datei: evil_ring.quest
--NCP: Lagerverwalter
--Items:Waffen,Rüstungen,Perlen
--Mobs: Flammengeister, Sensenmann, Flammenkönig*
quest evil_ring begin
state start begin
------------------------------------------>Ring<-------------------------------------|
when ID.use begin --ID Ring
----"12345678901234567890123456789012345678901234567890"|
say("Das ist der Böse Ring, wenn du es benutzt")
say("macht er dich Unsichtbar,")
say("nur für kurze zeit kannst du in den zustand sein,")
say("du verlierst nach und nach Leben")
say("bis du schließlich stirbst.")
local s=select("Unsichtbarkeit","Normal")
if s==1 then
local a=pc.get_max_hp()-2000 -- (-2000tp/s³) ---|Nicht ganz eindeutig
local times = get_time() + 3 ---|
pc.get_hp(a, times) ---|
-- affect.add_collect(apply.HP_REGEN, -2000, 3) ---|Andere Beispielmöglichkeit
command("Unsichtbarkeitscode") ---|
-- cmdchat(" ") ---|
chat("Du wurdest Unsichtbar, verlierst aber jede 3te") ---|
chat("secunde TP") ---|
else ---|
return ---|
end ---|
if s==2 then ---|
command("Unsichtbarkeitscode") ---|
-- cmdchat(" ") ---|
chat("Du bist wieder Sichtbar") ---|Nicht ganz eindeutig
else
return
end
set_state(mission)
end
------------------------------------------>Ring ENDE<--------------------------------|
end
state mission begin
when login or letter with pc.level >= 60 begin
send_letter("Wirf den Ring ins Feuer")
-- if pc.is_gm() then
-- return
-- end
end
------------------------------------------>Geisterstimme<----------------------------|
when button or info begin
say_title("Geisterstimme:")
say("")
----"12345678901234567890123456789012345678901234567890"|
say("Hallo Abenteurer, ich bin eine umherwanderne Seele,")
say("die keine Ruhe findet, ich suche Abenteurer")
say("die ein Speziellen gegenstand besitzen... du hast")
say("mein Schatz*! Ring*")
say("Du hast schon mitbekommen, dass der Ring Böse ist~")
say("Ihm verdanke ich auch mein derzeitigen zustand...")
say("drum sage ich dir wie man den vernichten kann.")
say("Höre gut zu.")
wait()
say("Die einzige möglichkeit den Ring loszuwerden")
say("ist ihn zu verbrennen, aus den lodernen Flammen")
say("wo er Ursprünglich kahm, soll er auch~")
say("zerstört werden.")
say("Was dannach Passiert kann ich dir nicht sagen~")
say("ich hab nicht Lange gelebt um das mitzuerleben.")
say("Versuche erstmal den ring zu verbrennen")
say("Geh und bezwinge Flammengeister")
say_reward("Besiege 200 Flammengeister")
clear_letter()
set_state(flammen)
end
end
state flammen begin
when letter begin
send_letter("Der Ring")
end
when button or info begin
say_title("Der Ring")
say("")
----"12345678901234567890123456789012345678901234567890"|
say("Die Geisterstimme sagte mir das ich den Ring")
say("vernichten soll, dafür solle ich Flammengeister~")
say("bezwingen.")
say("Er war ja nicht besonders schlau, er hätte den Ring")
say("nur abnehmen brauchen um sich wieder zu erholen.")
say("")
say_reward("Hoffentlich dauert das nicht zu lange..")
end
----------------------------------------->Flammengeister<--------------------------------------|
when 2202.kill begin --ID Flammengeister
local kill1 = number(1,200)
if kill1==200 then --200 kills
clear_letter()
pc.remove_item(vnum, menge) -- Ring wegnehmen
pc.give_item2(vnum, menge) -- Neuer Ring
chat("Da stimmt was nicht mit dem Ring!")
set_state(geist)
end
------------------------------------->Flammengeister kill ENDE<--------------------------------|
end
end
state geist begin
when letter begin
send_letter("Der Ring")
end
when button or info begin
say_title("Geisterstimme:")
say("")
----"12345678901234567890123456789012345678901234567890"|
say("Hallo, wie ich gemerkt habe hat sich was getahn")
say("Der Ring wurde nur Heiß, in stücke sehe ich es~")
say("nicht.")
say("Bezwinge den Teufel selbst um den Ring vernichten~")
say("zu können. Geh nun und besiege den Sensenmann,")
say("damit man den Ring zerstören kann.")
say_reward("Besiege 1 Sensenmann")
end
when .kill begin --ID vom Sensenmann
------------------------------------------>Sensenmann<-----------------------------------------|
say_title("Geisterstimme:")
say("")
say("Du hast in Besiegt, gut gemacht.")
clear_letter()
set_state(destroy_ring)
end
---------------------------------------->Sensenmann kill Ende<---------------------------------|
end
state destroy_ring begin
when letter begin
sen_letter("Letzte Aufgabe")
end
when button or info begin
say_title("Geisterstimme:")
say("")
----"12345678901234567890123456789012345678901234567890"|
say("Hallo, Abenteurer~")
say("Du musst noch eine Letzte kleinigkeit erledigen")
say("jetzt musst du den Ring nur noch ins Vulkansfeuer~")
say("werfen,")
say("solch eine hitze kann nur der Feuerkönig erzeugen")
say("Geh nun mein Junger Abenteurer.")
say_reward("Besiege 100 Flammenkönig*")
end
when ID.kill begin --ID vom Flammenkönig
----------------------------------------->Flammenkönig*<---------------------------------------|
local pct = number(1,100)
if pct==100 then
clear_letter()
pc.remove_item(vnum, menge) --Ring wegnehmen
say_title("Geisterstimme:")
say("")
----"12345678901234567890123456789012345678901234567890"|
say(""..pc.get_name().."Unglaublich du hast es geschafft")
say("Die erste Aufgabe war umsonst hmm...")
say("Ich bin nicht Allwissend, So nun da du mein Schatz*")
say("Zerstört hast und den Fluch gebrochen hast")
say("Werde ich dir was verraten, das bringt mich von den")
say("Toten auch nicht wieder, aber was solls.")
say("Scheibe dir das Passwort auf.")
say_reward(""..pc.get_name().." schreibt... .")
wait()
say_reward(""..pc.get_name().." hat ein Passwortschein erhalten")
if pc.enough_inventory() then
pc.give_item2(vnum, menge) --ID des Scheine's
else
say(locale.years_greetings.not_enoguh_inventory)
end
set_state(lager)
end
------------------------------------------>Geisterstimme ENDE<---------------------------------|
---------------------------------------->Flammenkönig* kill ENDE<------------------------------|
end
state lager begin
when letter begin
send_letter("Passwortschein Abgeben")
local v = find_npc_by_vnum(ID) --ID vom Lagerverwalter
if v != 0 then
target.vid("targ", v, "Lagerverwalter")
end
end
when button or info begin
say_title("Passwortschein Abgeben")
say("")
say_reward("Zieh den Passwortschein auf dem Lagerverwalter")
end
when targ.target.click "Passwortschein" begin
target.delete("targ")
say_title("Lagerverwalter:")
say("")
say("ja, was möchtest du?")
say_reward("Tipp: Zieh den Passwortschein auf dem Lagerverwalter")
end
------------------------------------------>Lagerverwalter<-------------------------------------|
when warehouse_keeper.take with item.get_vnum(ID) begin --ID Passwortschein
-- if pc.is_gm() then
-- return
-- end
say_title("Lagerverwalter:")
say("")
----"12345678901234567890123456789012345678901234567890"|
say("Nanu was ist denn das?")
say("Ein Passwortschein?")
say("Junger Abenteurer weist du von wem das Ursprünglich")
say("gehörte?")
say("Das ist ein Passwortschein der Kaiserlichen Familie")
say("Ich sollte dies vor graumer Zeit aufbewahren")
say("Hier die Truhe von der Kaiserlichen Familie.")
pc.remove_item(ID) --ID vom Passwortschein
pc.give_item2(vnum, menge) --Kiste wegnehmen ID
say_reward("Du hast die Kaiserliche Truhe erhalten")
clear_letter()
set_state(kiste)
end
-------------------------------------->Lagerverwalter ENDE<------------------------------------|
end
------------------------------------------------>KISTE<----------------------------------------|
state kiste begin
when ID.use begin --ID Kiste
-- if pc.is_gm() then
-- return
-- end
say("Die Kaiserliche Truhe")
----"12345678901234567890123456789012345678901234567890"|
say_reward("Unglaublich, das ist keine Normale Kiste")
say("Wähle deine Belohnung mit Bedacht aus.")
-- say("Du darfst dir nur 2 sachen Auswählen")
say("Die Truhe verschwindet beim Öffnen")
-- if pc.getqf("kauf_punkt")==2 then
-- pc.remove_item(vnum, menge)
local s=select("Rüstungen,"Waffen","Sonstige","Beenden")
if s==1 then
local a=select("Krieger Rüstung","Ninja Rüstung","Sura Rüstung","Schamane Rüstung","Zurück")
if a==1 then --Krieger
-- pc.setqf("kauf_punkt", pc.getqf("kauf_punkt")+1)
if pc.enough_inventory() then
pc.give_item2(vnum, menge) --ID Rüstung
else
say(locale.years_greetings.not_enoguh_inventory)
end
pc.remove_item(vnum, menge) --Kiste wegnehmen ID
elseif a==2 then --Ninja
if pc.enough_inventory() then
pc.give_item2(vnum, menge) --ID Rüstung
else
say(locale.years_greetings.not_enoguh_inventory)
end
pc.remove_item(vnum, menge) --Kiste wegnehmen ID
-- pc.setqf("kauf_punkt", pc.getqf("kauf_punkt")+1)
elseif a==3 then --Sura
if pc.enough_inventory() then
pc.give_item2(vnum, menge) --ID Rüstung
else
say(locale.years_greetings.not_enoguh_inventory)
end
pc.remove_item(vnum, menge) --Kiste wegnehmen ID
-- pc.setqf("kauf_punkt", pc.getqf("kauf_punkt")+1)
elseif a==4 then --Schamane
if pc.enough_inventory() then
pc.give_item2(vnum, menge) --ID Rüstung
else
say(locale.years_greetings.not_enoguh_inventory)
end
pc.remove_item(vnum, menge) --Kiste wegnehmen ID
-- pc.setqf("kauf_punkt", pc.getqf("kauf_punkt")+1)
elseif a==5 then
return
else
say_title("Unbekanter Fehler:")
say("")
say("Berichte es dem ServerAdmin")
end
elseif s==2 then
local a=select("Krieger Waffe","Ninja Waffe","Sura Waffe","Schamane Waffe","Zurück")
if a==1 then --Krieger
if pc.enough_inventory() then
pc.give_item2(vnum, menge) --ID Waffe
else
say(locale.years_greetings.not_enoguh_inventory)
end
pc.remove_item(vnum, menge) --Kiste wegnehmen ID
-- pc.setqf("kauf_punkt", pc.getqf("kauf_punkt")+1)
elseif a==2 then --Ninja
if pc.enough_inventory() then
pc.give_item2(vnum, menge) --ID Waffe
else
say(locale.years_greetings.not_enoguh_inventory)
end
pc.remove_item(vnum, menge) --Kiste wegnehmen ID
-- pc.setqf("kauf_punkt", pc.getqf("kauf_punkt")+1)
elseif a==3 then --Sura
if pc.enough_inventory() then
pc.give_item2(vnum, menge) --ID Waffe
else
say(locale.years_greetings.not_enoguh_inventory)
end
pc.remove_item(vnum, menge) --Kiste wegnehmen ID
-- pc.setqf("kauf_punkt", pc.getqf("kauf_punkt")+1)
elseif a==4 then --Schamane
if pc.enough_invenotry() then
pc.give_item2(vnum, menge) --ID Waffe
else
say(locale.years_greetings.not_enoguh_inventory)
end
pc.remove_item(vnum, menge) --Kiste wegnehmen ID
-- pc.setqf("kauf_punkt", pc.getqf("kauf_punkt")+1)
elseif a==5 then
return
else
say_title("Unbekanter Fehler:")
say("")
say("Berichte es dem ServerAdmin")
end
elseif s==3 then
say_title("Wähle:")
say("")
local a=select("Weiße Perlen*","Blaue Perlen*","Rote Perlen*","Zurück")
if a==1 then
if pc.enough_inventory() then
pc.give_item2(vnum, menge) --ID der Perle
else
say(locale.years_greetings.not_enoguh_inventory)
end
pc.remove_item(vnum, menge) --Kiste wegnehmen ID
-- pc.setqf("kauf_punkt", pc.getqf("kauf_punkt")+1)
elseif a==2 then
if pc.enough_inventory() then
pc.give_item2(vnum, menge) --ID der Perle
else
say(locale.years_greetings.not_enoguh_inventory)
end
pc.remove_item(vnum, menge) --Kiste wegnehmen ID
-- pc.setqf("kauf_punkt", pc.getqf("kauf_punkt")+1)
elseif a==3 then
if pc.enough_inventory() then
pc.give_item2(vnum, menge) --ID der Perle
else
say(locale.years_greetings.not_enoguh_inventory)
end
pc.remove_item(vnum, menge) --Kiste wegnehmen ID
-- pc.setqf("kauf_punkt", pc.getqf("kauf_punkt")+1)
elseif a==4 then
return
else
say_title("Unbekanter Fehler:")
say("")
say("Berichte es dem ServerAdmin")
------------------------------------------------>KISTE ENDE<-------------------------------|
end
end
-- end
end
end
end
da hast du bei Rüstungen ein " vergessen ^^
PHP Code:
--Datei: evil_ring.quest
--NCP: Lagerverwalter
--Items:Waffen,Rüstungen,Perlen
--Mobs: Flammengeister, Sensenmann, Flammenkönig*
quest evil_ring begin
state start begin
------------------------------------------>Ring<-------------------------------------|
when ID.use begin --ID Ring
----"12345678901234567890123456789012345678901234567890"|
say("Das ist der Böse Ring, wenn du es benutzt")
say("macht er dich Unsichtbar,")
say("nur für kurze zeit kannst du in den zustand sein,")
say("du verlierst nach und nach Leben")
say("bis du schließlich stirbst.")
local s=select("Unsichtbarkeit","Normal")
if s==1 then
local a=pc.get_max_hp()-2000 -- (-2000tp/s³) ---|Nicht ganz eindeutig
local times = get_time() + 3 ---|
pc.get_hp(a, times) ---|
-- affect.add_collect(apply.HP_REGEN, -2000, 3) ---|Andere Beispielmöglichkeit
command("Unsichtbarkeitscode") ---|
-- cmdchat(" ") ---|
chat("Du wurdest Unsichtbar, verlierst aber jede 3te") ---|
chat("secunde TP") ---|
else ---|
return ---|
end ---|
if s==2 then ---|
command("Unsichtbarkeitscode") ---|
-- cmdchat(" ") ---|
chat("Du bist wieder Sichtbar") ---|Nicht ganz eindeutig
else
return
end
set_state(mission)
end
------------------------------------------>Ring ENDE<--------------------------------|
end
state mission begin
when login or letter with pc.level >= 60 begin
send_letter("Wirf den Ring ins Feuer")
-- if pc.is_gm() then
-- return
-- end
end
------------------------------------------>Geisterstimme<----------------------------|
when button or info begin
say_title("Geisterstimme:")
say("")
----"12345678901234567890123456789012345678901234567890"|
say("Hallo Abenteurer, ich bin eine umherwanderne Seele,")
say("die keine Ruhe findet, ich suche Abenteurer")
say("die ein Speziellen gegenstand besitzen... du hast")
say("mein Schatz*! Ring*")
say("Du hast schon mitbekommen, dass der Ring Böse ist~")
say("Ihm verdanke ich auch mein derzeitigen zustand...")
say("drum sage ich dir wie man den vernichten kann.")
say("Höre gut zu.")
wait()
say("Die einzige möglichkeit den Ring loszuwerden")
say("ist ihn zu verbrennen, aus den lodernen Flammen")
say("wo er Ursprünglich kahm, soll er auch~")
say("zerstört werden.")
say("Was dannach Passiert kann ich dir nicht sagen~")
say("ich hab nicht Lange gelebt um das mitzuerleben.")
say("Versuche erstmal den ring zu verbrennen")
say("Geh und bezwinge Flammengeister")
say_reward("Besiege 200 Flammengeister")
clear_letter()
set_state(flammen)
end
end
state flammen begin
when letter begin
send_letter("Der Ring")
end
when button or info begin
say_title("Der Ring")
say("")
----"12345678901234567890123456789012345678901234567890"|
say("Die Geisterstimme sagte mir das ich den Ring")
say("vernichten soll, dafür solle ich Flammengeister~")
say("bezwingen.")
say("Er war ja nicht besonders schlau, er hätte den Ring")
say("nur abnehmen brauchen um sich wieder zu erholen.")
say("")
say_reward("Hoffentlich dauert das nicht zu lange..")
end
----------------------------------------->Flammengeister<--------------------------------------|
when 2202.kill begin --ID Flammengeister
local kill1 = number(1,200)
if kill1==200 then --200 kills
clear_letter()
pc.remove_item(vnum, menge) -- Ring wegnehmen
pc.give_item2(vnum, menge) -- Neuer Ring
chat("Da stimmt was nicht mit dem Ring!")
set_state(geist)
end
------------------------------------->Flammengeister kill ENDE<--------------------------------|
end
end
state geist begin
when letter begin
send_letter("Der Ring")
end
when button or info begin
say_title("Geisterstimme:")
say("")
----"12345678901234567890123456789012345678901234567890"|
say("Hallo, wie ich gemerkt habe hat sich was getahn")
say("Der Ring wurde nur Heiß, in stücke sehe ich es~")
say("nicht.")
say("Bezwinge den Teufel selbst um den Ring vernichten~")
say("zu können. Geh nun und besiege den Sensenmann,")
say("damit man den Ring zerstören kann.")
say_reward("Besiege 1 Sensenmann")
end
when .kill begin --ID vom Sensenmann
------------------------------------------>Sensenmann<-----------------------------------------|
say_title("Geisterstimme:")
say("")
say("Du hast in Besiegt, gut gemacht.")
clear_letter()
set_state(destroy_ring)
end
---------------------------------------->Sensenmann kill Ende<---------------------------------|
end
state destroy_ring begin
when letter begin
sen_letter("Letzte Aufgabe")
end
when button or info begin
say_title("Geisterstimme:")
say("")
----"12345678901234567890123456789012345678901234567890"|
say("Hallo, Abenteurer~")
say("Du musst noch eine Letzte kleinigkeit erledigen")
say("jetzt musst du den Ring nur noch ins Vulkansfeuer~")
say("werfen,")
say("solch eine hitze kann nur der Feuerkönig erzeugen")
say("Geh nun mein Junger Abenteurer.")
say_reward("Besiege 100 Flammenkönig*")
end
when ID.kill begin --ID vom Flammenkönig
----------------------------------------->Flammenkönig*<---------------------------------------|
local pct = number(1,100)
if pct==100 then
clear_letter()
pc.remove_item(vnum, menge) --Ring wegnehmen
say_title("Geisterstimme:")
say("")
----"12345678901234567890123456789012345678901234567890"|
say(""..pc.get_name().."Unglaublich du hast es geschafft")
say("Die erste Aufgabe war umsonst hmm...")
say("Ich bin nicht Allwissend, So nun da du mein Schatz*")
say("Zerstört hast und den Fluch gebrochen hast")
say("Werde ich dir was verraten, das bringt mich von den")
say("Toten auch nicht wieder, aber was solls.")
say("Scheibe dir das Passwort auf.")
say_reward(""..pc.get_name().." schreibt... .")
wait()
say_reward(""..pc.get_name().." hat ein Passwortschein erhalten")
if pc.enough_inventory() then
pc.give_item2(vnum, menge) --ID des Scheines
else
say(locale.years_greetings.not_enoguh_inventory)
end
set_state(lager)
end
------------------------------------------>Geisterstimme ENDE<---------------------------------|
---------------------------------------->Flammenkönig* kill ENDE<------------------------------|
end
state lager begin
when letter begin
send_letter("Passwortschein Abgeben")
local v = find_npc_by_vnum(ID) --ID vom Lagerverwalter
if v != 0 then
target.vid("targ", v, "Lagerverwalter")
end
end
when button or info begin
say_title("Passwortschein Abgeben")
say("")
say_reward("Zieh den Passwortschein auf dem Lagerverwalter")
end
when targ.target.click "Passwortschein" begin
target.delete("targ")
say_title("Lagerverwalter:")
say("")
say("ja, was möchtest du?")
say_reward("Tipp: Zieh den Passwortschein auf dem Lagerverwalter")
end
------------------------------------------>Lagerverwalter<-------------------------------------|
when warehouse_keeper.take with item.get_vnum(ID) begin --ID Passwortschein
-- if pc.is_gm() then
-- return
-- end
say_title("Lagerverwalter:")
say("")
----"12345678901234567890123456789012345678901234567890"|
say("Nanu was ist denn das?")
say("Ein Passwortschein?")
say("Junger Abenteurer weist du von wem das Ursprünglich")
say("gehörte?")
say("Das ist ein Passwortschein der Kaiserlichen Familie")
say("Ich sollte dies vor graumer Zeit aufbewahren")
say("Hier die Truhe von der Kaiserlichen Familie.")
pc.remove_item(ID) --ID vom Passwortschein
pc.give_item2(vnum, menge) --Kiste wegnehmen ID
say_reward("Du hast die Kaiserliche Truhe erhalten")
clear_letter()
set_state(kiste)
end
-------------------------------------->Lagerverwalter ENDE<------------------------------------|
end
------------------------------------------------>KISTE<----------------------------------------|
state kiste begin
when ID.use begin --ID Kiste
-- if pc.is_gm() then
-- return
-- end
say("Die Kaiserliche Truhe")
----"12345678901234567890123456789012345678901234567890"|
say_reward("Unglaublich, das ist keine Normale Kiste")
say("Wähle deine Belohnung mit Bedacht aus.")
-- say("Du darfst dir nur 2 sachen Auswählen")
say("Die Truhe verschwindet beim Öffnen")
-- if pc.getqf("kauf_punkt")==2 then
-- pc.remove_item(vnum, menge)
local s=select("Rüstungen","Waffen","Sonstige","Beenden")
if s==1 then
local a=select("Krieger Rüstung","Ninja Rüstung","Sura Rüstung","Schamane Rüstung","Zurück")
if a==1 then --Krieger
-- pc.setqf("kauf_punkt", pc.getqf("kauf_punkt")+1)
if pc.enough_inventory() then
pc.give_item2(vnum, menge) --ID Rüstung
else
say(locale.years_greetings.not_enoguh_inventory)
end
pc.remove_item(vnum, menge) --Kiste wegnehmen ID
elseif a==2 then --Ninja
if pc.enough_inventory() then
pc.give_item2(vnum, menge) --ID Rüstung
else
say(locale.years_greetings.not_enoguh_inventory)
end
pc.remove_item(vnum, menge) --Kiste wegnehmen ID
-- pc.setqf("kauf_punkt", pc.getqf("kauf_punkt")+1)
elseif a==3 then --Sura
if pc.enough_inventory() then
pc.give_item2(vnum, menge) --ID Rüstung
else
say(locale.years_greetings.not_enoguh_inventory)
end
pc.remove_item(vnum, menge) --Kiste wegnehmen ID
-- pc.setqf("kauf_punkt", pc.getqf("kauf_punkt")+1)
elseif a==4 then --Schamane
if pc.enough_inventory() then
pc.give_item2(vnum, menge) --ID Rüstung
else
say(locale.years_greetings.not_enoguh_inventory)
end
pc.remove_item(vnum, menge) --Kiste wegnehmen ID
-- pc.setqf("kauf_punkt", pc.getqf("kauf_punkt")+1)
elseif a==5 then
return
else
say_title("Unbekanter Fehler:")
say("")
say("Berichte es dem ServerAdmin")
end
elseif s==2 then
local a=select("Krieger Waffe","Ninja Waffe","Sura Waffe","Schamane Waffe","Zurück")
if a==1 then --Krieger
if pc.enough_inventory() then
pc.give_item2(vnum, menge) --ID Waffe
else
say(locale.years_greetings.not_enoguh_inventory)
end
pc.remove_item(vnum, menge) --Kiste wegnehmen ID
-- pc.setqf("kauf_punkt", pc.getqf("kauf_punkt")+1)
elseif a==2 then --Ninja
if pc.enough_inventory() then
pc.give_item2(vnum, menge) --ID Waffe
else
say(locale.years_greetings.not_enoguh_inventory)
end
pc.remove_item(vnum, menge) --Kiste wegnehmen ID
-- pc.setqf("kauf_punkt", pc.getqf("kauf_punkt")+1)
elseif a==3 then --Sura
if pc.enough_inventory() then
pc.give_item2(vnum, menge) --ID Waffe
else
say(locale.years_greetings.not_enoguh_inventory)
end
pc.remove_item(vnum, menge) --Kiste wegnehmen ID
-- pc.setqf("kauf_punkt", pc.getqf("kauf_punkt")+1)
elseif a==4 then --Schamane
if pc.enough_invenotry() then
pc.give_item2(vnum, menge) --ID Waffe
else
say(locale.years_greetings.not_enoguh_inventory)
end
pc.remove_item(vnum, menge) --Kiste wegnehmen ID
-- pc.setqf("kauf_punkt", pc.getqf("kauf_punkt")+1)
elseif a==5 then
return
else
say_title("Unbekanter Fehler:")
say("")
say("Berichte es dem ServerAdmin")
end
elseif s==3 then
say_title("Wähle:")
say("")
local a=select("Weiße Perlen*","Blaue Perlen*","Rote Perlen*","Zurück")
if a==1 then
if pc.enough_inventory() then
pc.give_item2(vnum, menge) --ID der Perle
else
say(locale.years_greetings.not_enoguh_inventory)
end
pc.remove_item(vnum, menge) --Kiste wegnehmen ID
-- pc.setqf("kauf_punkt", pc.getqf("kauf_punkt")+1)
elseif a==2 then
if pc.enough_inventory() then
pc.give_item2(vnum, menge) --ID der Perle
else
say(locale.years_greetings.not_enoguh_inventory)
end
pc.remove_item(vnum, menge) --Kiste wegnehmen ID
-- pc.setqf("kauf_punkt", pc.getqf("kauf_punkt")+1)
elseif a==3 then
if pc.enough_inventory() then
pc.give_item2(vnum, menge) --ID der Perle
else
say(locale.years_greetings.not_enoguh_inventory)
end
pc.remove_item(vnum, menge) --Kiste wegnehmen ID
-- pc.setqf("kauf_punkt", pc.getqf("kauf_punkt")+1)
elseif a==4 then
return
else
say_title("Unbekanter Fehler:")
say("")
say("Berichte es dem ServerAdmin")
------------------------------------------------>KISTE ENDE<-------------------------------|
end
end
-- end
end
end
end
hier ist der fehler behoben beachte dann noch den tipp vom vorposter dann könnte es funktionieren ;D
|
|
|
|
|
09/03/2012, 16:07
|
#6708
|
elite*gold: 0
Join Date: Oct 2009
Posts: 428
Received Thanks: 192
|
Quote:
Originally Posted by dstyl
Hey Community,
ich habe ein kleines Problem..
Und zwar, wenn ich meine Quest einfüge steht in FreeBSD nur das:
Code:
QUEST : give_basic_weapon
STATE : start
WHEN : login
Das hier ist die volle Quest:
Code:
quest give_basic_weapon begin
state start begin
when login begin
if pc.getqf("first_log") == 0 then
pc.setqf("first_log", 1)
say_title("Herzlich willkommen!")
say("")
say("Herzlich willkommen auf SERVERNAME.")
say("Hier erwarten dich viele Quests und Aufgaben")
say("die teilweise nur in Gruppen schaffbar sind.")
say("Der zusammen halt von Gilden und Freunden ist")
say("hier sehr gefördert um den maximalen Spielspaß")
say("zu erzielen. Ich bitte dich nun zu Mr. Snace zu")
say("gehen. Er wird dir einiges näher bringen und erklären.")
say("Hole dir nun deine erste Ausrüstung bei Mr.Snace.")
set_state(first_mission)
end
end
end
state first_mission begin
when letter begin
local v = find_npc_by_vnum(33006)
if v != 0 then target.vid("__TARGET__", v, "Mr.Snace")
end
send_letter("Mr.Snace")
end
when button or info begin
say_title("Erste Mission")
say("")
say("Mr.Snace bittet dich zu ihm.")
say("Sprich mit ihm.")
say("")
say_reward("Sprich mit Mr.Snace")
say("")
end
when __TARGET__.target.click or 33006.chat."Erste Mission" begin
target.delete("__TARGET__")
say("Mr.Snace:")
say("")
say("Oh, da bist du ja endlich!")
say("Gut ...")
say("Ich bin übrigens Mr.Snace")
say("und helfe den neuen Usern sich zurecht zu finden.")
say("Als erstes solltest du zur Gemischwarenhändlerin.")
say("Sie hat einige Items für dich!")
set_state(gemi_items)
end
end
state gemi_items begin
when letter begin
local v = find_npc_by_vnum(9003)
if v != 0 then target.vid("__TARGET__", v, "Gemischtwarenhändlerin")
end
send_letter("Gehe zur Gemischtwarenhändlerin")
end
when button or info begin
say_title("Die Gemischtwarenhändlerin")
say("")
say("Mr.Snace gab euch den Auftrag,")
say("zur Gemischtwarenhändlerin zu gehen.")
say("Geht zu ihr und sprecht mit ihr.")
say("")
say_reward("Sprich mit der Gemischtwarenhändlerin")
say("")
end
when __TARGET__.target.click or 9003.chat."Mr.Snace" begin
target.delete("__TARGET__")
local gib = {
["allen"] = {{13007,1},{14007,1},{15007,1},{16007,1},{27001,200},{27004,200},{22230,1},{50904,1},},
[0] = {18 , 12207 , 11207 , 17027},[1] = {1008 , 12347 , 11407 , 17007},[2] = {18 , 12487 , 11607 , 17067},[3] = {7008 , 12627 , 11807 , 17067},}
table.foreach(gib.allen,function(i,l) pc.give_item2(l[1],l[2]) end)
table.foreach(gib[pc.get_job()],function(i,l) pc.give_item2(l,1) end)
say_title("Deine erste Ausrüstung")
say("")
say("Ihr müsst neu sein!")
say("Schön das Ihr so schnell zu mir gekommen seid.")
say("Ich bin übrigens die Gemischtwarenhändlerin!")
say("Ihr werdet mich wahrscheinlich öfters besuchen")
say("kommen, denn Ihr siehst aus wie eine Kämpfernatur!")
say("Ich habe noch ein paar alte Items im Lager die Ihr")
say("haben könnt, wenn Ihr möchtet.")
say("Ich hab sie ihnen mal in eure Tasche gepackt.")
say("Ihr könnt eure Tasche, auch Inventar genannt,")
say("mit der Taste "I" oder unten rechts auf dem Inventar")
say("Button öffnen. Außerdem wäre es lieb wenn Ihr etwas zu")
say("Mr.Snace von mir bringen könntest, was er letztens hier")
say("liegen gelassen hat.")
say_item_vnum(50904)
say("")
set_state(mrsnace_item)
end
end
state mrsnace_item begin
when letter begin
send_letter("Gehe zu Mr.Snace")
local v = find_npc_by_vnum(33006)
if v != 0 then target.vid("__TARGET__", v, "Mr.Snace")
end
end
when button or info begin
say_title("Mr.Snace's Rezept")
say("")
say("Mr.Snace hat sein Rezept bei der Gemischtwarenhändlerin")
say("vergessen. Bring es ihm zurück!")
say("")
end
when __TARGET__.target.click or 33006.chat."Das Rezept" begin
if pc.count_item(50904)>0 then
say("Mr.Snace:")
say("Vielen Dank!")
say("Das Rezept habe ich schon total vergessen.")
say("Vielen Dank nochmal das du es mir gebracht hast.")
say("Hier, nimm diese Umhänge als Zeichen meiner")
say("Dankbarkeit.")
say("")
pc.remove_item(50904,1)
pc.give_item2(70038,5)
set_state(rezept_abgegeben)
else
say("Mr.Snace:")
say("Könntest du mein Rezept von der")
say("Gemischtwarenhändlerin holen?")
say("WAS???")
say("Du hast es verloren?")
say("Auf Leute wie dich ist nie verlass..")
say("")
end
end
state rezept_abgegeben begin
when 33006.chat."Neue Aufgabe" begin
say("Mr.Snace:")
say("Hey, eine Aufgabe hätte ich noch für dich.")
say("Die Wildhunde haben mir ein anderes Rezept geklaut")
say("was ich umbedingt wieder haben muss.")
say("Es wäre echt toll wenn du sie mir zurückholen würdest.")
say_item_vnum(50903)
say_title("Würdest du das für mich machen?")
local s = select("Ja", "Nein")
if s == 1 then
say("Vielen, vielen Dank!")
say("Nun geh los und töte Wildhunde um mein Rezept")
say("zu finden.")
set_state(rezept_finden)
else
return
end
end
end
state rezept_finden begin
when letter begin
send_letter("Finde das Rezept")
end
when button or info begin
say_title("Das Rezept")
say("")
say("Die Wildhunde haben das Rezept geklaut!")
say("Geht und tötet Wildhunde um es wieder zu finden.")
say("")
say_item_vnum(50903)
say("")
end
when 101.kill or 102.kill or 103.kill begin
if pc.count_item(50903)<1 then
local rand = number(0,99)
if rand<3 then pc.give_item2(50903, 1)
end
end
end
when 33006.chat."Das verlorene Rezept" begin
if pc.count_item(50903)>0 then
say("Mr.Snace:")
say("Dank deiner Hilfe habe ich nun endlich")
say("mein Rezept wieder!")
say("Du hast hart gekämpft und dafür")
say("danke ich dir.")
say("Sprich mit Baek-Go, er wird dir helfen,")
say("deine inneren Kräfte zu steigern.")
say("")
pc.remove_item(50903,1)
set_state(rezept_reward)
else
say("Mr.Snace:")
say("Du hast das Rezept noch nicht gefunden?")
say("Das ist Schade..")
say("Was die Wildhunde wohl damit anstellen?")
say("")
end
end
end
state rezept_reward begin
when letter begin
send_letter("Sprich mit Baek-Go")
local v = find_npc_by_vnum(20018)
if v != 0 then target.vid("__TARGET__", v, "Doktor")
end
end
when button or info begin
say("Um die Belohnung von Mr.Snace zu erhalten")
say("suche Baek-Go auf.")
say("")
end
when __TARGET__.target.click or 20018.chat."Belohnung des Biologen" begin
target.delete("__TARGET__")
say_title("Baek-Go:")
say("Ich sehe ...")
say("Mr.Snace hat dich zu mir geschickt.")
say("Hier ist deine Belohnung:")
say("")
say_reward("Du erhälst:")
say_reward("TP +1500")
say("")
affect.add_collect(apply.MAX_HP, 1000, 60*60*24*365*60)
set_state(__COMPLETE__)
end
end
state __COMPLETE__ begin
end
end
PS: Das ist meine ERSTE Quest. |
Bräuchte immernoch Hilfe.. 
|
|
|
|
|
09/03/2012, 19:07
|
#6709
|
elite*gold: 5
Join Date: Oct 2010
Posts: 1,692
Received Thanks: 1,772
|
Quote:
Originally Posted by dstyl
Bräuchte immernoch Hilfe.. |
Benutz nicht immer else sondern mach elseif s == 2 then z.b.
|
|
|
|
|
09/04/2012, 00:24
|
#6710
|
elite*gold: 0
Join Date: Aug 2012
Posts: 65
Received Thanks: 8
|
Heyho zusammen,
Ich habe die Pets von  eingefügt,
Nun habe ich aber die Shinju2 Files und ne andere Quest.
Da ich probleme mit denen hatte, habe ich nun einfach neue Quest's gemacht.
Die Pets kommen zwar alle, aber sobald ich auf denen draufklicke erscheint nicht das Fenster wo ich zwischen Status & Tp auswählen kann...
Quest
Code:
quest BabyAzrael begin
state start begin
when 53005.use with pc.get_level()>=120 begin
local old = horse.get_level()
horse.set_level(22)
horse.summon()
say_title("BabyAzrael")
say("Um den Boni zu aktivieren musst du")
say("auf das BabyAzrael klicken!")
horse.set_level(old)
end
when 20529.click or 20530.click or 20531.click with horse.is_mine() begin
say_title("BabyAzrael")
if pc.getqf("dur") > get_time() then
say("Zurzeit ist noch ein Boni aktiv.")
return
end
say("Was für einen Boni möchtest du haben?")
local arr = {
{"Status", "Max. HP"},
{Status, Tp}
}
local bon = select_table(arr[1])
say_title("BabyAzrael")
if bon==3 then
affect.add_collect(1, 15000, 60*30)
say("Deine max. HP wurde für 30 Minuten um 15000 erhöht!")
else
for i=arr[2][1], arr[2][2] do
affect.add_collect(i, 35, 60*30)
end
say("Dein Status wurde für 30 Minuten um 35 erhöht!")
end
pc.setqf("dur", get_time() + 60*30)
end
end
end
Bitte genau erklären was falsch ist...
|
|
|
|
|
09/04/2012, 06:19
|
#6711
|
elite*gold: 0
Join Date: Mar 2012
Posts: 230
Received Thanks: 25
|
Was ist denn an dieser Quest bitte Falsch
PHP Code:
quest kaiser begin
state start begin
when 9010.chat."Kaiser-Wahl" begin
if game.get_event_flag("wahl") == 1 then
say("Grüß dich, was möchtest du tun?")
local s = select("Kaiser wählen", "zur Wahl aufstellen", "Wahl-Ergebnisse anschauen", "Abbrechen")
if s == 2 then
if pc.get_level() >= 98 then
if pc.getqf("aufgestellt") == 0 then
say("Willst du dich wirklich zur Wahl aufstellen?")
local w = select("Ja", "Nein")
if w == 2 then
say("Du kannst es dir ja noch anders überlegen.")
say("Bis dann.")
else
if game.get_event_flag("maximum") == 0 then
local name = pc.get_name()
global_setvarchar("erster", name)
game.set_event_flag("maximum", 1)
game.set_event_flag("stimmen_eins", 0)
pc.setqf("aufgestellt", 1)
say_color("green" , "Du hast dich erfolgreich zur Wahl aufgestellt.")
elseif game.get_event_flag("maximum") == 1 then
local name = pc.get_name()
global_setvarchar("zweiter", name)
game.set_event_flag("maximum", 2)
game.set_event_flag("stimmen_zwei", 0)
pc.setqf("aufgestellt", 1)
say_color("green" , "Du hast dich erfolgreich zur Wahl aufgestellt.")
elseif game.get_event_flag("maximum") == 2 then
local name = pc.get_name()
global_setvarchar("dritter", name)
game.set_event_flag("maximum", 3)
game.set_event_flag("stimmen_drei", 0)
pc.setqf("aufgestellt", 1)
say_color ("color" , "Du hast dich erfolgreich zur Wahl aufgestellt.")
elseif game.get_event_flag("maximum") == 3 then
local name = pc.get_name()
global_setvarchar("vierter", name)
game.set_event_flag("maximum", 4)
game.set_event_flag("stimmen_vier", 0)
pc.setqf("aufgestellt", 1)
say_color ("color" , "Du hast dich erfolgreich zur Wahl aufgestellt.")
elseif game.get_event_flag("maximum") == 4 then
local name = pc.get_name()
global_setvarchar("fuenfter", name)
game.set_event_flag("maximum", 5)
game.set_event_flag("stimmen_fuenf", 0)
pc.setqf("aufgestellt", 1)
say_color ("color" , "Du hast dich erfolgreich zur Wahl aufgestellt.")
elseif game.get_event_flag("maximum") == 5 then
local name = pc.get_name()
global_setvarchar("sechster", name)
game.set_event_flag("maximum", 6)
game.set_event_flag("stimmen_sechs", 0)
pc.setqf("aufgestellt", 1)
say_color ("color" , "Du hast dich erfolgreich zur Wahl aufgestellt.")
elseif game.get_event_flag("maximum") == 6 then
local name = pc.get_name()
global_setvarchar("siebter", name)
game.set_event_flag("maximum", 7)
game.set_event_flag("stimmen_sieben", 0)
pc.setqf("aufgestellt", 1)
say_color ("color" , "Du hast dich erfolgreich zur Wahl aufgestellt.")
elseif game.get_event_flag("maximum") == 7 then
local name = pc.get_name()
global_setvarchar("achter", name)
game.set_event_flag("maximum", 8)
pc.setqf("aufgestellt", 1)
game.set_event_flag("stimmen_acht", 0)
say_color ("color" , "Du hast dich erfolgreich zur Wahl aufgestellt.")
elseif game.get_event_flag("maximum") == 8 then
local name = pc.get_name()
global_setvarchar("neunter", name)
game.set_event_flag("maximum", 9)
game.set_event_flag("stimmen_neun", 0)
pc.setqf("aufgestellt", 1)
say_color ("color" , "Du hast dich erfolgreich zur Wahl aufgestellt.")
elseif game.get_event_flag("maximum") == 9 then
local name = pc.get_name()
global_setvarchar("zehnter", name)
game.set_event_flag("maximum", 10)
game.set_event_flag("stimmen_zehn", 0)
pc.setqf("aufgestellt", 1)
say_color ("color" , "Du hast dich erfolgreich zur Wahl aufgestellt.")
elseif game.get_event_flag("maximum") >= 10 then
say_color("red" , "Leider sind bereits 10 Spieler aufgestellt.")
else
say_color("red" , "Fehler!")
end
end
else
say_color("red" , "Du bist bereits aufgestellt!")
end
else
say_color("red" , "Du bist leider zu niedrig um als Kaiser zu kandidieren!")
end
elseif s == 1 then
if pc.getqf("gewählt") == 0 then
say("Welchen Spieler möchtest du als Kaiser wählen?")
local waehlen = select(""..global_getvarchar("erster").."", ""..global_getvarchar("zweiter").."", ""..global_getvarchar("dritter").."", ""..global_getvarchar("vierter").."", ""..global_getvarchar("fuenfter").."", "Weiter", "Abbrechen")
if waehlen == 6 then
local waehlen_zwei = select(""..global_getvarchar("sechster").."", ""..global_getvarchar("siebter").."", ""..global_getvarchar("achter").."", ""..global_getvarchar("neunter").."", ""..global_getvarchar("zehnter").."", "Abbrechen")
if waehlen_zwei == 1 then
say("Willst du wirklich "..global_getvarchar("sechster").." wählen?")
local w = select("Ja", "Nein")
if w == 1 then
say_green("Du hast "..global_getvarchar("sechster").." gewählt.")
pc.setqf("gewählt", 1)
game.set_event_flag("stimmen_sechs", game.get_event_flag("stimmen_sechs")+1)
end
elseif waehlen_zwei == 2 then
say("Willst du wirklich "..global_getvarchar("siebter").." wählen?")
local w = select("Ja", "Nein")
if w == 1 then
say_green("Du hast "..global_getvarchar("siebter").." gewählt.")
pc.setqf("gewählt", 1)
game.set_event_flag("stimmen_sieben", game.get_event_flag("stimmen_sieben")+1)
end
elseif waehlen_zwei == 3 then
say("Willst du wirklich "..global_getvarchar("achter").." wählen?")
local w = select("Ja", "Nein")
if w == 1 then
say_green("Du hast "..global_getvarchar("achter").." gewählt.")
pc.setqf("gewählt", 1)
game.set_event_flag("stimmen_acht", game.get_event_flag("stimmen_acht")+1)
end
elseif waehlen_zwei == 4 then
say("Willst du wirklich "..global_getvarchar("neunter").." wählen?")
local w = select("Ja", "Nein")
if w == 1 then
say_green("Du hast "..global_getvarchar("neunter").." gewählt.")
pc.setqf("gewählt", 1)
game.set_event_flag("stimmen_neun", game.get_event_flag("stimmen_neun")+1)
end
elseif waehlen_zwei == 5 then
say("Willst du wirklich "..global_getvarchar("zehnter").." wählen?")
local w = select("Ja", "Nein")
if w == 1 then
say_green("Du hast "..global_getvarchar("zehnter").." gewählt.")
pc.setqf("gewählt", 1)
game.set_event_flag("stimmen_zehn", game.get_event_flag("stimmen_zehn")+1)
end
end
elseif waehlen == 1 then
say("Willst du wirklich "..global_getvarchar("erster").." wählen?")
local w = select("Ja", "Nein")
if w == 1 then
say_green("Du hast "..global_getvarchar("erster").." gewählt.")
pc.setqf("gewählt", 1)
game.set_event_flag("stimmen_eins", game.get_event_flag("stimmen_eins")+1)
end
elseif waehlen == 2 then
say("Willst du wirklich "..global_getvarchar("zweiter").." wählen?")
local w = select("Ja", "Nein")
if w == 1 then
say_green("Du hast "..global_getvarchar("zweiter").." gewählt.")
pc.setqf("gewählt", 1)
game.set_event_flag("stimmen_zwei", game.get_event_flag("stimmen_zwei")+1)
end
elseif waehlen == 3 then
say("Willst du wirklich "..global_getvarchar("dritter").." wählen?")
local w = select("Ja", "Nein")
if w == 1 then
say_green("Du hast "..global_getvarchar("dritter").." gewählt.")
pc.setqf("gewählt", 1)
game.set_event_flag("stimmen_drei", game.get_event_flag("stimmen_drei")+1)
end
elseif waehlen == 4 then
say("Willst du wirklich "..global_getvarchar("vierter").." wählen?")
local w = select("Ja", "Nein")
if w == 1 then
say_green("Du hast "..global_getvarchar("vierter").." gewählt.")
pc.setqf("gewählt", 1)
game.set_event_flag("stimmen_vier", game.get_event_flag("stimmen_vier")+1)
end
elseif waehlen == 5 then
say("Willst du wirklich "..global_getvarchar("fuenfter").." wählen?")
local w = select("Ja", "Nein")
if w == 1 then
say_green("Du hast "..global_getvarchar("fuenfter").." gewählt.")
pc.setqf("gewählt", 1)
game.set_event_flag("stimmen_fuenf", game.get_event_flag("stimmen_fuenf")+1)
end
end
else
say_color("red" , "Du hast bereits eine Stimme abgegeben.")
end
elseif s == 3 then
say("Hier kannst du die aktuellen Wahl-Ergebnisse anschauen.")
say("")
say(""..global_getvarchar("erster").." : "..game.get_event_flag("stimmen_eins").." Stimmen")
say("")
say(""..global_getvarchar("zweiter").." : "..game.get_event_flag("stimmen_zwei").." Stimmen")
say("")
say(""..global_getvarchar("dritter").." : "..game.get_event_flag("stimmen_drei").." Stimmen")
say("")
say(""..global_getvarchar("vierter").." : "..game.get_event_flag("stimmen_vier").." Stimmen")
say("")
say(""..global_getvarchar("fuenfter").." : "..game.get_event_flag("stimmen_fuenf").." Stimmen")
say("")
say(""..global_getvarchar("sechster").." : "..game.get_event_flag("stimmen_sechs").." Stimmen")
say("")
say(""..global_getvarchar("siebter").." : "..game.get_event_flag("stimmen_sieben").." Stimmen")
say("")
say(""..global_getvarchar("achter").." : "..game.get_event_flag("stimmen_acht").." Stimmen")
say("")
say(""..global_getvarchar("neunter").." : "..game.get_event_flag("stimmen_neun").." Stimmen")
say("")
say(""..global_getvarchar("zehnter").." : "..game.get_event_flag("stimmen_zehn").." Stimmen")
say("")
end
elseif game.get_event_flag("wahl") == 0 then
if pc.getqf("aufgestellt") == 1 then
say_green("Zurück gesetzt. Vielen Dank!")
pc.setqf("aufgestellt", 0)
else
say_color("red" , "Die Kaiser-Wahl ist beendet.")
say_color("red" , "Sobald die nächste startet, wirst du informiert.")
say("")
if game.get_event_flag(""..global_getvarchar("neuer_kaiser").."") == 1 then
say_green("Aktueller Kaiser: "..global_getvarchar("neuer_kaiser")..", Status: Online")
else
say_color("red" , Aktueller Kaiser: "..global_getvarchar("neuer_kaiser")..", Status: Offline")
end
end
end
end
when 20013.chat."Kaiser-Wahl-Optionen" with pc.is_gm() begin
if game.get_event_flag("wahl") == 0 then
if pc.getqf("installation") == 0 then
say("Wie ich sehe, sind sie das erste mal hier.")
say("Deshalb ist eine Installation vor dem Starten erforderlich!")
say("Geben sie bitte folgendes ein: nicht festgelegt")
local abc = input()
if abc == "nicht festgelegt" then
global_setvarchar("install", abc)
pc.setqf("installation", 1)
say_green("Installation erfolgreich!")
say_green("Sie können das System nun benutzen.")
else
say_color("red" , "Installation fehlgeschlagen!")
end
else
local w = select("Kaiser-Wahl starten", "aktueller Kaiser", "Abbrechen")
if w == 1 then
notice_all(""..global_getvarchar("neuer_kaiser").." wurde von seinem Amt entlöst!")
notice_all("Eine neue Kaiser-Wahl wurde gestartet!")
notice_all("Ihr könnt euch nun zur Wahl aufstellen.")
notice_all("Viel Glück!")
game.set_event_flag("wahl", 1)
game.set_event_flag("stimmen_eins", 0)
game.set_event_flag("stimmen_zwei", 0)
game.set_event_flag("stimmen_drei", 0)
game.set_event_flag("stimmen_vier", 0)
game.set_event_flag("stimmen_fuenf", 0)
game.set_event_flag("stimmen_sechs", 0)
game.set_event_flag("stimmen_sieben", 0)
game.set_event_flag("stimmen_acht", 0)
game.set_event_flag("stimmen_neun", 0)
game.set_event_flag("stimmen_zehn", 0)
game.set_event_flag("maximum", 0)
global_setvarchar("erster", global_getvarchar("install"))
global_setvarchar("zweiter", global_getvarchar("install"))
global_setvarchar("dritter", global_getvarchar("install"))
global_setvarchar("vierter", global_getvarchar("install"))
global_setvarchar("fuenfter", global_getvarchar("install"))
global_setvarchar("sechster", global_getvarchar("install"))
global_setvarchar("siebter", global_getvarchar("install"))
global_setvarchar("achter", global_getvarchar("install"))
global_setvarchar("neunter", global_getvarchar("install"))
global_setvarchar("zehnter", global_getvarchar("install"))
global_setvarchar("neuer_kaiser", global_getvarchar("install"))
elseif w == 2 then
say("Aktueller Kaiser ist: "..global_getvarchar("neuer_kaiser")..".")
end
end
else
local w = select("Kaiser-Wahl beenden", "Abbrechen")
if w == 1 then
say("Möchtest du die Wahl wirklich beenden?")
local s = select("Ja", "Nein")
if s == 1 then
notice_all("In 24 Stunden endet die Kaiser-Wahl.")
notice_all("Also nochmal kräftig wählen!")
timer("generation", 60*1)
end
end
end
end
when generation.timer begin
game.set_event_flag("wahl", 0)
notice_all("Die letzten 24 Stunden sind rum!")
notice_all("Die Wahl-Kanäle wurden geschlossen.")
notice_all("Die Stimmen werden ausgewertet. Dies kann einige Minuten beanspruchen.")
game.set_event_flag("wahl", 0)
local eins = game.get_event_flag("stimmen_eins")
local zwei = game.get_event_flag("stimmen_zwei")
local drei = game.get_event_flag("stimmen_drei")
local vier = game.get_event_flag("stimmen_vier")
local fuenf = game.get_event_flag("stimmen_fuenf")
local sechs = game.get_event_flag("stimmen_sechs")
local sieben = game.get_event_flag("stimmen_sieben")
local acht = game.get_event_flag("stimmen_acht")
local neun = game.get_event_flag("stimmen_neun")
local zehn = game.get_event_flag("stimmen_zehn")
if eins > zwei and eins > drei and eins > vier and eins > fuenf and eins > sechs and eins > sieben and eins > acht and eins > neun and eins > zehn then
global_setvarchar("neuer_kaiser", global_getvarchar("erster"))
timer("auswertung", 60*2)
elseif zwei > eins and zwei > drei and zwei > vier and zwei > fuenf and zwei > sechs and zwei > sieben and zwei > acht and zwei > neun and zwei > zehn then
global_setvarchar("neuer_kaiser", global_getvarchar("zweiter"))
timer("auswertung", 60*2)
elseif drei > eins and drei > zwei and drei > vier and drei > fuenf and drei > sechs and drei > sieben and drei > acht and drei > neun and drei > zehn then
global_setvarchar("neuer_kaiser", global_getvarchar("dritter"))
timer("auswertung", 60*2)
elseif vier > eins and vier > zwei and vier > drei and vier > fuenf and vier > sechs and vier > sieben and vier > acht and vier > neun and vier > zehn then
global_setvarchar("neuer_kaiser", global_getvarchar("vierter"))
timer("auswertung", 60*2)
elseif fuenf > eins and fuenf > zwei and fuenf > drei and fuenf > vier and fuenf > sechs and fuenf > sieben and fuenf > acht and fuenf > neun and fuenf > zehn then
global_setvarchar("neuer_kaiser", global_getvarchar("fuenf"))
timer("auswertung", 60*2)
elseif sechs > eins and sechs > zwei and sechs > drei and sechs > vier and sechs > fuenf and sechs > sieben and sechs > acht and sechs > neun and sechs > zehn then
global_setvarchar("neuer_kaiser", global_getvarchar("sechs"))
timer("auswertung", 60*2)
elseif sieben > eins and sieben > zwei and sieben > drei and sieben > vier and sieben > fuenf and sieben > sechs and sieben > acht and sieben > neun and sieben > zehn then
global_setvarchar("neuer_kaiser", global_getvarchar("sieben"))
timer("auswertung", 60*2)
elseif acht > eins and acht > zwei and acht > drei and acht > vier and acht > fuenf and acht > sechs and acht > sieben and acht > neun and acht > zehn then
global_setvarchar("neuer_kaiser", global_getvarchar("acht"))
timer("auswertung", 60*2)
elseif neun > eins and neun > zwei and neun > drei and neun > vier and neun > fuenf and neun > sechs and neun > sieben and neun > acht and neun > zehn then
global_setvarchar("neuer_kaiser", global_getvarchar("neun"))
timer("auswertung", 60*2)
elseif zehn > eins and zehn > zwei and zehn > drei and zehn > vier and zehn > fuenf and zehn > sechs and zehn > sieben and zehn > acht and zehn > neun then
global_setvarchar("neuer_kaiser", global_getvarchar("zehn"))
timer("auswertung", 60*2)
else
notice_all("Stimmen Gleichheit! Neuwahl erforderlich.")
notice_all("Die aufgestellten Spieler können nun nicht mit wählen!")
game.set_event_flag("wahl", 1)
game.set_event_flag("stimmen_eins", 0)
game.set_event_flag("stimmen_zwei", 0)
game.set_event_flag("stimmen_drei", 0)
game.set_event_flag("stimmen_vier", 0)
game.set_event_flag("stimmen_fuenf", 0)
game.set_event_flag("stimmen_sechs", 0)
game.set_event_flag("stimmen_sieben", 0)
game.set_event_flag("stimmen_acht", 0)
game.set_event_flag("stimmen_neun", 0)
game.set_event_flag("stimmen_zehn", 0)
end
end
when auswertung.timer begin
notice_all("Die Stimmen wurden ausgewertet!")
notice_all("Der neue Kaiser ist : "..global_getvarchar("neuer_kaiser").."")
notice_all("Herzlichen Glückwunsch!")
timer("bugs", 60*2)
end
when bugs.timer begin
notice_all("An alle, die sich bei der Wahl aufgestellt haben:")
notice_all("Bitte begebt euch umgehend zum Fischer,")
notice_all("ansonsten könnt ihr bei der nächsten Wahl nicht teilnehmen!!!")
end
when login begin
if global_getvarchar("neuer_kaiser") == pc.get_name() then
notice_all("Euer Kaiser, "..global_getvarchar("neuer_kaiser").." hat sich soeben eingeloggt!")
game.set_event_flag(pc.get_name(), 1)
end
end
when logout begin
if global_getvarchar("neuer_kaiser") == pc.get_name() then
notice_all("Euer Kaiser, "..global_getvarchar("neuer_kaiser").." hat sich soeben ausgeloggt!")
game.set_event_flag(pc.get_name(), 0)
end
end
end
end
|
|
|
|
|
09/04/2012, 18:29
|
#6712
|
elite*gold: 150
Join Date: Sep 2009
Posts: 855
Received Thanks: 486
|
Beim ersten drüberscrollen sieht man natürlich den "Farbwechsel", der auf einem fehlenden Zeichen bzw. einem Überschüssigen basiert, probier es so, hab es mir nicht genau angeschaut, is mir grad zu lang, wäre auch ÜBERAUS praktisch, wenn du in Zukunft die Fehlermeldung in Putty/VPC/Bla mit postest, danke!
PHP Code:
quest kaiser begin
state start begin
when 9010.chat."Kaiser-Wahl" begin
if game.get_event_flag("wahl") == 1 then
say("Grüß dich, was möchtest du tun?")
local s = select("Kaiser wählen", "zur Wahl aufstellen", "Wahl-Ergebnisse anschauen", "Abbrechen")
if s == 2 then
if pc.get_level() >= 98 then
if pc.getqf("aufgestellt") == 0 then
say("Willst du dich wirklich zur Wahl aufstellen?")
local w = select("Ja", "Nein")
if w == 2 then
say("Du kannst es dir ja noch anders überlegen.")
say("Bis dann.")
else
if game.get_event_flag("maximum") == 0 then
local name = pc.get_name()
global_setvarchar("erster", name)
game.set_event_flag("maximum", 1)
game.set_event_flag("stimmen_eins", 0)
pc.setqf("aufgestellt", 1)
say_color("green" , "Du hast dich erfolgreich zur Wahl aufgestellt.")
elseif game.get_event_flag("maximum") == 1 then
local name = pc.get_name()
global_setvarchar("zweiter", name)
game.set_event_flag("maximum", 2)
game.set_event_flag("stimmen_zwei", 0)
pc.setqf("aufgestellt", 1)
say_color("green" , "Du hast dich erfolgreich zur Wahl aufgestellt.")
elseif game.get_event_flag("maximum") == 2 then
local name = pc.get_name()
global_setvarchar("dritter", name)
game.set_event_flag("maximum", 3)
game.set_event_flag("stimmen_drei", 0)
pc.setqf("aufgestellt", 1)
say_color ("color" , "Du hast dich erfolgreich zur Wahl aufgestellt.")
elseif game.get_event_flag("maximum") == 3 then
local name = pc.get_name()
global_setvarchar("vierter", name)
game.set_event_flag("maximum", 4)
game.set_event_flag("stimmen_vier", 0)
pc.setqf("aufgestellt", 1)
say_color ("color" , "Du hast dich erfolgreich zur Wahl aufgestellt.")
elseif game.get_event_flag("maximum") == 4 then
local name = pc.get_name()
global_setvarchar("fuenfter", name)
game.set_event_flag("maximum", 5)
game.set_event_flag("stimmen_fuenf", 0)
pc.setqf("aufgestellt", 1)
say_color ("color" , "Du hast dich erfolgreich zur Wahl aufgestellt.")
elseif game.get_event_flag("maximum") == 5 then
local name = pc.get_name()
global_setvarchar("sechster", name)
game.set_event_flag("maximum", 6)
game.set_event_flag("stimmen_sechs", 0)
pc.setqf("aufgestellt", 1)
say_color ("color" , "Du hast dich erfolgreich zur Wahl aufgestellt.")
elseif game.get_event_flag("maximum") == 6 then
local name = pc.get_name()
global_setvarchar("siebter", name)
game.set_event_flag("maximum", 7)
game.set_event_flag("stimmen_sieben", 0)
pc.setqf("aufgestellt", 1)
say_color ("color" , "Du hast dich erfolgreich zur Wahl aufgestellt.")
elseif game.get_event_flag("maximum") == 7 then
local name = pc.get_name()
global_setvarchar("achter", name)
game.set_event_flag("maximum", 8)
pc.setqf("aufgestellt", 1)
game.set_event_flag("stimmen_acht", 0)
say_color ("color" , "Du hast dich erfolgreich zur Wahl aufgestellt.")
elseif game.get_event_flag("maximum") == 8 then
local name = pc.get_name()
global_setvarchar("neunter", name)
game.set_event_flag("maximum", 9)
game.set_event_flag("stimmen_neun", 0)
pc.setqf("aufgestellt", 1)
say_color ("color" , "Du hast dich erfolgreich zur Wahl aufgestellt.")
elseif game.get_event_flag("maximum") == 9 then
local name = pc.get_name()
global_setvarchar("zehnter", name)
game.set_event_flag("maximum", 10)
game.set_event_flag("stimmen_zehn", 0)
pc.setqf("aufgestellt", 1)
say_color ("color" , "Du hast dich erfolgreich zur Wahl aufgestellt.")
elseif game.get_event_flag("maximum") >= 10 then
say_color("red" , "Leider sind bereits 10 Spieler aufgestellt.")
else
say_color("red" , "Fehler!")
end
end
else
say_color("red" , "Du bist bereits aufgestellt!")
end
else
say_color("red" , "Du bist leider zu niedrig um als Kaiser zu kandidieren!")
end
elseif s == 1 then
if pc.getqf("gewählt") == 0 then
say("Welchen Spieler möchtest du als Kaiser wählen?")
local waehlen = select(""..global_getvarchar("erster").."", ""..global_getvarchar("zweiter").."", ""..global_getvarchar("dritter").."", ""..global_getvarchar("vierter").."", ""..global_getvarchar("fuenfter").."", "Weiter", "Abbrechen")
if waehlen == 6 then
local waehlen_zwei = select(""..global_getvarchar("sechster").."", ""..global_getvarchar("siebter").."", ""..global_getvarchar("achter").."", ""..global_getvarchar("neunter").."", ""..global_getvarchar("zehnter").."", "Abbrechen")
if waehlen_zwei == 1 then
say("Willst du wirklich "..global_getvarchar("sechster").." wählen?")
local w = select("Ja", "Nein")
if w == 1 then
say_green("Du hast "..global_getvarchar("sechster").." gewählt.")
pc.setqf("gewählt", 1)
game.set_event_flag("stimmen_sechs", game.get_event_flag("stimmen_sechs")+1)
end
elseif waehlen_zwei == 2 then
say("Willst du wirklich "..global_getvarchar("siebter").." wählen?")
local w = select("Ja", "Nein")
if w == 1 then
say_green("Du hast "..global_getvarchar("siebter").." gewählt.")
pc.setqf("gewählt", 1)
game.set_event_flag("stimmen_sieben", game.get_event_flag("stimmen_sieben")+1)
end
elseif waehlen_zwei == 3 then
say("Willst du wirklich "..global_getvarchar("achter").." wählen?")
local w = select("Ja", "Nein")
if w == 1 then
say_green("Du hast "..global_getvarchar("achter").." gewählt.")
pc.setqf("gewählt", 1)
game.set_event_flag("stimmen_acht", game.get_event_flag("stimmen_acht")+1)
end
elseif waehlen_zwei == 4 then
say("Willst du wirklich "..global_getvarchar("neunter").." wählen?")
local w = select("Ja", "Nein")
if w == 1 then
say_green("Du hast "..global_getvarchar("neunter").." gewählt.")
pc.setqf("gewählt", 1)
game.set_event_flag("stimmen_neun", game.get_event_flag("stimmen_neun")+1)
end
elseif waehlen_zwei == 5 then
say("Willst du wirklich "..global_getvarchar("zehnter").." wählen?")
local w = select("Ja", "Nein")
if w == 1 then
say_green("Du hast "..global_getvarchar("zehnter").." gewählt.")
pc.setqf("gewählt", 1)
game.set_event_flag("stimmen_zehn", game.get_event_flag("stimmen_zehn")+1)
end
end
elseif waehlen == 1 then
say("Willst du wirklich "..global_getvarchar("erster").." wählen?")
local w = select("Ja", "Nein")
if w == 1 then
say_green("Du hast "..global_getvarchar("erster").." gewählt.")
pc.setqf("gewählt", 1)
game.set_event_flag("stimmen_eins", game.get_event_flag("stimmen_eins")+1)
end
elseif waehlen == 2 then
say("Willst du wirklich "..global_getvarchar("zweiter").." wählen?")
local w = select("Ja", "Nein")
if w == 1 then
say_green("Du hast "..global_getvarchar("zweiter").." gewählt.")
pc.setqf("gewählt", 1)
game.set_event_flag("stimmen_zwei", game.get_event_flag("stimmen_zwei")+1)
end
elseif waehlen == 3 then
say("Willst du wirklich "..global_getvarchar("dritter").." wählen?")
local w = select("Ja", "Nein")
if w == 1 then
say_green("Du hast "..global_getvarchar("dritter").." gewählt.")
pc.setqf("gewählt", 1)
game.set_event_flag("stimmen_drei", game.get_event_flag("stimmen_drei")+1)
end
elseif waehlen == 4 then
say("Willst du wirklich "..global_getvarchar("vierter").." wählen?")
local w = select("Ja", "Nein")
if w == 1 then
say_green("Du hast "..global_getvarchar("vierter").." gewählt.")
pc.setqf("gewählt", 1)
game.set_event_flag("stimmen_vier", game.get_event_flag("stimmen_vier")+1)
end
elseif waehlen == 5 then
say("Willst du wirklich "..global_getvarchar("fuenfter").." wählen?")
local w = select("Ja", "Nein")
if w == 1 then
say_green("Du hast "..global_getvarchar("fuenfter").." gewählt.")
pc.setqf("gewählt", 1)
game.set_event_flag("stimmen_fuenf", game.get_event_flag("stimmen_fuenf")+1)
end
end
else
say_color("red" , "Du hast bereits eine Stimme abgegeben.")
end
elseif s == 3 then
say("Hier kannst du die aktuellen Wahl-Ergebnisse anschauen.")
say("")
say(""..global_getvarchar("erster").." : "..game.get_event_flag("stimmen_eins").." Stimmen")
say("")
say(""..global_getvarchar("zweiter").." : "..game.get_event_flag("stimmen_zwei").." Stimmen")
say("")
say(""..global_getvarchar("dritter").." : "..game.get_event_flag("stimmen_drei").." Stimmen")
say("")
say(""..global_getvarchar("vierter").." : "..game.get_event_flag("stimmen_vier").." Stimmen")
say("")
say(""..global_getvarchar("fuenfter").." : "..game.get_event_flag("stimmen_fuenf").." Stimmen")
say("")
say(""..global_getvarchar("sechster").." : "..game.get_event_flag("stimmen_sechs").." Stimmen")
say("")
say(""..global_getvarchar("siebter").." : "..game.get_event_flag("stimmen_sieben").." Stimmen")
say("")
say(""..global_getvarchar("achter").." : "..game.get_event_flag("stimmen_acht").." Stimmen")
say("")
say(""..global_getvarchar("neunter").." : "..game.get_event_flag("stimmen_neun").." Stimmen")
say("")
say(""..global_getvarchar("zehnter").." : "..game.get_event_flag("stimmen_zehn").." Stimmen")
say("")
end
elseif game.get_event_flag("wahl") == 0 then
if pc.getqf("aufgestellt") == 1 then
say_green("Zurück gesetzt. Vielen Dank!")
pc.setqf("aufgestellt", 0)
else
say_color("red" , "Die Kaiser-Wahl ist beendet.")
say_color("red" , "Sobald die nächste startet, wirst du informiert.")
say("")
if game.get_event_flag(""..global_getvarchar("neuer_kaiser").."") == 1 then
say_green("Aktueller Kaiser: "..global_getvarchar("neuer_kaiser")..", Status: Online")
else
say_color("red" , "Aktueller Kaiser: "..global_getvarchar("neuer_kaiser")..", Status: Offline")
end
end
end
end
when 20013.chat."Kaiser-Wahl-Optionen" with pc.is_gm() begin
if game.get_event_flag("wahl") == 0 then
if pc.getqf("installation") == 0 then
say("Wie ich sehe, sind sie das erste mal hier.")
say("Deshalb ist eine Installation vor dem Starten erforderlich!")
say("Geben sie bitte folgendes ein: nicht festgelegt")
local abc = input()
if abc == "nicht festgelegt" then
global_setvarchar("install", abc)
pc.setqf("installation", 1)
say_green("Installation erfolgreich!")
say_green("Sie können das System nun benutzen.")
else
say_color("red" , "Installation fehlgeschlagen!")
end
else
local w = select("Kaiser-Wahl starten", "aktueller Kaiser", "Abbrechen")
if w == 1 then
notice_all(""..global_getvarchar("neuer_kaiser").." wurde von seinem Amt entlöst!")
notice_all("Eine neue Kaiser-Wahl wurde gestartet!")
notice_all("Ihr könnt euch nun zur Wahl aufstellen.")
notice_all("Viel Glück!")
game.set_event_flag("wahl", 1)
game.set_event_flag("stimmen_eins", 0)
game.set_event_flag("stimmen_zwei", 0)
game.set_event_flag("stimmen_drei", 0)
game.set_event_flag("stimmen_vier", 0)
game.set_event_flag("stimmen_fuenf", 0)
game.set_event_flag("stimmen_sechs", 0)
game.set_event_flag("stimmen_sieben", 0)
game.set_event_flag("stimmen_acht", 0)
game.set_event_flag("stimmen_neun", 0)
game.set_event_flag("stimmen_zehn", 0)
game.set_event_flag("maximum", 0)
global_setvarchar("erster", global_getvarchar("install"))
global_setvarchar("zweiter", global_getvarchar("install"))
global_setvarchar("dritter", global_getvarchar("install"))
global_setvarchar("vierter", global_getvarchar("install"))
global_setvarchar("fuenfter", global_getvarchar("install"))
global_setvarchar("sechster", global_getvarchar("install"))
global_setvarchar("siebter", global_getvarchar("install"))
global_setvarchar("achter", global_getvarchar("install"))
global_setvarchar("neunter", global_getvarchar("install"))
global_setvarchar("zehnter", global_getvarchar("install"))
global_setvarchar("neuer_kaiser", global_getvarchar("install"))
elseif w == 2 then
say("Aktueller Kaiser ist: "..global_getvarchar("neuer_kaiser")..".")
end
end
else
local w = select("Kaiser-Wahl beenden", "Abbrechen")
if w == 1 then
say("Möchtest du die Wahl wirklich beenden?")
local s = select("Ja", "Nein")
if s == 1 then
notice_all("In 24 Stunden endet die Kaiser-Wahl.")
notice_all("Also nochmal kräftig wählen!")
timer("generation", 60*1)
end
end
end
end
when generation.timer begin
game.set_event_flag("wahl", 0)
notice_all("Die letzten 24 Stunden sind rum!")
notice_all("Die Wahl-Kanäle wurden geschlossen.")
notice_all("Die Stimmen werden ausgewertet. Dies kann einige Minuten beanspruchen.")
game.set_event_flag("wahl", 0)
local eins = game.get_event_flag("stimmen_eins")
local zwei = game.get_event_flag("stimmen_zwei")
local drei = game.get_event_flag("stimmen_drei")
local vier = game.get_event_flag("stimmen_vier")
local fuenf = game.get_event_flag("stimmen_fuenf")
local sechs = game.get_event_flag("stimmen_sechs")
local sieben = game.get_event_flag("stimmen_sieben")
local acht = game.get_event_flag("stimmen_acht")
local neun = game.get_event_flag("stimmen_neun")
local zehn = game.get_event_flag("stimmen_zehn")
if eins > zwei and eins > drei and eins > vier and eins > fuenf and eins > sechs and eins > sieben and eins > acht and eins > neun and eins > zehn then
global_setvarchar("neuer_kaiser", global_getvarchar("erster"))
timer("auswertung", 60*2)
elseif zwei > eins and zwei > drei and zwei > vier and zwei > fuenf and zwei > sechs and zwei > sieben and zwei > acht and zwei > neun and zwei > zehn then
global_setvarchar("neuer_kaiser", global_getvarchar("zweiter"))
timer("auswertung", 60*2)
elseif drei > eins and drei > zwei and drei > vier and drei > fuenf and drei > sechs and drei > sieben and drei > acht and drei > neun and drei > zehn then
global_setvarchar("neuer_kaiser", global_getvarchar("dritter"))
timer("auswertung", 60*2)
elseif vier > eins and vier > zwei and vier > drei and vier > fuenf and vier > sechs and vier > sieben and vier > acht and vier > neun and vier > zehn then
global_setvarchar("neuer_kaiser", global_getvarchar("vierter"))
timer("auswertung", 60*2)
elseif fuenf > eins and fuenf > zwei and fuenf > drei and fuenf > vier and fuenf > sechs and fuenf > sieben and fuenf > acht and fuenf > neun and fuenf > zehn then
global_setvarchar("neuer_kaiser", global_getvarchar("fuenf"))
timer("auswertung", 60*2)
elseif sechs > eins and sechs > zwei and sechs > drei and sechs > vier and sechs > fuenf and sechs > sieben and sechs > acht and sechs > neun and sechs > zehn then
global_setvarchar("neuer_kaiser", global_getvarchar("sechs"))
timer("auswertung", 60*2)
elseif sieben > eins and sieben > zwei and sieben > drei and sieben > vier and sieben > fuenf and sieben > sechs and sieben > acht and sieben > neun and sieben > zehn then
global_setvarchar("neuer_kaiser", global_getvarchar("sieben"))
timer("auswertung", 60*2)
elseif acht > eins and acht > zwei and acht > drei and acht > vier and acht > fuenf and acht > sechs and acht > sieben and acht > neun and acht > zehn then
global_setvarchar("neuer_kaiser", global_getvarchar("acht"))
timer("auswertung", 60*2)
elseif neun > eins and neun > zwei and neun > drei and neun > vier and neun > fuenf and neun > sechs and neun > sieben and neun > acht and neun > zehn then
global_setvarchar("neuer_kaiser", global_getvarchar("neun"))
timer("auswertung", 60*2)
elseif zehn > eins and zehn > zwei and zehn > drei and zehn > vier and zehn > fuenf and zehn > sechs and zehn > sieben and zehn > acht and zehn > neun then
global_setvarchar("neuer_kaiser", global_getvarchar("zehn"))
timer("auswertung", 60*2)
else
notice_all("Stimmen Gleichheit! Neuwahl erforderlich.")
notice_all("Die aufgestellten Spieler können nun nicht mit wählen!")
game.set_event_flag("wahl", 1)
game.set_event_flag("stimmen_eins", 0)
game.set_event_flag("stimmen_zwei", 0)
game.set_event_flag("stimmen_drei", 0)
game.set_event_flag("stimmen_vier", 0)
game.set_event_flag("stimmen_fuenf", 0)
game.set_event_flag("stimmen_sechs", 0)
game.set_event_flag("stimmen_sieben", 0)
game.set_event_flag("stimmen_acht", 0)
game.set_event_flag("stimmen_neun", 0)
game.set_event_flag("stimmen_zehn", 0)
end
end
when auswertung.timer begin
notice_all("Die Stimmen wurden ausgewertet!")
notice_all("Der neue Kaiser ist : "..global_getvarchar("neuer_kaiser").."")
notice_all("Herzlichen Glückwunsch!")
timer("bugs", 60*2)
end
when bugs.timer begin
notice_all("An alle, die sich bei der Wahl aufgestellt haben:")
notice_all("Bitte begebt euch umgehend zum Fischer,")
notice_all("ansonsten könnt ihr bei der nächsten Wahl nicht teilnehmen!!!")
end
when login begin
if global_getvarchar("neuer_kaiser") == pc.get_name() then
notice_all("Euer Kaiser, "..global_getvarchar("neuer_kaiser").." hat sich soeben eingeloggt!")
game.set_event_flag(pc.get_name(), 1)
end
end
when logout begin
if global_getvarchar("neuer_kaiser") == pc.get_name() then
notice_all("Euer Kaiser, "..global_getvarchar("neuer_kaiser").." hat sich soeben ausgeloggt!")
game.set_event_flag(pc.get_name(), 0)
end
end
end
end
|
|
|
|
|
09/04/2012, 20:13
|
#6713
|
elite*gold: 0
Join Date: Aug 2012
Posts: 406
Received Thanks: 75
|
Warpring Quest
Habe folgende Warpring Quest, allerdings sind hier die Koordinaten für Grotte falsch eingetragen oder gar nicht, kenne mich dabei nicht aus. Ich weiß nur das ich nicht zum gewünschten Ort geportet werde, nämlich der Grotte 1. Da ich mich wirklich 0 mit Questen auskenne, wollte ich euch fragen ob ihr mir die richtigen Koordinaten für die Grotte 1 eintragen könnt & evtl. noch Grotte 2.
Ich weiß nicht ob es sowas schon gibt, aber ich benötige noch eine Quest um mit einem NPC in den Drachenraum zu porten, wäre euch sehr dankbar wenn ihr mir die Quest "auffrischen" könntet !
Koordinaten:
Grotte1 : 10000 , 1214200
Grotte2 : 241700 , 1274900
Drachenraum: 171700 , 1220400
Quest:
PHP 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","Feuerland","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","Land der Riesen","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(27600, 142700)
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(434200, 290600)
elseif empire == 2 then
pc.warp(375200, 174900)
elseif empire == 3 then
pc.warp(491800, 173600)
end
elseif eisselect == 2 then
pc.warp(436500, 215400)
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(599400, 756300)
elseif empire == 2 then
pc.warp(597800, 622200)
elseif empire == 3 then
pc.warp(730700, 689800)
end
elseif feuerselect == 2 then
pc.warp(600800, 687100)
end
end
end
end
end
Ich hoffe ihr könnt mir dabei helfen.
Mfg
|
|
|
|
|
09/04/2012, 21:00
|
#6714
|
elite*gold: 0
Join Date: Mar 2012
Posts: 230
Received Thanks: 25
|
Danke das du versuchst hast mir zu helfen.
Aber es hat immer noch ein fehler
PHP Code:
quest kaiser begin
state start begin
when 9010.chat."Kaiser-Wahl" begin
if game.get_event_flag("wahl") == 1 then
say("Grüß dich, was möchtest du tun?")
local s = select("Kaiser wählen", "zur Wahl aufstellen", "Wahl-Ergebnisse anschauen", "Abbrechen")
if s == 2 then
if pc.get_level() >= 98 then
if pc.getqf("aufgestellt") == 0 then
say("Willst du dich wirklich zur Wahl aufstellen?")
local w = select("Ja", "Nein")
if w == 2 then
say("Du kannst es dir ja noch anders überlegen.")
say("Bis dann.")
else
if game.get_event_flag("maximum") == 0 then
local name = pc.get_name()
global_setvarchar("erster", name)
game.set_event_flag("maximum", 1)
game.set_event_flag("stimmen_eins", 0)
pc.setqf("aufgestellt", 1)
say_color("green" , "Du hast dich erfolgreich zur Wahl aufgestellt.")
elseif game.get_event_flag("maximum") == 1 then
local name = pc.get_name()
global_setvarchar("zweiter", name)
game.set_event_flag("maximum", 2)
game.set_event_flag("stimmen_zwei", 0)
pc.setqf("aufgestellt", 1)
say_color("green" , "Du hast dich erfolgreich zur Wahl aufgestellt.")
elseif game.get_event_flag("maximum") == 2 then
local name = pc.get_name()
global_setvarchar("dritter", name)
game.set_event_flag("maximum", 3)
game.set_event_flag("stimmen_drei", 0)
pc.setqf("aufgestellt", 1)
say_color ("green" , "Du hast dich erfolgreich zur Wahl aufgestellt.")
elseif game.get_event_flag("maximum") == 3 then
local name = pc.get_name()
global_setvarchar("vierter", name)
game.set_event_flag("maximum", 4)
game.set_event_flag("stimmen_vier", 0)
pc.setqf("aufgestellt", 1)
say_color ("green" , "Du hast dich erfolgreich zur Wahl aufgestellt.")
elseif game.get_event_flag("maximum") == 4 then
local name = pc.get_name()
global_setvarchar("fuenfter", name)
game.set_event_flag("maximum", 5)
game.set_event_flag("stimmen_fuenf", 0)
pc.setqf("aufgestellt", 1)
say_color ("green" , "Du hast dich erfolgreich zur Wahl aufgestellt.")
elseif game.get_event_flag("maximum") == 5 then
local name = pc.get_name()
global_setvarchar("sechster", name)
game.set_event_flag("maximum", 6)
game.set_event_flag("stimmen_sechs", 0)
pc.setqf("aufgestellt", 1)
say_color ("green" , "Du hast dich erfolgreich zur Wahl aufgestellt.")
elseif game.get_event_flag("maximum") == 6 then
local name = pc.get_name()
global_setvarchar("siebter", name)
game.set_event_flag("maximum", 7)
game.set_event_flag("stimmen_sieben", 0)
pc.setqf("aufgestellt", 1)
say_color ("green" , "Du hast dich erfolgreich zur Wahl aufgestellt.")
elseif game.get_event_flag("maximum") == 7 then
local name = pc.get_name()
global_setvarchar("achter", name)
game.set_event_flag("maximum", 8)
pc.setqf("aufgestellt", 1)
game.set_event_flag("stimmen_acht", 0)
say_color ("green" , "Du hast dich erfolgreich zur Wahl aufgestellt.")
elseif game.get_event_flag("maximum") == 8 then
local name = pc.get_name()
global_setvarchar("neunter", name)
game.set_event_flag("maximum", 9)
game.set_event_flag("stimmen_neun", 0)
pc.setqf("aufgestellt", 1)
say_color ("green" , "Du hast dich erfolgreich zur Wahl aufgestellt.")
elseif game.get_event_flag("maximum") == 9 then
local name = pc.get_name()
global_setvarchar("zehnter", name)
game.set_event_flag("maximum", 10)
game.set_event_flag("stimmen_zehn", 0)
pc.setqf("aufgestellt", 1)
say_color ("green" , "Du hast dich erfolgreich zur Wahl aufgestellt.")
elseif game.get_event_flag("maximum") >= 10 then
say_color("red" , "Leider sind bereits 10 Spieler aufgestellt.")
else
say_color("red" , "Fehler!")
end
end
else
say_color("red" , "Du bist bereits aufgestellt!")
end
else
say_color("red" , "Du bist leider zu niedrig um als Kaiser zu kandidieren!")
end
elseif s == 1 then
if pc.getqf("gewählt") == 0 then
say("Welchen Spieler möchtest du als Kaiser wählen?")
local waehlen = select(""..global_getvarchar("erster").."", ""..global_getvarchar("zweiter").."", ""..global_getvarchar("dritter").."", ""..global_getvarchar("vierter").."", ""..global_getvarchar("fuenfter").."", "Weiter", "Abbrechen")
if waehlen == 6 then
local waehlen_zwei = select(""..global_getvarchar("sechster").."", ""..global_getvarchar("siebter").."", ""..global_getvarchar("achter").."", ""..global_getvarchar("neunter").."", ""..global_getvarchar("zehnter").."", "Abbrechen")
if waehlen_zwei == 1 then
say("Willst du wirklich "..global_getvarchar("sechster").." wählen?")
local w = select("Ja", "Nein")
if w == 1 then
say_green("Du hast "..global_getvarchar("sechster").." gewählt.")
pc.setqf("gewählt", 1)
game.set_event_flag("stimmen_sechs", game.get_event_flag("stimmen_sechs")+1)
end
elseif waehlen_zwei == 2 then
say("Willst du wirklich "..global_getvarchar("siebter").." wählen?")
local w = select("Ja", "Nein")
if w == 1 then
say_green("Du hast "..global_getvarchar("siebter").." gewählt.")
pc.setqf("gewählt", 1)
game.set_event_flag("stimmen_sieben", game.get_event_flag("stimmen_sieben")+1)
end
elseif waehlen_zwei == 3 then
say("Willst du wirklich "..global_getvarchar("achter").." wählen?")
local w = select("Ja", "Nein")
if w == 1 then
say_green("Du hast "..global_getvarchar("achter").." gewählt.")
pc.setqf("gewählt", 1)
game.set_event_flag("stimmen_acht", game.get_event_flag("stimmen_acht")+1)
end
elseif waehlen_zwei == 4 then
say("Willst du wirklich "..global_getvarchar("neunter").." wählen?")
local w = select("Ja", "Nein")
if w == 1 then
say_green("Du hast "..global_getvarchar("neunter").." gewählt.")
pc.setqf("gewählt", 1)
game.set_event_flag("stimmen_neun", game.get_event_flag("stimmen_neun")+1)
end
elseif waehlen_zwei == 5 then
say("Willst du wirklich "..global_getvarchar("zehnter").." wählen?")
local w = select("Ja", "Nein")
if w == 1 then
say_green("Du hast "..global_getvarchar("zehnter").." gewählt.")
pc.setqf("gewählt", 1)
game.set_event_flag("stimmen_zehn", game.get_event_flag("stimmen_zehn")+1)
end
end
elseif waehlen == 1 then
say("Willst du wirklich "..global_getvarchar("erster").." wählen?")
local w = select("Ja", "Nein")
if w == 1 then
say_green("Du hast "..global_getvarchar("erster").." gewählt.")
pc.setqf("gewählt", 1)
game.set_event_flag("stimmen_eins", game.get_event_flag("stimmen_eins")+1)
end
elseif waehlen == 2 then
say("Willst du wirklich "..global_getvarchar("zweiter").." wählen?")
local w = select("Ja", "Nein")
if w == 1 then
say_green("Du hast "..global_getvarchar("zweiter").." gewählt.")
pc.setqf("gewählt", 1)
game.set_event_flag("stimmen_zwei", game.get_event_flag("stimmen_zwei")+1)
end
elseif waehlen == 3 then
say("Willst du wirklich "..global_getvarchar("dritter").." wählen?")
local w = select("Ja", "Nein")
if w == 1 then
say_green("Du hast "..global_getvarchar("dritter").." gewählt.")
pc.setqf("gewählt", 1)
game.set_event_flag("stimmen_drei", game.get_event_flag("stimmen_drei")+1)
end
elseif waehlen == 4 then
say("Willst du wirklich "..global_getvarchar("vierter").." wählen?")
local w = select("Ja", "Nein")
if w == 1 then
say_green("Du hast "..global_getvarchar("vierter").." gewählt.")
pc.setqf("gewählt", 1)
game.set_event_flag("stimmen_vier", game.get_event_flag("stimmen_vier")+1)
end
elseif waehlen == 5 then
say("Willst du wirklich "..global_getvarchar("fuenfter").." wählen?")
local w = select("Ja", "Nein")
if w == 1 then
say_green("Du hast "..global_getvarchar("fuenfter").." gewählt.")
pc.setqf("gewählt", 1)
game.set_event_flag("stimmen_fuenf", game.get_event_flag("stimmen_fuenf")+1)
end
end
else
say_color("red" , "Du hast bereits eine Stimme abgegeben.")
end
elseif s == 3 then
say("Hier kannst du die aktuellen Wahl-Ergebnisse anschauen.")
say("")
say(""..global_getvarchar("erster").." : "..game.get_event_flag("stimmen_eins").." Stimmen")
say("")
say(""..global_getvarchar("zweiter").." : "..game.get_event_flag("stimmen_zwei").." Stimmen")
say("")
say(""..global_getvarchar("dritter").." : "..game.get_event_flag("stimmen_drei").." Stimmen")
say("")
say(""..global_getvarchar("vierter").." : "..game.get_event_flag("stimmen_vier").." Stimmen")
say("")
say(""..global_getvarchar("fuenfter").." : "..game.get_event_flag("stimmen_fuenf").." Stimmen")
say("")
say(""..global_getvarchar("sechster").." : "..game.get_event_flag("stimmen_sechs").." Stimmen")
say("")
say(""..global_getvarchar("siebter").." : "..game.get_event_flag("stimmen_sieben").." Stimmen")
say("")
say(""..global_getvarchar("achter").." : "..game.get_event_flag("stimmen_acht").." Stimmen")
say("")
say(""..global_getvarchar("neunter").." : "..game.get_event_flag("stimmen_neun").." Stimmen")
say("")
say(""..global_getvarchar("zehnter").." : "..game.get_event_flag("stimmen_zehn").." Stimmen")
say("")
end
elseif game.get_event_flag("wahl") == 0 then
if pc.getqf("aufgestellt") == 1 then
say_green("Zurück gesetzt. Vielen Dank!")
pc.setqf("aufgestellt", 0)
else
say_color("red" , "Die Kaiser-Wahl ist beendet.")
say_color("red" , "Sobald die nächste startet, wirst du informiert.")
say("")
if game.get_event_flag(""..global_getvarchar("neuer_kaiser").."") == 1 then
say_green("Aktueller Kaiser: "..global_getvarchar("neuer_kaiser")..", Status: Online")
else
say_color("red" , "Aktueller Kaiser: "..global_getvarchar("neuer_kaiser")..", Status: Offline")
end
end
end
end
when 20013.chat."Kaiser-Wahl-Optionen" with pc.is_gm() begin
if game.get_event_flag("wahl") == 0 then
if pc.getqf("installation") == 0 then
say("Wie ich sehe, sind sie das erste mal hier.")
say("Deshalb ist eine Installation vor dem Starten erforderlich!")
say("Geben sie bitte folgendes ein: nicht festgelegt")
local abc = input()
if abc == "nicht festgelegt" then
global_setvarchar("install", abc)
pc.setqf("installation", 1)
say_green("Installation erfolgreich!")
say_green("Sie können das System nun benutzen.")
else
say_color("red" , "Installation fehlgeschlagen!")
end
else
local w = select("Kaiser-Wahl starten", "aktueller Kaiser", "Abbrechen")
if w == 1 then
notice_all(""..global_getvarchar("neuer_kaiser").." wurde von seinem Amt entlöst!")
notice_all("Eine neue Kaiser-Wahl wurde gestartet!")
notice_all("Ihr könnt euch nun zur Wahl aufstellen.")
notice_all("Viel Glück!")
game.set_event_flag("wahl", 1)
game.set_event_flag("stimmen_eins", 0)
game.set_event_flag("stimmen_zwei", 0)
game.set_event_flag("stimmen_drei", 0)
game.set_event_flag("stimmen_vier", 0)
game.set_event_flag("stimmen_fuenf", 0)
game.set_event_flag("stimmen_sechs", 0)
game.set_event_flag("stimmen_sieben", 0)
game.set_event_flag("stimmen_acht", 0)
game.set_event_flag("stimmen_neun", 0)
game.set_event_flag("stimmen_zehn", 0)
game.set_event_flag("maximum", 0)
global_setvarchar("erster", global_getvarchar("install"))
global_setvarchar("zweiter", global_getvarchar("install"))
global_setvarchar("dritter", global_getvarchar("install"))
global_setvarchar("vierter", global_getvarchar("install"))
global_setvarchar("fuenfter", global_getvarchar("install"))
global_setvarchar("sechster", global_getvarchar("install"))
global_setvarchar("siebter", global_getvarchar("install"))
global_setvarchar("achter", global_getvarchar("install"))
global_setvarchar("neunter", global_getvarchar("install"))
global_setvarchar("zehnter", global_getvarchar("install"))
global_setvarchar("neuer_kaiser", global_getvarchar("install"))
elseif w == 2 then
say("Aktueller Kaiser ist: "..global_getvarchar("neuer_kaiser")..".")
end
end
else
local w = select("Kaiser-Wahl beenden", "Abbrechen")
if w == 1 then
say("Möchtest du die Wahl wirklich beenden?")
local s = select("Ja", "Nein")
if s == 1 then
notice_all("In 24 Stunden endet die Kaiser-Wahl.")
notice_all("Also nochmal kräftig wählen!")
timer("generation", 60*1)
end
end
end
end
when generation.timer begin
game.set_event_flag("wahl", 0)
notice_all("Die letzten 24 Stunden sind rum!")
notice_all("Die Wahl-Kanäle wurden geschlossen.")
notice_all("Die Stimmen werden ausgewertet. Dies kann einige Minuten beanspruchen.")
game.set_event_flag("wahl", 0)
local eins = game.get_event_flag("stimmen_eins")
local zwei = game.get_event_flag("stimmen_zwei")
local drei = game.get_event_flag("stimmen_drei")
local vier = game.get_event_flag("stimmen_vier")
local fuenf = game.get_event_flag("stimmen_fuenf")
local sechs = game.get_event_flag("stimmen_sechs")
local sieben = game.get_event_flag("stimmen_sieben")
local acht = game.get_event_flag("stimmen_acht")
local neun = game.get_event_flag("stimmen_neun")
local zehn = game.get_event_flag("stimmen_zehn")
if eins > zwei and eins > drei and eins > vier and eins > fuenf and eins > sechs and eins > sieben and eins > acht and eins > neun and eins > zehn then
global_setvarchar("neuer_kaiser", global_getvarchar("erster"))
timer("auswertung", 60*2)
elseif zwei > eins and zwei > drei and zwei > vier and zwei > fuenf and zwei > sechs and zwei > sieben and zwei > acht and zwei > neun and zwei > zehn then
global_setvarchar("neuer_kaiser", global_getvarchar("zweiter"))
timer("auswertung", 60*2)
elseif drei > eins and drei > zwei and drei > vier and drei > fuenf and drei > sechs and drei > sieben and drei > acht and drei > neun and drei > zehn then
global_setvarchar("neuer_kaiser", global_getvarchar("dritter"))
timer("auswertung", 60*2)
elseif vier > eins and vier > zwei and vier > drei and vier > fuenf and vier > sechs and vier > sieben and vier > acht and vier > neun and vier > zehn then
global_setvarchar("neuer_kaiser", global_getvarchar("vierter"))
timer("auswertung", 60*2)
elseif fuenf > eins and fuenf > zwei and fuenf > drei and fuenf > vier and fuenf > sechs and fuenf > sieben and fuenf > acht and fuenf > neun and fuenf > zehn then
global_setvarchar("neuer_kaiser", global_getvarchar("fuenf"))
timer("auswertung", 60*2)
elseif sechs > eins and sechs > zwei and sechs > drei and sechs > vier and sechs > fuenf and sechs > sieben and sechs > acht and sechs > neun and sechs > zehn then
global_setvarchar("neuer_kaiser", global_getvarchar("sechs"))
timer("auswertung", 60*2)
elseif sieben > eins and sieben > zwei and sieben > drei and sieben > vier and sieben > fuenf and sieben > sechs and sieben > acht and sieben > neun and sieben > zehn then
global_setvarchar("neuer_kaiser", global_getvarchar("sieben"))
timer("auswertung", 60*2)
elseif acht > eins and acht > zwei and acht > drei and acht > vier and acht > fuenf and acht > sechs and acht > sieben and acht > neun and acht > zehn then
global_setvarchar("neuer_kaiser", global_getvarchar("acht"))
timer("auswertung", 60*2)
elseif neun > eins and neun > zwei and neun > drei and neun > vier and neun > fuenf and neun > sechs and neun > sieben and neun > acht and neun > zehn then
global_setvarchar("neuer_kaiser", global_getvarchar("neun"))
timer("auswertung", 60*2)
elseif zehn > eins and zehn > zwei and zehn > drei and zehn > vier and zehn > fuenf and zehn > sechs and zehn > sieben and zehn > acht and zehn > neun then
global_setvarchar("neuer_kaiser", global_getvarchar("zehn"))
timer("auswertung", 60*2)
else
notice_all("Stimmen Gleichheit! Neuwahl erforderlich.")
notice_all("Die aufgestellten Spieler können nun nicht mit wählen!")
game.set_event_flag("wahl", 1)
game.set_event_flag("stimmen_eins", 0)
game.set_event_flag("stimmen_zwei", 0)
game.set_event_flag("stimmen_drei", 0)
game.set_event_flag("stimmen_vier", 0)
game.set_event_flag("stimmen_fuenf", 0)
game.set_event_flag("stimmen_sechs", 0)
game.set_event_flag("stimmen_sieben", 0)
game.set_event_flag("stimmen_acht", 0)
game.set_event_flag("stimmen_neun", 0)
game.set_event_flag("stimmen_zehn", 0)
end
end
when auswertung.timer begin
notice_all("Die Stimmen wurden ausgewertet!")
notice_all("Der neue Kaiser ist : "..global_getvarchar("neuer_kaiser").."")
notice_all("Herzlichen Glückwunsch!")
timer("bugs", 60*2)
end
when bugs.timer begin
notice_all("An alle, die sich bei der Wahl aufgestellt haben:")
notice_all("Bitte begebt euch umgehend zum Fischer,")
notice_all("ansonsten könnt ihr bei der nächsten Wahl nicht teilnehmen!!!")
end
when login begin
if global_getvarchar("neuer_kaiser") == pc.get_name() then
notice_all("Euer Kaiser, "..global_getvarchar("neuer_kaiser").." hat sich soeben eingeloggt!")
game.set_event_flag(pc.get_name(), 1)
end
end
when logout begin
if global_getvarchar("neuer_kaiser") == pc.get_name() then
notice_all("Euer Kaiser, "..global_getvarchar("neuer_kaiser").." hat sich soeben ausgeloggt!")
game.set_event_flag(pc.get_name(), 0)
end
end
end
end
Error befehl:
Danek nochmal für eure hilfe
|
|
|
|
|
09/04/2012, 22:18
|
#6715
|
elite*gold: 150
Join Date: Sep 2009
Posts: 855
Received Thanks: 486
|
Naja, daran kann man jetz schonma ablesen, dass die Quest fehlerfrei durchläuft, sie soll nur Funktionen/Befehle verwenden, die der Server/der "Questausführer" garnicht kennt, die "undeclared" sind.
Deklarieren musst du sie in der quest_functions, das ist eine Datei unter locale/germany[hongkong]/quest.
Dort unten anfügen.
Jetzt gibts aber noch nen kleinen Haken, der Server muss natürlich auch wissen, was er bei diesen Befehlen überhaupt machen soll, dass wird in der questlib definiert. Du kannst jetzt nur beten, das dort die Befehle definiert sind, ansonsten musst du erst eien Definition suchen.
Hoffe, das es halbwegs verständlich ist.
|
|
|
|
|
09/04/2012, 23:06
|
#6716
|
elite*gold: 0
Join Date: Sep 2011
Posts: 108
Received Thanks: 14
|
Ich habe ein Problem, wenn ich eine Quest bei Filezilla einfüge, egal ob sie komplett richtig ist, oder nicht (Codes copy+pasted), es kommt immer dieselbe Meldung nachdem ich die Quests in der VirtualBox geladen habe. Und zwar:
must start with 'quest'
testi.quest:1:Error occured on compile testi.quest
|
|
|
|
|
09/05/2012, 14:52
|
#6717
|
elite*gold: 0
Join Date: May 2012
Posts: 273
Received Thanks: 30
|
Quote:
Originally Posted by *SkillzZ'
Ich habe ein Problem, wenn ich eine Quest bei Filezilla einfüge, egal ob sie komplett richtig ist, oder nicht (Codes copy+pasted), es kommt immer dieselbe Meldung nachdem ich die Quests in der VirtualBox geladen habe. Und zwar:
must start with 'quest'
testi.quest:1:Error occured on compile testi.quest
|
poste mal die quest hier rein :-)
|
|
|
|
|
09/05/2012, 20:32
|
#6718
|
elite*gold: 0
Join Date: Mar 2012
Posts: 230
Received Thanks: 25
|
Hi ich wollte fragen ob es ein Quest gib wo nur VIPs rauf kommen, auf maps.
|
|
|
|
|
09/05/2012, 22:12
|
#6719
|
elite*gold: 0
Join Date: Aug 2012
Posts: 406
Received Thanks: 75
|
Problem mit UserPanel Quest
Moin Leute, wie der Titel schon sagt habe ich Problem mit folgender UserPanel Quest:
PHP Code:
quest user begin
state start begin
when 112000.use begin
say_title("Servername Userpanel")
say("")
say_reward("Willkommen im Userpanel von Servername")
say_reward("Wie kann ich dir "..pc.get_name().." weiterhelfen")
say("")
local main_set = select("Lager-Tool","Reich's Teleport","Shops","Team-Liste","Panel Entbuggen","Garnichts")
if main_set == 6 then
say("Nagut, vielleicht beim nächsten mal")
return
elseif main_set == 1 then
say_title("Lagerverwalter:")
say("Hey, ich kann auch von weit weg")
say("euer Lager/Itemshop öffnen...willst du")
say("das ich das mache?")
local gg = select("Lager öffnen","Is-Lager öffnen","Nichts öffnen")
if gg == 3 then
say("Okay wie du gedenkst. Bis später!")
return
elseif gg == 1 then
say("Okey ich öffne dir dein Lager!")
say("Beachte: Du kannst dein Lager nur")
say("jede 10 Sekunden aufrufen")
game.open_safebox()
chat("Lager geöffnet")
elseif gg == 2 then
say("Okey ich öffne dein Itemshop-Lager")
say("Beachte: Du kannst dein Itemshop-Lager")
say("nur jede 10 Sekunden öffnen")
game.open_mall()
chat("Lager geöffnet")
end
end
elseif 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","Lieber nicht.")
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
elseif main_set == 3 then
say("Du kannst die Shops auch von weitem ansprechen!")
say("Jedoch kostet es dich 10kk Yang. Ich weiss,")
say("dass es ist nicht wenig ist.")
say("")
say("Bist du einverstanden?")
local j = select("Okay","Nein")
if j == 2 then
return
else
say_reward("Welchen Shop willst du öffnen?")
local k = select("Gemischtwahrenhändlerin","Item-Shop","SteinTruhe","Lieber nicht.")
if k == 4 then
return
end
if k == 1 then
npc.open_shop (3)
pc.change_money(-10000000)
end
if k == 2 then
npc.open_shop (13)
pc.change_money(-10000000)
end
if k == 3 then
npc.open_shop (12)
pc.change_money(-10000000)
end
end
elseif main_set == 4 then
say_reward("Hier siehst du alle Teammitglieder")
say("")
say_reward("Die ServerAdmin´s [SL] :")
say("[SL]NeXo")
say_reward("Die GameAdmin´s [GA] :")
say("Keine")
say_reward("Die SuperGameMaster´s [SGM] :")
say("Keine")
say_reward("Die GameMaster´s [GM] :")
say("Keine")
say("Keine")
say_reward("Die TestGameMaster´s [TGM] :")
say("Keine")
say("Keine")
say("Du kannst dir die Liste jederzeit erneut anschaun")
return
end
elseif main_set == 5 then
say_reward("Also dein Panel ist Verbuggt Hmmmmm...")
say("")
say_reward("Sprich mit einem X beliebigen NPC")
say_reward("danach solte es gehen!")
say("")
say_reward("Fals es nicht Funktioniert")
say_reward("kauf dir einfach ein neues.")
say("")
say("")
say("Ach du meine Güte schaus dir an es")
say("zerfällt gleich in tausend Teile!")
say("Ich nehme dein altes und gebe dir ein neues.")
Ansprechen-->chat.npc(20023) <--- Ansprechen
pc.remove_item(112000, 1)
pc.give_item2(112000,1 )
end
end
end
end
Beim reloaden kam dieser Fehler:
Hoffe ihr könnt mir schnell dabei helfen !
Mit freundlichen Grüßen
|
|
|
|
|
09/05/2012, 23:23
|
#6720
|
elite*gold: 0
Join Date: Jul 2009
Posts: 26
Received Thanks: 3
|
Hallo Leute,
ich habe folgendes Problem:
ich habe die yangbug quest umgeändert und zwar so:
quest yang begin
state start begin
when login begin
pc.get_gold()
if pc.gold >1900000001 then
pc.changegold(-500000000)
pc.give_item2(30253,1)
return
end
end
end
end
Damit wollte ich erzielen, dass man, wenn man mehr als 1,9kkk im Invi hat,
automatisch einen 500kk Yangspeicher(30253) bekommt.
Allerdings klappt das nicht...habe die quest richtig eingefügt (quest_list und
in der VirtualBOX aktiviert)
Bitte schnell um Hilfe 
|
|
|
|
All times are GMT +1. The time now is 09:14.
|
|
![[SERVICE] Die Questkontrolle](https://www.elitepvpers.com/forum/iconimages/metin2-private-server/service-die-questkontrolle_ltr.gif){kind=small}
