|
You last visited: Today at 16:19
Advertisement
[SERVICE] Die Questkontrolle
Discussion on [SERVICE] Die Questkontrolle within the Metin2 Private Server forum part of the Metin2 category.
03/02/2012, 14:19
|
#4936
|
elite*gold: 26 
Join Date: Mar 2010
Posts: 3,765
Received Thanks: 2,661
|
Quote:
Originally Posted by .Scratchy.
@Delta das hab ich ja auch so geschrieben, nur wohin muss ich es überall setzen damit die Kills NUR auf dieser Map zählen und nicht überall?
|
du ersetzt
PHP Code:
when kill begin
durch
PHP Code:
when kill with pc.get_map_index() == 220 begin
!?!?!!?!?
@ Real
ich meine ein groß geschriebenes if sollte dir eine Fehlermeldung ausgeben^^
|
|
|
|
03/02/2012, 14:40
|
#4937
|
elite*gold: 0
Join Date: Jul 2011
Posts: 501
Received Thanks: 110
|
@.Delta:
Ja er meinte ja es würde so nicht klappen wie du es beschrieben hast, obwohl es bei mir ebenfalls in meinen Quests so klappt, deshalb hab ich ihm die alternative mit if gegeben 
Und mit dem If, ich habe es imm grop geschrieben bei meinen quests und klappt bisher fehlerfrei^^
|
|
|
|
|
03/02/2012, 14:45
|
#4938
|
elite*gold: 60
Join Date: Sep 2010
Posts: 756
Received Thanks: 272
|
Genau Real,
so wie es Delta beschrieben hat klappte es nicht aus welchem Grund auch immer ..grml -.-"
Aber ich probiers jetzt mal mit if dann gebe ich Rückmeldung
|
|
|
|
|
03/02/2012, 16:04
|
#4939
|
elite*gold: 26
Join Date: Aug 2009
Posts: 107
Received Thanks: 62
|
edit: i only need add () after pc.get_level
|
|
|
|
|
03/02/2012, 17:22
|
#4940
|
elite*gold: 0
Join Date: Aug 2009
Posts: 220
Received Thanks: 25
|
Mir hat jemand bei der Quest geholfen, sie zu erweitern,
ich hatte die schon damals gepostet gehabt, aber noch nicht wirklich
eine funktionierende Quest.
Diesmal wende ich mich wieder zu euch und bitte um hilfe,
da die Quest sehr wichtig für mich ist.
PHP Code:
quest feuersigel begin
state start begin
when 20096.chat begin
say_title("Die nächste Ebene:")
say("")
say("Guten Tag.")
say("Ziehe das Item Zahn des dunklen Fürste")
say("auf mich, um in die höhere Ebene zu gelangen!")
say("")
local s = select("Ja, Mobs Spawnen", "Nein, lieber nicht")
if s == 2 then
return
end
if s == 1 then
say_title("")
say("")
say("")
say("")
spawn_mob(2231, 150, 779)
spawn_mob(2232, 150, 775)
spawn_mob(2233, 150, 777)
spawn_mob(2234, 150, 779)
end
when 20096.take with item.vnum == 70045 begin
say_title("Nächste Ebene:")
say("Also, willst du nun in die nächste Ebene?")
say("Aber Achtung!!")
say("Dort lauert ein böser Drache!")
local x = select("Ja!", "Nein!")
if x == 1 then
pc.remove_item(70045, 1)
pc.warp(460800, 1049600)
end
if x == 2 then
return
end
end
end
Fehlercode bei make.py:
Code:
syntax error : [string "start"]:21: unexpected symbol near `when'
feuersigel.quest:38:Error occured on compile feuersigel.quest
|
|
|
|
|
03/02/2012, 17:31
|
#4941
|
elite*gold: 0
Join Date: May 2010
Posts: 82
Received Thanks: 11
|
Hilfeeee .. Kann mir einer sagen was ich falsch gemacht hab?
quest itemtausch begin
state start begin
when 9010.take with item.vnum == 27991 begin
say("Hey,")
say("Hallo lieber , Gamer")
say("Willst du dein Wasserstein gegen eine Rüstung tauschen?.")
say("Klicke an was du ts willst ")
say("Blub")
say("")
local s = select ("Blaustahl-Panzer (Krieger)", "Kleidung des Drachen(Schamane)","Auraplattenpanzer(Sura)","Blau er Drachenanzug(ninja)", "Abbrechen!")
if s == 1 then
if pc.count_item(27991)
pc.removeitem("27991")
pc.give_item2("12019")
say("Danke dir!")
say("Du erhältst ein Blaustahl-Panzer")
say("Ich hoffe sie wird dir von großem Nutzen sein")
say("lieber Abenteurer!")
say("")
end
if s == 2 then
if pc.count_item(27991)
pc.removeitem("27991")
pc.give_item2("12049")
say("Danke dir!")
say("Du erhältst eine Kleidung des Drachen(")
say("Ich hoffe sie wird dir von großem Nutzen sein")
say("lieber Abenteurer!")
say("")
end
if s == 3 then
if pc.count_item(27991)
pc.removeitem("27991")
pc.give_item2("12039")
say("Danke dir!")
say("Du erhältst ein Auraplattenpanzer")
say("Ich hoffe sie wird dir von großem Nutzen sein")
say("lieber Abenteurer!")
say("")
end
if s == 4 then
if pc.count_item(27991)
pc.removeitem("27991")
pc.give_item2("12029")
say("Danke dir!")
say("Du erhältst einen Blauen Drachenanzug(ninja)")
say("Ich hoffe sie wird dir von großem Nutzen sein")
say("lieber Abenteurer!")
say("")
end
end
end
|
|
|
|
|
03/02/2012, 17:35
|
#4942
|
elite*gold: 0
Join Date: Jan 2011
Posts: 2,903
Received Thanks: 1,262
|
PHP Code:
quest feuersigel begin
state start begin
when 20096.chat begin
say_title("Die nächste Ebene:")
say("")
say("Guten Tag.")
say("Ziehe das Item Zahn des dunklen Fürste")
say("auf mich, um in die höhere Ebene zu gelangen!")
say("")
local s = select("Ja, Mobs Spawnen", "Nein, lieber nicht")
if s == 2 then
return
end
elseif s == 1 then
say_title("")
say("")
say("")
say("")
spawn_mob(2231, 150, 779)
spawn_mob(2232, 150, 775)
spawn_mob(2233, 150, 777)
spawn_mob(2234, 150, 779)
when 20096.take with item.vnum == 70045 begin
say_title("Nächste Ebene:")
say("Also, willst du nun in die nächste Ebene?")
say("Aber Achtung!!")
say("Dort lauert ein böser Drache!")
local x = select("Ja!", "Nein!")
if x == 2 then
return
elseif x == 1 then
pc.remove_item(70045, 1)
pc.warp(460800, 1049600)
end
end
end
Versuch es mal so
|
|
|
|
|
03/02/2012, 17:41
|
#4943
|
elite*gold: 0
Join Date: Aug 2009
Posts: 220
Received Thanks: 25
|
Quote:
Originally Posted by £αšεℜ™
PHP Code:
quest feuersigel begin
Versuch es mal so |
Code:
syntax error : [string "start"]:11: <eof> expected near `elseif'
feuersigel.quest:38:Error occured on compile feuersigel.quest
|
|
|
|
|
03/02/2012, 18:09
|
#4944
|
elite*gold: 0
Join Date: Jul 2011
Posts: 501
Received Thanks: 110
|
Have fun
PHP Code:
quest feuersigel begin
state start begin
when 20096.chat begin
say_title("Die nächste Ebene:")
say("")
say("Guten Tag.")
say("Ziehe das Item Zahn des dunklen Fürste")
say("auf mich, um in die höhere Ebene zu gelangen!")
say("")
local s = select("Ja, Mobs Spawnen", "Nein, lieber nicht")
if s == 2 then
return
elseif s == 1 then
say_title("")
say("")
say("")
say("")
spawn_mob(2231, 150, 779)
spawn_mob(2232, 150, 775)
spawn_mob(2233, 150, 777)
spawn_mob(2234, 150, 779)
end
end
when 20096.take with item.vnum == 70045 begin
say_title("Nächste Ebene:")
say("Also, willst du nun in die nächste Ebene?")
say("Aber Achtung!!")
say("Dort lauert ein böser Drache!")
local x = select("Ja!", "Nein!")
if x == 2 then
return
elseif x == 1 then
pc.remove_item(70045, 1)
pc.warp(460800, 1049600)
end
end
end
end
Have fun
PHP Code:
quest mapa_tal begin
state start begin
when login with pc.get_map_index() == 222 and pc.get_level < 92 begin
local empire = pc.get_empire()
if empire == 1 then
pc.warp(474300,954800)
elseif empire == 2 then
pc.warp(63800,166400)
elseif empire == 3 then
pc.warp(959900,269200)
end
end
end
end
Have Fun
PHP Code:
quest itemtausch begin
state start begin
when 9010.chat."Eintauschen" begin
say("Hey,")
say("Hallo lieber , Gamer")
say("Willst du dein Wasserstein gegen eine Rüstung tauschen?.")
say("Klicke an was du ts willst ")
say("Blub")
say("")
local s = select ("Blaustahl-Panzer (Krieger)", "Kleidung des Drachen(Schamane)","Auraplattenpanzer(Sura)","Blau er Drachenanzug(ninja)", "Abbrechen!")
if s == 1 then
if pc.count_item(27991)>=1 then
pc.removeitem(27991, 1)
pc.give_item2(12019, 1)
say("Danke dir!")
say("Du erhältst ein Blaustahl-Panzer")
say("Ich hoffe sie wird dir von großem Nutzen sein")
say("lieber Abenteurer!")
say("")
elseif
say("Du hast das Item nicht")
return
end
end
if s == 2 then
if pc.count_item(27991)>=1 then
pc.removeitem(27991, 1)
pc.give_item2(12049, 1)
say("Danke dir!")
say("Du erhältst eine Kleidung des Drachen(")
say("Ich hoffe sie wird dir von großem Nutzen sein")
say("lieber Abenteurer!")
say("")
elseif
say("Du hast das Item nicht")
return
end
end
if s == 3 then
if pc.count_item(27991)>=1 then
pc.removeitem(27991, 1)
pc.give_item2(12039, 1)
say("Danke dir!")
say("Du erhältst ein Auraplattenpanzer")
say("Ich hoffe sie wird dir von großem Nutzen sein")
say("lieber Abenteurer!")
say("")
elseif
say("Du hast das Item nicht")
return
end
end
if s == 4 then
if pc.count_item(27991)>=1 then
pc.removeitem(27991, 1)
pc.give_item2(12029, 1)
say("Danke dir!")
say("Du erhältst einen Blauen Drachenanzug(ninja)")
say("Ich hoffe sie wird dir von großem Nutzen sein")
say("lieber Abenteurer!")
say("")
elseif
say("Du hast das Item nicht")
return
end
end
if s == 5 then
return
end
end
end
|
|
|
|
|
03/02/2012, 18:37
|
#4945
|
elite*gold: 0
Join Date: Dec 2011
Posts: 130
Received Thanks: 24
|
pc.count_item wie kann ich hier meherer items überprüfen geht das z.b.
PHP Code:
if pc.count_item(vnum1)<2,(vnum2)<2
oder wie mach ich das hab sowas von keine ahnung.
|
|
|
|
|
03/02/2012, 18:40
|
#4946
|
elite*gold: 0
Join Date: Jul 2011
Posts: 501
Received Thanks: 110
|
PHP Code:
if pc.count_item(vnum1)<2 and pc.count_item(vnum2)<3 and pc.count_item(vnum3) <2 then
...
end
|
|
|
|
|
03/02/2012, 21:14
|
#4947
|
elite*gold: 0
Join Date: Oct 2009
Posts: 382
Received Thanks: 161
|
Code:
quest whattime begin
state start begin
when login begin
local saat0 = os.date("%H")
local saat1 = os.date("%H")
local dakika0 = os.date("%M")
local dakika1 = os.date("%M")
if saat > 22 and dakika > 15 then
game.set_event_flag ("eclipse",1)
elseif saat > 8 and dakika > 15 then
game.set_event_flag ("eclipse",0)
end
end
end
end
where are the problem
|
|
|
|
|
03/02/2012, 22:15
|
#4948
|
elite*gold: 0
Join Date: Jan 2009
Posts: 267
Received Thanks: 103
|
Hallo lieber community,
Ich habe mir die Event-manager quest von profizocker(habe files von kay331) was beim Weiser mann aktivierbar ist, ich wollte es mit den eventmanager von ~LuckyStrike~
zusammen bringen so wie auch ein Halloween starter quest.
Ich wollte hallt alles in einem NPC 20095(Weiser Mann)
Hier die Quest die ich gemacht habe:
Code:
say_title("Seon-Hae:")
say("")
say("Du moechtest also die Rates einstellen??")
say("")
say_title("Wähle die zu einstellende Rate")
local rateset = select ("EXP","Yang","Max-Yang","Gegenstaende","Abbrechen")
if rateset == 1 then
say_title("Seon-Hae:")
say("")
say("Wie hoch soll die EXP-Rate werden?")
local w =select ("200","300","400","500","600","700","750","800","900","1000","Abbrechen")
if w == 1 then
command("priv_empire 0 4:exp 200 24")
elseif w == 2 then
command("priv_empire 0 4:exp 300 24")
elseif w == 3 then
command("priv_empire 0 4:exp 400 24")
elseif w == 4 then
command("priv_empire 0 4:exp 500 24")
elseif w == 5 then
command("priv_empire 0 4:exp 600 24")
elseif w == 6 then
command("priv_empire 0 4:exp 700 24")
elseif w == 7 then
command("priv_empire 0 4:exp 750 24")
elseif w == 8 then
command("priv_empire 0 4:exp 800 24")
elseif w == 9 then
command("priv_empire 0 4:exp 900 24")
elseif w == 10 then
command("priv_empire 0 4:exp 1000 24")
elseif w == 11 then
return
end
elseif rateset == 2 then
say_title("Seon-Hae:")
say("")
say("Wie hoch soll die Yangdrop-Rate werden?")
local x =select ("200","300","400","500","600","700","750","800","900","1000","Abbrechen")
if x == 1 then
command("priv_empire 0 2:gold_drop 200 24")
elseif x == 2 then
command("priv_empire 0 2:gold_drop 300 24")
elseif x == 3 then
command("priv_empire 0 2:gold_drop 400 24")
elseif x == 4 then
command("priv_empire 0 2:gold_drop 500 24")
elseif x == 5 then
command("priv_empire 0 2:gold_drop 600 24")
elseif x == 6 then
command("priv_empire 0 2:gold_drop 700 24")
elseif x == 7 then
command("priv_empire 0 2:gold_drop 750 24")
elseif x == 8 then
command("priv_empire 0 2:gold_drop 800 24")
elseif x == 9 then
command("priv_empire 0 2:gold_drop 900 24")
elseif x == 10 then
command("priv_empire 0 2:gold_drop 1000 24")
elseif x == 11 then
return
end
elseif rateset == 3 then
say_title("Seon-Hae:")
say("")
say("Wie hoch soll die MaxYang-Drop-Rate werden?")
local y =select ("200","300","400","500","600","700","750","800","900","1000","Abbrechen")
if y == 1 then
command("priv_empire 0 3:gold10_drop 200 24")
elseif y == 2 then
command("priv_empire 0 3:gold10_drop 300 24")
elseif y == 3 then
command("priv_empire 0 3:gold10_drop 400 24")
elseif y == 4 then
command("priv_empire 0 3:gold10_drop 500 24")
elseif y == 5 then
command("priv_empire 0 3:gold10_drop 600 24")
elseif y == 6 then
command("priv_empire 0 3:gold10_drop 700 24")
elseif y == 7 then
command("priv_empire 0 3:gold10_drop 750 24")
elseif y == 8 then
command("priv_empire 0 3:gold10_drop 800 24")
elseif y == 9 then
command("priv_empire 0 3:gold10_drop 900 24")
elseif y == 10 then
command("priv_empire 0 3:gold10_drop 1000 24")
elseif y == 11 then
return
end
elseif rateset == 4 then
say_title("Seon-Hae:")
say("")
say("Wie hoch soll die Gegenstandsdrop-Rate werden?")
local z =select ("200","300","400","500","600","700","750","800","900","1000","Abbrechen")
if z == 1 then
command("priv_empire 0 1:item_drop 200 24")
elseif z == 2 then
command("priv_empire 0 1:item_drop 300 24")
elseif z == 3 then
command("priv_empire 0 1:item_drop 400 24")
elseif z == 4 then
command("priv_empire 0 1:item_drop 500 24")
elseif z == 5 then
command("priv_empire 0 1:item_drop 600 24")
elseif z == 6 then
command("priv_empire 0 1:item_drop 700 24")
elseif z == 7 then
command("priv_empire 0 1:item_drop 750 24")
elseif z == 8 then
command("priv_empire 0 1:item_drop 800 24")
elseif z == 9 then
command("priv_empire 0 1:item_drop 900 24")
elseif z == 10 then
command("priv_empire 0 1:item_drop 1000 24")
elseif z == 11 then
return
end
elseif rateset == 5 then
return
end
elseif e == 4 then
return
end
end
end
end
Und hier Pic. vom server:
Anschließend die wuest einzelnd (die vom Profizocker94):
Code:
quest gm begin
state start begin
when 20095.chat."GameMaster-Shop" with pc.is_gm() begin
say_title("Seon-Hae:")
say("")
say("Ohooo, hoher Besuch!")
say("Einen GameMaster sieht man nicht")
say("jeden Tag. Deshalb moechte ich dir")
say("meine besten Sachen anbieten.")
say("")
say_title("Moechtest du etwas kaufen?")
local s = select("Ja", "Nein")
if s == 1 then
npc.open_shop(6194)
else
return
end
end
when 20095.chat."Dieser Ort" begin
say_title("Seon-Hae:")
say("")
say("Dies ist ein schoener Ort,")
say("findest du nicht auch?")
say("Staendig scheint hier die Sonne")
say("und es ist schoen warm.")
say("")
end
when 20095.chat."Infos" with pc.is_gm() begin
say_title("Seon-Hae:")
say("")
say("Du moechtest also Wichtige Nachrichten senden?")
local g = select ("Server Reboot" , "Server Offline" , "Relog" , "Homepage", "Abbrechen")
if g == 1 then
notice_all ("!!Achtung, Bitte ALLE Ausloggen... Server Reboot!!")
say_title("Seon-Hae:")
say("")
say("Nachricht wurde Gesendet!")
say("")
say("")
return
end
if g == 2 then
notice_all ("!!Achtung, Bitte ALLE Ausloggen... Server geht in 5 Min Offline!!")
say_title("Seon-Hae:")
say("")
say("Nachricht wurde Gesendet")
say("")
say("")
return
end
if g == 3 then
notice_all ("!!Achtung, Bitte ALLE Relog machen!!")
say_title("Seon-Hae:")
say("")
say("Nachricht wurde Gesendet")
say("")
say("")
return
end
if g == 4 then
notice_all ("http://www.imbamt2.de/")
say_title("Seon-Hae:")
say("")
say("Nachricht wurde Gesendet")
say("")
say("")
return
end
if g == 4 then
return
end
end
when 20095.chat."Mob-Spawn Event" with pc.is_gm() begin
say_title("Seon-Hae:")
say("")
say("Bei mir kannst du saemtliche Events starten.")
say("")
say_title("Waehle das zustartende oder zubeendende Event:")
say("")
local e = select("Zombie-Event", "Sensenmann-Event", "Eishexen-Event", "Metin-Event", "Drachen-Event", "Abbrechen")
if e == 1 then
say("Wenn du diese Quest aktivierst wird ein Event")
say("gestartet. Startest du dieses Event kannst du es")
say("nicht mehr abbrechen.")
say("Dieser NPC ist nur für Eventhelfer und Manager gedacht.")
say("Möchtest du das Event nun starten?")
local s = select ("Ja!", "Nein!")
if s == 1 then
notice_all("Zombie-Event gestartet!")
notice_all("Es wurde soeben ein Zombiesensenmann im Orktal vor dem")
notice_all("Tempel gespawnt. Vernichtet ihn und rettet die Orks.")
notice_all("Aber sei gewarnt er ist Stark und könnte so manchen")
notice_all("Kriegern von euch zu schaffen machen.")
notice_all("Und nun geht los und vernichtet diese Kreatur!")
mob.spawn(2525, 769, 805, 1)
else
return
end
end
if e == 2 then
say("Wenn du diese Quest aktivierst wird ein Event")
say("gestartet. Startest du dieses Event kannst du es")
say("nicht mehr abbrechen.")
say("Dieser NPC ist nur für Eventhelfer und Manager gedacht.")
say("Möchtest du das Event nun starten?")
local s = select ("Ja!", "Nein!")
if s == 1 then
pc.setqf("sensenmann_ot", 1)
notice_all("Sensenmann-Event gestartet!")
notice_all("Es wurden soeben 8 Sensenmannänner im Orktal vor dem")
notice_all("Tempel gesichtet. Sucht ihn auf und vernichtet ihn.")
notice_all("Aber sei gewarnt sie sind Stark und könnten so manchen")
notice_all("Kriegern von euch zu schaffen machen.")
notice_all("Und nun geht los und vernichtet diese Kreatur!")
regen_in_map("64", "locale/germany/map/map_n_threeway/sensennmannevent.txt" )
pc.setqf("sensenmann_ot", 0)
else
return
end
end
if e == 3 then
say("Wenn du diese Quest aktivierst wird ein Event")
say("gestartet. Startest du dieses Event kannst du es")
say("nicht mehr abbrechen.")
say("Dieser NPC ist nur für Eventhelfer und Manager gedacht.")
say("Möchtest du das Event nun starten?")
local s = select ("Ja!", "Nein!")
if s == 1 then
pc.setqf("eishexen_ot", 1)
notice_all("Eishexen-Event gestartet!")
notice_all("Es wurden soeben 4 Eishexen im Orktal vor dem")
notice_all("Tempel gesichtet. Sucht sie auf und vernichtet sie.")
notice_all("Aber sei gewarnt sie sind Stark und könnten so manchen")
notice_all("Kriegern von euch zu schaffen machen.")
notice_all("Und nun geht los und vernichtet diese Kreatur!")
regen_in_map("64", "locale/germany/map/map_n_threeway/eishexen.txt" )
pc.setqf("eishexen_ot", 0)
else
return
end
end
if e == 4 then
say("Wenn du diese Quest aktivierst wird ein Event")
say("gestartet. Startest du dieses Event kannst du es")
say("nicht mehr abbrechen.")
say("Dieser NPC ist nur für Eventhelfer und Manager gedacht.")
say("Möchtest du das Event nun starten?")
local s = select ("Ja!", "Nein!")
if s == 1 then
pc.setqf("metin_ot", 1)
notice_all("Metin-Event gestartet!")
notice_all("Es wurden soeben einige Metins im Orktal vor dem")
notice_all("Tempel gesichtet. Sucht sie auf und vernichtet sie.")
notice_all("Aber sei gewarnt sie sind halten viel aus und können")
notice_all("Kriegern von euch zu schaffen machen.")
notice_all("Und nun geht los und vernichtet diese Kreatur!")
regen_in_map("64", "locale/germany/map/map_n_threeway/metinsteine.txt" )
pc.setqf("metin_ot", 0)
else
return
end
end
if e == 5 then
say("Wenn du diese Quest aktivierst wird ein Event")
say("gestartet. Startest du dieses Event kannst du es")
say("nicht mehr abbrechen.")
say("Dieser NPC ist nur für Eventhelfer und Manager gedacht.")
say("Möchtest du das Event nun starten?")
local s = select ("Ja!", "Nein!")
if s == 1 then
notice_all("Drachen-Event gestartet!")
notice_all("Es wurde soeben ein Drache im Orktal vor dem")
notice_all("Tempel gespawnt. Vernichtet ihn und rettet die Orks.")
notice_all("Aber sei gewarnt er ist Stark und könnte so manchen")
notice_all("Kriegern von euch zu schaffen machen.")
notice_all("Und nun geht los und vernichtet diese Kreatur!")
mob.spawn(2291, 769, 805, 1)
else
return
end
end
when 20095.chat."Event Management" with pc.is_gm() begin
say_title("Seon-Hae:")
say("")
say("Bei mir kannst du saemtliche Events starten.")
say("")
say_title("Waehle das zustartende oder zubeendende Event:")
say("")
local e = select("Tag / Nacht", "Weihnachts Events", "Halloween Event", "Rates einstellen", "Abbrechen")
if e == 1 then
say_title("Seon-Hae:")
say("")
say("Du moechtest also zwischen Tag und")
say("Nacht wechseln ?")
local f = select ("Tag" , "Nacht", "Abbrechen")
if f == 1 then
command ("x 2")
elseif f == 2 then
command ("x 1")
elseif f == 3 then
return
end
elseif e == 2 then
say_title("Seon-Hae:")
say("")
say("Du moechtest also die Weihnachts Events Starten?")
local f = select ("Weihnachtsbaum", "Schnee", "Weihnachtsmusik", "Weihnachtsevent starten (Alles)", "Weihnachtsevent stoppen (Alles)", "Abbrechen")
if f == 1 then
local g = select ("Weihnachtsbaum aufstellen" , "Weihnachtsbaum wegraeumen", "Abbrechen")
if g == 1 then
command ("e xmas_tree 1")
notice_all ("Bei Weihnachtlicher Stimmung darf")
notice_all ("ein Weihnachtsbaum nicht fehlen!")
notice_all ("Das ImbaMT2 Team hat diesen geschmueckt")
notice_all ("und in der Mitte Berg Sohans aufgestellt!")
notice_all ("Frohes Fest!")
say_title("Seon-Hae:")
say("")
say("Es ist geschafft!")
say("Der Weihnachtsbaum steht!")
say("")
elseif g == 2 then
command ("e xmas_tree 0")
notice_all ("Weihnachten neigt sich langsam")
notice_all ("dem Ende! Der Weihnachtsbaum wird")
notice_all ("nun nichtmehr benoetigt")
notice_all ("und wir haben ihn deshalb abgebaut.")
say_title("Seon-Hae:")
say("")
say("Es ist geschafft!")
say("Der Weihnachtsbaum ist weg!")
say("")
elseif g == 3 then
return
end
elseif f == 2 then
local h = select ("Schnee an" , "Schnee aus", "Abbrechen")
if h == 1 then
command("e xmas_snow 1")
elseif h == 2 then
command ("e xmas_snow 0")
elseif h == 3 then
return
end
elseif f == 3 then
local i = select ("Musik abspielen", "Musik stoppen", "Abbrechen")
if i == 1 then
command("e xmas_song 1")
elseif i == 2 then
command("e xmas_song 0")
elseif i == 3 then
return
end
elseif f == 4 then
say("Willst du wirklich alles aktivieren?")
say("Also Nachtmodus, den Weihnachtsbaum,")
say("Schnee und die Weihnachtsmusik?")
say("")
local g_sub = select ("Ja", "Nein")
if g_sub == 1 then
command("e xmas_tree 1")
command("e xmas_song 1")
command("e xmas_boom 1")
command("e xmas_snow 1")
say("Alles aktiviert!")
elseif g_sub == 2 then
return
end
elseif f == 5 then
say("Willst du wirklich alles deaktivieren?")
say("Also Nachtmodus, den Weihnachtsbaum,")
say("Schnee und die Weihnachtsmusik?")
say("")
local g_desub = select ("Ja", "Nein")
if g_desub == 1 then
command("e xmas_tree 0")
command("e xmas_song 0")
command("e xmas_boom 0")
command("e xmas_snow 0")
say("Alles deaktiviert!")
elseif g_desub == 2 then
return
end
elseif f == 6 then
return
end
elseif e == 3 then
if game.get_event_flag("kürbisse_drop") == 0 then
say("Das Event ist gerade nicht Aktive.")
say("Willst du es Aktivieren")
local s = select ("Ja", "Nein")
if s == 1 then
say("Halloween Event wurde aktiviert!")
game.set_event_flag("moon_drop", 1)
notice_all("Das Halloween Event wurde aktiviert!")
else
return
end
else
say("Das Halloween Event ist aktiviert")
say("Möchtest du es deaktivieren?")
local s = select("Ja","Nein")
if s == 1 then
say("Das Halloween Event wurde deaktiviert!")
game.set_event_flag("moon_drop", 0)
notice_all("Das Halloween Event wurde deaktiviert!")
else
return
end
end
say_title ("Sei gegrüsst, "..pc.get_name().."!")
say ("Das Halloween-Event hat begonnen und jetzt")
say ("heisst es, dass jeder Spieler die Chance hat,")
say ("etwas Besonderes zu gewinnen.")
say ("Als Alternativ-Drop wurden Kürbisse aktiviert,")
say ("die man von jedem Monster erhalten kann.")
say ("Daher solltest du diese gut aufbewahren, denn")
say ("man bekommt am Ende eine kleine Überraschung.")
say ("Man kann ab 5 Kürbise bis 100 Stück etwas gewinnen")
wait()
say_title ("Ab Bestimmter Anzahl von Kürbissen:")
say ("")
say_reward ("5 = Reittier Siegel")
say_reward ("10 = Frucht des Lebens")
say_reward ("25 = Seelensteine")
say_reward ("50 = 3 Perlen jeder Sorte")
say_reward ("100 = Regenbogenstein")
end
when 20095.chat."Kürbisse tauschen" with pc.count_item(50095) >= 5 begin
say_title (""..pc.get_name()..":")
say ("Ich habe Kürbisse und möchte diese tauschen.")
local a = select ("5 Kürbisse", "10 Kürbisse", "25 Kürbisse", "50 Kürbisse", "100 Kürbisse", "Abbrechen")
if a == 1 then
if pc.count_item(50095) >= 5 then
pc.give_item2(71114, 10)
pc.give_item2(71115, 10)
pc.give_item2(71116, 10)
pc.give_item2(71117, 10)
pc.remove_item(50095, 5)
else
say ("Du hast zu wenig kuerbise")
end
elseif a == 2 then
if pc.count_item(50095) >= 10 then
pc.give_item2(71107)
pc.give_item2(71107)
pc.give_item2(71107)
pc.remove_item(50095, 10)
else
say ("Du hast du wenig kuerbise")
end
elseif a == 3 then
if pc.count_item(50095) >= 25 then
pc.give_item2(50513)
pc.give_item2(50513)
pc.give_item2(50513)
pc.remove_item(50095, 25)
else
say("Du hast zu wenig Kuerbise")
end
elseif a == 4 then
if pc.count_item(50095) >= 50
pc.give_item2(27992)
pc.give_item2(27993)
pc.give_item2(27994)
pc.give_item2(27992)
pc.give_item2(27993)
pc.give_item2(27994)
pc.give_item2(27992)
pc.give_item2(27993)
pc.give_item2(27994)
pc.remove_item(50095, 50)
else
say("Du hast zuwenig kuerbise")
end
elseif a == 5 then
if pc.count_item(50095) >= 100 then
pc.give_item2(50512)
pc.remove_item(50095, 100)
end
return
end
elseif e == 24 then
say_title("Seon-Hae:")
say("")
say("Du moechtest also die Rates einstellen??")
say("")
say_title("Wähle die zu einstellende Rate")
local rateset = select ("EXP","Yang","Max-Yang","Gegenstaende","Abbrechen")
if rateset == 1 then
say_title("Seon-Hae:")
say("")
say("Wie hoch soll die EXP-Rate werden?")
local w =select ("200","300","400","500","600","700","750","800","900","1000","Abbrechen")
if w == 1 then
command("priv_empire 0 4:exp 200 24")
elseif w == 2 then
command("priv_empire 0 4:exp 300 24")
elseif w == 3 then
command("priv_empire 0 4:exp 400 24")
elseif w == 4 then
command("priv_empire 0 4:exp 500 24")
elseif w == 5 then
command("priv_empire 0 4:exp 600 24")
elseif w == 6 then
command("priv_empire 0 4:exp 700 24")
elseif w == 7 then
command("priv_empire 0 4:exp 750 24")
elseif w == 8 then
command("priv_empire 0 4:exp 800 24")
elseif w == 9 then
command("priv_empire 0 4:exp 900 24")
elseif w == 10 then
command("priv_empire 0 4:exp 1000 24")
elseif w == 11 then
return
end
elseif rateset == 2 then
say_title("Seon-Hae:")
say("")
say("Wie hoch soll die Yangdrop-Rate werden?")
local x =select ("200","300","400","500","600","700","750","800","900","1000","Abbrechen")
if x == 1 then
command("priv_empire 0 2:gold_drop 200 24")
elseif x == 2 then
command("priv_empire 0 2:gold_drop 300 24")
elseif x == 3 then
command("priv_empire 0 2:gold_drop 400 24")
elseif x == 4 then
command("priv_empire 0 2:gold_drop 500 24")
elseif x == 5 then
command("priv_empire 0 2:gold_drop 600 24")
elseif x == 6 then
command("priv_empire 0 2:gold_drop 700 24")
elseif x == 7 then
command("priv_empire 0 2:gold_drop 750 24")
elseif x == 8 then
command("priv_empire 0 2:gold_drop 800 24")
elseif x == 9 then
command("priv_empire 0 2:gold_drop 900 24")
elseif x == 10 then
command("priv_empire 0 2:gold_drop 1000 24")
elseif x == 11 then
return
end
elseif rateset == 3 then
say_title("Seon-Hae:")
say("")
say("Wie hoch soll die MaxYang-Drop-Rate werden?")
local y =select ("200","300","400","500","600","700","750","800","900","1000","Abbrechen")
if y == 1 then
command("priv_empire 0 3:gold10_drop 200 24")
elseif y == 2 then
command("priv_empire 0 3:gold10_drop 300 24")
elseif y == 3 then
command("priv_empire 0 3:gold10_drop 400 24")
elseif y == 4 then
command("priv_empire 0 3:gold10_drop 500 24")
elseif y == 5 then
command("priv_empire 0 3:gold10_drop 600 24")
elseif y == 6 then
command("priv_empire 0 3:gold10_drop 700 24")
elseif y == 7 then
command("priv_empire 0 3:gold10_drop 750 24")
elseif y == 8 then
command("priv_empire 0 3:gold10_drop 800 24")
elseif y == 9 then
command("priv_empire 0 3:gold10_drop 900 24")
elseif y == 10 then
command("priv_empire 0 3:gold10_drop 1000 24")
elseif y == 11 then
return
end
elseif rateset == 4 then
say_title("Seon-Hae:")
say("")
say("Wie hoch soll die Gegenstandsdrop-Rate werden?")
local z =select ("200","300","400","500","600","700","750","800","900","1000","Abbrechen")
if z == 1 then
command("priv_empire 0 1:item_drop 200 24")
elseif z == 2 then
command("priv_empire 0 1:item_drop 300 24")
elseif z == 3 then
command("priv_empire 0 1:item_drop 400 24")
elseif z == 4 then
command("priv_empire 0 1:item_drop 500 24")
elseif z == 5 then
command("priv_empire 0 1:item_drop 600 24")
elseif z == 6 then
command("priv_empire 0 1:item_drop 700 24")
elseif z == 7 then
command("priv_empire 0 1:item_drop 750 24")
elseif z == 8 then
command("priv_empire 0 1:item_drop 800 24")
elseif z == 9 then
command("priv_empire 0 1:item_drop 900 24")
elseif z == 10 then
command("priv_empire 0 1:item_drop 1000 24")
elseif z == 11 then
return
end
elseif rateset == 5 then
return
end
elseif e == 4 then
return
end
end
end
end
Events vom ~LuckyStrike~:
Code:
quest eventmanager begin
state start begin
when 20095.chat."Zombie-Event" with pc.is_gm() and pc.get_map_index() == 64 begin
say("Wenn du diese Quest aktivierst wird ein Event")
say("gestartet. Startest du dieses Event kannst du es")
say("nicht mehr abbrechen.")
say("Dieser NPC ist nur für Eventhelfer und Manager gedacht.")
say("Möchtest du das Event nun starten?")
local s = select ("Ja!", "Nein!")
if s == 1 then
notice_all("Zombie-Event gestartet!")
notice_all("Es wurde soeben ein Zombiesensenmann im Orktal vor dem")
notice_all("Tempel gespawnt. Vernichtet ihn und rettet die Orks.")
notice_all("Aber sei gewarnt er ist Stark und könnte so manchen")
notice_all("Kriegern von euch zu schaffen machen.")
notice_all("Und nun geht los und vernichtet diese Kreatur!")
mob.spawn(2525, 769, 805, 1)
else
return
end
end
when 20095.chat."Sensenmann-Event" with pc.is_gm() and pc.get_map_index() == 64 begin
say("Wenn du diese Quest aktivierst wird ein Event")
say("gestartet. Startest du dieses Event kannst du es")
say("nicht mehr abbrechen.")
say("Dieser NPC ist nur für Eventhelfer und Manager gedacht.")
say("Möchtest du das Event nun starten?")
local s = select ("Ja!", "Nein!")
if s == 1 then
pc.setqf("sensenmann_ot", 1)
notice_all("Sensenmann-Event gestartet!")
notice_all("Es wurden soeben 8 Sensenmannänner im Orktal vor dem")
notice_all("Tempel gesichtet. Sucht ihn auf und vernichtet ihn.")
notice_all("Aber sei gewarnt sie sind Stark und könnten so manchen")
notice_all("Kriegern von euch zu schaffen machen.")
notice_all("Und nun geht los und vernichtet diese Kreatur!")
regen_in_map("64", "locale/germany/map/map_n_threeway/sensennmannevent.txt" )
pc.setqf("sensenmann_ot", 0)
else
return
end
end
when 20095.chat."Eishexe-Event" with pc.is_gm() and pc.get_map_index() == 64 begin
say("Wenn du diese Quest aktivierst wird ein Event")
say("gestartet. Startest du dieses Event kannst du es")
say("nicht mehr abbrechen.")
say("Dieser NPC ist nur für Eventhelfer und Manager gedacht.")
say("Möchtest du das Event nun starten?")
local s = select ("Ja!", "Nein!")
if s == 1 then
pc.setqf("eishexen_ot", 1)
notice_all("Eishexen-Event gestartet!")
notice_all("Es wurden soeben 4 Eishexen im Orktal vor dem")
notice_all("Tempel gesichtet. Sucht sie auf und vernichtet sie.")
notice_all("Aber sei gewarnt sie sind Stark und könnten so manchen")
notice_all("Kriegern von euch zu schaffen machen.")
notice_all("Und nun geht los und vernichtet diese Kreatur!")
regen_in_map("64", "locale/germany/map/map_n_threeway/eishexen.txt" )
pc.setqf("eishexen_ot", 0)
else
return
end
end
when 20095.chat."Metin-Event" with pc.is_gm() and pc.get_map_index() == 64 begin
say("Wenn du diese Quest aktivierst wird ein Event")
say("gestartet. Startest du dieses Event kannst du es")
say("nicht mehr abbrechen.")
say("Dieser NPC ist nur für Eventhelfer und Manager gedacht.")
say("Möchtest du das Event nun starten?")
local s = select ("Ja!", "Nein!")
if s == 1 then
pc.setqf("metin_ot", 1)
notice_all("Metin-Event gestartet!")
notice_all("Es wurden soeben einige Metins im Orktal vor dem")
notice_all("Tempel gesichtet. Sucht sie auf und vernichtet sie.")
notice_all("Aber sei gewarnt sie sind halten viel aus und können")
notice_all("Kriegern von euch zu schaffen machen.")
notice_all("Und nun geht los und vernichtet diese Kreatur!")
regen_in_map("64", "locale/germany/map/map_n_threeway/metinsteine.txt" )
pc.setqf("metin_ot", 0)
else
return
end
end
when 20095.chat."Drachen-Event" with pc.is_gm() and pc.get_map_index() == 64 begin
say("Wenn du diese Quest aktivierst wird ein Event")
say("gestartet. Startest du dieses Event kannst du es")
say("nicht mehr abbrechen.")
say("Dieser NPC ist nur für Eventhelfer und Manager gedacht.")
say("Möchtest du das Event nun starten?")
local s = select ("Ja!", "Nein!")
if s == 1 then
notice_all("Drachen-Event gestartet!")
notice_all("Es wurde soeben ein Drache im Orktal vor dem")
notice_all("Tempel gespawnt. Vernichtet ihn und rettet die Orks.")
notice_all("Aber sei gewarnt er ist Stark und könnte so manchen")
notice_all("Kriegern von euch zu schaffen machen.")
notice_all("Und nun geht los und vernichtet diese Kreatur!")
mob.spawn(2291, 769, 805, 1)
else
return
end
end
end
end
Und hier das kurbis(halloween) quest:
Code:
quest kurbis begin
state start begin
when 20095.chat."Halloween Event" with pc.is_gm() begin
if game.get_event_flag("kürbisse_drop") == 0 then
say("Das Event ist gerade nicht Aktive.")
say("Willst du es Aktivieren")
local s = select ("Ja", "Nein")
if s == 1 then
say("Halloween Event wurde aktiviert!")
game.set_event_flag("moon_drop", 1)
notice_all("Das Halloween Event wurde aktiviert!")
else
return
end
else
say("Das Halloween Event ist aktiviert")
say("Möchtest du es deaktivieren?")
local s = select("Ja","Nein")
if s == 1 then
say("Das Halloween Event wurde deaktiviert!")
game.set_event_flag("moon_drop", 0)
notice_all("Das Halloween Event wurde deaktiviert!")
else
return
end
end
say_title ("Sei gegrüsst, "..pc.get_name().."!")
say ("Das Halloween-Event hat begonnen und jetzt")
say ("heisst es, dass jeder Spieler die Chance hat,")
say ("etwas Besonderes zu gewinnen.")
say ("Als Alternativ-Drop wurden Kürbisse aktiviert,")
say ("die man von jedem Monster erhalten kann.")
say ("Daher solltest du diese gut aufbewahren, denn")
say ("man bekommt am Ende eine kleine Überraschung.")
say ("Man kann ab 5 Kürbise bis 100 Stück etwas gewinnen")
wait()
say_title ("Ab Bestimmter Anzahl von Kürbissen:")
say ("")
say_reward ("5 = Reittier Siegel")
say_reward ("10 = Frucht des Lebens")
say_reward ("25 = Seelensteine")
say_reward ("50 = 3 Perlen jeder Sorte")
say_reward ("100 = Regenbogenstein")
end
when 20095.chat."Kürbisse tauschen" with pc.count_item(50095) >= 5 begin
say_title (""..pc.get_name()..":")
say ("Ich habe Kürbisse und möchte diese tauschen.")
local a = select ("5 Kürbisse", "10 Kürbisse", "25 Kürbisse", "50 Kürbisse", "100 Kürbisse", "Abbrechen")
if a == 1 then
if pc.count_item(50095) >= 5 then
pc.give_item2(71114, 10)
pc.give_item2(71115, 10)
pc.give_item2(71116, 10)
pc.give_item2(71117, 10)
pc.remove_item(50095, 5)
else
say ("Du hast zu wenig kuerbise")
end
elseif a == 2 then
if pc.count_item(50095) >= 10 then
pc.give_item2(71107)
pc.give_item2(71107)
pc.give_item2(71107)
pc.remove_item(50095, 10)
else
say ("Du hast du wenig kuerbise")
end
elseif a == 3 then
if pc.count_item(50095) >= 25 then
pc.give_item2(50513)
pc.give_item2(50513)
pc.give_item2(50513)
pc.remove_item(50095, 25)
else
say("Du hast zu wenig Kuerbise")
end
elseif a == 4 then
if pc.count_item(50095) >= 50
pc.give_item2(27992)
pc.give_item2(27993)
pc.give_item2(27994)
pc.give_item2(27992)
pc.give_item2(27993)
pc.give_item2(27994)
pc.give_item2(27992)
pc.give_item2(27993)
pc.give_item2(27994)
pc.remove_item(50095, 50)
else
say("Du hast zuwenig kuerbise")
end
elseif a == 5 then
if pc.count_item(50095) >= 100 then
pc.give_item2(50512)
pc.remove_item(50095, 100)
end
end
end
end
end
Danke an alle die mir helfen werden !!!
|
|
|
|
|
03/02/2012, 22:56
|
#4949
|
elite*gold: 15
Join Date: Sep 2010
Posts: 844
Received Thanks: 975
|
PHP Code:
quest name begin
state start begin
when 20095.chat."Rates" begin
say_title("Seon-Hae:")
say("")
say("Du moechtest also die Rates einstellen??")
say("")
say("Wie hoch soll die jeweilige Rate sein?")
local b = tonumber(input())
if b < 1 or b > 1000 then
say("falsche Eingabe")
return
end
say_title("Wähle die zu einstellende Rate")
local rateset = select("EXP","Yang","Max-Yang","Gegenstaende","Abbrechen") local w
if s == 1 then w = 4 name.set(w, b) end
if s == 2 then w = 2 name.set(w, b) end
if s == 3 then w = 3 name.set(w, b) end
if s == 4 then w = 1 name.set(w, b) end
end
function set(n, a)
command("priv_empire 0 "..n.." "..a.." 24")
end
end
end
|
|
|
|
|
03/02/2012, 23:12
|
#4950
|
elite*gold: 26
Join Date: Mar 2010
Posts: 3,765
Received Thanks: 2,661
|
if b < 1 or b > 1000 then
meinst du hoffentlich
|
|
|
|
All times are GMT +1. The time now is 16:21.
|
|
![[SERVICE] Die Questkontrolle](https://www.elitepvpers.com/forum/iconimages/metin2-private-server/service-die-questkontrolle_ltr.gif){kind=small}
