quest userpanel begin
state start begin
when 2.use begin
if pc.level<=120 then
say_title("Wilkommen ".. pc.get_name() .." im ingame Userpanel!")
say("Was möchtest du tun?")
say("")
local s=select("Lagers Öffnen","Gemichtwaren Öffnen","Teleportieren")
if s==1 then
local a=select("Lager Öffnen", "Itemshoplager Öfnnen")
elseif a==2 then
game.open_safebox()
elseif a==2 then
game.open_mall()
end
elseif s==2 then
npc.open_shop(3)
say_title("Gemichtwaren:")
say("Willkommen in meinem kleinen Shop :D")
elseif s==3 then
say("Hast du dich verlaufen?")
say("Diese Option bringt dich in die Stadt zurück!")
local c=select("In die Stadt porten", "Abbrechen")
if 1==c then
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
elseif 2==c then
say("Dann nicht")
say("")
end
end
end
end
end
[SIZE="3"][COLOR="Red"][B]BITTE FEHLERMELDUNGEN DAZUPOSTEN! DAS MACHT DAS GANZE UM EINIGES EINFACHER[/B][/COLOR][/SIZE]
quest userpanel begin
state start begin
when 2.use begin
if pc.level<=120 then
say_title("Wilkommen ".. pc.get_name() .." im ingame Userpanel!")
say("Was möchtest du tun?")
say("")
local s=select("Lagers Öffnen","Gemichtwaren Öffnen","Teleportieren")
if s==1 then
local a=select("Lager Öffnen", "Itemshoplager Öfnnen")
elseif a==2 then
game.open_safebox()
elseif a==2 then
game.open_mall()
end
elseif s==2 then
npc.open_shop(3)
say_title("Gemichtwaren:")
say("Willkommen in meinem kleinen Shop :D")
elseif s==3 then
say("Hast du dich verlaufen?")
say("Diese Option bringt dich in die Stadt zurück!")
local c=select("In die Stadt porten", "Abbrechen")
if 1==c then
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
elseif 2==c then
say("Dann nicht")
say("")
end
end
end
end
end
So sollte sie funktionierenQuote:
hab so ne quest die funzt nicht richtig
quest gm_item begin
state start begin
when 12345.use begin
say_title("GM Ansagen:")
say("")
say("Was möchtest du sagen?")
say("")
local s=select("GM Online", "GM Offline", "GM ist für Fragen da", "Abbrechen")
if s==1 then
notice_all(pc.get_name().. " ist nun Online!!!")
say_title("GM Ansagen:")
say("")
say("Nachricht gesendet.")
say("")
elseif s==2 then
notice_all(pc.get_name().. " geht nun Offline!!!")
say_title("GM Ansagen:")
say("")
say("Nachricht gesendet.")
say("")
elseif s==3 then
notice_all(pc.get_name().. " ist nun für Eure Fragen da!!!")
say_tile("GM Ansagen:")
say("")
say("Nachricht gesendet.")
say("")
elseif s==4 then
else
end
end
end
end
quest gm_item begin
state start begin
when 12345.use begin
say_title("GM Ansagen:")
say("")
say("Was möchtest du sagen?")
say("")
local s=select("GM Online", "GM Offline", "GM ist für Fragen da", "Abbrechen")
if s==1 then
notice_all(pc.get_name().. " ist nun Online!!!")
say_title("GM Ansagen:")
say("")
say("Nachricht gesendet.")
say("")
elseif s==2 then
notice_all(pc.get_name().. " geht nun Offline!!!")
say_title("GM Ansagen:")
say("")
say("Nachricht gesendet.")
say("")
elseif s==3 then
notice_all(pc.get_name().. " ist nun für eure Fragen da!!!")
say_title("GM Ansagen:")
say("")
say("Nachricht gesendet.")
say("")
elseif s==4 then
else
end
end
end
end
Les mal mein text durch hab nie rumgeprallt das ich hier einer währ will ich auch nicht sein? bringt mir eh null :DQuote:
Du bist genauso ein Niemand. Ich hab noch nie einen Nützlichen Post von dir gesehn hier bei Epvper!!! Und ich muss auch Ben recht geben du behandelst hier leute wie dreck und erwartest dann das sie dir helfen also das is ja mal echt der ober hammer!!! lern erstmal dich zu zügeln dann kannste hier weiter schreiben....
Mfg xX°Stalker°Xx
P.s: Im gegensatz zu deinen Shadow funktionieren seine Quests die er gemacht hat also tön hier nich so rum!!!!
PHP-Code + Fehlermeldung
quests ohne zeilenumbrüche macht orientierungslos und ohne fehlermeldung kommt man der lösung keinen schritt näher
Segmentation fault (core dumped) Segmentation fault (core dumped) Segmentation fault (core dumped) Segmentation fault (core dumped) Segmentation fault (core dumped) Segmentation fault (core dumped) Segmentation fault (core dumped) Segmentation fault (core dumped)
----------------------------------------------------
--COLLECT QUEST_lv30
--METIN2 Collect Quest
----------------------------------------------------
quest collect_quest_lv30 begin
state start begin
when login or levelup with pc.level >= 30 and pc.level <= 90 begin
set_state(information)
end
end
state information begin
when letter begin
local v = find_npc_by_vnum(20084)
if v != 0 then
target.vid("__TARGET__", v, "Biologe Chaegirab")
end
send_letter("Die Forschung des Biologen")
end
when button or info begin
say_title("Die Forschung des Biologen")
say("")
say("Biologe Chaegirab, der Lehrling")
say("Uriels lässt nach dir suchen.")
say("Gehe zu ihm und schau was du für ihn tun kannst.")
say("")
end
when __TARGET__.target.click begin
target.delete("__TARGET__")
say_title("Biologe Chaegirab")
say("")
say("Oh..")
say("Schön, dass du gekommen bist..")
say("Ich habe eine wichtige aufgabe für dich!")
say("")
say("Beim letzten mal, als ich deine Hilfe")
say("brauchte ging es nur um Tue-Pilze..")
say("Diesmal ist es aber wichtiger!")
wait()
say_title("Biologe Chaegirab")
say("")
say("Ich habe von meinem Ausbilder")
say("Uriel erfahren, dass die Schwarzen Orks")
say("einen Stoff in ihren Zähnen haben können,")
say("der die anderen Monster in der Umgebung,")
say("durch ihren stinkenden Geruch aggressiv")
say("machen können.")
say("")
wait()
say("Biologe Chaegirab")
say("")
say("Ich möchte herausfinden, was dieser")
say("Stoff genau ist und warum er die Monster")
say("so aggressiv macht. Vielleicht könnte man")
say("dann sogar ein Gegenmittel entwickeln, das")
say("die Monster wieder beruigt.")
say("")
set_state(go_to_disciple)
pc.setqf("duration",0) -- ¥i¥H¸Õ¸Õªº®É¶¡
pc.setqf("collect_count",0) -- ¡X¨ú±o¹Lªºª««~¼Æ¶q
pc.setqf("drink_drug",0) -- ¡X ³Ü°g´bÃĤôªº¸Ü 1
end
end
state go_to_disciple begin
when letter begin
send_letter("Die Forschung des Biologen")
end
when button or info begin
say_title("Zähne aus dem Orktal")
--- l
say("")
say("Der Biologe Caegirab benötigt für seine")
say("Untersuchungen Backenzähne der Orks aus dem Tal")
say("von Seungryong.")
say("Bringe ihm einen Zahn nach dem anderen, damit er")
say("die einzelnen Exemplare eingehend untersuchen")
say("kann.")
say("")
say_item_vnum(30006)
say_reward("Bisher hast du".." "..pc.getqf("collect_count").."Orkzähne gefunden.")
say("")
end
when 71035.use begin --°g´bÃĤô
if get_time() < pc.getqf("duration") then
say("")
say("ÁÙ¤£¥i¥H¨Ï¥Î°g´bÃĤô")
say("")
return
end
if pc.getqf("drink_drug")==1 then
say("")
say("¤w¸g¨Ï¥Î¤F1¦¸")
say("")
return
end
if pc.count_item(30006)==0 then
say_title("Biologe Chaegirab")
say("¥ý§ä¨ì°*¤ú¥H«á, ")
say("¤~¨Ï¥Î°g´bÃĤô¤]¤£·|¦³°ÝÃD.")
say("")
return
end
item.remove()
pc.setqf("drink_drug",1)
end
when 20084.chat."Orkzähne" with pc.count_item(30006) >0 begin
if get_time() > pc.getqf("duration") then
say_title("Biologe Chaegirab")
say("")
say("Oh!!! Du hast einen...")
say("dann gib mal her und lass mich sehen,")
say("ob ich an diesem Exemplar forschen kann.")
say("")
pc.remove_item("30006", 1)
pc.setqf("duration",get_time()+0*0*0) -----------------------------------22??
wait()
local pass_percent
if pc.getqf("drink_drug")==0 then
pass_percent=60
else
pass_percent=90
end
local s= number(1,100)
if s<= pass_percent then
if pc.getqf("collect_count")< 9 then --10*Ó¥H¤U
local index =pc.getqf("collect_count")+1
pc.setqf("collect_count",index) --¨ú±o¤@* +1
say(pass_percent)
say_title("Biologe Chaegirab")
say("Oh dieses Exemplar ist gut geeignet.")
say("Es wäre schön wenn du mir")
say("noch".." "..10-pc.getqf("collect_count").. "bringen würdest.")
say("³Â·Ð±z¤F~!")
say("")
pc.setqf("drink_drug",0) --ÃĤôªì©l¤Æ
return
end
say_title("Biologe Chaegirab")
say("")
say("Gut gemacht!")
say("Du hast alle Orkzähne für mich gesammelt.")
say("So konnte ich den Stoff in den Zähnen")
say("untersuchen, und herausfinden, warum er")
say("die Monster in der Nähe aggressiv macht.")
say("")
wait()
say("Um jedoch ein Gegenmittel herzustellen,")
say("Benötige ich noch ein weiteres Item...")
say("Den Jinunggyis Seelenstein.")
say("Bitte besorge ihn mir.")
pc.setqf("collect_count",0)
pc.setqf("drink_drug",0)
pc.setqf("duration",0)
set_state(key_item)
return
else
say_title("Biologe Chaegirab")
say("Oh dieser Zahn ist in nicht so")
say("gutem Zustand... Damt kann ich leider")
say("nicht forschen..")
say("Bitte hole mir einen neuen.")
pc.setqf("drink_drug",0) --ÃĤôªì©l¤Æ
return
end
else
say_title("Biologe Chaegirab")
say("Entschuldigung aber ich habe")
say("meine Forschungen noch nicht")
say("abschließen können. Bitte")
say("komm später wieder.")
say("")
return
end
end
end
state key_item begin
when letter begin
send_letter("Die Forschung des Biologen")
if pc.count_item(30220)>0 then
local v = find_npc_by_vnum(20084)
if v != 0 then
target.vid("__TARGET__", v, "Biologe Chaegirab")
end
end
end
when button or info begin
if pc.count_item(30220) >0 then
say_title("Jinunggyis Seelenstein")
say("")
--- l
say("Du hast den Seelenstein.")
say("Bringe ihn zum Biologen.")
say("")
return
end
say_title("Jinunggyis Seelenstein")
say("")
say("Der Biologe brauch für das Gegenmittel")
say("noch einen weiteren Gegenstand.")
say("Den Jinunggyis Seelenstein..")
say("")
say_item_vnum(30220)----------- ¯u°*±ÚÆF»î¥Û
say("Du bekokmmst ihn von den")
say("Stolzen Ork Generälen,")
say("den Schwarzen Orks und den")
say("Schwarzen ork Riesen.")
say("")
end
when 635.kill or
636.kill or
637.kill begin
local s = number(1, 500)
if s == 1 and pc.count_item(30220)==0 then
pc.give_item2(30220, 1)
send_letter("Jinunggyis Seelenstein erhalten")
end
end
when __TARGET__.target.click or 20084.chat."Jinunggyis Seelenstein" with pc.count_item(30220) > 0 begin
target.delete("__TARGET__")
say_title("Biologe Chaegirab")
say("")
say("Super!")
say("Danke! Nun kann ich das Gegenmittel")
say("herstellen und die Monster wieder")
say("friedlich stimmen. Hab vielen dank.")
say("")
say("Hier hast du ein Geheimrezept. ")
say("Baek-Go kann dir zeigen wie du es benutzt.")
say("")
pc.remove_item(30220,1)
set_state(__reward__)
end
end
state __reward__ begin
when letter begin
send_letter("Finde Baek-Go")
local v = find_npc_by_vnum(20018)
if v != 0 then
target.vid("__TARGET__", v, "Baek-Go")
end
end
when button or info begin
say_title("Finde Baek-Go")
--- l
say("Der Biologe Chaegirab hat dir ein")
say("Geheimrezept gegeben. Baek-Go kann")
say("dir zeigen, wie du dich damit")
say("stärken kannst.")
say("Also finde ihn.")
say("")
end
when __TARGET__.target.click or
20018.chat."Finde Baek-Go" begin
target.delete("__TARGET__")
say("Baek-Go:")
say("Sieh mal an,")
say("ist das ein Geheimrezept von Chaegirab, dem")
say("Biologen? Hm, das wird deine")
say("Bewegungsgeschwindigkeit um 10 erhöhen.")
say("")
say("Hier, dieses Holzkästchen ist für dich. Bewahre")
say("es sorgfältig auf.")
say_reward("Als Belohnung für die Erfüllung")
say_reward("der Bitte Caegirabs erhöht")
say_reward("sich deine Bewegungsgeschwindigkeit")
say_reward("dauerhaft um 10 Punkte.")
affect.add_collect(apply.MOV_SPEED, 10, 60*60*24*365*60) --60¦~
clear_letter()
set_quest_state("collect_quest_lv40", "run")
set_state(__complete__)
end
end
state __complete__ begin
end
end
----------------------------------------------------
--COLLECT QUEST_lv40
--METIN2 Collect Quest
----------------------------------------------------
quest collect_quest_lv40 begin
state start begin
end
state run begin
when login or levelup with pc.level >= 40 and pc.level <= 90 begin
set_state(information)
end
end
state information begin
when letter begin
local v = find_npc_by_vnum(20084)
if v != 0 then
target.vid("__TARGET__", v, "Biologenquest")
end
send_letter("Die Forschung des Biologen 2")
end
when button or info begin
say_title("Die Forschung des Biologen 2")
say("")
say("Der Biologe sucht dich!")
say("Gehe zu ihm.")
say("Er sagte, du sollst etwas für ihn finden.")
say("")
end
when __TARGET__.target.click or
20084.chat."Fluchbücher" begin
target.delete("__TARGET__")
say("Biologe:")
--- l
say("Super, dass du mir wieder hilfst...")
say("Sehr gut...")
say("Du kennst mich ja schon...")
say("Ich habe die Orkzähne fertig untersucht...")
say("Nun habe ich neue Objekte gefunden...")
say("Die ich gerne untersuchen würde!")
say("Kannst du mir dabei helfen?")
wait()
say("Biologe:")
say("Wenn du mir hilfst werde ich dir eine")
say("Belohnung eben, die sehr hilfreich ist. ")
say("Ich würde ja selber gehen, aber")
say("Ich habe zuviel zu tun...")
say("Wäre echt nett, wenn du für mich")
say("Das erledigen könntest.")
wait()
say("Achso ich muss dir ja noch sagen")
say("Wodrum es sich handelt.")
say("Ich möchte die Fluchbücher untersuchen.")
say("Ich brauche 15 Stück von ihnen.")
say("Erst dann kann ich sie genau untersuchen..")
say("Die Bücher sind aber sehr alt...")
say("Manchmal zerfallen sie einfach!")
say("")
set_state(go_to_disciple)
pc.setqf("duration",0) -- Dauer der Quest
pc.setqf("collect_count",0)---- Fortschritt der quest
pc.setqf("drink_drug",0) ------¡V ³Ü°g´bÃĤôªº¸Ü 1
end
end
state go_to_disciple begin
when letter begin
send_letter("Spezialauftrag sammle Fluchsammlungen!")
end
when button or info begin
say_title("Fluchsammlungen")
--- l
say("")
say("Der Biologe gab mir den Auftrag")
say("15 Fluchsammlungen zu sammeln! ")
say("Du bekommst sie von Dunkle Peinigern")
say("und von hohen Peinigern.")
say("Du musst sie dem Biologen geben.")
say("")
say_item_vnum(30047)
say_reward("Du hast".." "..pc.getqf("collect_count").."abgegeben")
say("")
end
when 71035.use begin --°g´bÃĤô
if get_time() < pc.getqf("duration") then
say("")
say("ÁÙ¤£¥i¥H¨Ï¥Î°g´bÃĤô")
say("")
return
end
if pc.getqf("drink_drug")==1 then
say("")
say("¤w¸g¨Ï¥Î¤F1¦¸")
say("")
return
end
if pc.count_item(30047)==0 then
say("Du hast keine Fluchsammlung!")
say("Bitte komm wieder wenn")
say("Du eine Fluchsammlung für mich hast!")
say("")
return
end
item.remove()
pc.setqf("drink_drug",1)
end
when 20084.chat."Fluchsammlungen!" with pc.count_item(30047) >0 begin
if get_time() > pc.getqf("duration") then
say("Kleinen Moment..")
--- l
say("Vielen Dank,")
say("Ich überprüf die Sammlung schnell,")
say("Ob diese Sammlung in Ordnung ist...")
say("")
pc.remove_item(30047, 1)
pc.setqf("duration",get_time()+0*0*0)--------------22*Ó¤p®É
wait()
local pass_percent
if pc.getqf("drink_drug")==0 then
pass_percent=60
else
pass_percent=90
end
local s= number(1,100)
if s<= pass_percent then
if pc.getqf("collect_count")< 14 then --15 Fluchsammlungen
local index =pc.getqf("collect_count")+1
pc.setqf("collect_count",index) -- ¨ú±o¤F¤@*Ó+1
say("Biologe:")
say("Sehr schön diese Sammlung ist on Ordnung!")
say("Du hast bis jetzt".." "..15-pc.getqf("collect_count").. " abgegeben!")
say("Bring mir bitte mehr!")
say("")
pc.setqf("drink_drug",0) --ÃĤôªì©l¤Æ
return
end
say("Biologe:")
say("Du hast mir alle 15 Stück gebracht!!")
say("Nun.. ich habe noch eine Bitte")
say("An dich und zwar:")
say("Benötige ich noch den Tempel Seelenstein")
say("Den bekommst du von stolzen dunkl. Fanatikern")
say("Oder stolze dunkle Kämpfer/Oberst.")
say("")
pc.setqf("collect_count",0)
pc.setqf("drink_drug",0)
pc.setqf("duration",0)
set_state(key_item)
return
else
say("Biologe:")
say("Sorry, aber diese Sammlung ist")
say("bei meinen Untersuchungen zerfallen!")
say("Tut mir Leid, aber")
say("Bringe mir eine Neue!")
say("")
pc.setqf("drink_drug",0) --ÃĤôªì©l¤Æ
return
end
else
say("Biologe:")
say("Es tut mir leid....")
say("¤§Ich habe die letzte Untersuchung noch nicht,")
say("Beendet, warte bitte!")
say("")
return
end
end
end
state key_item begin
when letter begin
send_letter("Tempel Seelenstein")
if pc.count_item(30221)>0 then
local v = find_npc_by_vnum(20084)
if v != 0 then
target.vid("__TARGET__", v, "Bioquest")
end
end
end
when button or info begin
if pc.count_item(30221) >0 then
say_title("Tempel Seelenstein")
say("")
--- l
say("Der Biologe braucht deine Hilfe!")
say("Gehe zu ihr.")
say("")
return
end
say_title("Tempel Seelenstein")
say("")
--- l
say("Du hast alle 15 Sammlungen abgegeben!")
say("Nun brauche ich den Tempel Seelenstein.")
say("Bitte hole ihn mir!")
say("")
say_item_vnum(30221)----------
say("Der legendäre Stein,")
say("Der die Seele der")
say("Tempelanhänger enthält.")
end
when 2032.kill or
2033.kill or
2034.kill or
2035.kill begin
local s = number(1, 500)
if s == 1 and pc.count_item(30221)==0 then
pc.give_item2(30221, 1)
send_letter("Tempel Seelenstein")
end
end
when __TARGET__.target.click or
20084.chat."Tempel Seelenstein" with pc.count_item(30221) > 0 begin
target.delete("__TARGET__")
say("Biologe:")
say("Du hast hart gekämpft...")
say("Dafür verschneller ich dich..")
say("Ich gebe dir die Info für Baek-Go")
say("Er wird dir die Belohnung geben...")
say("Danke für deine Hilfe..")
say("Wenn ich noch eine Aufgabe für dich habe")
say("Werde ich dir einen Brief zukommen lassen!")
say("")
pc.remove_item(30221,1)
set_state(__reward)
end
end
state __reward begin
when letter begin
send_letter("Infos des Biologen")
local v = find_npc_by_vnum(20018)
if v != 0 then
target.vid("__TARGET__", v, "Doktor")
end
end
when button or info begin
say_title("Zugang zu den Infos des Biologen!")
--- l
say("Du hast die Aufgabe fast abgeschlossen.")
say("Jetzt musst du nur noch deine Belohhnung")
say("Bei Baek-Go abholen!")
say("Gehe zu ihm!")
say("Er ist in Map1.")
say("")
end
when __TARGET__.target.click or
20018.chat."Belohnung des Biologen" begin
target.delete("__TARGET__")
say("Baek-Go:")
say("Ich sehe..")
say("Der Biologe hat dich zu mir geschickt.")
say("Hier ist deine Belohnung:")
say("Angriffsgeschwindigkeit +5% (Dauerhaft)")
say("")
say_reward("Du hast dem Biologen geholfen")
say_reward("Deine Belohnung ist:")
say_reward("Angriffsgeschwindigkeit +5%")
affect.add_collect(apply.ATT_SPEED,5,60*60*24*365*60) --- ¡V60¦~
clear_letter()
set_quest_state("collect_quest_lv50", "run")
set_state(__complete)
end
end
state __complete begin
end
end
----------------------------------------------------
--COLLECT QUEST_lv50
--METIN2 Collect Quest
----------------------------------------------------
quest collect_quest_lv50 begin
state start begin
end
state run begin
when login or levelup with pc.level >= 50 and pc.level <= 90 begin
set_state(information)
end
end
state information begin
when letter begin
local v = find_npc_by_vnum(20084)
if v != 0 then
target.vid("__TARGET__", v, "Bioquest")
end
send_letter("Die Forschung des Biologen 3")
end
when button or info begin
say_title("Die Forschung des Biologen 3")
say("")
say("Der Biologe sucht dich!")
say("Gehe zu ih,.")
say("Er sagte, du sollst etwas für ihn finden.")
say("")
end
when __TARGET__.target.click or
20084.chat."Dämonenandenken" begin
target.delete("__TARGET__")
say("Biologe:")
--- l
say("Super, dass du mir wieder hilfst..")
say("Ich freue mich immer, wenn du mir hilfst...")
say("Du kennst ja schon die Dinge, die ich tue...")
say("Also ich hab wieder neue Objekte gefunden...")
say("Dieses mal habe ich mit den Dämonen befasst...")
say("Und zwar suche ich nun Dämonenandenken.")
say("Hilf mir dabei!")
wait()
say("Biologe:")
say("Ich gebe dir natürlich wieder eine")
say("Nützliche Belohnung wenn du mir")
say("Hilfst!")
say("Ich habe aber wieder viel zu tun...")
say("Erledgist du es wieder für mich?")
wait()
say("Biologe:")
say("Ich benötige wie schon gesagt")
say("Dämonenandenken.")
say("Du bekommst sie von Dämonenbogis,")
say("Dämonenspeerkämpfer, Dämonenschamanen")
say("und Dämonensoldaten. Ich brauche 15")
say("Stück davon!")
say("")
set_state(go_to_disciple)
pc.setqf("duration",0) --¥i¥H¸Õ¸Õªº®É¶¡
pc.setqf("collect_count",0)-- ¨ú±oªºª««~¼Æ¶q
pc.setqf("drink_drug",0) --³Ü°g´bÃĤôªº¸Ü1
end
end
state go_to_disciple begin
when letter begin
send_letter("Spezialauftrag sammle Dämonenandenken!")
end
when button or info begin
say_title("Dämonenandenken")
--- l
say("")
say("Der Biologe sagte ich soll")
say("Ihr 15 Dämonenandenken sammeln!")
say("Ich bekomme sie von den meisten im DT.")
say("Auf Ebene 1-3.")
say("")
say_item_vnum(30015)
say_reward("Du hast".." "..pc.getqf("collect_count").."abgegeben")
say("")
end
when 71035.use begin --°g´bÃĤô
if get_time() < pc.getqf("duration") then
say("")
say("ÁÙ¤£¥i¥H¨Ï¥Î°g´bÃĤô")
say("")
return
end
if pc.getqf("drink_drug")==1 then
say("")
say("¤w¸g¨Ï¥Î¤F1¦¸")
say("")
return
end
if pc.count_item(30015)==0 then
say("Biologe:")
say("Du musst schon ein Andenken dabei")
say("Haben um es mir zu geben.")
say("")
return
end
item.remove()
pc.setqf("drink_drug",1)
end
when 20084.chat."Dämonenandenken" with pc.count_item(30015) >0 begin
if get_time() > pc.getqf("duration") then
say("Geb' mir nen Moment")
--- l
say("Vielen Dank,")
say("Ich überprüfe das Andenken eben,")
say("Ob das Andenken in Ordnung ist.")
say("")
pc.remove_item(30015, 1)
pc.setqf("duration",get_time()+0*0*0) ----------------22??
wait()
local pass_percent
if pc.getqf("drink_drug")==0 then
pass_percent=60
else
pass_percent=90
end
local s= number(1,100)
if s<= pass_percent then
if pc.getqf("collect_count")< 14 then --15 Dämonenandenken
local index =pc.getqf("collect_count")+1
pc.setqf("collect_count",index) --¨ú±o¤@*Ó®É+1
say("Biologe:")
say("Sehr gut! Dieses Andenken ist gut.")
say("Du hast bis jetzt".." "..15-pc.getqf("collect_count").. "abgegeben!")
say("Bring mir bitte mehr!")
say("")
pc.setqf("drink_drug",0) --ÃĤôªì©l¤Æ
return
end
say("Biologe:")
say("Du hast mir alle 15 Stück gebracht!")
say("Ich habe aber noch eine Bitte!")
say("Und zwar:")
say("Benötige ich wieder einen Seelenstein.")
say("Es handelt sich um Sagyis Seelenstein.")
say("")
pc.setqf("collect_count",0)
pc.setqf("drink_drug",0)
pc.setqf("duration",0)
set_state(key_item)
return
else
say("Biologe:")
say("Sorry, aber dieses Andenken ist")
say("Mir bei den Untersuchungen abhanden")
say("gekommen, ein Neues bitte!")
say("")
pc.setqf("drink_drug",0) --ÃĤôªì©l¤Æ
return
end
else
say("Biologe:")
say("Tut mir leid..")
say("Ich habe die Untersuchung noch nicht ")
say("abgeschlossen, warte bitte.")
say("")
return
end
end
end
state key_item begin
when letter begin
send_letter("Sagyis Seelenstein")
if pc.count_item(30222)>0 then
local v = find_npc_by_vnum(20084)
if v != 0 then
target.vid("__TARGET__", v, "Bioquest")
end
end
end
when button or info begin
if pc.count_item(30222) >0 then
say_title("Sagyis Seelenstein")
say("")
--- l
say("Der Biologe sucht dich.")
say("Gehe zu ihr.")
say("")
return
end
say_title("Sagyis Seelenstein")
say("")
--- l
say("Du hast mir alle Andenken gebracht,")
say("Nun braucne ich einen Seelenstein:")
say("Sagyis Seelenstein!")
say_item_vnum(30222)----------Sagyis Seelenstein
say("Der legendäre Stein, der die")
say("Seele der Sagyis Adligen enthält.")
say("")
end
when 1031.kill or
1032.kill or
1033.kill or
1034.kill begin
local s = number(1, 500)
if s == 1 and pc.count_item(30222)==0 then
pc.give_item2(30222, 1)
send_letter("Sagyis Seelenstein")
end
end
when __TARGET__.target.click or
20084.chat."Sagyis Seelenstein" with pc.count_item(30222) > 0 begin
target.delete("__TARGET__")
say("Biologe:")
say("Du hast hart gekämpft..")
say("Dafür verstärke ich dich..")
say("Ich gebe dir die Infos für Baek-Go")
say("Er wird dir die Belohnung geben...")
say("Danke für deine Hilfe!")
say("Wenn ich wieder was für dich habe,")
say("Dir einen Brief zukommen lassen!")
say("")
pc.remove_item(30222,1)
set_state(__reward)
end
end
state __reward begin
when letter begin
send_letter("Infos des Biologen")
local v = find_npc_by_vnum(20018)
if v != 0 then
target.vid("__TARGET__", v, "Doktor")
end
end
when button or info begin
say_title("Zugang zu den Infos des Biologen!")
--- l
say("Die Quest ist nun fast beendet.")
say("Du musst dir nurnoch deine")
say("Belohnung abholen: ")
say("+60 Verteidigung")
say("Jetzt aber schnell zu Baek-Go.")
say("")
end
when __TARGET__.target.click or
20018.chat." ¬Ý¬ÝÃĤè¦n¶Ü" begin
target.delete("__TARGET__")
say("Baek-Go:")
say("Ich sehe..")
say("Der Biologe hat dich zu mir geschickt?")
say("Achso...damit ich dir deine Belohnung")
say("Gebe, hier hast du sie.")
say("")
say_reward("Auftrag des Biologen erfolgreich")
say_reward("Beendet du erhälst deine Belohnung.")
say_reward("+60 Verteidigung, daurhaft.")
say("")
affect.add_collect(apply.DEF_GRADE_BONUS,60,60*60*24*365*60) -----¡V60¦~
clear_letter()
set_quest_state("collect_quest_lv60", "run")
set_state(__complete)
end
end
state __complete begin
end
end
----------------------------------------------------
--COLLECT QUEST_lv60
--METIN2 Collect Quest
----------------------------------------------------
quest collect_quest_lv60 begin
state start begin
end
state run begin
when login or levelup with pc.level >= 60 and pc.level <= 90 begin
set_state(information)
end
end
state information begin
when letter begin
local v = find_npc_by_vnum(20084)
if v != 0 then
target.vid("__TARGET__", v, "Bioquest")
end
send_letter("Die Forschung des Biologen 4")
end
when button or info begin
say_title("Die Forschung des Biologen 4")
say("")
say("Der Biologe sucht dich!")
say("Gehe zu ihr.")
say("Er sagte, du sollst etwas für ihn tun.")
say("")
end
when __TARGET__.target.click or
20084.chat."Eiskugeln" begin
target.delete("__TARGET__")
say("Biologe:")
--- l
say("Ich finde es toll, wie gut du")
say("Mich immer unterstüzt.")
say("Nun brauche ich wieder deine")
say("Hilfe...Und zwar habe ich")
say("Dieses Mal etwas auf dem Berg")
say("Sohan gefunden! Es wäre nett,")
say("Wenn du mir dabei helfen könntest.")
wait()
say("Biologe:")
say("Wenn du mir ein weiteres Mal")
say("Helfen willst, dann werde ich")
say("Dich mit einem zauber verstärken",)
say("Der dir Stärke gibt!")
say("Leider bin ich unerfahren und schwach,")
say("Sonst wäre ich selber auf die Suche nach")
say("Eiskugeln gegangen, aber Eisgolems beschützen sie...")
say("")
wait()
say("Biologe:")
say("Wie schon angesprochen sind die Eiskugeln")
say("In der Nähe von Eisgolems...")
say("Um genauer zu sein, kommen die")
say("Eiskugeln von den Eisgolems, d.h. du musst")
say("Ins Eisland.. Ich benötige 20 Stück.")
say("Bitte beeil dich, damit sie nicht schmelzen.")
say("")
set_state(go_to_disciple)
pc.setqf("duration",0) -- ¥i¥H¸Õ¸Õªº®É¶¡
pc.setqf("collect_count",0)-- ¨ú±oªºª««~¼Æ¶q
pc.setqf("drink_drug",0) -- ³Ü°g´bÃĤôªº¸Ü1
end
end
state go_to_disciple begin
when letter begin
send_letter("Spezialauftrag sammle Eiskugeln!")
end
when button or info begin
say_title("Eiskugeln")
--- l
say("")
say("Der Biologe gab mir den Auftrag")
say("Ihr 20 Eiskugeln zu holen.")
say("Er sagte, ich bekomme sie von")
say("Den Eisgolems...")
say("Mal sehen, vielleicht geben mir")
say("Die Eisgolems die Dämonenandenken.")
say_reward("Besorge 20 Eiskugeln von den Eisgolems.")
say_item_vnum(30050)
say_reward("Du hast".." "..pc.getqf("collect_count").."abgegeben")
end
when 71035.use begin -- °g´bÃĤô
if get_time() < pc.getqf("duration") then
say("ÁÙ¤£¥i¥H¨Ï¥Î°g´bÃĤô")
return
end
if pc.getqf("drink_drug")==1 then
say("¤w¸g¨Ï¥Î¤F1¦¸")
return
end
if pc.count_item(30050)==0 then
say("Biologe:")
say("Du musst schon eine Eiskugel")
say("Dabei haben, sonst geht's nicht.")
say("")
return
end
item.remove()
pc.setqf("drink_drug",1)
end
when 20084.chat."Eiskugeln" with pc.count_item(30050) >0 begin
if get_time() > pc.getqf("duration") then
say("Biologe:")
--- l
say("Danke!!")
say("Ich werde die Kugel jetzt")
say("Überprüfen, dann sage ich dir")
say("Ob ich sie untersuchen kann.")
say("")
pc.remove_item(30050, 1)
pc.setqf("duration",get_time()+0*0*0)------------------22¤p®É
wait()
local pass_percent
if pc.getqf("drink_drug")==0 then
pass_percent=60
else
pass_percent=90
end
local s= number(1,100)
if s<= pass_percent then
if pc.getqf("collect_count")< 19 then --20*Eiskugeln
local index =pc.getqf("collect_count")+1
pc.setqf("collect_count",index) --¨ú±o¤@*Ó®É+1
say("Biologe:")
say("Super, diese Eiskugel ist perfekt!")
say("Du hast bis jetzt".." "..20-pc.getqf("collect_count").. "abgegeben!")
say("Bring mir bitte mehr!")
say("")
pc.setqf("drink_drug",0) --ÃĤôªì©l¤Æ
return
end
say("Biologe:")
say("Sehr gut, du hast alle gesammelt!")
say("Ich konnte meine Untersuchungen,")
say("Erfolgreich beeden!!")
say("Nun benötige ich aber wieder einen Seelenstein.")
say("Aurtumryus Seelenstein")
say("")
pc.setqf("collect_count",0)
pc.setqf("drink_drug",0)
pc.setqf("duration",0)
set_state(key_item)
return
else
say("Biologe:")
say("Es tut mir Leid, aber")
say("Diese Eiskugel ist grade geschmolzen.")
say("Bring mir bitte eine Neue.")
say("Mach schnell!")
say("")
pc.setqf("drink_drug",0) --ÃĤôªì©l¤Æ
return
end
else
say("Biologe:")
say("Tut mir Leid...")
say("Aber ich habe die Untersuchungen an")
say("der letzten Kugel noch nicht abgeschlossen.")
say("")
return
end
end
end
state key_item begin
when letter begin
send_letter("Aurtumryus Seelenstein")
if pc.count_item(30223)>0 then
local v = find_npc_by_vnum(20084)
if v != 0 then
target.vid("__TARGET__", v, "Bioquest")
end
end
end
when button or info begin
if pc.count_item(30223) >0 then
say_title("Aurtumryus Seelenstein")
say("")
--- l
say("Der Biologe sucht dich.)
say("Gehe zu ihr.")
say("")
return
end
say_title("Aurtumryus Seelenstein")
say("")
--- l
say("Du hast mir nun alle Kugel gebracht und")
say("Ich habe sie untersucht.")
say("Bring mir bitte Aurtumryus Seelenstein.")
say_item_vnum(30223)---------- Aurtumryus Seelenstein
say("Der Legendäre Stein,")
say("Der die Seele der Aurtumryus Adligen enthält.")
say("")
end
when 1101.kill or
1102.kill or
1103.kill or
1104.kill or
1105.kill or
1106.kill or
1107.kill begin
local s = number(1, 500)
if s == 1 and pc.count_item(30223)==0 then
pc.give_item2(30223, 1)
send_letter("Aurtumryus Seelenstein")
end
end
when __TARGET__.target.click or
20084.chat."Aurtumryus Seelenstein" with pc.count_item(30223) > 0 begin
target.delete("__TARGET__")
say("Biologe:")
say("Du hast dir dieses Mal aber")
say("Sehr viel Zeit gelassen, hoffe das")
say("Wird nächstes Mal schneller gehen!")
say("Nichtsdestodtrotz hast du die Aufgabe")
say("Bewältigt, hoffe du hilfst mir nächses")
say("Mal wieder dabei!!")
say("Du wirst bald von mir hören!!")
say("")
pc.remove_item(30223,1)
set_state(__reward)
end
end
state __reward begin
when letter begin
send_letter("Infos des Biologen")
local v = find_npc_by_vnum(20018)
if v != 0 then
target.vid("__TARGET__", v, "Baek-Go")
end
end
when button or info begin
say_title("Der Weg zur Belohnung")
--- l
say("Die Quest des Biologen selbst")
say("Ist beendet, gehe dir nun deine")
say("Belohnung bei Baek-Go abholen.")
say("Belohnung:")
say("+50 AW")
say("")
end
when __TARGET__.target.click or
20018.chat."Belohnung" begin
target.delete("__TARGET__")
say("Baek-Go:")
say("Nun, ich kenne dich..")
say("Du warst doch letztes Mal auch bei mir?")
say("Ich erinnere mich...")
say("Du holst dir wieder deine Belohnung ab.")
say("")
say_reward("Auftrag des Biologen erfolgreich")
say_reward("Beendet du erhälst deine Belohnung.")
say_reward("+50 Angriffswert, dauerhaft.")
affect.add_collect(apply.ATT_GRADE_BONUS,50,60*60*24*365*60)--¡X60¦~
clear_letter()
set_quest_state("collect_quest_lv70", "run")
set_state(__complete)
end
end
state __giveup__ begin
end
state __complete begin
end
end
----------------------------------------------------
--COLLECT QUEST_lv70
--METIN2 collect quest
--By ShaDoW
----------------------------------------------------
quest collect_quest_lv70 begin
state start begin
end
state run begin
when login or levelup with pc.level >= 70 and pc.level <= 90 begin
set_state(information)
end
end
state information begin
when letter begin
local v = find_npc_by_vnum(20084)
if v != 0 then
target.vid("__TARGET__", v, "Bioquest")
end
send_letter("Die Forschung des Biologen 5")
end
when button or info begin
say_title("Die Forschung des Biologen 5")
say("")
say("Der Biologe sucht dich!")
say("Gehe zu ihm.")
say("Er sagte, er hat wieder was für dich.")
say("")
end
when __TARGET__.target.click or
20084.chat."Zelkovas Holzäste" begin
target.delete("__TARGET__")
say("Biologe:")
--- l
say("Wunderbar! Ich finde es toll, dass")
say("Du mir wieder hilfst!")
say("Deine Aufgabe, die ich dir jetzt")
say("Gebe, ist nicht besonders "hell",")
say("Denn jetzt werde ich dich in den")
say("Dunklen Geisterwald schicken.")
say("Die Monster dort, sind nicht sehr nett.")
wait()
say("Biologe:")
say("Da du dieses mal dein Leben riskieren")
say("Musst, um mir das Objekt zu bringen,")
say("welches ich Suche..")
say("Dieses mal bin ich weder zu beschäftigt,")
say("Noch zu schwach..Ich habe einfach nur Angst.")
say("")
wait()
say("Biologe:")
say("Also, da du nun lost musst und mir")
say("Die Onjekte holen musst, sage ich dir")
say("Was ich brauche.")
say("Ich benötige Zelkovas Holzäste")
say("Aber Achtung, sie welken schnell.")
say("Beeil dich!")
say("")
set_state(go_to_disciple)
pc.setqf("duration",0) -- ¥i¥H¸Õ¸Õªº®É¶¡
pc.setqf("collect_count",0)--¨ú±oªºª««~¼Æ¶q
pc.setqf("drink_drug",0) --³Ü°g´bÃĤôªº¸Ü 1
end
end
state go_to_disciple begin
when letter begin
send_letter("Spezialauftrag sammle Holzäste!")
end
when button or info begin
say_title("Zelkovas Holzäste")
--- l
say("")
say("Der Biologe gab mir den Auftag,")
say("Ihr 25 Holzäste zu bringen.")
say("Ich bekomme sie von den Mops")
say("Im Geisterwald.. Ich denke mal von Allen.")
say("")
say_item_vnum(30165)
say_reward("Du hast".." "..pc.getqf("collect_count").."abgegeben.")
say("")
end
when 71035.use begin --°g´bÃĤô
if get_time() < pc.getqf("duration") then
say("ÁÙ¤£¥i¥H¨Ï¥Î°g´bÃĤô")
return
end
if pc.getqf("drink_drug")==1 then
say("¤w¸g¨Ï¥Î¤F1¦¸")
return
end
if pc.count_item(30165)==0 then
say("Biologe:")
say("Du musst schon einen Ast dabei haben,")
say("Denn die Leere kann ich nicht untersuchen.")
say("")
return
end
item.remove()
pc.setqf("drink_drug",1)
end
when 20084.chat."Zelkovas Holzäste" with pc.count_item(30165) >0 begin
if get_time() > pc.getqf("duration") then
say("Biologe:")
--- l
say("Viele Dank, dass du mir")
say("Einen gebracht hast!")
say("Ich werde ihn untersuchen!")
say("")
pc.remove_item(30165, 1)
pc.setqf("duration",get_time()+0*0*0)------------------22*Ó¤p®É
wait()
local pass_percent
if pc.getqf("drink_drug")==0 then
pass_percent=60
else
pass_percent=90
end
local s= number(1,100)
if s<= pass_percent then
if pc.getqf("collect_count")< 24 then --25*Zelkovas Holzäste
local index =pc.getqf("collect_count")+1
pc.setqf("collect_count",index) --¨ú±o¤F¤@*Ó+1
say("Biologe:")
say("Perfekt!!Dieser Ast ist einfach nur perfekt!")
say("Du hast bis jetzt".." "..25-pc.getqf("collect_count").. "*abgegeben!")
say("Ich brauche aber noch mehr!")
say("")
pc.setqf("drink_drug",0) --ÃĤôªì©l¤Æ
return
end
say("Biologe:")
say("Du hast alle 25 Stück gesammelt!")
say("Meine Untersuchungen der Äste")
say("Ist nun abgeschlossen!")
say("Du weisst was jetzt kommt oder?")
say("Ich brauche noch Gyimoks Seelenstein.")
say("")
pc.setqf("collect_count",0)
pc.setqf("drink_drug",0)
pc.setqf("duration",0)
set_state(key_item)
return
else
say("Biologe:")
say("Es tut mir Leid, aber")
say("Dieser Ast ist beim Transport")
say("Verwelkt und ich kann ihn nicht")
say("Mehr untersuchen!")
say("")
pc.setqf("drink_drug",0) --ÃĤôªì©l¤Æ
return
end
else
say("Biologe:")
say("Ich habe die Untersuchengen")
say("Am letzten Ast noch nicht feritg.")
say("Bitte komm später wieder!!")
say("Was guckst du so? Halte mich nicht auf.")
say("")
return
end
end
end
state key_item begin
when letter begin
send_letter("Gyimoks Seelenstein")
if pc.count_item(30224)>0 then
local v = find_npc_by_vnum(20084)
if v != 0 then
target.vid("__TARGET__", v, "Bioquest")
end
end
end
when button or info begin
if pc.count_item(30224) >0 then
say_title("Gyimoks Seelenstein")
say("")
--- l
say("Der Biologe hat noch eine Aufgabe")
say("Für dich, gehe zu ihr!")
say("")
return
end
say_title("Gyimoks Seelenstein")
say("")
--- l
say("Du hast mir alle 25 Äste gebracht")
say("Und ich habe sie alle untersucht.")
say("Nun benöte ich noch Gyimoks Seelenstein.")
say_item_vnum(30224)----------Gyimoks Seelenstein
say("Der legendäre Stein,")
say("Der die Seelen Gyimoks Adligen enthält.")
say("")
end
when 2301.kill or
2302.kill or
2303.kill or
2304.kill or
2305.kill or
2311.kill or
2312.kill or
2313.kill or
2314.kill or
2315.kill or
2306.kill or
2307.kill begin
local s = number(1, 500)
if s == 1 and pc.count_item(30224)==0 then
pc.give_item2(30224)
send_letter("Gyimoks Seelenstein")
end
end
when __TARGET__.target.click or
20084.chat."Gyimoks Seelenstein" with pc.count_item(30224) > 0 begin
target.delete("__TARGET__")
say("Biologe:")
say("Diese Aufgabe war wohl doch")
say("Einfacher als erwartet... dann")
say("Lasse ich mir mal etwas schwereres")
say("Einfallen für das nächste Mal!")
say("Aber danke, dass du mir wieder")
say("Geholfen hast!!")
say("Mit Level 80 hörst du wieder von mir!")
say("")
pc.remove_item(30224,1)
set_state(__reward)
end
end
state __reward begin
when letter begin
send_letter("Info des Biologen")
local v = find_npc_by_vnum(20018)
if v != 0 then
target.vid("__TARGET__", v, "Baek-Go")
end
end
when button or info begin
say_title("Der weg zur Belohnung")
--- l
say("Die Quest des Biologen ist")
say("Beendet, alle 25 Holzäste wurde")
say("Abgegeben. Nun gehe zu")
say("Baek-Go und hole dir deine Belohnung ab:")
say("11% Bewegungsgeschwindigkeit")
say("10% Schadensreduzierung")
say("")
end
when __TARGET__.target.click or
20018.chat."Belohnung" begin
target.delete("__TARGET__")
say("Baek-Go:")
say("Du schon wieder...")
say("Ich weiss, weswegen du hier bist.")
say("Du willst dir deine Belohnung abholen,")
say("Nicht wahr? Hier hast du sie.")
say("")
say_reward("Auftrag des Biologen erfolgreich")
say_reward("Beendet, du erhälst deine Belohnung.")
say_reward("11% Bewegungsgeschwindigkeit und 10% Schadensreduzierung.")
say("")
affect.add_collect(apply.MOV_SPEED,11,60*60*24*365*60)
affect.add_collect(apply.DEF_GRADE_BONUS,10,60*60*24*365*60) --60¦~
clear_letter()
set_quest_state("collect_quest_lv80", "run")
set_state(__complete)
end
end
state __complete begin
end
end
----------------------------------------------------
--COLLECT QUEST_lv80
--METIN2 collect quest
----------------------------------------------------
quest collect_quest_lv80 begin
state start begin
end
state run begin
when login or levelup with pc.level >= 80 begin
set_state(information)
end
end
state information begin
when letter begin
local v = find_npc_by_vnum(20084)
if v != 0 then
target.vid("__TARGET__", v, "Bioquest")
end
send_letter("Die Forschung des Biologen 6")
end
when button or info begin
say_title("Die Forschung des Biologen 6")
say("")
say("Der Biologe sucht dich!")
say("Gehe zu ihm.")
say("Er sagte, er hat eine weitere Aufgabe für dich.")
say("")
end
when __TARGET__.target.click or
20084.chat."Tugyis Tafeln" begin
target.delete("__TARGET__")
say("Biologe:")
--- l
say("Sehr schön!!! Ich freue mich, dass du")
say("Mir wieder unter die Arme greifen willst.")
say("Da ich deine letzte Aufgabe, etwas zu leicht")
say("Fand, gebe ich dir nun eine schwerere Aufgabe..")
say("Du hast bestimmt schoneinmal vom Schlangenfeld")
say("Oder Land der Riese gehört, oder?")
wait()
say("Biologe:")
say("Nunja, ich habe dort etwas gefunden,")
say("Was ich gerne untersuchen würde.")
say("Aber dieses Etwas bekommt man nur von")
say("Den dort ansässigen Riesen!")
say("Würdest du für mich dort hin gehen")
say("Und mir Tugyis Tafeln bringen?")
say("Aber bitte pass auf, denn diese Tafeln")
say("Sind schon sehr alt und werden gut")
say("Von den Riesen verteidigt!")
say("")
wait()
say("Biologe:")
say("Ich benötige Tugyis Tafeln")
say("Und zwar, um eine genaue Analyse")
say("Dieser Tafeln zu machen, 30 Stück!")
say("Wärst du so freundlich?")
say("Danke!!")
say("")
set_state(go_to_disciple)
pc.setqf("duration",0) -- ¥i¥H¸Õ¸Õªº®É¶¡
pc.setqf("collect_count",0)-- ¨ú±oªºª««~¼Æ¶q
pc.setqf("drink_drug",0) --³Ü°g´bÃĤôªº¸Ü 1
end
end
state go_to_disciple begin
when letter begin
send_letter("Spezialauftrag sammle Tafeln!")
end
when button or info begin
say_title("Tugyis Tafeln")
--- l
say("")
say("Der Biologe verlangt von mir," )
say("Dass ich ins Schlangenfeld oder")
say("Ins Land der Riesen gehe und dort")
say("30 Tugyis Tafeln besorge..")
say("Das wird bestimmt lustig...")
say("")
say_item_vnum(30166)
say_reward("Du hast".." "..pc.getqf("collect_count").."abgegeben")
say("")
end
when 71035.use begin --°g´bÃĤô
if get_time() < pc.getqf("duration") then
say("ÁÙ¤£¥i¥H¨Ï¥Î°g´bÃĤô")
return
end
if pc.getqf("drink_drug")==1 then
say("¤w¸g¨Ï¥Î¤F1¦¸")
return
end
if pc.count_item(30166)==0 then
say("Biologe:")
say("Du musst schon eine Tafel dabei haben")
say("Sonst kann ich nichts untersuchen!")
say("")
return
end
item.remove()
pc.setqf("drink_drug",1)
end
when 1401.kill or
1402.kill or
1403.kill or
1601.kill or
1602.kill or
1603.kill begin
local s = number(1, 100)
if s <= 5 and pc.count_item(30166)==0 then
pc.give_item2(30166, 1)
end
end
when 20084.chat."Tugyis Tafeln" with pc.count_item(30166) >0 begin
if get_time() > pc.getqf("duration") then
say("Biologe:")
--- l
say("Vielen Dank, dass du mir")
say("Eine Tafel gebracht hast.")
say("Ich werde sie jetzt untersuchen.")
say("")
pc.remove_item(30166, 1)
pc.setqf("duration",get_time()+0*0*0)--------------22¤p®É
wait()
local pass_percent
if pc.getqf("drink_drug")==0 then
pass_percent=60
else
pass_percent=90
end
local s= number(1,100)
if s<= pass_percent then
if pc.getqf("collect_count")< 29 then --30*Tugyis Tafeln
local index =pc.getqf("collect_count")+1
pc.setqf("collect_count",index) --¨ú±o»õ¦U±o®É+1
say("Biologe:")
say("Ich muss sagen, eine sehr schöne Tafel.")
say("Du hast bis jetzt".." "..30-pc.getqf("collect_count").. "*abgegeben!")
say("Ich brauche mehr!")
say("")
pc.setqf("drink_drug",0) --ÃĤôªì©l¤Æ
return
end
say("Biologe:")
say("Super du hast 30 Stück gesammelt!")
say("Meine Untersuchungen der Tafeln")
say("Ist abgeschlossen!")
say("Du weisst bestimmt, was ich jetzt brauche?")
say("Ich brauche: Tugyis Seelenstein!")
say("")
say("")
pc.setqf("collect_count",0)
pc.setqf("drink_drug",0)
pc.setqf("duration",0)
set_state(key_item)
return
else
say("Biologe:")
say("Es tut mir Leid, aber")
say("Diese Tafel ist zu alt,")
say("als dass ich sie untersuchen kann.")
say("Hast du noch eine?")
say("")
pc.setqf("drink_drug",0) --ÃĤôªì©l¤Æ
return
end
else
say("Biologe:")
say("Die Untersuchungen der letzten")
say("Tafel sind noch nicht abgeschlossen.")
say("Warte bitte und komme später wieder.")
say("Guck nicht wie'n Auto und warte..")
say("")
return
end
end
end
state key_item begin
when letter begin
send_letter("Tugyis Tafeln")
if pc.count_item(30225)>0 then
local v = find_npc_by_vnum(20084)
if v != 0 then
target.vid("__TARGET__", v, "Bioquest")
end
end
end
when button or info begin
if pc.count_item(30225) >0 then
say_title("Tugyis Seelenstein")
say("")
--- l
say("Der Biologe hat eine Aufgabe..")
say("Gehe zu ihr.")
say("")
return
end
say_title("Tugyis Seelenstein")
say("")
--- l
say("Nun, da du mir alle meine 30")
say("Tafeln geholt hast, benötige")
say("Ich noch den Tugyis Seelenstein.")
say_item_vnum(30225)---------- Tugyis Seelenstein
say("Ein Legendäre Stein, ")
say("der die Seele eines Tugyi Adligen enthält.")
say("")
end
when 1401.kill or
1402.kill or
1403.kill or
1601.kill or
1602.kill or
1603.kill begin
local s = number(1, 200)
if s == 1 and pc.count_item(30225)==0 then
pc.give_item2(30225, 1)
send_letter("Tugyis Seelenstein")
end
end
when __TARGET__.target.click or
20084.chat."Tugyis Seelenstein" with pc.count_item(30225) > 0 begin
target.delete("__TARGET__")
say("Biologe:")
say("Nundenn, du hast die Aufgabe")
say("Schnell und sauber gemeistert!")
say("Ich danke dir dafür.")
say("Um deine Belohnung abzuholen,")
say("Gehe bitte zu Baek-Go")
say("Er wird sie dir geben!")
say("Ich gebe dir noch die Bestätigung.")
say("")
pc.remove_item(30225,1)
set_state(__reward)
end
end
state __reward begin
when letter begin
send_letter("Info des Biologen")
local v = find_npc_by_vnum(20018)
if v != 0 then
target.vid("__TARGET__", v, "Baek-Go)
end
end
when button or info begin
say_title("Der Weg zur Belohnung")
--- l
say("Die Quest des Biologen ist")
say("Beendet und alle 30 Tafeln und")
say("Der Seelenstein wurden abgegeben.")
say("Nun muss ich noch zu Baek-Go")
say("Und die Belohnung holen!")
say("")
end
when __TARGET__.target.click or
20018.chat."Belohnung" begin
target.delete("__TARGET__")
say("Baek-Go:")
say("Ich hoffe, dass ich dich")
say("Nichtmehr oft sehen werde, denn")
say("Immer dieses Zaubern nervt mich")
say("Langsam...")
say("")
say_reward("Auftrag erfolgreich beendet.")
say_reward("Du erhälst deine Belohnung.")
say_reward("+6% Angriffgeschwindigkeit")
say_reward("+10% Schadenserhöhung")
affect.add_collect(apply.ATT_SPEED,6,60*60*24*365*60) --¡V60¦~
affect.add_collect_point(POINT_ATT_BONUS,10,60*60*24*365*60) --60³â
clear_letter()
set_state(__complete)
end
end
state __complete begin
end
end
----------------------------------------------------
--COLLECT QUEST_lv85
--METIN2 collect quest
----------------------------------------------------
quest collect_quest_lv85 begin
state start begin
end
state run begin
when login or levelup with pc.level >= 85 begin
set_state(information)
end
end
state information begin
when letter begin
local v = find_npc_by_vnum(20084)
if v != 0 then
target.vid("__TARGET__", v, "Die Bitte des Biologen")
end
send_letter("Die Bitte des Biologen")
end
when button or info begin
say_title("Die Bitte des Biologen:")
say("")
say("Der Hauptmann sage, dass der Biologe")
say("nach dir suche. Vielleicht solltest du")
say("bei ihm vorbei gehen und schauen,")
say("was er von dir wollte.")
say("")
end
when __TARGET__.target.click or
20084.chat."Die Bitte" begin
target.delete("__TARGET__")
say("Biologe:~:")
--- l
say("Meine Forschungen sind nun bald")
say("beendet... aber ich bräuchte noch")
say("ein paar mal deine Hilfe...")
say("")
say("Dieses mal geht es um Bäume...")
say("Um ihre Äste um genau zu sein.")
wait()
say("Biologe:~:")
say("Ich habe vor die Äste")
say("der Roten Bäume zu erforschen.")
say("Sie sollen angeblich heilende")
say("Kräfte besitzen und ich möchte")
say("herausfinden ob dies stimmt.")
say("")
wait()
say("Biologe:~")
say("Du bekommst die Äste von den Monstern")
say("im Roten Wald. Also folgende:")
say("")
say("Roter Geisterbaumstumpf")
say("Roter Geisterbaum")
say("Rote Dryade")
say("Rote Geisterweide")
say("Roter böser Baum")
say("Riesiger Geisterbaum")
say("")
set_state(go_to_disciple)
pc.setqf("duration",0) -- ¥i¥H¸Õ¸Õªº®É¶¡
pc.setqf("collect_count",0)-- ¨ú±oªºª««~¼Æ¶q
pc.setqf("drink_drug",0) --³Ü°g´bÃĤôªº¸Ü 1
end
end
state go_to_disciple begin
when letter begin
send_letter("Die Geisterbaum Äste")
end
when button or info begin
say_title("Die Geisterbaum Äste")
--- l
say("")
say("Der Biologe hat dir den Auftag" )
say("gegeben Geisterbaum Äste zu sammeln.")
say("")
say("Du benötigst 40 Stück davon.")
say("")
say_item_vnum(30167)
say_reward("²Du hast bereits ".." "..pc.getqf("collect_count").." gesammelt.")
say("")
end
when 71035.use begin --°g´bÃĤô
if get_time() < pc.getqf("duration") then
say("ÁÙ¤£¥i¥H¨Ï¥Î°g´bÃĤô")
return
end
if pc.getqf("drink_drug")==1 then
say("¤w¸g¨Ï¥Î¤F1¦¸")
return
end
if pc.count_item(30167)==0 then
say("Biologe:~:")
say("¥ý§ä¨ìÆF»îªº«Hª«¥H«á")
say("¤~¨Ï¥Î°g´bÃĤô¤]¤£·|¦³°ÝÃD")
say("")
return
end
item.remove()
pc.setqf("drink_drug",1)
end
when 2311.kill or
2312.kill or
2313.kill or
2314.kill or
2315.kill or
2306.kill begin
local s = number(1, 100)
if s <= 25 then
pc.give_item2(30167, 1)
end
end
when 20084.chat."Die Geisterbaum Äste" with pc.count_item(30167) >0 begin
if get_time() > pc.getqf("duration") then
say_title("Biologe:")
--- l
say("Oh!!! Du hast einen...")
say("dann gib mal her und lass mich sehen,")
say("ob ich an diesem Exemplar forschen kann.")
say("")
pc.remove_item(30167, 1)
pc.setqf("duration",get_time()+0*0*0)--------------22¤p®É
wait()
local pass_percent
if pc.getqf("drink_drug")==0 then
pass_percent=60
else
pass_percent=90
end
local s= number(1,100)
if s<= pass_percent then
if pc.getqf("collect_count")< 29 then --30*Ó¥¼º¡
local index =pc.getqf("collect_count")+1
pc.setqf("collect_count",index) --¨ú±o»õ¦U±o®É+1
say("Biologe:~:")
say("®@®@~!! ±z°µ±o¯u¦n. ¨¯*W±z¤F...")
say("Es wäre schön wenn du mir")
say("noch".." "..40-pc.getqf("collect_count").. "bringen würdest.")
say("")
pc.setqf("drink_drug",0) --ÃĤôªì©l¤Æ
return
end
say_title("Biologe:")
say("Gut gemacht!")
say("Du hast alle 40 Geisterbaum Äste gesammelt.")
say("")
say("Um die Forschungen abzuschließen benötige ich")
say("allerdings noch einen anderen Gegenstand....")
say("")
say("Den Waldgeist-Seelenstein!")
say("Bitte hole ihn mir.")
say("")
pc.setqf("collect_count",0)
pc.setqf("drink_drug",0)
pc.setqf("duration",0)
set_state(key_item)
return
else
say_title("Biologe:")
say("Oh dieser Ast ist in nicht so")
say("gutem Zustand... Damt kann ich leider")
say("nicht forschen..")
say("Bitte hole mir einen neuen.")
say("")
pc.setqf("drink_drug",0) --ÃĤôªì©l¤Æ
return
end
else
say_title("Biologe:")
say("Entschuldigung aber ich habe")
say("meine Forschungen noch nicht")
say("abschließen können. Bitte")
say("komm später wieder.")
say("")
return
end
end
end
state key_item begin
when letter begin
send_letter("Waldgeist-Seelenstein")
if pc.count_item(30226)>0 then
local v = find_npc_by_vnum(20084)
if v != 0 then
target.vid("__TARGET__", v, "Der Waldgeist Seelenstein")
end
end
end
when button or info begin
if pc.count_item(30226) >0 then
say_title("Waldgeist Seelenstein")
say("")
--- l
say("Du hast den Stein gefunden!")
say("Gehe schnell zum Biologen und zeige")
say("ihm deinen Fund!")
say("")
return
end
say_title("Waldgeist Seelenstein")
say("")
--- l
say("Nachdem du die 40 Geisterbaum Äste")
say("gefunden hast, hat der Biologe dich gebeten")
say("ihm den Waldgeist Seelenstein zu holen.")
say_item_vnum(30226)---------- ÆF»î¥Û
say("Du bekommst ihn im Roten Wald.")
say("")
end
when 2311.kill or
2312.kill or
2313.kill or
2314.kill or
2315.kill or
2306.kill begin
local s = number(1, 200)
if s <= 15 and pc.count_item(30226)==0 then
pc.give_item2(30226, 1)
send_letter("Waldgeist-Seelenstein")
end
end
when __TARGET__.target.click or
20084.chat."Waldgeist Seelenstein" with pc.count_item(30226) > 0 begin
target.delete("__TARGET__")
say("Biologe:")
say("OHH!!! Danke..")
say("Nun kann ich endlich meine Forschungen")
say("zu Ende führen und herausfinden")
say("was es damit aufsich hat was die Leute")
say("erzählen...")
say("")
say("Um deine Belohnung zu erhalten gehe zu Beak-Go")
say("")
pc.remove_item(30226,1)
set_state(__reward__)
end
end
state __reward__ begin
when letter begin
send_letter("Finde Beak-Go")
local v = find_npc_by_vnum(20018)
if v != 0 then
target.vid("__TARGET__", v, "Beak-Go")
end
end
when button or info begin
say_title("Rote Geisterbaum Äste")
--- l
say("Du hast dem Biologen nun die 40")
say("Äste und den Seelenstein gebracht.")
say("")
say("Die Belohnung sollst du nun bei")
say("Beak-Go abhohlen.")
say("")
end
when __TARGET__.target.click or
20018.chat."Roter Geisterbaum Ast" begin
target.delete("__TARGET__")
say_title("Beak-Go:")
say("")
say("Du hast dem Biologen also Geholfen?")
say("Okay... ich gebe dir dann wohl")
say("besser deine Belohnung...")
say("")
say("Gegenstand erhalten:")
say_reward("2x Blauer Ebenholzkasten")
say("Ausserdem erhälst du:")
say_reward("10% Schadensreduzierung gegen andere Spieler.")
pc.give_item2("50114", 1)
pc.give_item2("50114", 1)
wait()
say_title("Beak-Go:")
say("")
say("Machs Gut!")
say("Bis zum nächsten mal.")
say("")
-- 10% Schwertdeff etc. pp. Fertigkeitenschaden wird auch reduziert
affect.add_collect(apply.RESIST_CURSE,10,60*60*24*365*60)
affect.add_collect(apply.RESIST_MELEE,10,60*60*24*365*60)
affect.add_collect(apply.RESIST_WIND,10,60*60*24*365*60)
affect.add_collect(apply.RESIST_MAGIC,10,60*60*24*365*60)
affect.add_collect(apply.RESIST_ELEC,10,60*60*24*365*60)
affect.add_collect(apply.RESIST_FIRE,10,60*60*24*365*60)
affect.add_collect(apply.RESIST_BOW,10,60*60*24*365*60)
affect.add_collect(apply.RESIST_FAN,10,60*60*24*365*60)
affect.add_collect(apply.RESIST_BELL,10,60*60*24*365*60)
affect.add_collect(apply.RESIST_DAGGER,10,60*60*24*365*60)
affect.add_collect(apply.RESIST_TWOHAND,10,60*60*24*365*60)
affect.add_collect(apply.RESIST_SWORD,10,60*60*24*365*60)
clear_letter()
set_state(__complete__)
end
end
state __complete__ begin
end
end
----------------------------------------------------
--COLLECT QUEST_lv90
--METIN2 collect quest
--By ShaDoW
----------------------------------------------------
quest collect_lv90 begin
state start begin
end
state run begin
when login or levelup with pc.level >= 85 begin
set_state(information)
end
end
state information begin
when letter begin
local v = find_npc_by_vnum(20084)
if v != 0 then
target.vid("__TARGET__", v, "Bioquest")
end
send_letter("Die Forschung des Biologen 8")
end
when button or info begin
say_title("Die Forschung des Biologen 8")
say("")
say("Die Biologin sucht dich!")
say("Gehe zu ihr.")
say("Sie sagte, dass sie etwas Unmögliches für dich hat.")
say("")
end
when __TARGET__.target.click or
20084.chat."Notiz des Anführers" begin
target.delete("__TARGET__")
say("Biologin:")
--- 1
say("Sehr schön!! Ich freue mich wieder dich zu sehen!")
say("Ich habe eine letzte Aufgabe für dich!")
say("Dieses Mal führe ich dich zu großen Gegnern!")
say("Nicht so klein wie die "Riesen"")
say("Die Aufgabe ist sehr schwer..")
say("Sei vorsichtig..")
wait()
say("Biologin:")
say("Um meine Objekte zu bekommen, musst")
say("Du schwere Gegner töten..")
say("Ich brauche 50 Notizen der Anführer")
say("Du bekommst sie, von den Bossen.")
say("Das heisst, dass du Gegner wie den")
say("Neunschwanz, den Oberork, die Königinnen-")
say("Spinne die Wüstenschildi etc. töten musst.")
say("Ich hoffe du wirst das hinkriegen!")
say("Ich benötige diese Objekte sehr dringend!")
wait()
say("Wenn ich es mit deiner Hilfe schaffe,")
say("Diese Notizen zu bekommen und zu lesen,")
say("Dann wirst du viel Kraft bekommen!")
say("Um nicht zu sagen, dass du nahezu unbesiegbar")
say("Wirst. Also bitte beeil dich!")
set_state(go_to_disciple)
pc.setqf("duration",0) -- ¥i¥H¸Õ¸Õªº®É¶¡
pc.setqf("collect_count",0)-- ¨ú±oªºª««~¼Æ¶q
pc.setqf("drink_drug",0) --³Ü°g´bÃĤôªº¸Ü 1
end
end
state go_to_disciple begin
when letter begin
send_letter("Spezialauftrag sammle Notizen")
end
when button or info begin
say_title("Notiz des Anführers")
--- l
say("")
say("Die Biologin hat mich beauftragt")
say("Bosse zu töten und ihr 50")
say("Notzigen des Anführers zu bringen.")
say("Das wird keine einfache Aufgabe!")
say("Ich hoffe mal, dass ich eine gute")
say("Belohnung bekommen werde..")
say("")
end
when 71035.use begin --°g´bÃĤô
if get_time() < pc.getqf("duration") then
say("ÁÙ¤£¥i¥H¨Ï¥Î°g´bÃĤô")
return
end
if pc.getqf("drink_drug")==1 then
say("¤w¸g¨Ï¥Î¤F1¦¸")
return
end
if pc.count_item(30168)==0 then
say("Biologin:")
say("Du musst mir schon eine Notiz brinen,")
say("Sonst kann ich nichts machen!")
say("")
return
end
item.remove()
pc.setqf("drink_drug",1)
end
when 591.kill or
691.kill or
791.kill or
793.kill or
991.kill or
992.kill or
993.kill or
1091.kill or
1092.kill or
1093.kill or
1304.kill or
1403.kill or
2091.kill or
2191.kill or
2206.kill or
2207.kill or
2306.kill or
2493.kill or
2494.kill or
5001.kill or
5004.kill or
5161.kill or
5162.kill or
5163.kill begin
local s = number(1,100)
if s <= 5 and pc.count_item(30168)==0 then
pc.give_item2(30168, 1)
end
end
when 20084.chat."Notiz des Anführers" with pc.count_item(30168) >0 begin
if get_time() > pc.getqf("duration") then
say("Biologin:")
--- 1
say("Vielenk Dank, dass du mir")
say("Diese Notiz gebracht hast.")
say("Warte einen Moment.")
say("")
pc.remove_item(30168, 1)
pc.setqf("duration",get_time()+0*0*0)--------------22¤p®É
wait()
local pass_pervent
if pc.getqf("drink_drug")==0 then
pass_pervent=60
else
pass_percent=90
end
local s= number(1,100)
if s<= pass_percent then
if pc.getqf("collect_count")< 39 then --50-Notizen des Anführers
local index =pc.getqf("collect_count")+1
pc.setqf("collect_count",index) --¨ú±o»õ¦U±o®É+1
say("Biologin:")
say("Juhu! Die Notiz ist wunderbar.")
say("Du hast bis jetzt".." "..50-pc.getqf("collect_count").. " abgegeben!")
say("Bitter bring' mir mehr!")
say("")
pc.setqf("drink_drug",0) --ÃĤôªì©l¤Æ
return
end
say("Biologin:")
say("Du hast mir alle 50 gebracht!")
say("Ich habe meine Untersuchungen")
say("Dieser Notizen erfolgreich beendet.")
say("Nun benötige ich allerdings noch")
say("Einen Seelenstein... Es wäre sehr")
say("nett, wenn du ihn mir bringst!")
say("")
pc.setqf("collect_count",0)
pc.setqf("drink_drug",0)
pc.setqf("duration"),0)
set_state(key_item)
return
else
say("Biologin:")
say("Tut mir Leid, aber")
say("Diese Notiz ist blut-")
say("verschmiert..Bringe")
say("Mir bitte eine Neue!")
say("")
pc.setqf("drink_drug",0) --ÃĤôªì©l¤Æ
return
end
end
else
say("Biologin:")
say("Die Untersuchungen der letzten")
say("Notiz sind noch nicht fertig!")
say("Bitte komme später wieder!")
say("Nun geh schon!")
return
end
end
end
state key_item begin
when letter begin
send_letter("Seelenstein des Anführers")
if pc.count_item(30227)>0 then
local v = find_npc_by_vnum(20084)
if v != 0 then
target.vid("__TARGET__", v, "Bioquest")
end
end
end
when button or info begin
if pc.count_item(30227) >0 then
say_title("Seelenstein des Anführers")
say("")
--- l
say("Die Biologin hat eine weitere")
say("Aufgabe für dich gehe hin.")
say("")
return
end
say_title("Seelenstein des Anführers")
say("")
--- l
say("Du hast mir alle 50 Notizen des Anführers")
say("Gebracht, vielen dank dafür!")
say("Ich brauche aber einen Seelenstein.")
say_item_vnum(30227)---------- Seelenstein des Anführes
say("Ein legendärer Stein,")
say("Der die Seele des Anführers enthält!")
say("")
end
when 591.kill or
691.kill or
791.kill or
793.kill or
991.kill or
992.kill or
993.kill or
1091.kill or
1092.kill or
1093.kill or
1304.kill or
1403.kill or
2091.kill or
2191.kill or
2206.kill or
2207.kill or
2306.kill or
2493.kill or
2494.kill or
5001.kill or
5004.kill or
5161.kill or
5162.kill or
5163.kill begin
local s = number(1, 200)
if s == 1 and pc.count_item(30227)==0 then
pc.give_item2(30227, 1)
send_letter("Seelenstein des Anführers")
end
end
when __TARGET__.target.click or
20084.chat."Notiz des Anführers" with pc.count_item(30227)
target.delete("__TARGET__")
say("Biologin:")
say("Du hast mir den letzten")
say("Seelenstein gebracht! Vielen Dank!")
say("Nun, ich habe etwas wichtiges herausgefunden!")
say("Ich weiss, wie ich dir die")
say("Unbesiegbare Kraft geben kann!")
say("Nun, nimm das hier mit zu Baek-Go!")
say("Nun geh und hol die Belohnung ab!")
say("")
pc.remove_item(30227,1)
set_state(__reward)
end
end
state __reward begin
when letter begin
send_letter("Info der Biologin")
local v = find_npc_by_vnum(20018)
if v != 0 then
target.vid("__TARGET__", v, "Baek-Go")
end
end
when button or info begin
say_title("Der Weg zur Belohnung")
--- l
say("Die Biologin sagte, dass")
say("Sie herausgefunden hat, wie")
say("Das mit den Kräften geht..")
say("Ich hoffe, dass Baek-Go")
say("Weiss, wie das geht!")
say("")
end
when __TARGET__.target.click or
20018.chat."Belohnung" begin
target.delete("__TARGET__")
say("Baek-Go:")
say("Du bist also der, der")
say("Die schweren Aufgaben von")
say("Der Biologin geschafft hat?")
say("Beachtlich.. hier deine Belohnung.")
say("")
say_reward("Auftrag beendet!")
say_reward("Du erählst deine Belohnungen!")
say_reward("Bewegungsgeschwindigkeit +5%")
say_reward("Angriffsgeschwindigkeit +3%")
say_reward("Schadensreduzierung +5%")
say_reward("Angriffswert + 25")
affect.add_collect(apply.MOV_SPEED, 5, 60*60*24*365*60) --60¦~
affect.add_collect(apply.ATT_GRADE_BONUS,25,60*60*24*365*60)--¡X60¦~
affect.add_collect(apply.DEF_GRADE_BONUS,3,60*60*24*365*60) --60¦~
affect.add_collect(apply.ATT_SPEED, 3, 60*60*24*365*60) --60¦~
clear_letter()
set_state(__complete)
end
end
state __complete begin
end
end
Quote:
30Code:Segmentation fault (core dumped) Segmentation fault (core dumped) Segmentation fault (core dumped) Segmentation fault (core dumped) Segmentation fault (core dumped) Segmentation fault (core dumped) Segmentation fault (core dumped) Segmentation fault (core dumped)
PHP Code:----------------------------------------------------
--COLLECT QUEST_lv30
--METIN2 Collect Quest
----------------------------------------------------
quest collect_quest_lv30 begin
state start begin
when login or levelup with pc.level >= 30 and pc.level <= 90 begin
set_state(information)
end
end
state information begin
when letter begin
local v = find_npc_by_vnum(20084)
if v != 0 then
target.vid("__TARGET__", v, "Biologe Chaegirab")
end
send_letter("Die Forschung des Biologen")
end
when button or info begin
say_title("Die Forschung des Biologen")
say("")
say("Biologe Chaegirab, der Lehrling")
say("Uriels lässt nach dir suchen.")
say("Gehe zu ihm und schau was du für ihn tun kannst.")
say("")
end
when __TARGET__.target.click begin
target.delete("__TARGET__")
say_title("Biologe Chaegirab")
say("")
say("Oh..")
say("Schön, dass du gekommen bist..")
say("Ich habe eine wichtige aufgabe für dich!")
say("")
say("Beim letzten mal, als ich deine Hilfe")
say("brauchte ging es nur um Tue-Pilze..")
say("Diesmal ist es aber wichtiger!")
wait()
say_title("Biologe Chaegirab")
say("")
say("Ich habe von meinem Ausbilder")
say("Uriel erfahren, dass die Schwarzen Orks")
say("einen Stoff in ihren Zähnen haben können,")
say("der die anderen Monster in der Umgebung,")
say("durch ihren stinkenden Geruch aggressiv")
say("machen können.")
say("")
wait()
say("Biologe Chaegirab")
say("")
say("Ich möchte herausfinden, was dieser")
say("Stoff genau ist und warum er die Monster")
say("so aggressiv macht. Vielleicht könnte man")
say("dann sogar ein Gegenmittel entwickeln, das")
say("die Monster wieder beruigt.")
say("")
set_state(go_to_disciple)
pc.setqf("duration",0) -- ¥i¥H¸Õ¸Õªº®É¶¡
pc.setqf("collect_count",0) -- ¡X¨ú±o¹Lªºª««~¼Æ¶q
pc.setqf("drink_drug",0) -- ¡X ³Ü°g´bÃĤôªº¸Ü 1
end
end
state go_to_disciple begin
when letter begin
send_letter("Die Forschung des Biologen")
end
when button or info begin
say_title("Zähne aus dem Orktal")
--- l
say("")
say("Der Biologe Caegirab benötigt für seine")
say("Untersuchungen Backenzähne der Orks aus dem Tal")
say("von Seungryong.")
say("Bringe ihm einen Zahn nach dem anderen, damit er")
say("die einzelnen Exemplare eingehend untersuchen")
say("kann.")
say("")
say_item_vnum(30006)
say_reward("Bisher hast du".." "..pc.getqf("collect_count").."Orkzähne gefunden.")
say("")
end
when 71035.use begin --°g´bÃĤô
if get_time() < pc.getqf("duration") then
say("")
say("ÁÙ¤£¥i¥H¨Ï¥Î°g´bÃĤô")
say("")
return
end
if pc.getqf("drink_drug")==1 then
say("")
say("¤w¸g¨Ï¥Î¤F1¦¸")
say("")
return
end
if pc.count_item(30006)==0 then
say_title("Biologe Chaegirab")
say("¥ý§ä¨ì°*¤ú¥H«á, ")
say("¤~¨Ï¥Î°g´bÃĤô¤]¤£·|¦³°ÝÃD.")
say("")
return
end
item.remove()
pc.setqf("drink_drug",1)
end
when 20084.chat."Orkzähne" with pc.count_item(30006) >0 begin
if get_time() > pc.getqf("duration") then
say_title("Biologe Chaegirab")
say("")
say("Oh!!! Du hast einen...")
say("dann gib mal her und lass mich sehen,")
say("ob ich an diesem Exemplar forschen kann.")
say("")
pc.remove_item("30006", 1)
pc.setqf("duration",get_time()+0*0*0) -----------------------------------22??
wait()
local pass_percent
if pc.getqf("drink_drug")==0 then
pass_percent=60
else
pass_percent=90
end
local s= number(1,100)
if s<= pass_percent then
if pc.getqf("collect_count")< 9 then --10*Ó¥H¤U
local index =pc.getqf("collect_count")+1
pc.setqf("collect_count",index) --¨ú±o¤@* +1
say(pass_percent)
say_title("Biologe Chaegirab")
say("Oh dieses Exemplar ist gut geeignet.")
say("Es wäre schön wenn du mir")
say("noch".." "..10-pc.getqf("collect_count").. "bringen würdest.")
say("³Â·Ð±z¤F~!")
say("")
pc.setqf("drink_drug",0) --ÃĤôªì©l¤Æ
return
end
say_title("Biologe Chaegirab")
say("")
say("Gut gemacht!")
say("Du hast alle Orkzähne für mich gesammelt.")
say("So konnte ich den Stoff in den Zähnen")
say("untersuchen, und herausfinden, warum er")
say("die Monster in der Nähe aggressiv macht.")
say("")
wait()
say("Um jedoch ein Gegenmittel herzustellen,")
say("Benötige ich noch ein weiteres Item...")
say("Den Jinunggyis Seelenstein.")
say("Bitte besorge ihn mir.")
pc.setqf("collect_count",0)
pc.setqf("drink_drug",0)
pc.setqf("duration",0)
set_state(key_item)
return
else
say_title("Biologe Chaegirab")
say("Oh dieser Zahn ist in nicht so")
say("gutem Zustand... Damt kann ich leider")
say("nicht forschen..")
say("Bitte hole mir einen neuen.")
pc.setqf("drink_drug",0) --ÃĤôªì©l¤Æ
return
end
else
say_title("Biologe Chaegirab")
say("Entschuldigung aber ich habe")
say("meine Forschungen noch nicht")
say("abschließen können. Bitte")
say("komm später wieder.")
say("")
return
end
end
end
state key_item begin
when letter begin
send_letter("Die Forschung des Biologen")
if pc.count_item(30220)>0 then
local v = find_npc_by_vnum(20084)
if v != 0 then
target.vid("__TARGET__", v, "Biologe Chaegirab")
end
end
end
when button or info begin
if pc.count_item(30220) >0 then
say_title("Jinunggyis Seelenstein")
say("")
--- l
say("Du hast den Seelenstein.")
say("Bringe ihn zum Biologen.")
say("")
return
end
say_title("Jinunggyis Seelenstein")
say("")
say("Der Biologe brauch für das Gegenmittel")
say("noch einen weiteren Gegenstand.")
say("Den Jinunggyis Seelenstein..")
say("")
say_item_vnum(30220)----------- ¯u°*±ÚÆF»î¥Û
say("Du bekokmmst ihn von den")
say("Stolzen Ork Generälen,")
say("den Schwarzen Orks und den")
say("Schwarzen ork Riesen.")
say("")
end
when 635.kill or
636.kill or
637.kill begin
local s = number(1, 500)
if s == 1 and pc.count_item(30220)==0 then
pc.give_item2(30220, 1)
send_letter("Jinunggyis Seelenstein erhalten")
end
end
when __TARGET__.target.click or 20084.chat."Jinunggyis Seelenstein" with pc.count_item(30220) > 0 begin
target.delete("__TARGET__")
say_title("Biologe Chaegirab")
say("")
say("Super!")
say("Danke! Nun kann ich das Gegenmittel")
say("herstellen und die Monster wieder")
say("friedlich stimmen. Hab vielen dank.")
say("")
say("Hier hast du ein Geheimrezept. ")
say("Baek-Go kann dir zeigen wie du es benutzt.")
say("")
pc.remove_item(30220,1)
set_state(__reward__)
end
end
state __reward__ begin
when letter begin
send_letter("Finde Baek-Go")
local v = find_npc_by_vnum(20018)
if v != 0 then
target.vid("__TARGET__", v, "Baek-Go")
end
end
when button or info begin
say_title("Finde Baek-Go")
--- l
say("Der Biologe Chaegirab hat dir ein")
say("Geheimrezept gegeben. Baek-Go kann")
say("dir zeigen, wie du dich damit")
say("stärken kannst.")
say("Also finde ihn.")
say("")
end
when __TARGET__.target.click or
20018.chat."Finde Baek-Go" begin
target.delete("__TARGET__")
say("Baek-Go:")
say("Sieh mal an,")
say("ist das ein Geheimrezept von Chaegirab, dem")
say("Biologen? Hm, das wird deine")
say("Bewegungsgeschwindigkeit um 10 erhöhen.")
say("")
say("Hier, dieses Holzkästchen ist für dich. Bewahre")
say("es sorgfältig auf.")
say_reward("Als Belohnung für die Erfüllung")
say_reward("der Bitte Caegirabs erhöht")
say_reward("sich deine Bewegungsgeschwindigkeit")
say_reward("dauerhaft um 10 Punkte.")
affect.add_collect(apply.MOV_SPEED, 10, 60*60*24*365*60) --60¦~
clear_letter()
set_quest_state("collect_quest_lv40", "run")
set_state(__complete__)
end
end
state __complete__ begin
end
end
40
PHP Code:----------------------------------------------------
--COLLECT QUEST_lv40
--METIN2 Collect Quest
----------------------------------------------------
quest collect_quest_lv40 begin
state start begin
end
state run begin
when login or levelup with pc.level >= 40 and pc.level <= 90 begin
set_state(information)
end
end
state information begin
when letter begin
local v = find_npc_by_vnum(20084)
if v != 0 then
target.vid("__TARGET__", v, "Biologenquest")
end
send_letter("Die Forschung des Biologen 2")
end
when button or info begin
say_title("Die Forschung des Biologen 2")
say("")
say("Der Biologe sucht dich!")
say("Gehe zu ihm.")
say("Er sagte, du sollst etwas für ihn finden.")
say("")
end
when __TARGET__.target.click or
20084.chat."Fluchbücher" begin
target.delete("__TARGET__")
say("Biologe:")
--- l
say("Super, dass du mir wieder hilfst...")
say("Sehr gut...")
say("Du kennst mich ja schon...")
say("Ich habe die Orkzähne fertig untersucht...")
say("Nun habe ich neue Objekte gefunden...")
say("Die ich gerne untersuchen würde!")
say("Kannst du mir dabei helfen?")
wait()
say("Biologe:")
say("Wenn du mir hilfst werde ich dir eine")
say("Belohnung eben, die sehr hilfreich ist. ")
say("Ich würde ja selber gehen, aber")
say("Ich habe zuviel zu tun...")
say("Wäre echt nett, wenn du für mich")
say("Das erledigen könntest.")
wait()
say("Achso ich muss dir ja noch sagen")
say("Wodrum es sich handelt.")
say("Ich möchte die Fluchbücher untersuchen.")
say("Ich brauche 15 Stück von ihnen.")
say("Erst dann kann ich sie genau untersuchen..")
say("Die Bücher sind aber sehr alt...")
say("Manchmal zerfallen sie einfach!")
say("")
set_state(go_to_disciple)
pc.setqf("duration",0) -- Dauer der Quest
pc.setqf("collect_count",0)---- Fortschritt der quest
pc.setqf("drink_drug",0) ------¡V ³Ü°g´bÃĤôªº¸Ü 1
end
end
state go_to_disciple begin
when letter begin
send_letter("Spezialauftrag sammle Fluchsammlungen!")
end
when button or info begin
say_title("Fluchsammlungen")
--- l
say("")
say("Der Biologe gab mir den Auftrag")
say("15 Fluchsammlungen zu sammeln! ")
say("Du bekommst sie von Dunkle Peinigern")
say("und von hohen Peinigern.")
say("Du musst sie dem Biologen geben.")
say("")
say_item_vnum(30047)
say_reward("Du hast".." "..pc.getqf("collect_count").."abgegeben")
say("")
end
when 71035.use begin --°g´bÃĤô
if get_time() < pc.getqf("duration") then
say("")
say("ÁÙ¤£¥i¥H¨Ï¥Î°g´bÃĤô")
say("")
return
end
if pc.getqf("drink_drug")==1 then
say("")
say("¤w¸g¨Ï¥Î¤F1¦¸")
say("")
return
end
if pc.count_item(30047)==0 then
say("Du hast keine Fluchsammlung!")
say("Bitte komm wieder wenn")
say("Du eine Fluchsammlung für mich hast!")
say("")
return
end
item.remove()
pc.setqf("drink_drug",1)
end
when 20084.chat."Fluchsammlungen!" with pc.count_item(30047) >0 begin
if get_time() > pc.getqf("duration") then
say("Kleinen Moment..")
--- l
say("Vielen Dank,")
say("Ich überprüf die Sammlung schnell,")
say("Ob diese Sammlung in Ordnung ist...")
say("")
pc.remove_item(30047, 1)
pc.setqf("duration",get_time()+0*0*0)--------------22*Ó¤p®É
wait()
local pass_percent
if pc.getqf("drink_drug")==0 then
pass_percent=60
else
pass_percent=90
end
local s= number(1,100)
if s<= pass_percent then
if pc.getqf("collect_count")< 14 then --15 Fluchsammlungen
local index =pc.getqf("collect_count")+1
pc.setqf("collect_count",index) -- ¨ú±o¤F¤@*Ó+1
say("Biologe:")
say("Sehr schön diese Sammlung ist on Ordnung!")
say("Du hast bis jetzt".." "..15-pc.getqf("collect_count").. " abgegeben!")
say("Bring mir bitte mehr!")
say("")
pc.setqf("drink_drug",0) --ÃĤôªì©l¤Æ
return
end
say("Biologe:")
say("Du hast mir alle 15 Stück gebracht!!")
say("Nun.. ich habe noch eine Bitte")
say("An dich und zwar:")
say("Benötige ich noch den Tempel Seelenstein")
say("Den bekommst du von stolzen dunkl. Fanatikern")
say("Oder stolze dunkle Kämpfer/Oberst.")
say("")
pc.setqf("collect_count",0)
pc.setqf("drink_drug",0)
pc.setqf("duration",0)
set_state(key_item)
return
else
say("Biologe:")
say("Sorry, aber diese Sammlung ist")
say("bei meinen Untersuchungen zerfallen!")
say("Tut mir Leid, aber")
say("Bringe mir eine Neue!")
say("")
pc.setqf("drink_drug",0) --ÃĤôªì©l¤Æ
return
end
else
say("Biologe:")
say("Es tut mir leid....")
say("¤§Ich habe die letzte Untersuchung noch nicht,")
say("Beendet, warte bitte!")
say("")
return
end
end
end
state key_item begin
when letter begin
send_letter("Tempel Seelenstein")
if pc.count_item(30221)>0 then
local v = find_npc_by_vnum(20084)
if v != 0 then
target.vid("__TARGET__", v, "Bioquest")
end
end
end
when button or info begin
if pc.count_item(30221) >0 then
say_title("Tempel Seelenstein")
say("")
--- l
say("Der Biologe braucht deine Hilfe!")
say("Gehe zu ihr.")
say("")
return
end
say_title("Tempel Seelenstein")
say("")
--- l
say("Du hast alle 15 Sammlungen abgegeben!")
say("Nun brauche ich den Tempel Seelenstein.")
say("Bitte hole ihn mir!")
say("")
say_item_vnum(30221)----------
say("Der legendäre Stein,")
say("Der die Seele der")
say("Tempelanhänger enthält.")
end
when 2032.kill or
2033.kill or
2034.kill or
2035.kill begin
local s = number(1, 500)
if s == 1 and pc.count_item(30221)==0 then
pc.give_item2(30221, 1)
send_letter("Tempel Seelenstein")
end
end
when __TARGET__.target.click or
20084.chat."Tempel Seelenstein" with pc.count_item(30221) > 0 begin
target.delete("__TARGET__")
say("Biologe:")
say("Du hast hart gekämpft...")
say("Dafür verschneller ich dich..")
say("Ich gebe dir die Info für Baek-Go")
say("Er wird dir die Belohnung geben...")
say("Danke für deine Hilfe..")
say("Wenn ich noch eine Aufgabe für dich habe")
say("Werde ich dir einen Brief zukommen lassen!")
say("")
pc.remove_item(30221,1)
set_state(__reward)
end
end
state __reward begin
when letter begin
send_letter("Infos des Biologen")
local v = find_npc_by_vnum(20018)
if v != 0 then
target.vid("__TARGET__", v, "Doktor")
end
end
when button or info begin
say_title("Zugang zu den Infos des Biologen!")
--- l
say("Du hast die Aufgabe fast abgeschlossen.")
say("Jetzt musst du nur noch deine Belohhnung")
say("Bei Baek-Go abholen!")
say("Gehe zu ihm!")
say("Er ist in Map1.")
say("")
end
when __TARGET__.target.click or
20018.chat."Belohnung des Biologen" begin
target.delete("__TARGET__")
say("Baek-Go:")
say("Ich sehe..")
say("Der Biologe hat dich zu mir geschickt.")
say("Hier ist deine Belohnung:")
say("Angriffsgeschwindigkeit +5% (Dauerhaft)")
say("")
say_reward("Du hast dem Biologen geholfen")
say_reward("Deine Belohnung ist:")
say_reward("Angriffsgeschwindigkeit +5%")
affect.add_collect(apply.ATT_SPEED,5,60*60*24*365*60) --- ¡V60¦~
clear_letter()
set_quest_state("collect_quest_lv50", "run")
set_state(__complete)
end
end
state __complete begin
end
end
50
PHP Code:----------------------------------------------------
--COLLECT QUEST_lv50
--METIN2 Collect Quest
----------------------------------------------------
quest collect_quest_lv50 begin
state start begin
end
state run begin
when login or levelup with pc.level >= 50 and pc.level <= 90 begin
set_state(information)
end
end
state information begin
when letter begin
local v = find_npc_by_vnum(20084)
if v != 0 then
target.vid("__TARGET__", v, "Bioquest")
end
send_letter("Die Forschung des Biologen 3")
end
when button or info begin
say_title("Die Forschung des Biologen 3")
say("")
say("Der Biologe sucht dich!")
say("Gehe zu ih,.")
say("Er sagte, du sollst etwas für ihn finden.")
say("")
end
when __TARGET__.target.click or
20084.chat."Dämonenandenken" begin
target.delete("__TARGET__")
say("Biologe:")
--- l
say("Super, dass du mir wieder hilfst..")
say("Ich freue mich immer, wenn du mir hilfst...")
say("Du kennst ja schon die Dinge, die ich tue...")
say("Also ich hab wieder neue Objekte gefunden...")
say("Dieses mal habe ich mit den Dämonen befasst...")
say("Und zwar suche ich nun Dämonenandenken.")
say("Hilf mir dabei!")
wait()
say("Biologe:")
say("Ich gebe dir natürlich wieder eine")
say("Nützliche Belohnung wenn du mir")
say("Hilfst!")
say("Ich habe aber wieder viel zu tun...")
say("Erledgist du es wieder für mich?")
wait()
say("Biologe:")
say("Ich benötige wie schon gesagt")
say("Dämonenandenken.")
say("Du bekommst sie von Dämonenbogis,")
say("Dämonenspeerkämpfer, Dämonenschamanen")
say("und Dämonensoldaten. Ich brauche 15")
say("Stück davon!")
say("")
set_state(go_to_disciple)
pc.setqf("duration",0) --¥i¥H¸Õ¸Õªº®É¶¡
pc.setqf("collect_count",0)-- ¨ú±oªºª««~¼Æ¶q
pc.setqf("drink_drug",0) --³Ü°g´bÃĤôªº¸Ü1
end
end
state go_to_disciple begin
when letter begin
send_letter("Spezialauftrag sammle Dämonenandenken!")
end
when button or info begin
say_title("Dämonenandenken")
--- l
say("")
say("Der Biologe sagte ich soll")
say("Ihr 15 Dämonenandenken sammeln!")
say("Ich bekomme sie von den meisten im DT.")
say("Auf Ebene 1-3.")
say("")
say_item_vnum(30015)
say_reward("Du hast".." "..pc.getqf("collect_count").."abgegeben")
say("")
end
when 71035.use begin --°g´bÃĤô
if get_time() < pc.getqf("duration") then
say("")
say("ÁÙ¤£¥i¥H¨Ï¥Î°g´bÃĤô")
say("")
return
end
if pc.getqf("drink_drug")==1 then
say("")
say("¤w¸g¨Ï¥Î¤F1¦¸")
say("")
return
end
if pc.count_item(30015)==0 then
say("Biologe:")
say("Du musst schon ein Andenken dabei")
say("Haben um es mir zu geben.")
say("")
return
end
item.remove()
pc.setqf("drink_drug",1)
end
when 20084.chat."Dämonenandenken" with pc.count_item(30015) >0 begin
if get_time() > pc.getqf("duration") then
say("Geb' mir nen Moment")
--- l
say("Vielen Dank,")
say("Ich überprüfe das Andenken eben,")
say("Ob das Andenken in Ordnung ist.")
say("")
pc.remove_item(30015, 1)
pc.setqf("duration",get_time()+0*0*0) ----------------22??
wait()
local pass_percent
if pc.getqf("drink_drug")==0 then
pass_percent=60
else
pass_percent=90
end
local s= number(1,100)
if s<= pass_percent then
if pc.getqf("collect_count")< 14 then --15 Dämonenandenken
local index =pc.getqf("collect_count")+1
pc.setqf("collect_count",index) --¨ú±o¤@*Ó®É+1
say("Biologe:")
say("Sehr gut! Dieses Andenken ist gut.")
say("Du hast bis jetzt".." "..15-pc.getqf("collect_count").. "abgegeben!")
say("Bring mir bitte mehr!")
say("")
pc.setqf("drink_drug",0) --ÃĤôªì©l¤Æ
return
end
say("Biologe:")
say("Du hast mir alle 15 Stück gebracht!")
say("Ich habe aber noch eine Bitte!")
say("Und zwar:")
say("Benötige ich wieder einen Seelenstein.")
say("Es handelt sich um Sagyis Seelenstein.")
say("")
pc.setqf("collect_count",0)
pc.setqf("drink_drug",0)
pc.setqf("duration",0)
set_state(key_item)
return
else
say("Biologe:")
say("Sorry, aber dieses Andenken ist")
say("Mir bei den Untersuchungen abhanden")
say("gekommen, ein Neues bitte!")
say("")
pc.setqf("drink_drug",0) --ÃĤôªì©l¤Æ
return
end
else
say("Biologe:")
say("Tut mir leid..")
say("Ich habe die Untersuchung noch nicht ")
say("abgeschlossen, warte bitte.")
say("")
return
end
end
end
state key_item begin
when letter begin
send_letter("Sagyis Seelenstein")
if pc.count_item(30222)>0 then
local v = find_npc_by_vnum(20084)
if v != 0 then
target.vid("__TARGET__", v, "Bioquest")
end
end
end
when button or info begin
if pc.count_item(30222) >0 then
say_title("Sagyis Seelenstein")
say("")
--- l
say("Der Biologe sucht dich.")
say("Gehe zu ihr.")
say("")
return
end
say_title("Sagyis Seelenstein")
say("")
--- l
say("Du hast mir alle Andenken gebracht,")
say("Nun braucne ich einen Seelenstein:")
say("Sagyis Seelenstein!")
say_item_vnum(30222)----------Sagyis Seelenstein
say("Der legendäre Stein, der die")
say("Seele der Sagyis Adligen enthält.")
say("")
end
when 1031.kill or
1032.kill or
1033.kill or
1034.kill begin
local s = number(1, 500)
if s == 1 and pc.count_item(30222)==0 then
pc.give_item2(30222, 1)
send_letter("Sagyis Seelenstein")
end
end
when __TARGET__.target.click or
20084.chat."Sagyis Seelenstein" with pc.count_item(30222) > 0 begin
target.delete("__TARGET__")
say("Biologe:")
say("Du hast hart gekämpft..")
say("Dafür verstärke ich dich..")
say("Ich gebe dir die Infos für Baek-Go")
say("Er wird dir die Belohnung geben...")
say("Danke für deine Hilfe!")
say("Wenn ich wieder was für dich habe,")
say("Dir einen Brief zukommen lassen!")
say("")
pc.remove_item(30222,1)
set_state(__reward)
end
end
state __reward begin
when letter begin
send_letter("Infos des Biologen")
local v = find_npc_by_vnum(20018)
if v != 0 then
target.vid("__TARGET__", v, "Doktor")
end
end
when button or info begin
say_title("Zugang zu den Infos des Biologen!")
--- l
say("Die Quest ist nun fast beendet.")
say("Du musst dir nurnoch deine")
say("Belohnung abholen: ")
say("+60 Verteidigung")
say("Jetzt aber schnell zu Baek-Go.")
say("")
end
when __TARGET__.target.click or
20018.chat." ¬Ý¬ÝÃĤè¦n¶Ü" begin
target.delete("__TARGET__")
say("Baek-Go:")
say("Ich sehe..")
say("Der Biologe hat dich zu mir geschickt?")
say("Achso...damit ich dir deine Belohnung")
say("Gebe, hier hast du sie.")
say("")
say_reward("Auftrag des Biologen erfolgreich")
say_reward("Beendet du erhälst deine Belohnung.")
say_reward("+60 Verteidigung, daurhaft.")
say("")
affect.add_collect(apply.DEF_GRADE_BONUS,60,60*60*24*365*60) -----¡V60¦~
clear_letter()
set_quest_state("collect_quest_lv60", "run")
set_state(__complete)
end
end
state __complete begin
end
end
60
PHP Code:----------------------------------------------------
--COLLECT QUEST_lv60
--METIN2 Collect Quest
----------------------------------------------------
quest collect_quest_lv60 begin
state start begin
end
state run begin
when login or levelup with pc.level >= 60 and pc.level <= 90 begin
set_state(information)
end
end
state information begin
when letter begin
local v = find_npc_by_vnum(20084)
if v != 0 then
target.vid("__TARGET__", v, "Bioquest")
end
send_letter("Die Forschung des Biologen 4")
end
when button or info begin
say_title("Die Forschung des Biologen 4")
say("")
say("Der Biologe sucht dich!")
say("Gehe zu ihr.")
say("Er sagte, du sollst etwas für ihn tun.")
say("")
end
when __TARGET__.target.click or
20084.chat."Eiskugeln" begin
target.delete("__TARGET__")
say("Biologe:")
--- l
say("Ich finde es toll, wie gut du")
say("Mich immer unterstüzt.")
say("Nun brauche ich wieder deine")
say("Hilfe...Und zwar habe ich")
say("Dieses Mal etwas auf dem Berg")
say("Sohan gefunden! Es wäre nett,")
say("Wenn du mir dabei helfen könntest.")
wait()
say("Biologe:")
say("Wenn du mir ein weiteres Mal")
say("Helfen willst, dann werde ich")
say("Dich mit einem zauber verstärken",)
say("Der dir Stärke gibt!")
say("Leider bin ich unerfahren und schwach,")
say("Sonst wäre ich selber auf die Suche nach")
say("Eiskugeln gegangen, aber Eisgolems beschützen sie...")
say("")
wait()
say("Biologe:")
say("Wie schon angesprochen sind die Eiskugeln")
say("In der Nähe von Eisgolems...")
say("Um genauer zu sein, kommen die")
say("Eiskugeln von den Eisgolems, d.h. du musst")
say("Ins Eisland.. Ich benötige 20 Stück.")
say("Bitte beeil dich, damit sie nicht schmelzen.")
say("")
set_state(go_to_disciple)
pc.setqf("duration",0) -- ¥i¥H¸Õ¸Õªº®É¶¡
pc.setqf("collect_count",0)-- ¨ú±oªºª««~¼Æ¶q
pc.setqf("drink_drug",0) -- ³Ü°g´bÃĤôªº¸Ü1
end
end
state go_to_disciple begin
when letter begin
send_letter("Spezialauftrag sammle Eiskugeln!")
end
when button or info begin
say_title("Eiskugeln")
--- l
say("")
say("Der Biologe gab mir den Auftrag")
say("Ihr 20 Eiskugeln zu holen.")
say("Er sagte, ich bekomme sie von")
say("Den Eisgolems...")
say("Mal sehen, vielleicht geben mir")
say("Die Eisgolems die Dämonenandenken.")
say_reward("Besorge 20 Eiskugeln von den Eisgolems.")
say_item_vnum(30050)
say_reward("Du hast".." "..pc.getqf("collect_count").."abgegeben")
end
when 71035.use begin -- °g´bÃĤô
if get_time() < pc.getqf("duration") then
say("ÁÙ¤£¥i¥H¨Ï¥Î°g´bÃĤô")
return
end
if pc.getqf("drink_drug")==1 then
say("¤w¸g¨Ï¥Î¤F1¦¸")
return
end
if pc.count_item(30050)==0 then
say("Biologe:")
say("Du musst schon eine Eiskugel")
say("Dabei haben, sonst geht's nicht.")
say("")
return
end
item.remove()
pc.setqf("drink_drug",1)
end
when 20084.chat."Eiskugeln" with pc.count_item(30050) >0 begin
if get_time() > pc.getqf("duration") then
say("Biologe:")
--- l
say("Danke!!")
say("Ich werde die Kugel jetzt")
say("Überprüfen, dann sage ich dir")
say("Ob ich sie untersuchen kann.")
say("")
pc.remove_item(30050, 1)
pc.setqf("duration",get_time()+0*0*0)------------------22¤p®É
wait()
local pass_percent
if pc.getqf("drink_drug")==0 then
pass_percent=60
else
pass_percent=90
end
local s= number(1,100)
if s<= pass_percent then
if pc.getqf("collect_count")< 19 then --20*Eiskugeln
local index =pc.getqf("collect_count")+1
pc.setqf("collect_count",index) --¨ú±o¤@*Ó®É+1
say("Biologe:")
say("Super, diese Eiskugel ist perfekt!")
say("Du hast bis jetzt".." "..20-pc.getqf("collect_count").. "abgegeben!")
say("Bring mir bitte mehr!")
say("")
pc.setqf("drink_drug",0) --ÃĤôªì©l¤Æ
return
end
say("Biologe:")
say("Sehr gut, du hast alle gesammelt!")
say("Ich konnte meine Untersuchungen,")
say("Erfolgreich beeden!!")
say("Nun benötige ich aber wieder einen Seelenstein.")
say("Aurtumryus Seelenstein")
say("")
pc.setqf("collect_count",0)
pc.setqf("drink_drug",0)
pc.setqf("duration",0)
set_state(key_item)
return
else
say("Biologe:")
say("Es tut mir Leid, aber")
say("Diese Eiskugel ist grade geschmolzen.")
say("Bring mir bitte eine Neue.")
say("Mach schnell!")
say("")
pc.setqf("drink_drug",0) --ÃĤôªì©l¤Æ
return
end
else
say("Biologe:")
say("Tut mir Leid...")
say("Aber ich habe die Untersuchungen an")
say("der letzten Kugel noch nicht abgeschlossen.")
say("")
return
end
end
end
state key_item begin
when letter begin
send_letter("Aurtumryus Seelenstein")
if pc.count_item(30223)>0 then
local v = find_npc_by_vnum(20084)
if v != 0 then
target.vid("__TARGET__", v, "Bioquest")
end
end
end
when button or info begin
if pc.count_item(30223) >0 then
say_title("Aurtumryus Seelenstein")
say("")
--- l
say("Der Biologe sucht dich.)
say("Gehe zu ihr.")
say("")
return
end
say_title("Aurtumryus Seelenstein")
say("")
--- l
say("Du hast mir nun alle Kugel gebracht und")
say("Ich habe sie untersucht.")
say("Bring mir bitte Aurtumryus Seelenstein.")
say_item_vnum(30223)---------- Aurtumryus Seelenstein
say("Der Legendäre Stein,")
say("Der die Seele der Aurtumryus Adligen enthält.")
say("")
end
when 1101.kill or
1102.kill or
1103.kill or
1104.kill or
1105.kill or
1106.kill or
1107.kill begin
local s = number(1, 500)
if s == 1 and pc.count_item(30223)==0 then
pc.give_item2(30223, 1)
send_letter("Aurtumryus Seelenstein")
end
end
when __TARGET__.target.click or
20084.chat."Aurtumryus Seelenstein" with pc.count_item(30223) > 0 begin
target.delete("__TARGET__")
say("Biologe:")
say("Du hast dir dieses Mal aber")
say("Sehr viel Zeit gelassen, hoffe das")
say("Wird nächstes Mal schneller gehen!")
say("Nichtsdestodtrotz hast du die Aufgabe")
say("Bewältigt, hoffe du hilfst mir nächses")
say("Mal wieder dabei!!")
say("Du wirst bald von mir hören!!")
say("")
pc.remove_item(30223,1)
set_state(__reward)
end
end
state __reward begin
when letter begin
send_letter("Infos des Biologen")
local v = find_npc_by_vnum(20018)
if v != 0 then
target.vid("__TARGET__", v, "Baek-Go")
end
end
when button or info begin
say_title("Der Weg zur Belohnung")
--- l
say("Die Quest des Biologen selbst")
say("Ist beendet, gehe dir nun deine")
say("Belohnung bei Baek-Go abholen.")
say("Belohnung:")
say("+50 AW")
say("")
end
when __TARGET__.target.click or
20018.chat."Belohnung" begin
target.delete("__TARGET__")
say("Baek-Go:")
say("Nun, ich kenne dich..")
say("Du warst doch letztes Mal auch bei mir?")
say("Ich erinnere mich...")
say("Du holst dir wieder deine Belohnung ab.")
say("")
say_reward("Auftrag des Biologen erfolgreich")
say_reward("Beendet du erhälst deine Belohnung.")
say_reward("+50 Angriffswert, dauerhaft.")
affect.add_collect(apply.ATT_GRADE_BONUS,50,60*60*24*365*60)--¡X60¦~
clear_letter()
set_quest_state("collect_quest_lv70", "run")
set_state(__complete)
end
end
state __giveup__ begin
end
state __complete begin
end
end
70
PHP Code:----------------------------------------------------
--COLLECT QUEST_lv70
--METIN2 collect quest
--By ShaDoW
----------------------------------------------------
quest collect_quest_lv70 begin
state start begin
end
state run begin
when login or levelup with pc.level >= 70 and pc.level <= 90 begin
set_state(information)
end
end
state information begin
when letter begin
local v = find_npc_by_vnum(20084)
if v != 0 then
target.vid("__TARGET__", v, "Bioquest")
end
send_letter("Die Forschung des Biologen 5")
end
when button or info begin
say_title("Die Forschung des Biologen 5")
say("")
say("Der Biologe sucht dich!")
say("Gehe zu ihm.")
say("Er sagte, er hat wieder was für dich.")
say("")
end
when __TARGET__.target.click or
20084.chat."Zelkovas Holzäste" begin
target.delete("__TARGET__")
say("Biologe:")
--- l
say("Wunderbar! Ich finde es toll, dass")
say("Du mir wieder hilfst!")
say("Deine Aufgabe, die ich dir jetzt")
say("Gebe, ist nicht besonders "hell",")
say("Denn jetzt werde ich dich in den")
say("Dunklen Geisterwald schicken.")
say("Die Monster dort, sind nicht sehr nett.")
wait()
say("Biologe:")
say("Da du dieses mal dein Leben riskieren")
say("Musst, um mir das Objekt zu bringen,")
say("welches ich Suche..")
say("Dieses mal bin ich weder zu beschäftigt,")
say("Noch zu schwach..Ich habe einfach nur Angst.")
say("")
wait()
say("Biologe:")
say("Also, da du nun lost musst und mir")
say("Die Onjekte holen musst, sage ich dir")
say("Was ich brauche.")
say("Ich benötige Zelkovas Holzäste")
say("Aber Achtung, sie welken schnell.")
say("Beeil dich!")
say("")
set_state(go_to_disciple)
pc.setqf("duration",0) -- ¥i¥H¸Õ¸Õªº®É¶¡
pc.setqf("collect_count",0)--¨ú±oªºª««~¼Æ¶q
pc.setqf("drink_drug",0) --³Ü°g´bÃĤôªº¸Ü 1
end
end
state go_to_disciple begin
when letter begin
send_letter("Spezialauftrag sammle Holzäste!")
end
when button or info begin
say_title("Zelkovas Holzäste")
--- l
say("")
say("Der Biologe gab mir den Auftag,")
say("Ihr 25 Holzäste zu bringen.")
say("Ich bekomme sie von den Mops")
say("Im Geisterwald.. Ich denke mal von Allen.")
say("")
say_item_vnum(30165)
say_reward("Du hast".." "..pc.getqf("collect_count").."abgegeben.")
say("")
end
when 71035.use begin --°g´bÃĤô
if get_time() < pc.getqf("duration") then
say("ÁÙ¤£¥i¥H¨Ï¥Î°g´bÃĤô")
return
end
if pc.getqf("drink_drug")==1 then
say("¤w¸g¨Ï¥Î¤F1¦¸")
return
end
if pc.count_item(30165)==0 then
say("Biologe:")
say("Du musst schon einen Ast dabei haben,")
say("Denn die Leere kann ich nicht untersuchen.")
say("")
return
end
item.remove()
pc.setqf("drink_drug",1)
end
when 20084.chat."Zelkovas Holzäste" with pc.count_item(30165) >0 begin
if get_time() > pc.getqf("duration") then
say("Biologe:")
--- l
say("Viele Dank, dass du mir")
say("Einen gebracht hast!")
say("Ich werde ihn untersuchen!")
say("")
pc.remove_item(30165, 1)
pc.setqf("duration",get_time()+0*0*0)------------------22*Ó¤p®É
wait()
local pass_percent
if pc.getqf("drink_drug")==0 then
pass_percent=60
else
pass_percent=90
end
local s= number(1,100)
if s<= pass_percent then
if pc.getqf("collect_count")< 24 then --25*Zelkovas Holzäste
local index =pc.getqf("collect_count")+1
pc.setqf("collect_count",index) --¨ú±o¤F¤@*Ó+1
say("Biologe:")
say("Perfekt!!Dieser Ast ist einfach nur perfekt!")
say("Du hast bis jetzt".." "..25-pc.getqf("collect_count").. "*abgegeben!")
say("Ich brauche aber noch mehr!")
say("")
pc.setqf("drink_drug",0) --ÃĤôªì©l¤Æ
return
end
say("Biologe:")
say("Du hast alle 25 Stück gesammelt!")
say("Meine Untersuchungen der Äste")
say("Ist nun abgeschlossen!")
say("Du weisst was jetzt kommt oder?")
say("Ich brauche noch Gyimoks Seelenstein.")
say("")
pc.setqf("collect_count",0)
pc.setqf("drink_drug",0)
pc.setqf("duration",0)
set_state(key_item)
return
else
say("Biologe:")
say("Es tut mir Leid, aber")
say("Dieser Ast ist beim Transport")
say("Verwelkt und ich kann ihn nicht")
say("Mehr untersuchen!")
say("")
pc.setqf("drink_drug",0) --ÃĤôªì©l¤Æ
return
end
else
say("Biologe:")
say("Ich habe die Untersuchengen")
say("Am letzten Ast noch nicht feritg.")
say("Bitte komm später wieder!!")
say("Was guckst du so? Halte mich nicht auf.")
say("")
return
end
end
end
state key_item begin
when letter begin
send_letter("Gyimoks Seelenstein")
if pc.count_item(30224)>0 then
local v = find_npc_by_vnum(20084)
if v != 0 then
target.vid("__TARGET__", v, "Bioquest")
end
end
end
when button or info begin
if pc.count_item(30224) >0 then
say_title("Gyimoks Seelenstein")
say("")
--- l
say("Der Biologe hat noch eine Aufgabe")
say("Für dich, gehe zu ihr!")
say("")
return
end
say_title("Gyimoks Seelenstein")
say("")
--- l
say("Du hast mir alle 25 Äste gebracht")
say("Und ich habe sie alle untersucht.")
say("Nun benöte ich noch Gyimoks Seelenstein.")
say_item_vnum(30224)----------Gyimoks Seelenstein
say("Der legendäre Stein,")
say("Der die Seelen Gyimoks Adligen enthält.")
say("")
end
when 2301.kill or
2302.kill or
2303.kill or
2304.kill or
2305.kill or
2311.kill or
2312.kill or
2313.kill or
2314.kill or
2315.kill or
2306.kill or
2307.kill begin
local s = number(1, 500)
if s == 1 and pc.count_item(30224)==0 then
pc.give_item2(30224)
send_letter("Gyimoks Seelenstein")
end
end
when __TARGET__.target.click or
20084.chat."Gyimoks Seelenstein" with pc.count_item(30224) > 0 begin
target.delete("__TARGET__")
say("Biologe:")
say("Diese Aufgabe war wohl doch")
say("Einfacher als erwartet... dann")
say("Lasse ich mir mal etwas schwereres")
say("Einfallen für das nächste Mal!")
say("Aber danke, dass du mir wieder")
say("Geholfen hast!!")
say("Mit Level 80 hörst du wieder von mir!")
say("")
pc.remove_item(30224,1)
set_state(__reward)
end
end
state __reward begin
when letter begin
send_letter("Info des Biologen")
local v = find_npc_by_vnum(20018)
if v != 0 then
target.vid("__TARGET__", v, "Baek-Go")
end
end
when button or info begin
say_title("Der weg zur Belohnung")
--- l
say("Die Quest des Biologen ist")
say("Beendet, alle 25 Holzäste wurde")
say("Abgegeben. Nun gehe zu")
say("Baek-Go und hole dir deine Belohnung ab:")
say("11% Bewegungsgeschwindigkeit")
say("10% Schadensreduzierung")
say("")
end
when __TARGET__.target.click or
20018.chat."Belohnung" begin
target.delete("__TARGET__")
say("Baek-Go:")
say("Du schon wieder...")
say("Ich weiss, weswegen du hier bist.")
say("Du willst dir deine Belohnung abholen,")
say("Nicht wahr? Hier hast du sie.")
say("")
say_reward("Auftrag des Biologen erfolgreich")
say_reward("Beendet, du erhälst deine Belohnung.")
say_reward("11% Bewegungsgeschwindigkeit und 10% Schadensreduzierung.")
say("")
affect.add_collect(apply.MOV_SPEED,11,60*60*24*365*60)
affect.add_collect(apply.DEF_GRADE_BONUS,10,60*60*24*365*60) --60¦~
clear_letter()
set_quest_state("collect_quest_lv80", "run")
set_state(__complete)
end
end
state __complete begin
end
end
80
PHP Code:----------------------------------------------------
--COLLECT QUEST_lv80
--METIN2 collect quest
----------------------------------------------------
quest collect_quest_lv80 begin
state start begin
end
state run begin
when login or levelup with pc.level >= 80 begin
set_state(information)
end
end
state information begin
when letter begin
local v = find_npc_by_vnum(20084)
if v != 0 then
target.vid("__TARGET__", v, "Bioquest")
end
send_letter("Die Forschung des Biologen 6")
end
when button or info begin
say_title("Die Forschung des Biologen 6")
say("")
say("Der Biologe sucht dich!")
say("Gehe zu ihm.")
say("Er sagte, er hat eine weitere Aufgabe für dich.")
say("")
end
when __TARGET__.target.click or
20084.chat."Tugyis Tafeln" begin
target.delete("__TARGET__")
say("Biologe:")
--- l
say("Sehr schön!!! Ich freue mich, dass du")
say("Mir wieder unter die Arme greifen willst.")
say("Da ich deine letzte Aufgabe, etwas zu leicht")
say("Fand, gebe ich dir nun eine schwerere Aufgabe..")
say("Du hast bestimmt schoneinmal vom Schlangenfeld")
say("Oder Land der Riese gehört, oder?")
wait()
say("Biologe:")
say("Nunja, ich habe dort etwas gefunden,")
say("Was ich gerne untersuchen würde.")
say("Aber dieses Etwas bekommt man nur von")
say("Den dort ansässigen Riesen!")
say("Würdest du für mich dort hin gehen")
say("Und mir Tugyis Tafeln bringen?")
say("Aber bitte pass auf, denn diese Tafeln")
say("Sind schon sehr alt und werden gut")
say("Von den Riesen verteidigt!")
say("")
wait()
say("Biologe:")
say("Ich benötige Tugyis Tafeln")
say("Und zwar, um eine genaue Analyse")
say("Dieser Tafeln zu machen, 30 Stück!")
say("Wärst du so freundlich?")
say("Danke!!")
say("")
set_state(go_to_disciple)
pc.setqf("duration",0) -- ¥i¥H¸Õ¸Õªº®É¶¡
pc.setqf("collect_count",0)-- ¨ú±oªºª««~¼Æ¶q
pc.setqf("drink_drug",0) --³Ü°g´bÃĤôªº¸Ü 1
end
end
state go_to_disciple begin
when letter begin
send_letter("Spezialauftrag sammle Tafeln!")
end
when button or info begin
say_title("Tugyis Tafeln")
--- l
say("")
say("Der Biologe verlangt von mir," )
say("Dass ich ins Schlangenfeld oder")
say("Ins Land der Riesen gehe und dort")
say("30 Tugyis Tafeln besorge..")
say("Das wird bestimmt lustig...")
say("")
say_item_vnum(30166)
say_reward("Du hast".." "..pc.getqf("collect_count").."abgegeben")
say("")
end
when 71035.use begin --°g´bÃĤô
if get_time() < pc.getqf("duration") then
say("ÁÙ¤£¥i¥H¨Ï¥Î°g´bÃĤô")
return
end
if pc.getqf("drink_drug")==1 then
say("¤w¸g¨Ï¥Î¤F1¦¸")
return
end
if pc.count_item(30166)==0 then
say("Biologe:")
say("Du musst schon eine Tafel dabei haben")
say("Sonst kann ich nichts untersuchen!")
say("")
return
end
item.remove()
pc.setqf("drink_drug",1)
end
when 1401.kill or
1402.kill or
1403.kill or
1601.kill or
1602.kill or
1603.kill begin
local s = number(1, 100)
if s <= 5 and pc.count_item(30166)==0 then
pc.give_item2(30166, 1)
end
end
when 20084.chat."Tugyis Tafeln" with pc.count_item(30166) >0 begin
if get_time() > pc.getqf("duration") then
say("Biologe:")
--- l
say("Vielen Dank, dass du mir")
say("Eine Tafel gebracht hast.")
say("Ich werde sie jetzt untersuchen.")
say("")
pc.remove_item(30166, 1)
pc.setqf("duration",get_time()+0*0*0)--------------22¤p®É
wait()
local pass_percent
if pc.getqf("drink_drug")==0 then
pass_percent=60
else
pass_percent=90
end
local s= number(1,100)
if s<= pass_percent then
if pc.getqf("collect_count")< 29 then --30*Tugyis Tafeln
local index =pc.getqf("collect_count")+1
pc.setqf("collect_count",index) --¨ú±o»õ¦U±o®É+1
say("Biologe:")
say("Ich muss sagen, eine sehr schöne Tafel.")
say("Du hast bis jetzt".." "..30-pc.getqf("collect_count").. "*abgegeben!")
say("Ich brauche mehr!")
say("")
pc.setqf("drink_drug",0) --ÃĤôªì©l¤Æ
return
end
say("Biologe:")
say("Super du hast 30 Stück gesammelt!")
say("Meine Untersuchungen der Tafeln")
say("Ist abgeschlossen!")
say("Du weisst bestimmt, was ich jetzt brauche?")
say("Ich brauche: Tugyis Seelenstein!")
say("")
say("")
pc.setqf("collect_count",0)
pc.setqf("drink_drug",0)
pc.setqf("duration",0)
set_state(key_item)
return
else
say("Biologe:")
say("Es tut mir Leid, aber")
say("Diese Tafel ist zu alt,")
say("als dass ich sie untersuchen kann.")
say("Hast du noch eine?")
say("")
pc.setqf("drink_drug",0) --ÃĤôªì©l¤Æ
return
end
else
say("Biologe:")
say("Die Untersuchungen der letzten")
say("Tafel sind noch nicht abgeschlossen.")
say("Warte bitte und komme später wieder.")
say("Guck nicht wie'n Auto und warte..")
say("")
return
end
end
end
state key_item begin
when letter begin
send_letter("Tugyis Tafeln")
if pc.count_item(30225)>0 then
local v = find_npc_by_vnum(20084)
if v != 0 then
target.vid("__TARGET__", v, "Bioquest")
end
end
end
when button or info begin
if pc.count_item(30225) >0 then
say_title("Tugyis Seelenstein")
say("")
--- l
say("Der Biologe hat eine Aufgabe..")
say("Gehe zu ihr.")
say("")
return
end
say_title("Tugyis Seelenstein")
say("")
--- l
say("Nun, da du mir alle meine 30")
say("Tafeln geholt hast, benötige")
say("Ich noch den Tugyis Seelenstein.")
say_item_vnum(30225)---------- Tugyis Seelenstein
say("Ein Legendäre Stein, ")
say("der die Seele eines Tugyi Adligen enthält.")
say("")
end
when 1401.kill or
1402.kill or
1403.kill or
1601.kill or
1602.kill or
1603.kill begin
local s = number(1, 200)
if s == 1 and pc.count_item(30225)==0 then
pc.give_item2(30225, 1)
send_letter("Tugyis Seelenstein")
end
end
when __TARGET__.target.click or
20084.chat."Tugyis Seelenstein" with pc.count_item(30225) > 0 begin
target.delete("__TARGET__")
say("Biologe:")
say("Nundenn, du hast die Aufgabe")
say("Schnell und sauber gemeistert!")
say("Ich danke dir dafür.")
say("Um deine Belohnung abzuholen,")
say("Gehe bitte zu Baek-Go")
say("Er wird sie dir geben!")
say("Ich gebe dir noch die Bestätigung.")
say("")
pc.remove_item(30225,1)
set_state(__reward)
end
end
state __reward begin
when letter begin
send_letter("Info des Biologen")
local v = find_npc_by_vnum(20018)
if v != 0 then
target.vid("__TARGET__", v, "Baek-Go)
end
end
when button or info begin
say_title("Der Weg zur Belohnung")
--- l
say("Die Quest des Biologen ist")
say("Beendet und alle 30 Tafeln und")
say("Der Seelenstein wurden abgegeben.")
say("Nun muss ich noch zu Baek-Go")
say("Und die Belohnung holen!")
say("")
end
when __TARGET__.target.click or
20018.chat."Belohnung" begin
target.delete("__TARGET__")
say("Baek-Go:")
say("Ich hoffe, dass ich dich")
say("Nichtmehr oft sehen werde, denn")
say("Immer dieses Zaubern nervt mich")
say("Langsam...")
say("")
say_reward("Auftrag erfolgreich beendet.")
say_reward("Du erhälst deine Belohnung.")
say_reward("+6% Angriffgeschwindigkeit")
say_reward("+10% Schadenserhöhung")
affect.add_collect(apply.ATT_SPEED,6,60*60*24*365*60) --¡V60¦~
affect.add_collect_point(POINT_ATT_BONUS,10,60*60*24*365*60) --60³â
clear_letter()
set_state(__complete)
end
end
state __complete begin
end
end
85
PHP Code:----------------------------------------------------
--COLLECT QUEST_lv85
--METIN2 collect quest
----------------------------------------------------
quest collect_quest_lv85 begin
state start begin
end
state run begin
when login or levelup with pc.level >= 85 begin
set_state(information)
end
end
state information begin
when letter begin
local v = find_npc_by_vnum(20084)
if v != 0 then
target.vid("__TARGET__", v, "Die Bitte des Biologen")
end
send_letter("Die Bitte des Biologen")
end
when button or info begin
say_title("Die Bitte des Biologen:")
say("")
say("Der Hauptmann sage, dass der Biologe")
say("nach dir suche. Vielleicht solltest du")
say("bei ihm vorbei gehen und schauen,")
say("was er von dir wollte.")
say("")
end
when __TARGET__.target.click or
20084.chat."Die Bitte" begin
target.delete("__TARGET__")
say("Biologe:~:")
--- l
say("Meine Forschungen sind nun bald")
say("beendet... aber ich bräuchte noch")
say("ein paar mal deine Hilfe...")
say("")
say("Dieses mal geht es um Bäume...")
say("Um ihre Äste um genau zu sein.")
wait()
say("Biologe:~:")
say("Ich habe vor die Äste")
say("der Roten Bäume zu erforschen.")
say("Sie sollen angeblich heilende")
say("Kräfte besitzen und ich möchte")
say("herausfinden ob dies stimmt.")
say("")
wait()
say("Biologe:~")
say("Du bekommst die Äste von den Monstern")
say("im Roten Wald. Also folgende:")
say("")
say("Roter Geisterbaumstumpf")
say("Roter Geisterbaum")
say("Rote Dryade")
say("Rote Geisterweide")
say("Roter böser Baum")
say("Riesiger Geisterbaum")
say("")
set_state(go_to_disciple)
pc.setqf("duration",0) -- ¥i¥H¸Õ¸Õªº®É¶¡
pc.setqf("collect_count",0)-- ¨ú±oªºª««~¼Æ¶q
pc.setqf("drink_drug",0) --³Ü°g´bÃĤôªº¸Ü 1
end
end
state go_to_disciple begin
when letter begin
send_letter("Die Geisterbaum Äste")
end
when button or info begin
say_title("Die Geisterbaum Äste")
--- l
say("")
say("Der Biologe hat dir den Auftag" )
say("gegeben Geisterbaum Äste zu sammeln.")
say("")
say("Du benötigst 40 Stück davon.")
say("")
say_item_vnum(30167)
say_reward("²Du hast bereits ".." "..pc.getqf("collect_count").." gesammelt.")
say("")
end
when 71035.use begin --°g´bÃĤô
if get_time() < pc.getqf("duration") then
say("ÁÙ¤£¥i¥H¨Ï¥Î°g´bÃĤô")
return
end
if pc.getqf("drink_drug")==1 then
say("¤w¸g¨Ï¥Î¤F1¦¸")
return
end
if pc.count_item(30167)==0 then
say("Biologe:~:")
say("¥ý§ä¨ìÆF»îªº«Hª«¥H«á")
say("¤~¨Ï¥Î°g´bÃĤô¤]¤£·|¦³°ÝÃD")
say("")
return
end
item.remove()
pc.setqf("drink_drug",1)
end
when 2311.kill or
2312.kill or
2313.kill or
2314.kill or
2315.kill or
2306.kill begin
local s = number(1, 100)
if s <= 25 then
pc.give_item2(30167, 1)
end
end
when 20084.chat."Die Geisterbaum Äste" with pc.count_item(30167) >0 begin
if get_time() > pc.getqf("duration") then
say_title("Biologe:")
--- l
say("Oh!!! Du hast einen...")
say("dann gib mal her und lass mich sehen,")
say("ob ich an diesem Exemplar forschen kann.")
say("")
pc.remove_item(30167, 1)
pc.setqf("duration",get_time()+0*0*0)--------------22¤p®É
wait()
local pass_percent
if pc.getqf("drink_drug")==0 then
pass_percent=60
else
pass_percent=90
end
local s= number(1,100)
if s<= pass_percent then
if pc.getqf("collect_count")< 29 then --30*Ó¥¼º¡
local index =pc.getqf("collect_count")+1
pc.setqf("collect_count",index) --¨ú±o»õ¦U±o®É+1
say("Biologe:~:")
say("®@®@~!! ±z°µ±o¯u¦n. ¨¯*W±z¤F...")
say("Es wäre schön wenn du mir")
say("noch".." "..40-pc.getqf("collect_count").. "bringen würdest.")
say("")
pc.setqf("drink_drug",0) --ÃĤôªì©l¤Æ
return
end
say_title("Biologe:")
say("Gut gemacht!")
say("Du hast alle 40 Geisterbaum Äste gesammelt.")
say("")
say("Um die Forschungen abzuschließen benötige ich")
say("allerdings noch einen anderen Gegenstand....")
say("")
say("Den Waldgeist-Seelenstein!")
say("Bitte hole ihn mir.")
say("")
pc.setqf("collect_count",0)
pc.setqf("drink_drug",0)
pc.setqf("duration",0)
set_state(key_item)
return
else
say_title("Biologe:")
say("Oh dieser Ast ist in nicht so")
say("gutem Zustand... Damt kann ich leider")
say("nicht forschen..")
say("Bitte hole mir einen neuen.")
say("")
pc.setqf("drink_drug",0) --ÃĤôªì©l¤Æ
return
end
else
say_title("Biologe:")
say("Entschuldigung aber ich habe")
say("meine Forschungen noch nicht")
say("abschließen können. Bitte")
say("komm später wieder.")
say("")
return
end
end
end
state key_item begin
when letter begin
send_letter("Waldgeist-Seelenstein")
if pc.count_item(30226)>0 then
local v = find_npc_by_vnum(20084)
if v != 0 then
target.vid("__TARGET__", v, "Der Waldgeist Seelenstein")
end
end
end
when button or info begin
if pc.count_item(30226) >0 then
say_title("Waldgeist Seelenstein")
say("")
--- l
say("Du hast den Stein gefunden!")
say("Gehe schnell zum Biologen und zeige")
say("ihm deinen Fund!")
say("")
return
end
say_title("Waldgeist Seelenstein")
say("")
--- l
say("Nachdem du die 40 Geisterbaum Äste")
say("gefunden hast, hat der Biologe dich gebeten")
say("ihm den Waldgeist Seelenstein zu holen.")
say_item_vnum(30226)---------- ÆF»î¥Û
say("Du bekommst ihn im Roten Wald.")
say("")
end
when 2311.kill or
2312.kill or
2313.kill or
2314.kill or
2315.kill or
2306.kill begin
local s = number(1, 200)
if s <= 15 and pc.count_item(30226)==0 then
pc.give_item2(30226, 1)
send_letter("Waldgeist-Seelenstein")
end
end
when __TARGET__.target.click or
20084.chat."Waldgeist Seelenstein" with pc.count_item(30226) > 0 begin
target.delete("__TARGET__")
say("Biologe:")
say("OHH!!! Danke..")
say("Nun kann ich endlich meine Forschungen")
say("zu Ende führen und herausfinden")
say("was es damit aufsich hat was die Leute")
say("erzählen...")
say("")
say("Um deine Belohnung zu erhalten gehe zu Beak-Go")
say("")
pc.remove_item(30226,1)
set_state(__reward__)
end
end
state __reward__ begin
when letter begin
send_letter("Finde Beak-Go")
local v = find_npc_by_vnum(20018)
if v != 0 then
target.vid("__TARGET__", v, "Beak-Go")
end
end
when button or info begin
say_title("Rote Geisterbaum Äste")
--- l
say("Du hast dem Biologen nun die 40")
say("Äste und den Seelenstein gebracht.")
say("")
say("Die Belohnung sollst du nun bei")
say("Beak-Go abhohlen.")
say("")
end
when __TARGET__.target.click or
20018.chat."Roter Geisterbaum Ast" begin
target.delete("__TARGET__")
say_title("Beak-Go:")
say("")
say("Du hast dem Biologen also Geholfen?")
say("Okay... ich gebe dir dann wohl")
say("besser deine Belohnung...")
say("")
say("Gegenstand erhalten:")
say_reward("2x Blauer Ebenholzkasten")
say("Ausserdem erhälst du:")
say_reward("10% Schadensreduzierung gegen andere Spieler.")
pc.give_item2("50114", 1)
pc.give_item2("50114", 1)
wait()
say_title("Beak-Go:")
say("")
say("Machs Gut!")
say("Bis zum nächsten mal.")
say("")
-- 10% Schwertdeff etc. pp. Fertigkeitenschaden wird auch reduziert
affect.add_collect(apply.RESIST_CURSE,10,60*60*24*365*60)
affect.add_collect(apply.RESIST_MELEE,10,60*60*24*365*60)
affect.add_collect(apply.RESIST_WIND,10,60*60*24*365*60)
affect.add_collect(apply.RESIST_MAGIC,10,60*60*24*365*60)
affect.add_collect(apply.RESIST_ELEC,10,60*60*24*365*60)
affect.add_collect(apply.RESIST_FIRE,10,60*60*24*365*60)
affect.add_collect(apply.RESIST_BOW,10,60*60*24*365*60)
affect.add_collect(apply.RESIST_FAN,10,60*60*24*365*60)
affect.add_collect(apply.RESIST_BELL,10,60*60*24*365*60)
affect.add_collect(apply.RESIST_DAGGER,10,60*60*24*365*60)
affect.add_collect(apply.RESIST_TWOHAND,10,60*60*24*365*60)
affect.add_collect(apply.RESIST_SWORD,10,60*60*24*365*60)
clear_letter()
set_state(__complete__)
end
end
state __complete__ begin
end
end
90
PHP Code:----------------------------------------------------
--COLLECT QUEST_lv90
--METIN2 collect quest
--By ShaDoW
----------------------------------------------------
quest collect_lv90 begin
state start begin
end
state run begin
when login or levelup with pc.level >= 85 begin
set_state(information)
end
end
state information begin
when letter begin
local v = find_npc_by_vnum(20084)
if v != 0 then
target.vid("__TARGET__", v, "Bioquest")
end
send_letter("Die Forschung des Biologen 8")
end
when button or info begin
say_title("Die Forschung des Biologen 8")
say("")
say("Die Biologin sucht dich!")
say("Gehe zu ihr.")
say("Sie sagte, dass sie etwas Unmögliches für dich hat.")
say("")
end
when __TARGET__.target.click or
20084.chat."Notiz des Anführers" begin
target.delete("__TARGET__")
say("Biologin:")
--- 1
say("Sehr schön!! Ich freue mich wieder dich zu sehen!")
say("Ich habe eine letzte Aufgabe für dich!")
say("Dieses Mal führe ich dich zu großen Gegnern!")
say("Nicht so klein wie die "Riesen"")
say("Die Aufgabe ist sehr schwer..")
say("Sei vorsichtig..")
wait()
say("Biologin:")
say("Um meine Objekte zu bekommen, musst")
say("Du schwere Gegner töten..")
say("Ich brauche 50 Notizen der Anführer")
say("Du bekommst sie, von den Bossen.")
say("Das heisst, dass du Gegner wie den")
say("Neunschwanz, den Oberork, die Königinnen-")
say("Spinne die Wüstenschildi etc. töten musst.")
say("Ich hoffe du wirst das hinkriegen!")
say("Ich benötige diese Objekte sehr dringend!")
wait()
say("Wenn ich es mit deiner Hilfe schaffe,")
say("Diese Notizen zu bekommen und zu lesen,")
say("Dann wirst du viel Kraft bekommen!")
say("Um nicht zu sagen, dass du nahezu unbesiegbar")
say("Wirst. Also bitte beeil dich!")
set_state(go_to_disciple)
pc.setqf("duration",0) -- ¥i¥H¸Õ¸Õªº®É¶¡
pc.setqf("collect_count",0)-- ¨ú±oªºª««~¼Æ¶q
pc.setqf("drink_drug",0) --³Ü°g´bÃĤôªº¸Ü 1
end
end
state go_to_disciple begin
when letter begin
send_letter("Spezialauftrag sammle Notizen")
end
when button or info begin
say_title("Notiz des Anführers")
--- l
say("")
say("Die Biologin hat mich beauftragt")
say("Bosse zu töten und ihr 50")
say("Notzigen des Anführers zu bringen.")
say("Das wird keine einfache Aufgabe!")
say("Ich hoffe mal, dass ich eine gute")
say("Belohnung bekommen werde..")
say("")
end
when 71035.use begin --°g´bÃĤô
if get_time() < pc.getqf("duration") then
say("ÁÙ¤£¥i¥H¨Ï¥Î°g´bÃĤô")
return
end
if pc.getqf("drink_drug")==1 then
say("¤w¸g¨Ï¥Î¤F1¦¸")
return
end
if pc.count_item(30168)==0 then
say("Biologin:")
say("Du musst mir schon eine Notiz brinen,")
say("Sonst kann ich nichts machen!")
say("")
return
end
item.remove()
pc.setqf("drink_drug",1)
end
when 591.kill or
691.kill or
791.kill or
793.kill or
991.kill or
992.kill or
993.kill or
1091.kill or
1092.kill or
1093.kill or
1304.kill or
1403.kill or
2091.kill or
2191.kill or
2206.kill or
2207.kill or
2306.kill or
2493.kill or
2494.kill or
5001.kill or
5004.kill or
5161.kill or
5162.kill or
5163.kill begin
local s = number(1,100)
if s <= 5 and pc.count_item(30168)==0 then
pc.give_item2(30168, 1)
end
end
when 20084.chat."Notiz des Anführers" with pc.count_item(30168) >0 begin
if get_time() > pc.getqf("duration") then
say("Biologin:")
--- 1
say("Vielenk Dank, dass du mir")
say("Diese Notiz gebracht hast.")
say("Warte einen Moment.")
say("")
pc.remove_item(30168, 1)
pc.setqf("duration",get_time()+0*0*0)--------------22¤p®É
wait()
local pass_pervent
if pc.getqf("drink_drug")==0 then
pass_pervent=60
else
pass_percent=90
end
local s= number(1,100)
if s<= pass_percent then
if pc.getqf("collect_count")< 39 then --50-Notizen des Anführers
local index =pc.getqf("collect_count")+1
pc.setqf("collect_count",index) --¨ú±o»õ¦U±o®É+1
say("Biologin:")
say("Juhu! Die Notiz ist wunderbar.")
say("Du hast bis jetzt".." "..50-pc.getqf("collect_count").. " abgegeben!")
say("Bitter bring' mir mehr!")
say("")
pc.setqf("drink_drug",0) --ÃĤôªì©l¤Æ
return
end
say("Biologin:")
say("Du hast mir alle 50 gebracht!")
say("Ich habe meine Untersuchungen")
say("Dieser Notizen erfolgreich beendet.")
say("Nun benötige ich allerdings noch")
say("Einen Seelenstein... Es wäre sehr")
say("nett, wenn du ihn mir bringst!")
say("")
pc.setqf("collect_count",0)
pc.setqf("drink_drug",0)
pc.setqf("duration"),0)
set_state(key_item)
return
else
say("Biologin:")
say("Tut mir Leid, aber")
say("Diese Notiz ist blut-")
say("verschmiert..Bringe")
say("Mir bitte eine Neue!")
say("")
pc.setqf("drink_drug",0) --ÃĤôªì©l¤Æ
return
end
end
else
say("Biologin:")
say("Die Untersuchungen der letzten")
say("Notiz sind noch nicht fertig!")
say("Bitte komme später wieder!")
say("Nun geh schon!")
return
end
end
end
state key_item begin
when letter begin
send_letter("Seelenstein des Anführers")
if pc.count_item(30227)>0 then
local v = find_npc_by_vnum(20084)
if v != 0 then
target.vid("__TARGET__", v, "Bioquest")
end
end
end
when button or info begin
if pc.count_item(30227) >0 then
say_title("Seelenstein des Anführers")
say("")
--- l
say("Die Biologin hat eine weitere")
say("Aufgabe für dich gehe hin.")
say("")
return
end
say_title("Seelenstein des Anführers")
say("")
--- l
say("Du hast mir alle 50 Notizen des Anführers")
say("Gebracht, vielen dank dafür!")
say("Ich brauche aber einen Seelenstein.")
say_item_vnum(30227)---------- Seelenstein des Anführes
say("Ein legendärer Stein,")
say("Der die Seele des Anführers enthält!")
say("")
end
when 591.kill or
691.kill or
791.kill or
793.kill or
991.kill or
992.kill or
993.kill or
1091.kill or
1092.kill or
1093.kill or
1304.kill or
1403.kill or
2091.kill or
2191.kill or
2206.kill or
2207.kill or
2306.kill or
2493.kill or
2494.kill or
5001.kill or
5004.kill or
5161.kill or
5162.kill or
5163.kill begin
local s = number(1, 200)
if s == 1 and pc.count_item(30227)==0 then
pc.give_item2(30227, 1)
send_letter("Seelenstein des Anführers")
end
end
when __TARGET__.target.click or
20084.chat."Notiz des Anführers" with pc.count_item(30227)
target.delete("__TARGET__")
say("Biologin:")
say("Du hast mir den letzten")
say("Seelenstein gebracht! Vielen Dank!")
say("Nun, ich habe etwas wichtiges herausgefunden!")
say("Ich weiss, wie ich dir die")
say("Unbesiegbare Kraft geben kann!")
say("Nun, nimm das hier mit zu Baek-Go!")
say("Nun geh und hol die Belohnung ab!")
say("")
pc.remove_item(30227,1)
set_state(__reward)
end
end
state __reward begin
when letter begin
send_letter("Info der Biologin")
local v = find_npc_by_vnum(20018)
if v != 0 then
target.vid("__TARGET__", v, "Baek-Go")
end
end
when button or info begin
say_title("Der Weg zur Belohnung")
--- l
say("Die Biologin sagte, dass")
say("Sie herausgefunden hat, wie")
say("Das mit den Kräften geht..")
say("Ich hoffe, dass Baek-Go")
say("Weiss, wie das geht!")
say("")
end
when __TARGET__.target.click or
20018.chat."Belohnung" begin
target.delete("__TARGET__")
say("Baek-Go:")
say("Du bist also der, der")
say("Die schweren Aufgaben von")
say("Der Biologin geschafft hat?")
say("Beachtlich.. hier deine Belohnung.")
say("")
say_reward("Auftrag beendet!")
say_reward("Du erählst deine Belohnungen!")
say_reward("Bewegungsgeschwindigkeit +5%")
say_reward("Angriffsgeschwindigkeit +3%")
say_reward("Schadensreduzierung +5%")
say_reward("Angriffswert + 25")
affect.add_collect(apply.MOV_SPEED, 5, 60*60*24*365*60) --60¦~
affect.add_collect(apply.ATT_GRADE_BONUS,25,60*60*24*365*60)--¡X60¦~
affect.add_collect(apply.DEF_GRADE_BONUS,3,60*60*24*365*60) --60¦~
affect.add_collect(apply.ATT_SPEED, 3, 60*60*24*365*60) --60¦~
clear_letter()
set_state(__complete)
end
end
state __complete begin
end
end
Hoffe könnt mir hilfen ^^
PS: Ja soll eine bioquest sein wo es keine zeit benötigt also das man alle hintereinander abgeben kann. ^^
Quote:
edit:schon gut mein fehler hab ihn :D
ABER
syntax error : [string "information"]:6: `)' expected near `hell'
collect_quest_lv70.quest:70:Abort trap (core dumped)
? xD
----------------------------------------------------
--COLLECT QUEST_lv70
--METIN2 collect quest
--By ShaDoW
----------------------------------------------------
quest collect_quest_lv70 begin
state start begin
end
state run begin
when login or levelup with pc.level >= 70 and pc.level <= 90 begin
set_state(information)
end
end
state information begin
when letter begin
local v = find_npc_by_vnum(20084)
if v != 0 then
target.vid("__TARGET__", v, "Bioquest")
end
send_letter("Die Forschung des Biologen 5")
end
when button or info begin
say_title("Die Forschung des Biologen 5")
say("")
say("Der Biologe sucht dich!")
say("Gehe zu ihm.")
say("Er sagte, er hat wieder was für dich.")
say("")
end
when __TARGET__.target.click or
20084.chat."Zelkovas Holzäste" begin
target.delete("__TARGET__")
say("Biologe:")
--- l
say("Wunderbar! Ich finde es toll, dass")
say("Du mir wieder hilfst!")
say("Deine Aufgabe, die ich dir jetzt")
say("Gebe, ist nicht besonders,")
say("Denn jetzt werde ich dich in den")
say("Dunklen Geisterwald schicken.")
say("Die Monster dort, sind nicht sehr nett.")
wait()
say("Biologe:")
say("Da du dieses mal dein Leben riskieren")
say("Musst, um mir das Objekt zu bringen,")
say("welches ich Suche..")
say("Dieses mal bin ich weder zu beschäftigt,")
say("Noch zu schwach..Ich habe einfach nur Angst.")
say("")
wait()
say("Biologe:")
say("Also, da du nun lost musst und mir")
say("Die Onjekte holen musst, sage ich dir")
say("Was ich brauche.")
say("Ich benötige Zelkovas Holzäste")
say("Aber Achtung, sie welken schnell.")
say("Beeil dich!")
say("")
set_state(go_to_disciple)
pc.setqf("duration",0) -- ¥i¥H¸Õ¸Õªº®É¶¡
pc.setqf("collect_count",0)--¨ú±oªºª««~¼Æ¶q
pc.setqf("drink_drug",0) --³Ü°g´bÃĤôªº¸Ü 1
end
end
state go_to_disciple begin
when letter begin
send_letter("Spezialauftrag sammle Holzäste!")
end
when button or info begin
say_title("Zelkovas Holzäste")
--- l
say("")
say("Der Biologe gab mir den Auftag,")
say("Ihr 25 Holzäste zu bringen.")
say("Ich bekomme sie von den Mops")
say("Im Geisterwald.. Ich denke mal von Allen.")
say("")
say_item_vnum(30165)
say_reward("Du hast".." "..pc.getqf("collect_count").."abgegeben.")
say("")
end
when 71035.use begin --°g´bÃĤô
if get_time() < pc.getqf("duration") then
say("ÁÙ¤£¥i¥H¨Ï¥Î°g´bÃĤô")
return
end
if pc.getqf("drink_drug")==1 then
say("¤w¸g¨Ï¥Î¤F1¦¸")
return
end
if pc.count_item(30165)==0 then
say("Biologe:")
say("Du musst schon einen Ast dabei haben,")
say("Denn die Leere kann ich nicht untersuchen.")
say("")
return
end
item.remove()
pc.setqf("drink_drug",1)
end
when 20084.chat."Zelkovas Holzäste" with pc.count_item(30165) >0 begin
if get_time() > pc.getqf("duration") then
say("Biologe:")
--- l
say("Viele Dank, dass du mir")
say("Einen gebracht hast!")
say("Ich werde ihn untersuchen!")
say("")
pc.remove_item(30165, 1)
pc.setqf("duration",get_time()+0*0*0)------------------22*Ó¤p®É
wait()
local pass_percent
if pc.getqf("drink_drug")==0 then
pass_percent=60
else
pass_percent=90
end
local s= number(1,100)
if s<= pass_percent then
if pc.getqf("collect_count")< 24 then --25*Zelkovas Holzäste
local index =pc.getqf("collect_count")+1
pc.setqf("collect_count",index) --¨ú±o¤F¤@*Ó+1
say("Biologe:")
say("Perfekt!!Dieser Ast ist einfach nur perfekt!")
say("Du hast bis jetzt".." "..25-pc.getqf("collect_count").. "*abgegeben!")
say("Ich brauche aber noch mehr!")
say("")
pc.setqf("drink_drug",0) --ÃĤôªì©l¤Æ
return
end
say("Biologe:")
say("Du hast alle 25 Stück gesammelt!")
say("Meine Untersuchungen der Äste")
say("Ist nun abgeschlossen!")
say("Du weisst was jetzt kommt oder?")
say("Ich brauche noch Gyimoks Seelenstein.")
say("")
pc.setqf("collect_count",0)
pc.setqf("drink_drug",0)
pc.setqf("duration",0)
set_state(key_item)
return
else
say("Biologe:")
say("Es tut mir Leid, aber")
say("Dieser Ast ist beim Transport")
say("Verwelkt und ich kann ihn nicht")
say("Mehr untersuchen!")
say("")
pc.setqf("drink_drug",0) --ÃĤôªì©l¤Æ
return
end
else
say("Biologe:")
say("Ich habe die Untersuchengen")
say("Am letzten Ast noch nicht feritg.")
say("Bitte komm später wieder!!")
say("Was guckst du so? Halte mich nicht auf.")
say("")
return
end
end
end
state key_item begin
when letter begin
send_letter("Gyimoks Seelenstein")
if pc.count_item(30224)>0 then
local v = find_npc_by_vnum(20084)
if v != 0 then
target.vid("__TARGET__", v, "Bioquest")
end
end
end
when button or info begin
if pc.count_item(30224) >0 then
say_title("Gyimoks Seelenstein")
say("")
--- l
say("Der Biologe hat noch eine Aufgabe")
say("Für dich, gehe zu ihr!")
say("")
return
end
say_title("Gyimoks Seelenstein")
say("")
--- l
say("Du hast mir alle 25 Äste gebracht")
say("Und ich habe sie alle untersucht.")
say("Nun benöte ich noch Gyimoks Seelenstein.")
say_item_vnum(30224)----------Gyimoks Seelenstein
say("Der legendäre Stein,")
say("Der die Seelen Gyimoks Adligen enthält.")
say("")
end
when 2301.kill or
2302.kill or
2303.kill or
2304.kill or
2305.kill or
2311.kill or
2312.kill or
2313.kill or
2314.kill or
2315.kill or
2306.kill or
2307.kill begin
local s = number(1, 500)
if s == 1 and pc.count_item(30224)==0 then
pc.give_item2(30224)
send_letter("Gyimoks Seelenstein")
end
end
when __TARGET__.target.click or
20084.chat."Gyimoks Seelenstein" with pc.count_item(30224) > 0 begin
target.delete("__TARGET__")
say("Biologe:")
say("Diese Aufgabe war wohl doch")
say("Einfacher als erwartet... dann")
say("Lasse ich mir mal etwas schwereres")
say("Einfallen für das nächste Mal!")
say("Aber danke, dass du mir wieder")
say("Geholfen hast!!")
say("Mit Level 80 hörst du wieder von mir!")
say("")
pc.remove_item(30224,1)
set_state(__reward)
end
end
state __reward begin
when letter begin
send_letter("Info des Biologen")
local v = find_npc_by_vnum(20018)
if v != 0 then
target.vid("__TARGET__", v, "Baek-Go")
end
end
when button or info begin
say_title("Der weg zur Belohnung")
--- l
say("Die Quest des Biologen ist")
say("Beendet, alle 25 Holzäste wurde")
say("Abgegeben. Nun gehe zu")
say("Baek-Go und hole dir deine Belohnung ab:")
say("11% Bewegungsgeschwindigkeit")
say("10% Schadensreduzierung")
say("")
end
when __TARGET__.target.click or
20018.chat."Belohnung" begin
target.delete("__TARGET__")
say("Baek-Go:")
say("Du schon wieder...")
say("Ich weiss, weswegen du hier bist.")
say("Du willst dir deine Belohnung abholen,")
say("Nicht wahr? Hier hast du sie.")
say("")
say_reward("Auftrag des Biologen erfolgreich")
say_reward("Beendet, du erhälst deine Belohnung.")
say_reward("11% Bewegungsgeschwindigkeit und 10% Schadensreduzierung.")
say("")
affect.add_collect(apply.MOV_SPEED,11,60*60*24*365*60)
affect.add_collect(apply.DEF_GRADE_BONUS,10,60*60*24*365*60) --60¦~
clear_letter()
set_quest_state("collect_quest_lv80", "run")
set_state(__complete)
end
end
state __complete begin
end
end
syntax error : [string "information"]:6: `)' expected near `Riesen'
collect_quest_lv90.quest:65:Abort trap (core dumped)
syntax error : [string "information"]:14: unexpected symbol near `)'
collect_quest_lv60.quest:67:Abort trap (core dumped)