|
You last visited: Today at 07:16
Advertisement
[SERVICE] Die Questkontrolle
Discussion on [SERVICE] Die Questkontrolle within the Metin2 Private Server forum part of the Metin2 category.
05/25/2013, 17:16
|
#8131
|
elite*gold: 0 
Join Date: Jan 2011
Posts: 1,297
Received Thanks: 1,295
|
Quote:
Originally Posted by Sogma
Hi, meine Quest will so nicht klappen :/
Code:
quest lv9 begin
state start begin
when pc.get_exp(50) begin
set_level_to_an_other_level(9)
end
end
end
Fehlermeldung:
Code:
when doesn't have begin-end clause. (()
|
PHP Code:
quest lv9 begin
state start begin
when pc.get_exp() >= 50 begin
set_level_to_an_other_level(9)
end
end
end
Bitte sehr
|
|
|
|
05/25/2013, 22:39
|
#8132
|
elite*gold: 0
Join Date: Jun 2009
Posts: 326
Received Thanks: 80
|
Code:
quest farmback begin
state start begin
when letter with pc.get_map_index()==200 begin
set_state(map)
end
when letter with pc.get_map_index()==114 begin
set_state(map)
end
end
state map begin
when letter begin
send_letter("Nach Hause")
end
when button or info begin
say_title("Nach Hause")
say("Ich kann dich nach Hause bringen, aber ich werde")
say("zuerst alle Rufrollen, die du gekauft hast entfernen!")
say("Willst du nach Hause?")
local s = ("Ja", "Nein")
if s=2 then
send letter ("Nach Hause")
return
end
wait()
if pc.count_item(71036)>0 then
pc.remove_item(71036, pc.count_item(71036))
end
if pc.count_item(71037)>0 then
pc.remove_item(71038, pc.count_item(71038))
end
if pc.count_item(71039)>0 then
pc.remove_item(71039, pc.count_item(71039))
end
if pc.count_item(71039)>0 then
pc.remove_item(71039, pc.count_item(71039))
end
if pc.count_item(71040)>0 then
pc.remove_item(71040, pc.count_item(71040))
end
if pc.count_item(71041)>0 then
pc.remove_item(71041, pc.count_item(71041))
end
if pc.count_item(71042)>0 then
pc.remove_item(71042, pc.count_item(71042))
end
if pc.count_item(71043)>0 then
pc.remove_item(71043, pc.count_item(71043))
end
if pc.count_item(71080)>0 then
pc.remove_item(71080, pc.count_item(71080))
end
if pc.count_item(71081)>0 then
pc.remove_item(71081, pc.count_item(71081))
end
if pc.count_item(71082)>0 then
pc.remove_item(71082, pc.count_item(71082))
end
say_title("Nach Hause")
say("Ich habe alles gelöscht!")
say("Du wirst teleportiert!")
clear_letter()
local empire == pc.get_empire()
if empire = 1 then
pc.warp(469300, 964200)
return
end
if empire = 2 then
pc.warp(55700, 157900)
return
end
if empire = 3 then
pc.warp(969600, 278400)
return
end
set_state(start)
end
end
end
Fehler:
Code:
syntax error : [string "map"]:5: `)' expected near `,'
farmback.quest:77:Error occured on compile farmback.quest
Klingt einfach, finds aba nicht :/
|
|
|
|
|
05/26/2013, 01:22
|
#8133
|
elite*gold: 215
Join Date: Mar 2013
Posts: 1,032
Received Thanks: 886
|
Wenn ich den Namen angebe passiert Leider nichts mehr.
PHP Code:
quest guild_manage begin
state start begin
when 11000.chat."Gilde verlassen" or 11002.chat."Gilde verlassen" or 11004.chat."Gilde verlassen" with pc.hasguild() and not pc.isguildmaster() and npc.get_empire() == pc.get_empire() begin
say_title("Wächter des Dorfplatzes")
say("Möchtest du deine Gilde wirklich")
say("verlassen? Ich denke deine Member")
say("werden enttäuscht von dir sein..")
local s = select("Ja", "Nein")
if s==1 then
say_title("Wächter des Dorfplatzes")
say("Du bist nun wieder Gildenlos!")
pc.remove_from_guild()
pc.setqf("new_withdraw_time",get_global_time())
end
end
when 11000.chat."Gilde auflösen" or 11002.chat."Gilde auflösen" or 11004.chat."Gilde auflösen" with pc.hasguild() and pc.isguildmaster() and npc.get_empire() == pc.get_empire() begin
say_title("Wächter des Dorfplatzes")
say("Möchtest du deine Gilde wirklich")
say("auflösen? Ich denke deine Member")
say("werden enttäuscht von dir sein..")
local s = select("Ja", "Nein")
if s==1 then
say_title("Wächter des Dorfplatzes")
say("Deine Gilde ist nun aufgelöst!")
pc.destroy_guild()
pc.setqf("new_disband_time",get_global_time())
pc.setqf("new_withdraw_time",get_global_time())
end
end
when 11000.chat."Gilde gründen" or 11002.chat."Gilde gründen" or 11004.chat."Gilde gründen" with not pc.hasguild() and not pc.isguildmaster() and npc.get_empire() == pc.get_empire() begin
if game.get_event_flag("guild_withdraw_delay")*86400 >
get_global_time() - pc.getqf("new_withdraw_time") or
game.get_event_flag("guild_disband_delay")*86400 >
get_global_time() - pc.getqf("new_disband_time") then
say_title("Wächter des Dorfplatzes")
say("Du kannst jetzt noch keine neue Gilde gründen!")
say("Warte noch eine Weile!")
return
end
say_title("Wächter des Dorfplatzes")
say("Möchtest du eine Gilde gründen?")
if select("Ja","Nein") == 2 then return
else
game.request_make_guild()
end
end
end
end
|
|
|
|
|
05/26/2013, 12:46
|
#8134
|
elite*gold: 47
Join Date: Feb 2012
Posts: 2,282
Received Thanks: 2,579
|
@Vali2222:
PHP Code:
quest farmback begin
state start begin
when login with pc.get_map_index() == 200 begin
set_state(map)
end
when login with pc.get_map_index() == 114 begin
set_state(map)
end
end
state map begin
when letter begin
send_letter("Nach Hause")
end
when button or info begin
say_title("Nach Hause")
say("Ich kann dich nach Hause bringen, aber ich werde")
say("zuerst alle Rufrollen, die du gekauft hast entfernen!")
say("Willst du nach Hause?")
local s = ("Ja", "Nein")
if s == 2 then
send letter ("Nach Hause")
return
end
wait()
if pc.count_item(71036)>0 then
pc.remove_item(71036, pc.count_item(71036))
end
if pc.count_item(71037)>0 then
pc.remove_item(71038, pc.count_item(71038))
end
if pc.count_item(71039)>0 then
pc.remove_item(71039, pc.count_item(71039))
end
if pc.count_item(71039)>0 then
pc.remove_item(71039, pc.count_item(71039))
end
if pc.count_item(71040)>0 then
pc.remove_item(71040, pc.count_item(71040))
end
if pc.count_item(71041)>0 then
pc.remove_item(71041, pc.count_item(71041))
end
if pc.count_item(71042)>0 then
pc.remove_item(71042, pc.count_item(71042))
end
if pc.count_item(71043)>0 then
pc.remove_item(71043, pc.count_item(71043))
end
if pc.count_item(71080)>0 then
pc.remove_item(71080, pc.count_item(71080))
end
if pc.count_item(71081)>0 then
pc.remove_item(71081, pc.count_item(71081))
end
if pc.count_item(71082) > 0 then
pc.remove_item(71082, pc.count_item(71082))
end
say_title("Nach Hause")
say("Ich habe alles gelöscht!")
say("Du wirst teleportiert!")
clear_letter()
local empire = pc.get_empire()
if empire = 1 then
pc.warp(469300, 964200)
return
end
if empire = 2 then
pc.warp(55700, 157900)
return
end
if empire = 3 then
pc.warp(969600, 278400)
return
end
set_state(start)
end
end
end
Probiers mal so 
MfG
|
|
|
|
|
05/26/2013, 19:28
|
#8135
|
elite*gold: 0
Join Date: Jun 2009
Posts: 326
Received Thanks: 80
|
Quote:
Originally Posted by DaJuBi
@Vali2222:
PHP Code:
quest farmback begin
state start begin
when login with pc.get_map_index() == 200 begin
set_state(map)
end
when login with pc.get_map_index() == 114 begin
set_state(map)
end
end
state map begin
when letter begin
send_letter("Nach Hause")
end
when button or info begin
say_title("Nach Hause")
say("Ich kann dich nach Hause bringen, aber ich werde")
say("zuerst alle Rufrollen, die du gekauft hast entfernen!")
say("Willst du nach Hause?")
local s = ("Ja", "Nein")
if s == 2 then
send letter ("Nach Hause")
return
end
wait()
if pc.count_item(71036)>0 then
pc.remove_item(71036, pc.count_item(71036))
end
if pc.count_item(71037)>0 then
pc.remove_item(71038, pc.count_item(71038))
end
if pc.count_item(71039)>0 then
pc.remove_item(71039, pc.count_item(71039))
end
if pc.count_item(71039)>0 then
pc.remove_item(71039, pc.count_item(71039))
end
if pc.count_item(71040)>0 then
pc.remove_item(71040, pc.count_item(71040))
end
if pc.count_item(71041)>0 then
pc.remove_item(71041, pc.count_item(71041))
end
if pc.count_item(71042)>0 then
pc.remove_item(71042, pc.count_item(71042))
end
if pc.count_item(71043)>0 then
pc.remove_item(71043, pc.count_item(71043))
end
if pc.count_item(71080)>0 then
pc.remove_item(71080, pc.count_item(71080))
end
if pc.count_item(71081)>0 then
pc.remove_item(71081, pc.count_item(71081))
end
if pc.count_item(71082) > 0 then
pc.remove_item(71082, pc.count_item(71082))
end
say_title("Nach Hause")
say("Ich habe alles gelöscht!")
say("Du wirst teleportiert!")
clear_letter()
local empire = pc.get_empire()
if empire = 1 then
pc.warp(469300, 964200)
return
end
if empire = 2 then
pc.warp(55700, 157900)
return
end
if empire = 3 then
pc.warp(969600, 278400)
return
end
set_state(start)
end
end
end
Probiers mal so
MfG |
Geht au net ;(
syntax error : [string "map"]:5: `)' expected near `,'
farmback.quest:76:Error occured on compile farmback.quest
|
|
|
|
|
05/27/2013, 13:48
|
#8136
|
elite*gold: 0
Join Date: Feb 2013
Posts: 123
Received Thanks: 22
|
PHP Code:
quest Userpanel begin
state start begin
when 70010.use begin
say_title("User-Panel")
say_reward("Wie kann ich helfen?")
local a = select("Lager öffnen", "Itemshop-Lager öffnen", "Team-Liste aufrufen", "Achievement-Punkte anzeigen", "FAQ", "Abbrechen")
if a == 6 then
return
elseif a == 1 then
game.open_safebox()
chat("Dein Lager wurde geöffnet!")
elseif a == 2 then
game.open_mall()
chat("Dein Itemshop-Lager wurde geöffnet!")
elseif a == 3 then
say_title("Teamliste:")
say("")
say("Hier die Aktuelle Teamliste:")
say("")
say("")
say("")
say("")
say("")
say("")
say("Bitte vergesst die eckigen Klammern nicht,")
say("falls ihr sie anschreiben wollt!")
say("")
wait()
say("Sucht SERVERNAME zurzeit Teamler?:")
say("Wenn wir Teamler suchen steht dies im Forum")
say("FORUMLINK")
elseif a == 4 then
local actual_achievement_points = pc.getqf("achievement_points")
local Reward = 0
pc.setqf("achievement_points", actual_achievement_points + Reward)
say("Du hast: ".. actual_achievement_points + Reward .." Achievementpunkte!")
elseif a == 5 then
say_title("FAQ:")
say("Hier findest du Antworten auf die")
say("wichtigsten Fragen, bitte wähle eine Kategorie:")
local b = select("Droppinfos", "Farmmaps", "Boni 1-5", "Boni 6-7", "Das High-Eq", "Achievementpunkte", "Abbrechen")
if b == 6 then
return
elseif b == 1 then
say_title("Wo droppt man was:")
say("Alle unnötigen Uppitems wurden entfernt.")
say("Ich zähle dir nun die wichtigsten Paar dinge auf:")
say("")
say("Weisse,Blaue,Rote Perlen: 75er-170er Metins")
say("Gegenangriffstrategie: 75er-170er Metins und in Grotte2")
say("Grüne, violette, gelbe, türkise, schwarze Perle: 75er-250er Metins")
say("Kristalle: 250er Metins")
say("Sterne: 140er-170er Metins")
say("Diamanten: 250er Metins")
say("75er Waffen: 75er-170er Metins und Feuer der Macht")
say("Wenn etwas fehlt meldet dies uns")
say("")
elseif b == 2 then
say_title("Farmmaps:")
say("Wir haben 3 Farmmaps:")
say("")
say("Auf der Farmmap ab Level 1 findet ihr:")
say("45er-90er Metins und Feuer der Macht")
say("")
say("Auf der 95er Farmmap findet ihr:")
say("90er-120er Metins, Feuer der Macht u. Sensis")
say("")
say("Auf der 130er Farmmap findet ihr:")
say("130er-250er Metins")
elseif b == 3 then
say_title("Boniliste 1-5:")
say("")
say("Hier die Maximale 1-5 Bonis:")
say("Max_TP: 5000")
say("Max_MP: 1000")
say("Halbmenschen: 15")
say("STR,INT,VIT,DEX: 20")
say("Krit, DB: 15")
say("Schwert, Zweihand: 20")
say("Dolch, Pfeil: 20")
say("Fächer, Glocken: 20")
say("Magie, Feuer, Wind: 20")
say("Chance auf Exp Bonus: 30")
say("Doppelt Dropp: 25")
say("TP und MP Regi: 30")
say("TP und MP_Apsobieren: 15")
say("Angriffsgeschwindigkeit: 15")
say("")
elseif b == 4 then
say_title("Boniliste 6-7:")
say("Hier die Maximale 6-7 Bonis:")
say("")
say("STR, INT, VIT, DEX: 5")
say("Max_TP: 2000")
say("Krit, DB: 10")
say("Stark gg Monster: 15")
say("")
elseif b == 5 then
say_title("Das High-Eq:")
say("")
say("130er Waffen und 140er Rüstungen bekommt ihr")
say("aus der Balrog-Truhe!")
say("Diese könnt ihr dann bis zum 170er Eq uppen.")
say("Das 170er Eq könnt ihr nicht mehr weiter uppen!")
say("Es wird eventuell noch 250er End Eq eingefügt.")
elseif b == 6 then
say_title("Achievementpunkte:")
say("")
say("Eure Achievementpunkte könnt ihr Map1")
say("bei dem Npc Tauschbörse jederzeit gegen")
say("wertvolle und vorallem nützliche Items eintauschen!")
end
end
end
Was ist da Falsch? Bitte verbessern
|
|
|
|
|
05/27/2013, 15:58
|
#8137
|
elite*gold: 30
Join Date: Oct 2012
Posts: 1,388
Received Thanks: 243
|
Quote:
Originally Posted by LiveOut
PHP Code:
quest Userpanel begin
state start begin
when 70010.use begin
say_title("User-Panel")
say_reward("Wie kann ich helfen?")
local a = select("Lager öffnen", "Itemshop-Lager öffnen", "Team-Liste aufrufen", "Achievement-Punkte anzeigen", "FAQ", "Abbrechen")
if a == 6 then
return
elseif a == 1 then
game.open_safebox()
chat("Dein Lager wurde geöffnet!")
elseif a == 2 then
game.open_mall()
chat("Dein Itemshop-Lager wurde geöffnet!")
elseif a == 3 then
say_title("Teamliste:")
say("")
say("Hier die Aktuelle Teamliste:")
say("")
say("")
say("")
say("")
say("")
say("")
say("Bitte vergesst die eckigen Klammern nicht,")
say("falls ihr sie anschreiben wollt!")
say("")
wait()
say("Sucht SERVERNAME zurzeit Teamler?:")
say("Wenn wir Teamler suchen steht dies im Forum")
say("FORUMLINK")
elseif a == 4 then
local actual_achievement_points = pc.getqf("achievement_points")
local Reward = 0
pc.setqf("achievement_points", actual_achievement_points + Reward)
say("Du hast: ".. actual_achievement_points + Reward .." Achievementpunkte!")
elseif a == 5 then
say_title("FAQ:")
say("Hier findest du Antworten auf die")
say("wichtigsten Fragen, bitte wähle eine Kategorie:")
local b = select("Droppinfos", "Farmmaps", "Boni 1-5", "Boni 6-7", "Das High-Eq", "Achievementpunkte", "Abbrechen")
if b == 6 then
return
elseif b == 1 then
say_title("Wo droppt man was:")
say("Alle unnötigen Uppitems wurden entfernt.")
say("Ich zähle dir nun die wichtigsten Paar dinge auf:")
say("")
say("Weisse,Blaue,Rote Perlen: 75er-170er Metins")
say("Gegenangriffstrategie: 75er-170er Metins und in Grotte2")
say("Grüne, violette, gelbe, türkise, schwarze Perle: 75er-250er Metins")
say("Kristalle: 250er Metins")
say("Sterne: 140er-170er Metins")
say("Diamanten: 250er Metins")
say("75er Waffen: 75er-170er Metins und Feuer der Macht")
say("Wenn etwas fehlt meldet dies uns")
say("")
elseif b == 2 then
say_title("Farmmaps:")
say("Wir haben 3 Farmmaps:")
say("")
say("Auf der Farmmap ab Level 1 findet ihr:")
say("45er-90er Metins und Feuer der Macht")
say("")
say("Auf der 95er Farmmap findet ihr:")
say("90er-120er Metins, Feuer der Macht u. Sensis")
say("")
say("Auf der 130er Farmmap findet ihr:")
say("130er-250er Metins")
elseif b == 3 then
say_title("Boniliste 1-5:")
say("")
say("Hier die Maximale 1-5 Bonis:")
say("Max_TP: 5000")
say("Max_MP: 1000")
say("Halbmenschen: 15")
say("STR,INT,VIT,DEX: 20")
say("Krit, DB: 15")
say("Schwert, Zweihand: 20")
say("Dolch, Pfeil: 20")
say("Fächer, Glocken: 20")
say("Magie, Feuer, Wind: 20")
say("Chance auf Exp Bonus: 30")
say("Doppelt Dropp: 25")
say("TP und MP Regi: 30")
say("TP und MP_Apsobieren: 15")
say("Angriffsgeschwindigkeit: 15")
say("")
elseif b == 4 then
say_title("Boniliste 6-7:")
say("Hier die Maximale 6-7 Bonis:")
say("")
say("STR, INT, VIT, DEX: 5")
say("Max_TP: 2000")
say("Krit, DB: 10")
say("Stark gg Monster: 15")
say("")
elseif b == 5 then
say_title("Das High-Eq:")
say("")
say("130er Waffen und 140er Rüstungen bekommt ihr")
say("aus der Balrog-Truhe!")
say("Diese könnt ihr dann bis zum 170er Eq uppen.")
say("Das 170er Eq könnt ihr nicht mehr weiter uppen!")
say("Es wird eventuell noch 250er End Eq eingefügt.")
elseif b == 6 then
say_title("Achievementpunkte:")
say("")
say("Eure Achievementpunkte könnt ihr Map1")
say("bei dem Npc Tauschbörse jederzeit gegen")
say("wertvolle und vorallem nützliche Items eintauschen!")
end
end
end
Was ist da Falsch? Bitte verbessern |
Um die Quest zu beenden musst du 4 mal end am Ende schreiben
|
|
|
|
|
05/27/2013, 18:22
|
#8138
|
elite*gold: 313
Join Date: Apr 2013
Posts: 585
Received Thanks: 122
|
Quote:
Originally Posted by LiveOut
PHP Code:
quest Userpanel begin
state start begin
when 70010.use begin
say_title("User-Panel")
say_reward("Wie kann ich helfen?")
local a = select("Lager öffnen", "Itemshop-Lager öffnen", "Team-Liste aufrufen", "Achievement-Punkte anzeigen", "FAQ", "Abbrechen")
if a == 6 then
return
elseif a == 1 then
game.open_safebox()
chat("Dein Lager wurde geöffnet!")
elseif a == 2 then
game.open_mall()
chat("Dein Itemshop-Lager wurde geöffnet!")
elseif a == 3 then
say_title("Teamliste:")
say("")
say("Hier die Aktuelle Teamliste:")
say("")
say("")
say("")
say("")
say("")
say("")
say("Bitte vergesst die eckigen Klammern nicht,")
say("falls ihr sie anschreiben wollt!")
say("")
wait()
say("Sucht SERVERNAME zurzeit Teamler?:")
say("Wenn wir Teamler suchen steht dies im Forum")
say("FORUMLINK")
elseif a == 4 then
local actual_achievement_points = pc.getqf("achievement_points")
local Reward = 0
pc.setqf("achievement_points", actual_achievement_points + Reward)
say("Du hast: ".. actual_achievement_points + Reward .." Achievementpunkte!")
elseif a == 5 then
say_title("FAQ:")
say("Hier findest du Antworten auf die")
say("wichtigsten Fragen, bitte wähle eine Kategorie:")
local b = select("Droppinfos", "Farmmaps", "Boni 1-5", "Boni 6-7", "Das High-Eq", "Achievementpunkte", "Abbrechen")
if b == 6 then
return
elseif b == 1 then
say_title("Wo droppt man was:")
say("Alle unnötigen Uppitems wurden entfernt.")
say("Ich zähle dir nun die wichtigsten Paar dinge auf:")
say("")
say("Weisse,Blaue,Rote Perlen: 75er-170er Metins")
say("Gegenangriffstrategie: 75er-170er Metins und in Grotte2")
say("Grüne, violette, gelbe, türkise, schwarze Perle: 75er-250er Metins")
say("Kristalle: 250er Metins")
say("Sterne: 140er-170er Metins")
say("Diamanten: 250er Metins")
say("75er Waffen: 75er-170er Metins und Feuer der Macht")
say("Wenn etwas fehlt meldet dies uns")
say("")
elseif b == 2 then
say_title("Farmmaps:")
say("Wir haben 3 Farmmaps:")
say("")
say("Auf der Farmmap ab Level 1 findet ihr:")
say("45er-90er Metins und Feuer der Macht")
say("")
say("Auf der 95er Farmmap findet ihr:")
say("90er-120er Metins, Feuer der Macht u. Sensis")
say("")
say("Auf der 130er Farmmap findet ihr:")
say("130er-250er Metins")
elseif b == 3 then
say_title("Boniliste 1-5:")
say("")
say("Hier die Maximale 1-5 Bonis:")
say("Max_TP: 5000")
say("Max_MP: 1000")
say("Halbmenschen: 15")
say("STR,INT,VIT,DEX: 20")
say("Krit, DB: 15")
say("Schwert, Zweihand: 20")
say("Dolch, Pfeil: 20")
say("Fächer, Glocken: 20")
say("Magie, Feuer, Wind: 20")
say("Chance auf Exp Bonus: 30")
say("Doppelt Dropp: 25")
say("TP und MP Regi: 30")
say("TP und MP_Apsobieren: 15")
say("Angriffsgeschwindigkeit: 15")
say("")
elseif b == 4 then
say_title("Boniliste 6-7:")
say("Hier die Maximale 6-7 Bonis:")
say("")
say("STR, INT, VIT, DEX: 5")
say("Max_TP: 2000")
say("Krit, DB: 10")
say("Stark gg Monster: 15")
say("")
elseif b == 5 then
say_title("Das High-Eq:")
say("")
say("130er Waffen und 140er Rüstungen bekommt ihr")
say("aus der Balrog-Truhe!")
say("Diese könnt ihr dann bis zum 170er Eq uppen.")
say("Das 170er Eq könnt ihr nicht mehr weiter uppen!")
say("Es wird eventuell noch 250er End Eq eingefügt.")
elseif b == 6 then
say_title("Achievementpunkte:")
say("")
say("Eure Achievementpunkte könnt ihr Map1")
say("bei dem Npc Tauschbörse jederzeit gegen")
say("wertvolle und vorallem nützliche Items eintauschen!")
end
end
end
Was ist da Falsch? Bitte verbessern |
PHP Code:
quest Userpanel begin
state start begin
when 70010.use begin
say_title("User-Panel")
say_reward("Wie kann ich helfen?")
local a = select("Lager öffnen", "Itemshop-Lager öffnen", "Team-Liste aufrufen", "Achievement-Punkte anzeigen", "FAQ", "Abbrechen")
if a == 6 then
return
elseif a == 1 then
game.open_safebox()
chat("Dein Lager wurde geöffnet!")
elseif a == 2 then
game.open_mall()
chat("Dein Itemshop-Lager wurde geöffnet!")
elseif a == 3 then
say_title("Teamliste:")
say("")
say("Hier die Aktuelle Teamliste:")
say("")
say("")
say("")
say("")
say("")
say("")
say("Bitte vergesst die eckigen Klammern nicht,")
say("falls ihr sie anschreiben wollt!")
say("")
wait()
say("Sucht SERVERNAME zurzeit Teamler?:")
say("Wenn wir Teamler suchen steht dies im Forum")
say("FORUMLINK")
elseif a == 4 then
local actual_achievement_points = pc.getqf("achievement_points")
local Reward = 0
pc.setqf("achievement_points", actual_achievement_points + Reward)
say("Du hast: ".. actual_achievement_points + Reward .." Achievementpunkte!")
elseif a == 5 then
say_title("FAQ:")
say("Hier findest du Antworten auf die")
say("wichtigsten Fragen, bitte wähle eine Kategorie:")
local b = select("Droppinfos", "Farmmaps", "Boni 1-5", "Boni 6-7", "Das High-Eq", "Achievementpunkte", "Abbrechen")
if b == 6 then
return
elseif b == 1 then
say_title("Wo droppt man was:")
say("Alle unnötigen Uppitems wurden entfernt.")
say("Ich zähle dir nun die wichtigsten Paar dinge auf:")
say("")
say("Weisse,Blaue,Rote Perlen: 75er-170er Metins")
say("Gegenangriffstrategie: 75er-170er Metins und in Grotte2")
say("Grüne, violette, gelbe, türkise, schwarze Perle: 75er-250er Metins")
say("Kristalle: 250er Metins")
say("Sterne: 140er-170er Metins")
say("Diamanten: 250er Metins")
say("75er Waffen: 75er-170er Metins und Feuer der Macht")
say("Wenn etwas fehlt meldet dies uns")
say("")
elseif b == 2 then
say_title("Farmmaps:")
say("Wir haben 3 Farmmaps:")
say("")
say("Auf der Farmmap ab Level 1 findet ihr:")
say("45er-90er Metins und Feuer der Macht")
say("")
say("Auf der 95er Farmmap findet ihr:")
say("90er-120er Metins, Feuer der Macht u. Sensis")
say("")
say("Auf der 130er Farmmap findet ihr:")
say("130er-250er Metins")
elseif b == 3 then
say_title("Boniliste 1-5:")
say("")
say("Hier die Maximale 1-5 Bonis:")
say("Max_TP: 5000")
say("Max_MP: 1000")
say("Halbmenschen: 15")
say("STR,INT,VIT,DEX: 20")
say("Krit, DB: 15")
say("Schwert, Zweihand: 20")
say("Dolch, Pfeil: 20")
say("Fächer, Glocken: 20")
say("Magie, Feuer, Wind: 20")
say("Chance auf Exp Bonus: 30")
say("Doppelt Dropp: 25")
say("TP und MP Regi: 30")
say("TP und MP_Apsobieren: 15")
say("Angriffsgeschwindigkeit: 15")
say("")
elseif b == 4 then
say_title("Boniliste 6-7:")
say("Hier die Maximale 6-7 Bonis:")
say("")
say("STR, INT, VIT, DEX: 5")
say("Max_TP: 2000")
say("Krit, DB: 10")
say("Stark gg Monster: 15")
say("")
elseif b == 5 then
say_title("Das High-Eq:")
say("")
say("130er Waffen und 140er Rüstungen bekommt ihr")
say("aus der Balrog-Truhe!")
say("Diese könnt ihr dann bis zum 170er Eq uppen.")
say("Das 170er Eq könnt ihr nicht mehr weiter uppen!")
say("Es wird eventuell noch 250er End Eq eingefügt.")
elseif b == 6 then
say_title("Achievementpunkte:")
say("")
say("Eure Achievementpunkte könnt ihr Map1")
say("bei dem Npc Tauschbörse jederzeit gegen")
say("wertvolle und vorallem nützliche Items eintauschen!")
end
end
end
end
end
|
|
|
|
|
05/27/2013, 21:07
|
#8139
|
elite*gold: 0
Join Date: Feb 2013
Posts: 34
Received Thanks: 32
|
Hallo ich bin es mal wieder Razac und zwar habe ich eine quest geschrieben aber Rangpunkte erstellen und Normale skills gehen nicht ich weis echt nicht warum naja Points auszahlen funktioniert ich hoffe ihr könnt mir weiter helfen.
Code:
quest linguna2userpanel begin
state start begin
when 50512.use begin
say("Hallo "..pc.get_name().." ")
say("du moechtest also den Linguna2 Userpanel")
say("benutzen habe ich recht...?")
say("")
say("OK Dann viel spas mit dem Userpanel")
say_reward("Was moechtest du machen/benutzen?")
local s=select("Points auszahlen","Rangpunke erstellen","Normale Skills","Schliesen")
if s==1 then
local s = select("500k Points geben", "Schliesen")
if s == 1 then
pc.change_money(500000000)
elseif s == 2 then
end
elseif n==2 then
local s = select("Player","Edel","Ritterlich", "Goettlich", "Kein Rang mehr", "Schliesen")
if s == 1 then
pc.change_alignment(2000)
elseif s == 2 then
pc.change_alignment(5000)
elseif s == 3 then
pc.change_alignment(8000)
elseif s == 4 then
pc.change_alignment(100000)
elseif s == 5 then
say_red("es geht nur wenn man Goettlich ist")
pc.change_alignment(-20000)
elseif s == 6 then
end
elseif n==3 then
local s = select("Was sind Normale Skills?", "Normale Skills skillen,", "Schliesen")
if s == 1 then
say_yellow("Normale Skills sind -->")
say_yellow("Bergbau")
say_yellow("Pferde Rufen")
say_yellow("Fuehrung")
say_yellow("Verwandeln")
say_yellow("Rot sprachen")
say_yellow("Gelb sprachen")
say_yellow("Blau sprachen")
say_yellow("Kampf von Pferdrueckend")
say_yellow("Pferdestampfer")
say_yellow("Kraftwelle")
say_yellow("Pfeilregen")
say_yellow("Schmieden")
say_yellow("Reiten")
say_yellow("Combo")
elseif s == 2 then
pc.set_skill_level(124 ,59)
pc.set_skill_level(131 ,10)
pc.set_skill_level(130 ,21)
pc.set_skill_level(121 ,59)
pc.set_skill_level(129 ,59)
pc.set_skill_level(126 ,59)
pc.set_skill_level(127 ,59)
pc.set_skill_level(128 ,59)
pc.set_skill_level(137 ,59)
pc.set_skill_level(138 ,59)
pc.set_skill_level(139 ,59)
pc.set_skill_level(140 ,59)
pc.set_skill_level(125 ,59)
pc.set_skill_level(122 ,2)
elseif s == 3 then
end
end
end
end
end
|
|
|
|
|
05/27/2013, 22:57
|
#8140
|
elite*gold: 0
Join Date: May 2013
Posts: 104
Received Thanks: 18
|
Ausschnitt aus quest, glaube das reicht..
Code:
when info or button begin
say_title("Angriff auf das Kaiser Reich")
say("Staus:")
say_reward("Du hast schon "..pc.getqf("state1").." von 1 x Sensenmann getötet.")
end
when 1093.kill begin
local count1 = pc.getqf("state1") + 1
if count1 <= 3 then
pc.setqf("state1", count1)
q.set_counter("Sensenmann", count1)
end
if count1 == 3 then
set_state(fertig)
end
end
end
state fertig begin
when letter begin
send_letter("Aufgabe abgeschlossen!")
end
Fehler bei putty gibt es kein, aber es wird einfach nicht gezählt wenn man den ingame tötet..
Warum?
|
|
|
|
|
05/28/2013, 05:24
|
#8141
|
elite*gold: 250
Join Date: Dec 2012
Posts: 652
Received Thanks: 195
|
Beim Ccompilen sagt er mir
expecting 'when' or 'function'
Code:
quest reittiere begin
state start begin
when 71125.use begin
if pc.get_level() >= 1 then
chat("Du hast nun für 380 Stunden einen Keiler als Reittier!")
affect.remove_collect()
pc.mount(20110, 9999)
pc.mount_bonus(apply.ATT_GRADE_BONUS,100,3800)
else
chat("Du bist noch zu jung!Versuch es mit lvl 1 wieder!")
end
if horse.unride() then
affect.remove_collect()
end
end
when 71126.use begin
if pc.get_level() >= 1 then
chat("Du hast nun für 380 Stunden einen Wolf als Reittier!")
affect.remove_collect()
pc.mount(20111, 9999)
pc.mount_bonus(apply.ATT_GRADE_BONUS,100,3800)
else
chat("Du bist noch zu jung!Versuch es mit lvl 1 wieder!")
end
if horse.unride() then
affect.remove_collect()
end
end
when 71127.use begin
if pc.get_level() >= 1 then
chat("Du hast nun für 380 Stunden einen Tiger als Reittier!")
affect.remove_collect()
pc.mount(20112, 9999)
pc.mount_bonus(apply.ATT_GRADE_BONUS,100,3800)
else
chat("Du bist noch zu jung!Versuch es mit lvl 1 wieder!")
end
if horse.unride() then
affect.remove_collect()
end
end
if horse.unride() then
affect.remove_collect()
end
end
when 20980.use begin
if pc.get_level() >= 1 then
chat("Du hast nun für 380 Stunden einen Weißen Loewen als Reittier!")
affect.remove_collect()
pc.mount(20114, 9999)
pc.mount_bonus(apply.ATT_GRADE_BONUS,200,300)
pc.mount_bonus(apply.DEF_GRADE_BONUS,200,300)
else
chat("Du bist noch zu jung!Versuch es mit lvl 1 wieder!")
end
if horse.unride() then
affect.remove_collect()
end
end
when 71128.use begin
if pc.get_level() >= 1 then
chat("Du hast nun für 380 Stunden einen Loewen als Reittier!")
affect.remove_collect()
pc.mount(20113, 9999)
pc.mount_bonus(apply.ATT_GRADE_BONUS,100,3800)
else
chat("Du bist noch zu jung!Versuch es mit lvl 1 wieder!")
end
if horse.unride() then
affect.remove_collect()
end
end
end
end
|
|
|
|
|
05/28/2013, 12:52
|
#8142
|
elite*gold: 0
Join Date: Mar 2010
Posts: 864
Received Thanks: 179
|
Wie muss ich genau hier das item.remove() ändern, so das das item nicht verschwindet sondern in itemshop sockel geht und man es da wieder raus nehmen kann? und halt nur eine gewisse zeit abläuft
PHP Code:
quest buffs begin
state start begin
when 71135.use begin
cmdchat("buff1")
item.remove()
end
when 71136.use begin
cmdchat("buff2")
item.remove()
end
when 71143.use begin
cmdchat("buff3")
item.remove()
end
when 71145.use begin
cmdchat("buff4")
item.remove()
end
when 71148.use begin
cmdchat("buff5")
item.remove()
end
when 71149.use begin
cmdchat("buff6")
item.remove()
end
end
end
|
|
|
|
|
05/28/2013, 16:13
|
#8143
|
elite*gold: 34
Join Date: May 2013
Posts: 75
Received Thanks: 86
|
@ ☜☆☞~Razac~☜☆☞
PHP Code:
quest linguna2userpanel begin
state start begin
when 50512.use begin
say("Hallo "..pc.get_name().." ")
say("du moechtest also den Linguna2 Userpanel")
say("benutzen habe ich recht...?")
say("")
say("OK Dann viel spas mit dem Userpanel")
say_reward("Was moechtest du machen/benutzen?")
local ausw = select("Points auszahlen","Rangpunke erstellen","Normale Skills","Schliesen")
if ausw == 1 then
local poin = select("500k Points geben", "Schliesen")
if poin == 1 then
pc.change_money(500000000)
elseif poin == 2 then
return
end
elseif ausw==2 then
local rang = select("Player","Edel","Ritterlich","Goettlich","Kein Rang mehr","Schliesen")
if rang == 1 then
pc.change_alignment(2000)
elseif rang == 2 then
pc.change_alignment(5000)
elseif rang == 3 then
pc.change_alignment(8000)
elseif rang == 4 then
pc.change_alignment(100000)
elseif rang == 5 then
say_red("es geht nur wenn man Goettlich ist")
pc.change_alignment(-20000)
elseif rang == 6 then
return
end
elseif ausw==3 then
local skill = select("Was sind Normale Skills?","Normale Skills skillen,","Schliesen")
if skill == 1 then
say_yellow("Normale Skills sind -->")
say_yellow("Bergbau")
say_yellow("Pferde Rufen")
say_yellow("Fuehrung")
say_yellow("Verwandeln")
say_yellow("Rot sprachen")
say_yellow("Gelb sprachen")
say_yellow("Blau sprachen")
say_yellow("Kampf von Pferdrueckend")
say_yellow("Pferdestampfer")
say_yellow("Kraftwelle")
say_yellow("Pfeilregen")
say_yellow("Schmieden")
say_yellow("Reiten")
say_yellow("Combo")
elseif skill == 2 then
pc.set_skill_level(124 ,59)
pc.set_skill_level(131 ,10)
pc.set_skill_level(130 ,21)
pc.set_skill_level(121 ,59)
pc.set_skill_level(129 ,59)
pc.set_skill_level(126 ,59)
pc.set_skill_level(127 ,59)
pc.set_skill_level(128 ,59)
pc.set_skill_level(137 ,59)
pc.set_skill_level(138 ,59)
pc.set_skill_level(139 ,59)
pc.set_skill_level(140 ,59)
pc.set_skill_level(125 ,59)
pc.set_skill_level(122 ,2)
elseif skill == 3 then
return
end
end
end
end
end
|
|
|
|
|
05/28/2013, 17:51
|
#8144
|
elite*gold: 0
Join Date: Feb 2013
Posts: 34
Received Thanks: 32
|
Thx;
Quote:
Originally Posted by PeloQ
@ ☜☆☞~Razac~☜☆☞
PHP Code:
quest linguna2userpanel begin
state start begin
when 50512.use begin
say("Hallo "..pc.get_name().." ")
say("du moechtest also den Linguna2 Userpanel")
say("benutzen habe ich recht...?")
say("")
say("OK Dann viel spas mit dem Userpanel")
say_reward("Was moechtest du machen/benutzen?")
local ausw = select("Points auszahlen","Rangpunke erstellen","Normale Skills","Schliesen")
if ausw == 1 then
local poin = select("500k Points geben", "Schliesen")
if poin == 1 then
pc.change_money(500000000)
elseif poin == 2 then
return
end
elseif ausw==2 then
local rang = select("Player","Edel","Ritterlich","Goettlich","Kein Rang mehr","Schliesen")
if rang == 1 then
pc.change_alignment(2000)
elseif rang == 2 then
pc.change_alignment(5000)
elseif rang == 3 then
pc.change_alignment(8000)
elseif rang == 4 then
pc.change_alignment(100000)
elseif rang == 5 then
say_red("es geht nur wenn man Goettlich ist")
pc.change_alignment(-20000)
elseif rang == 6 then
return
end
elseif ausw==3 then
local skill = select("Was sind Normale Skills?","Normale Skills skillen,","Schliesen")
if skill == 1 then
say_yellow("Normale Skills sind -->")
say_yellow("Bergbau")
say_yellow("Pferde Rufen")
say_yellow("Fuehrung")
say_yellow("Verwandeln")
say_yellow("Rot sprachen")
say_yellow("Gelb sprachen")
say_yellow("Blau sprachen")
say_yellow("Kampf von Pferdrueckend")
say_yellow("Pferdestampfer")
say_yellow("Kraftwelle")
say_yellow("Pfeilregen")
say_yellow("Schmieden")
say_yellow("Reiten")
say_yellow("Combo")
elseif skill == 2 then
pc.set_skill_level(124 ,59)
pc.set_skill_level(131 ,10)
pc.set_skill_level(130 ,21)
pc.set_skill_level(121 ,59)
pc.set_skill_level(129 ,59)
pc.set_skill_level(126 ,59)
pc.set_skill_level(127 ,59)
pc.set_skill_level(128 ,59)
pc.set_skill_level(137 ,59)
pc.set_skill_level(138 ,59)
pc.set_skill_level(139 ,59)
pc.set_skill_level(140 ,59)
pc.set_skill_level(125 ,59)
pc.set_skill_level(122 ,2)
elseif skill == 3 then
return
end
end
end
end
end
|
danke PeloQ
Quest funktioniert thx bekommst ein thx
|
|
|
|
|
05/28/2013, 17:54
|
#8145
|
elite*gold: 0
Join Date: Mar 2009
Posts: 171
Received Thanks: 7
|
Thanks man
|
|
|
|
All times are GMT +1. The time now is 07:19.
|
|
![[SERVICE] Die Questkontrolle](https://www.elitepvpers.com/forum/iconimages/metin2-private-server/service-die-questkontrolle_ltr.gif){kind=small}
