ich hab momentan das ziel questes in den biomann rein zuhauen
so die erste klappt wunderbar das wäre die:
PHP Code:
quest Sammle_Pflanzen1 begin
state start begin
when login or levelup with pc.get_level() >=2 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, "Quest")
end
send_letter("Ein Brief vom Professor")
end
when button or info begin
say_title("Schriftrolleninhalt:")
say("")
say("Hallo ich bin Prof. Hattric,")
say("ich bin Forscher für Planzen")
say("und Tiere.Ich bin der Nachfolger")
say("vom Biologen Chaegirab,der")
say("bei seiner letzten Reise leider")
say("in den Tod gestürzt ist.")
wait()
say("Da die Regierung")
say("nun befürchtet das mir soetwas")
say("auch zustoßen könnte.Muss ich mir")
say("Helfer suchen,die für mich")
say("Pflanzen und andere Sachen besorgen.")
say("")
say("Komm doch bitte zu mir,dann erkläre")
say("Ich dir alles weitere.")
say("")
say("gez. Professor Hattric")
end
when __TARGET__.target.click or
20084.chat."Ich habe Ein Brief von Dir!" begin
target.delete("__TARGET__")
say_title("Prof. Hattric:")
--- l
say("")
say("Schön dich zusehen,also hast")
say("Du meinen Brief bekommen.")
say("")
say("Das bedeutet euer Postamt leistet")
say("gute Arbeit das wird meiner Familie")
say("in der Heimat aber gefallen.")
say("")
wait()
say("Als erste möchte Ich eure Pflanzenwelt")
say("untersuchen,die übrigens sehr Fazinierend ist.")
say("Ich habe auf den Weg hierher,zu meinem Lager.solch")
say("einen komischen braunen Samen gefunden.")
say("Laut Chaegirab's Aufzeichnungen ist es ein")
say("Pfirsichsamen sein,besorg mir doch noch 10")
say("weitere davon,damit ich Setzlinge")
say("daraus ziehen kann.")
wait()
set_state(go_to_disciple)
pc.setqf("collect_count",0)
pc.setqf("drink_drug",0)
end
end
state go_to_disciple begin
when letter begin
send_letter("Auftrag von Prof. Hattric")
end
when button or info begin
say_title("Sammle Pfirsichsamen")
--- l
say_title("Information:")
say("Pfirsichsamen sind die Kerne von der Frucht")
say("die Pfirsich genannt wird.Es gibt 2 Arten")
say("von Pfirsichen,welche mit glatter Schale")
say("und welche mit einer samtig weichen Schale.")
say("")
say_gold("Gedanken des Charakters:")
say_white("Toll...woher weiß ich welcher Samen von")
say("welcher Frucht ist!?Das fängt ja gut an...")
wait()
say_title("Prof. Hattric")
say("Besorge mir bitte 10 mal")
say_item_vnum(30020)
say_reward(" Du hast".." "..pc.getqf("collect_count").." bis jetzt gesammelt!")
say("")
end
when 71035.use begin --°g´bÃĤô
if pc.getqf("drink_drug")==1 then
say("")
say("Bessere Droppchance!")
say("")
return
end
if pc.count_item(30020)==0 then
say("")
say("Du hast doch keinen Samen")
say("Lauf los und besorg mir welche!")
say("")
return
end
item.remove()
pc.setqf("drink_drug",1)
end
when 101.kill begin
if pc.count_item(30020)<10-pc.getqf("collect_count") then
pc.give_item2(30020, 1)
end
end
when 20084.chat."Wegen den Pfirsichsamen" with pc.count_item(30020) >0 begin
say("Einen Moment!")
--- l
say("Ich werde den Samen")
say("schnell mal überprüfen.")
say("Hoffentlich ist er noch zu gebrauchen")
say("")
pc.remove_item(30020, 1)
wait()
local pass_percent
if pc.getqf("drink_drug")==0 then
pass_percent=99
else
pass_percent=99
end
local s= number(1,100)
if s<= pass_percent then
if pc.getqf("collect_count")< 9 then --5*Ó¥H¤U
local index =pc.getqf("collect_count")+1
pc.setqf("collect_count",index) --¨ú±o¤@* +1
say_title("Prof. Hattric:")
say("Perfekt!Der Samen ist in bester Qualität.")
say("Er wird sicher zu einem schönen Setzling.")
say("Jetzt fehlen ja nurnoch".." "..10-pc.getqf("collect_count").. " von den Samen.")
say("Bring mir bitte noch die Restlichen!")
say("")
pc.setqf("drink_drug",0) --ÃĤôªì©l¤Æ
return
end
say_title("Prof. Hattric:")
say("Yuhu!Du hast es endlich geschafft")
say("und mir alle 10 Samen gebracht.")
say("Nun können sie Keimen und zu Setzlingen")
say("heranwachsen.Für deine Arbeit werde Ich")
say("dir Natürlich eine Kleinigkeit geben.")
say("")
say_reward("Du bekommst 1.000.000 Yang!")
say_reward("Außerdem erhälst du noch ein paar Tränke.")
pc.setqf("collect_count",0)
pc.setqf("drink_drug",0)
clear_letter()
set_state(__complete)
pc.give_item2(27003, 200)
pc.change_money(1000000)
set_quest_state("levelup","run")
return
else
say_title("Prof. Hattric:")
say("Dieser Samen ist von schlechter Qualität!")
say("Daraus kann kein Setzling wachsen,")
say("besorge mir doch bitte einen anderen Samen.")
say("")
pc.setqf("drink_drug",0) --ÃĤôªì©l¤Æ
return
end
end
end
state __complete begin
end
end
PHP Code:
quest Sammle_Pflanzen2 begin
state start begin
when login or levelup with pc.get_level() >=5 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, "Quest")
end
send_letter("Ein weiterer Brief vom Professor")
end
when button or info begin
say_title("Schriftrolleninhalt:")
say("")
say("Hallo fleißiger Helfer,")
say("ich bin es wieder der Professor.")
say("Ich danke dir nochmal,das du mir letztens")
say("bei den Pfirsichsamen geholfen hast.")
say("Kannst du dich noch an die Samen erinnern?")
say("Sie sind zu wunder schönen kleinen Bäumchen")
say("herrangewachsen und haben vor kurzem erst geblüht")
say("Es sah so Zauberhaft aus ich wünschte du hättest")
say("gesehen.Nun ist es aber soweit das ich dich wieder")
say("um deine Hilfe bitten muss.Komm doch einfach mal")
say("bei mir vorbei.")
say("")
say("gez. Professor Hattric")
end
when __TARGET__.target.click or
20084.chat."Da bin ich wieder" begin
target.delete("__TARGET__")
say_title("Prof. Hattric:")
--- l
say("")
say_tilte("Prof. Hattric:")
say("")
say("Hallo mein neuer Freund,Ich freue mich sehr")
say("dich wieder zusehen,wie Ich sehe hast du einige")
say("Fortschritte in deiner Kampfkunst gemacht.")
say("Dank deiner Hilfe bei den Samen,konnte Ich")
say("die Aufzeichnungen von Chaegirab vervollständigen.")
say("")
say("Ich habe dir ja geschrieben das die Samen zu kleinen")
say("Bäumen herrangewachsen sind,die vor einigen Tagen")
say("geblüht haben.So schusselig wie man sein kann,habe")
say("Ich vergessen die Töpfe ins Zelt zustellen.")
wait()
say("Nun sind die ganzen Blüten vom Wind verweht, nur gut")
say("das Ich sie vorher schon bestäubt hatte.Die")
say("wilden Tiere hier in der Umgebung haben die Blüten")
say("durch den Nektar nun an Ihrem Fell kleben.Ich selber")
say("habe keine Kampferfahrung und hoffe du kannst mir einige")
say("Blüten für die Unterlagen zurückholen.")
say("")
say("Soweit ich sehen konnte ist das Fell der Blauwölfe")
say("besonders mit Blüten bestückt.")
set_state(go_to_disciple)
pc.setqf("collect_count",0)
pc.setqf("drink_drug",0)
end
end
state go_to_disciple begin
when letter begin
send_letter("Auftrag von Prof. Hattric")
end
when button or info begin
say_title("Sammle Pfirsichblüten")
--- l
say_title("Information:")
say("Pfirsichblüten sind leicht Rosafarbend.Wenn sie bestäubt werden,")
say("können daraus Pfirsiche werden,diese sind ein beliebtes Obst")
say("bei den Kindern von Alleria.")
say("")
say_gold("Gedanken des Charakters:")
say_white("Ein ziemlichliches Schusselchen")
say("dieser Biologe,dem werd Ich sicher noch öfters")
say("helfen müssen...Naja solange es der forschung dient....")
wait()
say_title("Prof. Hattric")
say("Besorge mir bitte 10 mal")
say_item_vnum(50701)
say_reward(" Du hast".." "..pc.getqf("collect_count").." bis jetzt gesammelt!")
say("")
end
when 71035.use begin --°g´bÃĤô
if pc.getqf("drink_drug")==1 then
say("")
say("Bessere Droppchance!")
say("")
return
end
if pc.count_item(50701)==0 then
say("")
say("Du hast doch keine Blüten")
say("Lauf los und besorg mir welche!")
say("")
return
end
item.remove()
pc.setqf("drink_drug",1)
end
when 104.kill begin
if pc.count_item(50701)<10-pc.getqf("collect_count") then
pc.give_item2(50701, 1)
end
end
when 20084.chat."Wegen den Pfirsichblüten" with pc.count_item(50701) >0 begin
say("Einen Moment!")
--- l
say("Ich werde die Blüte")
say("schnell mal überprüfen.")
say("Hoffentlich ist sie nirgends eingerissen.")
say("")
pc.remove_item(50701, 1)
wait()
local pass_percent
if pc.getqf("drink_drug")==0 then
pass_percent=96
else
pass_percent=96
end
local s= number(1,100)
if s<= pass_percent then
if pc.getqf("collect_count")< 9 then --5*Ó¥H¤U
local index =pc.getqf("collect_count")+1
pc.setqf("collect_count",index) --¨ú±o¤@* +1
say_title("Prof. Hattric:")
say("Perfekt!Die Blüte ist in bester Qualität.")
say("Sie wird ein gutes Forschungsobjekt sein.")
say("Jetzt fehlen ja nurnoch".." "..10-pc.getqf("collect_count").. " von den Blüten.")
say("Bring mir bitte noch die Restlichen!")
say("")
pc.setqf("drink_drug",0) --ÃĤôªì©l¤Æ
return
end
say_title("Prof. Hattric:")
say("Yuhu!Du hast es endlich geschafft")
say("und mir alle 10 Blüten gebracht.")
say("Nun kann ich sie genauer Erforschen.")
say("Ich gebe dir Natürlich wieder eine kleine Belohnung!")
say("")
say_reward("Ich gebe dir ein paar Falschen Pfirsichwein und")
say_reward("Pfirsichsaft,Ich habe ihn aus der Heimat mitgebracht!")
pc.setqf("collect_count",0)
pc.setqf("drink_drug",0)
clear_letter()
set_state(__complete)
pc.give_item2(70020, 200)
pc.give_item2(50801, 200)
pc.change_money(1000000)
set_quest_state("levelup","run")
return
else
say_title("Prof. Hattric:")
say("Diese Blüte ist von schlechter Qualität!")
say("Daraus kann Ich kein Forschungsobjekt machen,")
say("besorge mir doch Bitte eine andere Blüte.")
say("")
pc.setqf("drink_drug",0) --ÃĤôªì©l¤Æ
return
end
end
end
state __complete begin
end
end





