[SCRIPT] Quest Generator

----------------------------------------------------
--a_quest_from_dumbledore
--METIN2 Collect Quest
----------------------------------------------------
quest Alles_fuer_den_Sieg begin
state run begin
when login or levelup with pc.level >= 50 and pc.level <= 99 begin
set_state(informationsiege)
end
end

state informationsiege begin
when letter begin
local v = find_npc_by_vnum(20095)
if 0==v then
else
target.vid("__TARGET__", v, "Alles f\195\188r den Sieg!")
end
send_letter("Alles f\195\188r den Sieg!")
end

when button or info begin
say("Alles f\195\188r den Sieg!")
say("")
say("Dumbledore braucht deine hilfe!")
say("Geh zu ihm!")
say("")
end

when __TARGET__.target.click
target.delete("__TARGET__")
say("Alles f\195\188r den Sieg!")
----"1234567890123456789012345678901234567890123456789 0"
say("")
say("Oh!! Du du bist gekommen um mir zu helfen?")
say("Gut ...")
say("Ich bin Dumbledore.")
say("Ich setze mich stark f\195r dieses Reich ein")
say("und m\195\182chte das du mir hilfst,")
say("unsere Armee zu verst\195\164rken")
wait()
say("Dumbledore:")
say("Ich habe mich erkundigt")
say("und neue Waffen entdeckt.")
say("Leider bin ich schon alt.")
say("Kannst du mir helfen ?")
wait()
say("Ich brauche 20 Verzierte B\195\182gen")
say("und 20 Pfeilspitzen f\195\188r die Aufr\195\188stung")
say("unseres Reiches.")
say("Du kannst diese Sachen")
say("von den Demonenbogensch\195\188tzen")
say("im Demonenturm bekommen.")
say("Bitte, wir brauchen diese Dinge")
say("Du wirst auch sehr gut Belohnt.")
say("Um dir deine Suche zu erleichtern werde")
say("ich dir je 1 Exemplar von jedem geben.")
say("Viel Gl\195\188\ck. Du wirst es brauchen.")
say("")
say("Verzierter Bogen erhalten.")
say("Pfeilspitze erhalten.")
pc.give_item2(30136, 1)
pc.give_item2(30157, 1)
set_state(goquestsiege)
end

end

state goquestsiege begin --State goquestsiege
when letter begin
send_letter("Hilfe f\195\188r dein Reich!")
end

when button or info begin
say("Hilfe f\195\188r dein Reich!")
say("")
----"1234567890123456789012345678901234567890123456789 0"|
say("Du wurdest ausgew\195\164hlt deinem Reich zu dienen.")
say("Der Alte Dumbledore hat dich dammit beauftragt")
say("20 Verzierte B\195\182gen und 20 Pfeilspitzen zu sammeln.")
say("Um diese zu bekommen musst du den Ort der D\195\164monen")
say("aufsuchen und ihren Bogensch\195\188tzen ihre Waffen")
say("und ihre Munition entreisen.")
set_state("questsiegebegonnen")
end

end

state questsiegebegonnen begin
when letter begin
send_letter("Der D\195\164monenturm")
end

when button or info begin
say("Der D\195\164monenturm")
say("")
----"1234567890123456789012345678901234567890123456789 0"|
say("Suche nun den D\195\164monenturm im Tempel auf")
say("und versuche die gesuchten B\195\182gen und")
say("Pfeilspitzen aufzutreiben.")
say("Du kannst sie nur vollst\195\164ndig")
say("bei Dumbledore abgeben!")
say("(Item Sammeln erst jetzt m\195\182glich!)")
set_state("questsiegesammeln")
end
end

state questsiegesammeln begin
when letter begin
send_letter("Pfeile und B\195\182gen")
if pc.count_item(30136) >19 then
if pc.count_item(30157) >19 then
local v = find_npc_by_vnum(20095)
if 0==v then
else
target.vid("__TARGET__", v, "Der D\195\164monenturm")
end
end
end
end

when 1002.kill or
1032.kill or
1062.kill begin
local s = number(1, 25)
if s == 1 and pc.count_item(30136) <=19 then
pc.give_item2(30136, 1)
if pc.count_item(30136) == 20 then
if pc.count_item(30157) == 20 then
send_letter("Du hast die Pfeile und Waffen!")
end
end
end
local s = number(1, 25)
if s == 1 and pc.count_item(30157) <=19 then
pc.give_item2(30157, 1)
if pc.count_item(30157) == 20 then
if pc.count_item(30136) == 20 then
send_letter("Du hast die Pfeile und Waffen!")
end
end
end
end

when button or info beginn
if pc.count_item(30136) >19 then
if pc.count_item(30157) >19 then
say("Pfeile und B\195\182gen")
say("")
--- l
say("Du hast alles gesammlt!")
say("Gehe nun zu Dumbledore.")
say("")
return
end
end
end

when __TARGET__.target.click
target.delete("__TARGET__")
say("Unterst\195\188zung f\195\188r dein Reich.")
say("")
--- l
say("Ihr habt erfolgreich alle 20 Verzierte")
say("B\195\182gen gesammlt ...")
say("Und ihr habt auch alle 20 Pfeilspitzen!")
say("bekommen. Ihr habt die Aufgabe Perfekt")
say("erledigt! Hier ist euer lohn.")
pc.remove_item(30136,20)
pc.remove_item(30157,20)
say("Ihr erhaltet folgende \195\164nderungen.")
say("Permanent!")
say("")
say("+20 Bewegungsgeschwindigkeit")
say("+60 Angrifswert")
say("+60 Verteidigung")
affect.add_collect(apply.MOV_SPEED, 25, 60*60*24*365*60)
say("")
set state(siegecomplete)
end

end

state __complete begin
end
end