Register for your free account! | Forgot your password?

You last visited: Today at 02:14

  • Please register to post and access all features, it's quick, easy and FREE!


[Problem Quest]Bio

Closed Thread
 
Old   #1
 
elite*gold: 0
Join Date: Feb 2012
Posts: 10
Received Thanks: 0
[Problem Quest]Bio

Hello guys i have a problem with my bio quest when someone finish quest after this quest has started again.

Any idea...?

Quote:
quest bio begin
state start begin
when login or levelup with pc.level>29 begin
set_state(talk_to_disciple_lv30)
end
end
state talk_to_disciple_lv30 begin
when letter begin
local v = find_npc_by_vnum(20084)
if v != 0 then target.vid("__TARGET__", v, "Biologe")
end
send_letter("Η Αναζήτηση του Βιολόγου ")
end
when button or info begin
say_title("Η Αναζήτηση του Βιολόγου ")
say("")
say("O Βιολόγος, ο μαθητευόμενος του Uriel, ")
say("αναζητά τη βοήθεια σου επειγόντως. ")
say("")
say_reward("Βιάσου να τον βοηθήσεις! ")
say("")
end
when __TARGET__.target.click or 20084.chat."Δόντια Ορκ " begin
target.delete("__TARGET__")
say("Βιολόγος: ")
say("")
say("Αχ, ήρθες να με βοηθήσεις; ")
say("Καλώς ... ")
say("Εγώ σαν Βιολόγος μελετώ πολλά ")
say("είδη Φυτών στον Κόσμο. ")
say("Αν με βοηθήσετε στην έρευνα μου, ")
say("θα σας ανταμείψω πλουσιοπάροχα. ")
say("")
wait()
say("Βιολόγος: ")
say("Πρόσφατα ξεκίνησα και πάλι...")
say("Ερευνώ ένα Μύθο....")
say("Αλλά έχω να κάνω πολλά προς το παρόν, ")
say("θα ήταν ωραίο αν μπορούσες να με βοηθήσεις... ")
say("")
wait()
say("Βιολόγος: ")
say("Χρειάζομαι δέκα Δόντια Ορκ για την Έρευνα μου. ")
say("Ωστόσο, αυτά είναι πολύ ευαίσθητα, ")
say("και μπορεί κάποια από αυτά να σπάσουν ")
say("την ώρα που θα τα μελετώ. ")
say("Πραγματικά χρειάζομαι δέκα, προκειμένου ")
say("να μπορέσω να ολοκληρώσω την έρευνά μου. ")
say("")
set_state(collect_orcteeth)
pc.setqf("duration",0)
pc.setqf("collect_count",0)
pc.setqf("drink_drug",0)
end
end
state collect_orcteeth begin
when letter begin
send_letter("Η Αναζήτηση του Βιολόγου ")
end
when button or info begin
say_title("Δόντια Ορκ ")
say("")
say("Ο Βιολόγος σου ζήτησε να μαζέψεις ")
say("10 Δόντια Ορκ ")
say("Αυτά μπορείς να τα πάρεις ")
say("από το Γενικό Κατάστημα. ")
say_item_vnum(30006)
say_reward("Έχεις μαζέψει "..pc.getqf("collect_count").." Δόντια Ορκ! ")
say("")
end

when 71035.use begin
if get_time() < pc.getqf("duration") then
say_title("Βιολόγος: ")
say("")
say("Δεν έχει έρθει ακόμα ο χρόνος ")
say("για να δώσεις Δόντι Ορκ και δεν ")
say("μπορείς να χρησιμοποιήσεις το Ελιξήριο! ")
return
end
if pc.getqf("drink_drug")==1 then
say_title("Βιολόγος: ")
say("")
say("Έχεις χρησιμοποιήσει ήδη ένα Ελιξήριο! ")
say("")
return
end
if pc.count_item(30006)==0 then
say_title("Βιολόγος: ")
say("")
say("Δεν έχεις Δόντια Ορκ και δεν ")
say("μπορείς να χρησιμοποιήσεις το Ελιξήριο! ")
say("")
return
end
say_title("Βιολόγος: ")
say("")
say("Χρησιμοποιήσες ένα Ελιξήριο οι ")
say("πιθανότητες να είναι καλό ανέβηκαν ")
say("κατά πολυ! ")
pc.remove_item(71035,1)
pc.setqf("drink_drug",1)
end
when 20084.chat."Δόντια Ορκ " with pc.count_item(30006)>0 begin
if get_time()>pc.getqf("duration") then
say("Ω! Μου έφερες ένα Δόντι Ορκ... ")
say("Ευχαριστώ πολύ!!! ")
say("Πρεπει να το εξέτασω πρωτα ... ")
say("Περίμενε ένα λεπτό! ")
say("")
pc.remove_item("30006", 1)
pc.setqf("duration",get_time() + 60*60*2)
wait()
local pass_percent
if pc.getqf("drink_drug")==0 then
pass_percent=50
else
pass_percent=90
end

local s= number(1,100)
if s<= pass_percent then
local count = pc.getqf("collect_count")+1
if count<10 then
pc.setqf("collect_count", count)
say("Βιολόγος: ")
say("Εξαιρετικά, αυτό το Δόντι είναι καλό. ")
say("Φέρε μου σε παρακαλώ περισσότερα Δόντια Ορκ, ")
say("ώστε να μπορέσω να ολοκληρώσω την έρευνά μου. ")
say("")
say_reward("Έχεις μαζέψει "..pc.getqf("collect_count").." Δόντια Ορκ! ")
say("")
pc.setqf("drink_drug",0)
else
say("Βιολόγος: ")
say("Συγχαρητήρια!! ")
say("Μάζεψες όλα τα Δόντια Ορκ!! ")
say("Τώρα όμως χρειάζομαι ένα Λίθο. ")
say("Τον Λίθο Ψυχής των Ορκ. ")
say("Μπορείς να μου φέρεις αυτόν τον Λίθο; ")
say("")
say_reward("Μπορείς να τον πάρεις από τα Ορκς. ")
pc.setqf("collect_count",0)
pc.setqf("drink_drug",0)
pc.setqf("duration",0)
pc.setqf("drink_drug",0)
set_state(collect_jinunggyis)
end
else
say("Βιολόγος: ")
say("Λυπάμαι, αλλά το Δόντι ")
say("έσπασε κατά τις έρευνες μου. ")
say("Σε παρακαλώ φέρε μου ένα ")
say("άλλο Δόντι Ορκ! ")
pc.setqf("drink_drug",0)
end
else
say("Βιολόγος: ")
say("Λυπάμαι... ")
say("Δεν έχω μελετήσει ακόμα το Δόντι ")
say("που μου έφερες..... ")
say("Σε παρακαλώ έλα σε 2 Ώρες. ")
say("")
if pc.count_item(50903) >0 then
say("")
say("Όπως βλέπω έχεις μια Απόδειξη. ")
say("Με αυτήν μπορείς να επηρεάσεις τον ")
say("χρόνο και να μην περιμένεις. ")
say_reward("Θέλεις να επηρρεάσεις τον χρόνο; ")
local s = select("Θέλω να επηρεάσω το Χρόνο ", "Περιμένω Κανονικά... ")
if s == 1 then
say("Ο Χρόνος επηρεάστηκε επιτυχώς! ")
pc.setqf("duration",0)
pc.remove_item(50903,1)
end
end
return;
end
end
end
state collect_jinunggyis begin
when letter begin
send_letter("Ο Λίθος Ψυχής των Ορκ ")
end
when button or info begin
say_title("Λίθος Ψυχής των Ορκ ")
say("")
say("Έχεις συγκεντρώσει τα 10 Δόντια Ορκ. ")
say("Τώρα λοιπόν πρέπει να βρεις ")
say("τον Λίθο Ψυχής των Ορκ! ")
say_item_vnum(30220)
say("Λες αυτός ο Λίθος να περιέχει ")
say("πραγματικά τις ψυχές των Ορκ; ")
end
when 635.kill or 636.kill or 637.kill begin
if pc.count_item(30220)<1 then
local rand = number(0,99)
if rand<5 then pc.give_item2(30220, 1)
end
end
end
when 20084.chat."Ο Λίθος Ψυχής των Ορκ " begin
if pc.count_item(30220)>0 then
say("Βιολόγος: ")
say("Χάρη στη βοήθειά σας, καταλαβαίνω τώρα ")
say("το μύθο του Λίθου Ψυχής των Ορκ. ")
say("Πολέμησες πολύ σκληρά. ")
say("Πήγαινε στον Baek-Go και αυτός θα ")
say("σε βοηθήσει να αναπτύξεις τις ")
say("Εσωτερικές σου Δυνάμεις! ")
pc.remove_item(30220,1)
set_state(jinunggyis_reward)
else
say("Βιολόγος: ")
say("Μου έχεις φέρει τα 10 Δόντια Ορκ... ")
say("Αλλά τώρα χρειάζομαι να μου φέρεις ")
say("τον Λίθο Ψυχής των Ορκ. ")
say("Αυτόν μπορείς να το πάρεις από τα Ορκ ...")
say("Πιστεύω πως είσαι αρκετά Δυνατός ")
say("για να τα καταφέρεις! ")
end
end
end
state jinunggyis_reward begin
when letter begin
send_letter("Πήγαινε στον Baek-Go ")
local v = find_npc_by_vnum(20018)
if v != 0 then target.vid("__TARGET__", v, "Doktor")
end
end
when button or info begin
say("Ο Βιολόγος ως ανταμοιβή για τις Πληροφορίες ")
say("που πήρε απά τα Δόντια και τον Λίθο Ψυχής ")
say("σου έδωσε μία συνταγή για ένα μυστικό φίλτρο. ")
say("Πήγαινε στον Baek-Go, και αυτός ")
say("θα δημιουργήσει το Μυστικό Φίλτρο! ")
end
when __TARGET__.target.click or 20018.chat."Η ανταμοιβή του Βιολόγου " begin
target.delete("__TARGET__")
say_title("Baek-Go:")
say("Χμμ... ")
say("Αυτή είναι η συνταγή,που σου έδωσε; ")
say("Ωρίστε Λοίπον η Ανταμοιβή σου: ")
say("")
say_reward("Έλαβες: ")
say_reward("Ταχύτητα Κίνησης +10% (Μόνιμα) ")
say_reward("Ένα Μπλε Λίθο ")
say_reward("Ένα Πράσινο Λίθο ")
say("")
affect.add_collect(apply.MOV_SPEED, 10, 60*60*24*365*60)
pc.give_item2("30230")
pc.give_item2("30231")
set_state(collect_quest_lv40)
end
end

----------------------------------
-- LvL 40 / Fluchsammlung
----------------------------------
state collect_quest_lv40 begin
when login or levelup with pc.level>39 begin
set_state(talk_to_disciple_lv40)
end
end
state talk_to_disciple_lv40 begin
when letter begin
local v = find_npc_by_vnum(20084)
if v != 0 then target.vid("__TARGET__", v, "Biologe")
end
send_letter("Η Αναζήτηση του Βιολόγου ")
end
when button or info begin
say_title("Η Αναζήτηση του Βιολόγου ")
say("")
say("Ο Βιολόγος Χρειάζεται και πάλι την βοήθεια σου! ")
say("Χρειάζεται βοήθεια για να βρεις ")
say("κάποια συγκεκριμένα αντικείμενα. ")
say("Πήγαινε σε αυτόν, ")
say("για να σου πει τι θέλει! ")
say("")
say_reward("Πήγαινε στον Βιολόγο! ")
say("")
end
when __TARGET__.target.click or 20084.chat."Βιβλία με Κατάρες " begin
target.delete("__TARGET__")
say("Βιολόγος: ")
say("Καλώς τον... ")
say("Η Μελέτη για τα Δόντια Ορκ ")
say("Έχει τελείωσει! ")
say("Τώρα όμως χρειάζομαι να εξετάσω ")
say("κάποια νέα Αντικείμενα! ")
wait()
say("Βιολόγος: ")
say("Θα πήγαινα να τα μαζέψω μόνος μου, ")
say("αλλά έχω πάρα πολλά να κάνω... ")
say("Θα ήταν πολύ ωραία αν μπορούσες ")
say("το κάνεις αυτό για μένα. ")
wait()
say("Βιολόγος: ")
say("Θέλω να μελετήσω τα Βίβλια με Κατάρες. ")
say("χρειάζομαι 15 Τεμάχια! ")
say("Ωστόσο τα Βιβλία είναι αρκετά παλιά ")
say("και μερικά μπορεί να καταστραφούν ")
say("την ώρα που θα τα μελετώ! ")
set_state(collect_cursebook)
pc.setqf("duration",0)
pc.setqf("collect_count",0)
pc.setqf("drink_drug",0)
end
end
state collect_cursebook begin
when letter begin
send_letter("Η Αναζήτηση του Βιολόγου ")
end
when button or info begin
say_title("Βιβλία με Κατάρες ")
say("")
say("Ο Βιολόγος σου ζήτησε να μαζέψεις, ")
say("15 Βιβλία με Κατάρες! ")
say("Αυτά μπορείς να τα πάρεις από ")
say("το Γενικό Κατάστημα! ")
say("")
say_item_vnum(30047)
say_reward("Έχεις μαζέψει "..pc.getqf("collect_count").." Βιβλία με Κατάρες! ")
say("")
end

when 71035.use begin
if get_time() < pc.getqf("duration") then
say_title("Βιολόγος: ")
say("")
say("Δεν έχει έρθει ακόμα ο χρόνος ")
say("για να δώσεις Βιβλίο με Κατάρες και δεν ")
say("μπορείς να χρησιμοποιήσεις το Ελιξήριο! ")
return
end
if pc.getqf("drink_drug")==1 then
say_title("Βιολόγος: ")
say("")
say("Έχεις χρησιμοποιήσει ήδη ένα Ελιξήριο! ")
say("")
return
end
if pc.count_item(30047)==0 then
say_title("Βιολόγος: ")
say("")
say("Δεν έχεις Βιβλία με Κατάρες και δεν ")
say("μπορείς να χρησιμοποιήσεις το Ελιξήριο! ")
say("")
return
end
say_title("Βιολόγος: ")
say("")
say("Χρησιμοποιήσες ένα Ελιξήριο οι ")
say("πιθανότητες να είναι καλό ανέβηκαν ")
say("κατά πολυ! ")
pc.remove_item(71035,1)
pc.setqf("drink_drug",1)
end
when 20084.chat."Βιβλία με Κατάρες " with pc.count_item(30047)>0 begin
if get_time()>pc.getqf("duration") then
say("Ω! Μου έφερες ένα Βιβλίο με Κατάρες ")
say("Ευχαριστώ πολύ!!! ")
say("Πρεπει να το εξέτασω πρωτα... ")
say("Περίμενε ένα λεπτό! ")
say("")
pc.remove_item("30047", 1)
pc.setqf("duration",get_time() + 60*60*2)
wait()
local pass_percent
if pc.getqf("drink_drug")==0 then
pass_percent=50
else
pass_percent=90
end

local s= number(1,100)
if s<= pass_percent then
local count = pc.getqf("collect_count")+1
if count<15 then
pc.setqf("collect_count", count)
say("Βιολόγος: ")
say("Εξαιρετικά, αυτό το Βιβλίο είναι καλό. ")
say("Φέρε μου σε παρακαλώ περισσότερα Βιβλία, ")
say("ώστε να μπορέσω να ολοκληρώσω την έρευνά μου. ")
say("")
say_reward("Έχεις μαζέψει "..pc.getqf("collect_count").." Βιβλία με Κατάρες! ")
say("")
pc.setqf("drink_drug",0)
else
say("Βιολόγος: ")
say("Συγχαρητήρια!! ")
say("Μάζεψες όλα τα Βιβλία με Κατάρες!! ")
say("Τώρα όμως χρειάζομαι ένα Λίθο. ")
say("Τον Λίθο Ψυχής των Ναού. ")
say("Μπορείς να μου φέρεις αυτόν τον Λίθο; ")
say("")
say_reward("Μπορείς να τον πάρεις από τα Ορκ. ")
pc.setqf("collect_count",0)
pc.setqf("duration",0)
pc.setqf("drink_drug",0)
set_state(collect_templekey)
end
else
say("Βιολόγος: ")
say("Λυπάμαι, αλλά το Βιβλίο ")
say("έσπασε κατά τις έρευνες μου. ")
say("Σε παρακαλώ φέρε μου ένα ")
say("άλλο Βιβλίο με Κατάρες! ")
pc.setqf("drink_drug",0)
end
else
say("Βιολόγος: ")
say("Λυπάμαι... ")
say("Δεν έχω μελετήσει ακόμα το Βιβλίο ")
say("που μου έφερες..... ")
say("Σε παρακαλώ έλα σε 2 Ώρες. ")
say("")
if pc.count_item(50903) >0 then
say("")
say("Όπως βλέπω έχεις μια Απόδειξη. ")
say("Με αυτήν μπορείς να επηρεάσεις τον ")
say("χρόνο και να μην περιμένεις. ")
say_reward("Θέλεις να επηρρεάσεις τον χρόνο; ")
local s = select("Θέλω να επηρεάσω το Χρόνο ", "Περιμένω Κανονικά... ")
if s == 1 then
say("Ο Χρόνος επηρεάστηκε επιτυχώς! ")
pc.setqf("duration",0)
pc.remove_item(50903,1)
end
end
return;
end
end
end
state collect_templekey begin
when letter begin
send_letter("Λίθος Ψυχής των Ναού ")
end
when button or info begin
say_title("Λίθος Ψυχής των Ναού ")
say("")
say("Συγκέντρωσες τα 15 Βιβλία με Κατάρες. ")
say("Τώρα λοιπόν πρέπει να βρεις ")
say("τον Λίθο Ψυχής του Ναού! ")
say_item_vnum(30221)
say("Λες αυτός ο Λίθος να περιέχει ")
say("πραγματικά τις ψυχές των οπαδών Ναού; ")
say("")
end
when 635.kill or 636.kill or 637.kill begin
if pc.count_item(30221)<1 then
local rand = number(0,99)
if rand<5 then pc.give_item2(30221, 1)
end
end
end
when 20084.chat."Λίθος Ψυχής των Ναού " begin
if pc.count_item(30221)>0 then
say("Βιολόγος: ")
say("Χάρη στη βοήθειά σou, καταλαβαίνω τώρα ")
say("το μύθο του Λίθου Ψυχής toυ Ναού. ")
say("Πολέμησες πολύ σκληρά. ")
say("Πήγαινε στον Baek-Go και αυτός θα ")
say("σε βοηθήσει να αναπτύξεις τις ")
say("Εσωτερικές σου Δυνάμεις! ")
say("")
pc.remove_item(30221,1)
set_state(templekey_reward)
else
say("Βιολόγος: ")
say("Μου έχεις φέρει τα 15 Βιβλία με Κατάρες... ")
say("Αλλά τώρα χρειάζομαι να μου φέρεις ")
say("τον Λίθο Ψυχής του Ναού. ")
say("Αυτόν μπορείς να το πάρεις από τα Ορκ ...")
say("Πιστεύω πως είσαι αρκετά Δυνατός ")
say("για να τα καταφέρεις! ")
say("")
end
end
end
state templekey_reward begin
when letter begin
send_letter("Πήγαινε στον Baek-Go ")
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("Πήγαινε στον Baek-Go ")
say("Ο Βιολόγος ως ανταμοιβή για τις Πληροφορίες ")
say("που πήρε απά τα Βιβλία και τον Λίθο Ψυχής ")
say("σου έδωσε μία συνταγή για ένα μυστικό φίλτρο. ")
say("Πήγαινε στον Baek-Go, και αυτός ")
say("θα δημιουργήσει το Μυστικό Φίλτρο! ")
say("")
end
when __TARGET__.target.click or 20018.chat."Η ανταμοιβή του Βιολόγου " begin
target.delete("__TARGET__")
say_title("Baek-Go:")
say("Χμμ... ")
say("Αυτή είναι η συνταγή, που σου έδωσε; ")
say("Ωρίστε Λοίπον η Ανταμοιβή σου: ")
say("")
say_reward("Έλαβες: ")
say_reward("Ταχύτητα Επίθεσης +5% (Μόνιμα) ")
say_reward("Κόκκινη Λίθο ")
say_reward("Μωβ Λίθο ")
say("")
affect.add_collect(apply.ATT_SPEED, 5, 60*60*24*365*60)
pc.give_item2("30232")
pc.give_item2("30233")
set_state(collect_quest_lv50)
end
end

----------------------------------
-- LvL 50 / Dδmonenandenken
----------------------------------
state collect_quest_lv50 begin
when login or levelup with pc.level>49 begin
set_state(talk_to_disciple_lv50)
end
end
state talk_to_disciple_lv50 begin
when letter begin
local v = find_npc_by_vnum(20084)
if v != 0 then target.vid("__TARGET__", v, "Biologe")
end
send_letter("Η Αναζήτηση του Βιολόγου ")
end
when button or info begin
say_title("Η Αναζήτηση του Βιολόγου ")
say("")
say("Ο Βιολόγος Χρειάζεται και πάλι την βοήθεια σου! ")
say("Χρειάζεται βοήθεια για να βρεις ")
say("κάποια συγκεκριμένα αντικείμενα. ")
say("Πήγαινε σε αυτόν, ")
say("για να σου πει τι θέλει! ")
say("")
say_reward("Πήγαινε στον Βιολόγο! ")
say("")
end
when __TARGET__.target.click or 20084.chat."Ενθύμιο Δαίμονα " begin
target.delete("__TARGET__")
say("Βιολόγος: ")
say("Καλώς τον... ")
say("Η Μελέτη για τα Βιβλία με Κατάρες. ")
say("Έχει τελείωσει! ")
say("Τώρα όμως χρειάζομαι να εξετάσω ")
say("κάποια νέα Αντικείμενα! ")
wait()
say("Βιολόγος: ")
say("Θα πήγαινα να τα μαζέψω μόνος μου, ")
say("αλλά έχω πάρα πολλά να κάνω... ")
say("Θα ήταν πολύ ωραία αν μπορούσες ")
say("το κάνεις αυτό για μένα. ")
wait()
say("Βιολόγος: ")
say("Θέλω να μελετήσω τα Ενθύμια του Δαίμονα. ")
say("χρειάζομαι 15 Τεμάχια! ")
say("Ωστόσο τα Ενθύμια είναι εύθραυστα ")
say("και μερικά μπορεί να καταστραφούν ")
say("την ώρα που θα τα μελετώ! ")
say("")
set_state(collect_deamonitem)
pc.setqf("duration",0)
pc.setqf("collect_count",0)
pc.setqf("drink_drug",0)
end
end
state collect_deamonitem begin
when letter begin
send_letter("Η Αναζήτηση του Βιολόγου ")
end
when button or info begin
say_title("Ενθύμιο Δαίμονα ")
say("")
say("Ο Βιολόγος σου ζήτησε να μαζέψεις, ")
say("15 Ενθύμια του Δαίμονα μπορείς ")
say("να τα βρείς στον Δαιμονικό Πύργο! ")
say("καλή τύχη! ")
say("")
say_item_vnum(30015)
say_reward("Έχεις μαζέψει "..pc.getqf("collect_count").." Ενθύμια του Δαίμονα! ")
say("")
end

when 71035.use begin
if get_time() < pc.getqf("duration") then
say_title("Βιολόγος: ")
say("")
say("Δεν έχει έρθει ακόμα ο χρόνος ")
say("για να δώσεις Ενθύμιο του Δαίμονα και δεν ")
say("μπορείς να χρησιμοποιήσεις το Ελιξήριο! ")
return
end
if pc.getqf("drink_drug")==1 then
say_title("Βιολόγος: ")
say("")
say("Έχεις χρησιμοποιήσει ήδη ένα Ελιξήριο! ")
say("")
return
end
if pc.count_item(30015)==0 then
say_title("Βιολόγος: ")
say("")
say("Δεν έχεις Ενθύμιο του Δαίμονα και δεν ")
say("μπορείς να χρησιμοποιήσεις το Ελιξήριο! ")
say("")
return
end
say_title("Βιολόγος: ")
say("")
say("Χρησιμοποιήσες ένα Ελιξήριο οι ")
say("πιθανότητες να είναι καλό ανέβηκαν ")
say("κατά πολυ! ")
pc.remove_item(71035,1)
pc.setqf("drink_drug",1)
end
when 20084.chat."Ενθύμιο του Δαίμονα " with pc.count_item(30015)>0 begin
if get_time()>pc.getqf("duration") then
say("Ω! Μου έφερες ένα Ενθύμιο του Δαίμονα. ")
say("Ευχαριστώ πολύ!!! ")
say("Πρεπει να το εξέτασω πρωτα... ")
say("Περίμενε ένα λεπτό! ")
say("")
pc.remove_item("30015", 1)
pc.setqf("duration",get_time() + 60*60*4)
wait()
local pass_percent
if pc.getqf("drink_drug")==0 then
pass_percent=50
else
pass_percent=90
end

local s= number(1,100)
if s<= pass_percent then
local count = pc.getqf("collect_count")+1
if count<15 then
pc.setqf("collect_count", count)
say("Βιολόγος: ")
say("Εξαιρετικά! ")
say("Αυτό το Ενθύμιο είναι καλό. ")
say("Φέρε μου σε παρακαλώ περισσότερα Ενθύμια, ")
say("ώστε να μπορέσω να ολοκληρώσω την έρευνά μου. ")
say("")
say_reward("Έχεις μαζέψει "..pc.getqf("collect_count").." Ενθύμια του Δαίμονα! ")
say("")
pc.setqf("drink_drug",0)
else
say("Βιολόγος: ")
say("Συγχαρητήρια!! ")
say("Μάζεψες όλα τα Ενθύμια του Δαίμονα!! ")
say("Τώρα όμως χρειάζομαι ένα Λίθο. ")
say("Τον Λίθο Ψυχής του Δαίμονα. ")
say("Μπορείς να μου φέρεις αυτόν τον Λίθο; ")
say("")
say_reward("Μπορείς να τον πάρεις στον Δαιμονικό Πύργο. ")
pc.setqf("collect_count",0)
pc.setqf("duration",0)
pc.setqf("drink_drug",0)
set_state(collect_sagyis)
end
else
say("Βιολόγος: ")
say("Λυπάμαι, αλλά το Ενθύμιο ")
say("καταστράφηκε κατά τις έρευνες μου. ")
say("Σε παρακαλώ φέρε μου ένα ")
say("άλλο Ενθύμιο του Δαίμονα! ")
pc.setqf("drink_drug",0)
end
else
say("Βιολόγος: ")
say("Λυπάμαι... ")
say("Δεν έχω μελετήσει ακόμα το Ενθύμιο ")
say("που μου έφερες..... ")
say("Σε παρακαλώ έλα σε 4 Ώρες. ")
if pc.count_item(50903) >0 then
say("")
say("Όπως βλέπω έχεις μια Απόδειξη. ")
say("Με αυτήν μπορείς να επηρεάσεις τον ")
say("χρόνο και να μην περιμένεις. ")
say_reward("Θέλεις να επηρρεάσεις τον χρόνο; ")
local s = select("Θέλω να επηρεάσω το Χρόνο ", "Περιμένω Κανονικά... ")
if s == 1 then
say("Ο Χρόνος επηρεάστηκε επιτυχώς! ")
pc.setqf("duration",0)
pc.remove_item(50903,1)
end
end
return;
end
end
end
state collect_sagyis begin
when letter begin
send_letter("Λίθος Ψυχής του Δαίμονα ")
end
when button or info begin
say_title("Λίθος Ψυχής του Δαίμονα ")
say("")
say("Συγκέντρωσες τα 15 Ενθύμια του Δαίμονα. ")
say("Τώρα λοιπόν πρέπει να βρεις ")
say("τον Λίθος Ψυχής του Δαίμονα! ")
say("")
say_item_vnum(30222)
say("Λες να περιέχει αυτός ο λίθος ")
say("την Ψυχή του Δαίμονα; ")
say("")
end
when 1031.kill or 1032.kill or 1033.kill or 1034.kill begin
if pc.count_item(30222)<1 then
local rand = number(0,99)
if rand<5 then pc.give_item2(30222, 1)
end
end
end
when 20084.chat."Λίθος ψυχής του Δαίμονα " begin
target.delete("__TARGET__")
if pc.count_item(30222)>0 then
say("Βιολόγος: ")
say("Χάρη στη βοήθειά σας, καταλαβαίνω τώρα ")
say("το μύθο του Λίθου Ψυχής του Δαίμονα. ")
say("Πολέμησες πολύ σκληρά. ")
say("Πήγαινε στον Baek-Go και αυτός θα ")
say("σε βοηθήσει να αναπτύξεις τις ")
say("Εσωτερικές σου Δυνάμεις! ")
say("")
pc.remove_item(30222,1)
set_state(sagyis_reward)
else
say("Βιολόγος: ")
say("Μου έφερες τα 15 Ενθύμια του Δαίμονα... ")
say("Αλλά τώρα χρειάζομαι να μου φέρεις ")
say("τον Λίθο Ψυχής του Δαίμονα. ")
say("Αυτόν μπορείς να το πάρεις από τα Τέρατα ")
say("στον Δαιμονικό Πύργο. ")
say("Πιστεύω πως είσαι αρκετά δυνατός ")
say("για να τα καταφέρεις! ")
say("")
end
end
end
state sagyis_reward begin
when letter begin
send_letter("Πήγαινε στον Baek-Go ")
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("Πήγαινε στον Baek-Go ")
say("Ο Βιολόγος ως ανταμοιβή για τις Πληροφορίες ")
say("που πήρε απά τα Ενθύμια και τον Λίθο Ψυχής ")
say("σου έδωσε μία συνταγή για ένα μυστικό φίλτρο. ")
say("Πήγαινε στον Baek-Go, και αυτός ")
say("θα δημιουργήσει ένα Μυστικό Φίλτρο! ")
say("")
end
when __TARGET__.target.click or 20018.chat."Η ανταμοιβή του Βιολόγου " begin
target.delete("__TARGET__")
say_title("Baek-Go:")
say("Χμμ... ")
say("Αυτή είναι η συνταγή,που σου έδωσε; ")
say("Ωρίστε Λοίπον η Ανταμοιβή σου: ")
say("")
say_reward("Έλαβες: ")
say_reward("Άμυνα +60 (Μόνιμα) ")
say_reward("Ένα Λευκό Μαργαριτάρι ")
say_reward("Ένα Μπλε Μαργαριτάρι ")
say("")
affect.add_collect(apply.DEF_GRADE_BONUS,60,60*60* 24*365*60)
pc.give_item2("27992")
pc.give_item2("27993")
set_state(collect_quest_lv60)
end
end

----------------------------------
-- LvL 60 / Βόλοι Πάγου
----------------------------------
state collect_quest_lv60 begin
when login or levelup with pc.level>59 begin
set_state(talk_to_disciple_lv60)
end
end
state talk_to_disciple_lv60 begin
when letter begin
local v = find_npc_by_vnum(20084)
if v != 0 then target.vid("__TARGET__", v, "Biologe")
end
send_letter("Η Αναζήτηση του Βιολόγου ")
end
when button or info begin
say_title("Η Αναζήτηση του Βιολόγου ")
say("")
say("Ο Βιολόγος Χρειάζεται και πάλι την βοήθεια σου! ")
say("Χρειάζεται βοήθεια για να βρεις ")
say("κάποια συγκεκριμένα αντικείμενα. ")
say("Πήγαινε σε αυτόν, ")
say("για να σου πει τι θέλει! ")
say("")
say_reward("Πήγαινε στον Βιολόγο! ")
say("")
end
when __TARGET__.target.click or 20084.chat."Βόλοι Πάγου " begin
target.delete("__TARGET__")
say("Βιολόγος: ")
say("Καλώς τον... ")
say("Η Μελέτη για τα Ενθύμια του Δαίμονα. ")
say("Έχει τελείωσει! ")
say("Τώρα όμως χρειάζομαι να εξετάσω ")
say("κάποια νέα Αντικείμενα! ")
wait()
say("Βιολόγος: ")
say("Θα πήγαινα να τα μαζέψω μόνος μου, ")
say("αλλά έχω πάρα πολλά να κάνω... ")
say("Θα ήταν πολύ ωραία αν μπορούσες ")
say("το κάνεις αυτό για μένα. ")
wait()
say("Βιολόγος: ")
say("Θέλω να μελετήσω τους Βόλους Πάγου ")
say("χρειάζομαι 20 Τεμάχια! ")
say("Ωστόσο οι Βόλοι είναι εύθραυστοι")
say("και μερικοί μπορεί να καταστραφούν ")
say("την ώρα που θα τους μελετώ! ")
say("")
set_state(collect_scoops)
pc.setqf("duration",0)
pc.setqf("collect_count",0)
pc.setqf("drink_drug",0)
end
end
state collect_scoops begin
when letter begin
send_letter("Η Αναζήτηση του Βιολόγου ")
end
when button or info begin
say_title("Βόλοι Πάγου ")
say("")
say("Ο Βιολόγος σου ζήτησε να μαζέψεις, ")
say("20 Βόλους Πάγου μπορείς να τους ")
say("πάρεις από τα Γκόλεμ. Καλή Τύχη! ")
say("")
say_item_vnum(30050)
say_reward("Έχεις μαζέψει "..pc.getqf("collect_count").." Βόλους Πάγου! ")
say("")
end

when 71035.use begin
if get_time() < pc.getqf("duration") then
say_title("Βιολόγος: ")
say("")
say("Δεν έχει έρθει ακόμα ο χρόνος ")
say("για να δώσεις Βόλους Πάγου και δεν ")
say("μπορείς να χρησιμοποιήσεις το Ελιξήριο! ")
return
end
if pc.getqf("drink_drug")==1 then
say_title("Βιολόγος: ")
say("")
say("Έχεις χρησιμοποιήσει ήδη ένα Ελιξήριο! ")
say("")
return
end
if pc.count_item(30050)==0 then
say_title("Βιολόγος: ")
say("")
say("Δεν έχεις Βόλους Πάγου και δεν ")
say("μπορείς να χρησιμοποιήσεις το Ελιξήριο! ")
say("")
return
end
say_title("Βιολόγος: ")
say("")
say("Χρησιμοποιήσες ένα Ελιξήριο οι ")
say("πιθανότητες να είναι καλό ανέβηκαν ")
say("κατά πολυ! ")
pc.remove_item(71035,1)
pc.setqf("drink_drug",1)
end
when 20084.chat."Βόλοι Πάγου " with pc.count_item(30050)>0 begin
if get_time()>pc.getqf("duration") then
say("Ω! Μου έφερες ένα Βόλο Πάγου. ")
say("Ευχαριστώ πολύ!!! ")
say("Πρεπει να το εξέτασω πρωτα ... ")
say("Περίμενε ένα λεπτό! ")
say("")
pc.remove_item("30050", 1)
pc.setqf("duration",get_time() + 60*60*8)
wait()
local pass_percent
if pc.getqf("drink_drug")==0 then
pass_percent=50
else
pass_percent=90
end

local s= number(1,100)
if s<= pass_percent then
local count = pc.getqf("collect_count")+1
if count<20 then
pc.setqf("collect_count", count)
say("Βιολόγος: ")
say("Εξαιρετικά! ")
say("Αυτός ο Βόλος είναι καλός. ")
say("Φέρε μου σε παρακαλώ περισσότερους Βόλους, ")
say("ώστε να μπορέσω να ολοκληρώσω την έρευνά μου. ")
say("")
say_reward("Έχεις μαζέψει "..pc.getqf("collect_count").." Βόλους Πάγου! ")
say("")
pc.setqf("drink_drug",0)
else
say("Βιολόγος: ")
say("Μάζεψες όλους τους Βόλους Πάγου!! ")
say("Τώρα όμως χρειάζομαι ένα Λίθο. ")
say("Τον Λίθο Ψυχής των Πάγων. ")
say("Μπορείς να μου φέρεις αυτόν τον Λίθο; ")
say("")
say_reward("Μπορείς να τον πάρεις στον Βουνό Sohan. ")
pc.setqf("collect_count",0)
pc.setqf("duration",0)
pc.setqf("drink_drug",0)
set_state(collect_aurtumryus)
end
else
say("Βιολόγος: ")
say("Λυπάμαι, αλλά ο Βόλος ")
say("καταστράφηκε κατά τις έρευνες μου. ")
say("Σε παρακαλώ φέρε μου ένα ")
say("άλλο Βόλο Πάγου! ")
pc.setqf("drink_drug",0)
end
else
say("Βιολόγος: ")
say("Λυπάμαι... ")
say("Δεν έχω μελετήσει ακόμα το Βόλο ")
say("που μου έφερες..... ")
say("Σε παρακαλώ έλα σε 8 Ώρες. ")
if pc.count_item(50903) >0 then
say("")
say("Όπως βλέπω έχεις μια Απόδειξη. ")
say("Με αυτήν μπορείς να επηρεάσεις τον ")
say("χρόνο και να μην περιμένεις. ")
say_reward("Θέλεις να επηρρεάσεις τον χρόνο; ")
local s = select("Θέλω να επηρεάσω το Χρόνο ", "Περιμένω Κανονικά... ")
if s == 1 then
say("Ο Χρόνος επηρεάστηκε επιτυχώς! ")
pc.setqf("duration",0)
pc.remove_item(50903,1)
end
end
return;
end
end
end
state collect_aurtumryus begin
when letter begin
send_letter("Λίθος Ψυχής των Πάγων ")
end
when button or info begin
say_title("Λίθος Ψυχής των Πάγων ")
say("")
say("Συγκέντρωσες τους 15 βόλους Πάγου. ")
say("Τώρα λοιπόν πρέπει να βρεις ")
say("τον Λίθος Ψυχής των Πάγων! ")
say("")
say_item_vnum(30223)
say("Λες να περιέχει αυτός ο Λίθος ")
say("την Ψυχή των Πάγων; ")
say("")
end
when 1101.kill or 1102.kill or 1103.kill or 1104.kill or 1105.kill or 1106.kill or 1107.kill begin
if pc.count_item(30223)<1 then
local rand = number(0,99)
if rand<5 then pc.give_item2(30223, 1)
end
end
end
when 20084.chat."Λίθος Ψυχής των Πάγων " begin
if pc.count_item(30223)>0 then
say("Βιολόγος: ")
say("Χάρη στη βοήθειά σας, καταλαβαίνω τώρα ")
say("το μύθο του Λίθου Ψυχής των Πάγων. ")
say("Πολέμησες πολύ σκληρά. ")
say("Πήγαινε στον Baek-Go και αυτός θα ")
say("σε βοηθήσει να αναπτύξεις τις ")
say("Εσωτερικές σου Δυνάμεις! ")
say("")
pc.remove_item(30223,1)
set_state(aurtumryus_reward)
else
say("Βιολόγος: ")
say("Μου έφερες τους 15 Βόλους Πάγου... ")
say("Αλλά τώρα χρειάζομαι να μου φέρεις ")
say("τον Λίθο Ψυχής των Πάγων. ")
say("Αυτόν μπορείς να το πάρεις από τα Τέρατα ")
say("στον Βουνό Sohan. ")
say("Πιστεύω πως είσαι αρκετά δυνατός ")
say("για να τα καταφέρεις! ")
say("")
end
end
end
state aurtumryus_reward begin
when letter begin
send_letter("Πήγαινε στον Baek-Go ")
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("Πήγαινε στον Baek-Go ")
say("Ο Βιολόγος ως ανταμοιβή για τις Πληροφορίες ")
say("που πήρε απά τους Βόλους και τον Λίθο Ψυχής ")
say("σου έδωσε μία συνταγή για ένα μυστικό φίλτρο. ")
say("Πήγαινε στον Baek-Go, και αυτός ")
say("θα δημιουργήσει το Μυστικό Φίλτρο! ")
say("")
end
when __TARGET__.target.click or 20018.chat."Η ανταμοιβή του Βιολόγου " begin
target.delete("__TARGET__")
say_title("Baek-Go:")
say("Χμμ... ")
say("Αυτή είναι η συνταγή,που σου έδωσε; ")
say("Ωρίστε Λοίπον η Ανταμοιβή σου: ")
say("")
say_reward("Έλαβες: ")
say_reward("Αξία Επίθεσης +50 (Μόνιμα) ")
say_reward("Ένα Ματωμένο Μαργαριτάρι ")
say_reward("Ένα Μαύρο Μαργαριτάρι ")
say("")
affect.add_collect(apply.ATT_GRADE_BONUS,50,60*60* 24*365*60)
pc.give_item2("27994")
pc.give_item2("99005")
set_state(collect_quest_lv70)
end
end

----------------------------------
-- LvL 70 / Κλαδί Zelkova
----------------------------------
state collect_quest_lv70 begin
when login or levelup with pc.level>69 begin
set_state(talk_to_disciple_lv70)
end
end
state talk_to_disciple_lv70 begin
when letter begin
local v = find_npc_by_vnum(20084)
if v != 0 then target.vid("__TARGET__", v, "Biologe")
end
send_letter("Η Αναζήτηση του Βιολόγου ")
end
when button or info begin
say_title("Η Αναζήτηση του Βιολόγου ")
say("")
say("Ο Βιολόγος Χρειάζεται και πάλι την βοήθεια σου! ")
say("Χρειάζεται βοήθεια για να βρεις ")
say("κάποια συγκεκριμένα αντικείμενα. ")
say("Πήγαινε σε αυτόν, ")
say("για να σου πει τι θέλει! ")
say("")
say_reward("Πήγαινε στον Βιολόγο! ")
say("")
end
when __TARGET__.target.click or 20084.chat."Κλαδί Zelkova " begin
target.delete("__TARGET__")
say("Βιολόγος: ")
say("Καλώς τον... ")
say("Η Μελέτη για τους Βόλους Πάγου. ")
say("Έχει τελείωσει! ")
say("Τώρα όμως χρειάζομαι να εξετάσω ")
say("κάποια νέα Αντικείμενα! ")
wait()
say("Βιολόγος: ")
say("Θα πήγαινα να τα μαζέψω μόνος μου, ")
say("αλλά έχω πάρα πολλά να κάνω... ")
say("Θα ήταν πολύ ωραία αν μπορούσες ")
say("το κάνεις αυτό για μένα. ")
wait()
say("Βιολόγος: ")
say("Θέλω να μελετήσω τα Κλαδιά Zelkova. ")
say("χρειάζομαι 25 Τεμάχια! ")
say("Ωστόσο τα Κλαδία είναι εύθραυστα ")
say("και μερικά μπορεί να καταστραφούν ")
say("την ώρα που θα τα μελετώ! ")
say("")
set_state(collect_branches)
pc.setqf("duration",0)
pc.setqf("collect_count",0)
pc.setqf("drink_drug",0)
end
end
state collect_branches begin
when letter begin
send_letter("Η Αναζήτηση του Βιολόγου ")
end
when button or info begin
say_title("Κλαδί Zelkova ")
say("")
say("Ο Βιολόγος σου ζήτησε να μαζέψεις, ")
say("25 Κλαδία Zelkova μπορείς ")
say("να τα βρείς στον Κόκκινο Δάσος! ")
say("Καλή Τύχη! ")
say("")
say_item_vnum(30165)
say_reward("Έχεις μαζέψει "..pc.getqf("collect_count").." Κλαδιά Zelkova! ")
say("")
end

when 71035.use begin
if get_time() < pc.getqf("duration") then
say_title("Βιολόγος: ")
say("")
say("Δεν έχει έρθει ακόμα ο χρόνος ")
say("για να δώσεις Κλαδιά Zelkova και δεν ")
say("μπορείς να χρησιμοποιήσεις το Ελιξήριο! ")
return
end
if pc.getqf("drink_drug")==1 then
say_title("Βιολόγος: ")
say("")
say("Έχεις χρησιμοποιήσει ήδη ένα Ελιξήριο! ")
say("")
return
end
if pc.count_item(30165)==0 then
say_title("Βιολόγος: ")
say("")
say("Δεν έχεις Κλαδιά Zelkova και δεν ")
say("μπορείς να χρησιμοποιήσεις το Ελιξήριο! ")
say("")
return
end
say_title("Βιολόγος: ")
say("")
say("Χρησιμοποιήσες ένα Ελιξήριο οι ")
say("πιθανότητες να είναι καλό ανέβηκαν ")
say("κατά πολυ! ")
pc.remove_item(71035,1)
pc.setqf("drink_drug",1)
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
if pc.count_item(30165)<1 then
local rand = number(0,99)
if rand<5 then pc.give_item2(30165, 1)
end
end
end

when 20084.chat."Κλαδί Zelkova" with pc.count_item(30165)>0 begin
if get_time()>pc.getqf("duration") then
say("Ω! Μου έφερες ένα Κλαδί Zelkova. ")
say("Ευχαριστώ πολύ!!! ")
say("Πρεπει να το εξέτασω πρωτα ... ")
say("Περίμενε ένα λεπτό! ")
say("")
pc.remove_item("30165", 1)
pc.setqf("duration",get_time() + 60*60*12)
wait()
local pass_percent
if pc.getqf("drink_drug")==0 then
pass_percent=50
else
pass_percent=90
end

local s= number(1,100)
if s<= pass_percent then
local count = pc.getqf("collect_count")+1
if count<25 then
pc.setqf("collect_count", count)
say("Βιολόγος: ")
say("Εξαιρετικά! ")
say("Αυτό το Κλαδί είναι καλό. ")
say("Φέρε μου σε παρακαλώ περισσότερα Κλαδιά, ")
say("ώστε να μπορέσω να ολοκληρώσω την έρευνά μου. ")
say("")
say_reward("Έχεις μαζέψει "..pc.getqf("collect_count").." Κλαδιά Zelkova! ")
say("")
pc.setqf("drink_drug",0)
else
say("Βιολόγος: ")
say("Συγχαρητήρια!! ")
say("Μάζεψες όλα τα Κλαδιά Zelkova!! ")
say("Τώρα όμως χρειάζομαι ένα Λίθο. ")
say("Τον Λίθος Ψυχής Φαντασμάτων. ")
say("Μπορείς να μου φέρεις αυτόν τον Λίθο; ")
say("")
pc.setqf("collect_count",0)
pc.setqf("duration",0)
pc.setqf("drink_drug",0)
set_state(collect_gyimoks)
end
else
say("Βιολόγος: ")
say("Λυπάμαι, αλλά το Κλαδί ")
say("καταστράφηκε κατά τις έρευνες μου. ")
say("Σε παρακαλώ φέρε μου ένα ")
say("άλλο Κλαδί Zelkova! ")
pc.setqf("drink_drug",0)
end
else
say("Βιολόγος: ")
say("Λυπάμαι... ")
say("Δεν έχω μελετήσει ακόμα το Κλαδί ")
say("που μου έφερες..... ")
say("Σε παρακαλώ έλα σε 12 Ώρες. ")
if pc.count_item(50903) >0 then
say("")
say("Όπως βλέπω έχεις μια Απόδειξη. ")
say("Με αυτήν μπορείς να επηρεάσεις τον ")
say("χρόνο και να μην περιμένεις. ")
say_reward("Θέλεις να επηρρεάσεις τον χρόνο; ")
local s = select("Θέλω να επηρεάσω το Χρόνο ", "Περιμένω Κανονικά... ")
if s == 1 then
say("Ο Χρόνος επηρεάστηκε επιτυχώς! ")
pc.setqf("duration",0)
pc.remove_item(50903,1)
end
end
return;
end
end
end
state collect_gyimoks begin
when letter begin
send_letter("Λίθος Ψυχής Φαντασμάτων ")
end
when button or info begin
say_title("Λίθος Ψυχής Φαντασμάτων ")
say("")
say("Συγκέντρωσες τα 25 Κλαδιά Zelkova. ")
say("Τώρα λοιπόν πρέπει να βρεις ")
say("τον Λίθος Ψυχής Φαντασμάτων! ")
say("")
say_item_vnum(30224)
say("Λες να περιέχει αυτός ο Λίθος ")
say("την Ψυχή των Φαντασμάτων; ")
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
if pc.count_item(30224)<1 then
local rand = number(0,99)
if rand<5 then pc.give_item2(30224, 1)
end
end
end
when 20084.chat."Λίθος Ψυχής Φαντασμάτων " begin
target.delete("__TARGET__")
if pc.count_item(30224)>0 then
say("Βιολόγος: ")
say("Χάρη στη βοήθειά σας, καταλαβαίνω τώρα ")
say("το μύθο του Λίθου Ψυχής Φαντασμάτων. ")
say("Πολέμησες πολύ σκληρά. ")
say("Πήγαινε στον Baek-Go και αυτός θα ")
say("σε βοηθήσει να αναπτύξεις τις ")
say("Εσωτερικές σου Δυνάμεις! ")
say("")
pc.remove_item(30224,1)
set_state(gyimoks_reward)
else
say("Βιολόγος: ")
say("Μου έφερες τα 25 Κλαδιά Zelkova... ")
say("Αλλά τώρα χρειάζομαι να μου φέρεις ")
say("τον Λίθο Ψυχής Φαντασμάτων. ")
say("Αυτόν μπορείς να το πάρεις από τα Τέρατα ")
say("στο Κόκκινο Δάσος. ")
say("Πιστεύω πως είσαι αρκετά δυνατός ")
say("για να τα καταφέρεις! ")
say("")
end
end
end
state gyimoks_reward begin
when letter begin
send_letter("Πήγαινε στον Baek-Go ")
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("Πήγαινε στον Baek-Go ")
say("Ο Βιολόγος ως ανταμοιβή για τις Πληροφορίες ")
say("που πήρε απά τα Κλαδιά και τον Λίθο Ψυχής ")
say("σου έδωσε μία συνταγή για ένα μυστικό φίλτρο. ")
say("Πήγαινε στον Baek-Go, και αυτός ")
say("θα δημιουργήσει το Μυστικό Φίλτρο! ")
say("")
end
when __TARGET__.target.click or 20018.chat."Η ανταμοιβή του Βιολόγου " begin
target.delete("__TARGET__")
say_title("Baek-Go:")
say("Χμμ... ")
say("Αυτή είναι η συνταγή που σου έδωσε; ")
say("Ωρίστε Λοίπον η Ανταμοιβή σου! ")
say("")
say_reward("Έλαβες: ")
say_reward("Ταχύτητα Κίνησης +10% (Μόνιμα) ")
say_reward("Μείωση Ζημιάς +10% (Μόνιμα) ")
say_reward("Ένα Σκούρομπλε Μαργαριτάρι ")
say_reward("Ένα Σκουροκόκκινο Μαργαριτάρι ")
say("")
affect.add_collect(apply.MOV_SPEED,10,60*60*24*365 *60)
affect.add_collect(apply.DEF_GRADE_BONUS,10,60*60* 24*365*60)
pc.give_item2("99006")
pc.give_item2("99007")
set_state(collect_quest_lv80)
end
end

----------------------------------
-- LvL 80 / Πιστοποιητικά Γιγάντων
----------------------------------
state collect_quest_lv80 begin
when login or levelup with pc.level>79 begin
set_state(talk_to_disciple_lv80)
end
end
state talk_to_disciple_lv80 begin
when letter begin
local v = find_npc_by_vnum(20084)
if v != 0 then target.vid("__TARGET__", v, "Biologe")
end
send_letter("Η Αναζήτηση του Βιολόγου ")
end
when button or info begin
say_title("Η Αναζήτηση του Βιολόγου ")
say("")
say("Ο Βιολόγος Χρειάζεται και πάλι την βοήθεια σου! ")
say("Χρειάζεται βοήθεια για να βρεις ")
say("κάποια συγκεκριμένα αντικείμενα. ")
say("Πήγαινε σε αυτόν, ")
say("για να σου πει τι θέλει! ")
say("")
say_reward("Πήγαινε στον Βιολόγο! ")
say("")
end
when __TARGET__.target.click or 20084.chat."Πιστοποιητικά Γιγάντων " begin
target.delete("__TARGET__")
say("Βιολόγος: ")
say("Καλώς τον... ")
say("Η Μελέτη για τα Κλαδιά Zelkova. ")
say("Έχει τελείωσει! ")
say("Τώρα όμως χρειάζομαι να εξετάσω ")
say("κάποια νέα Αντικείμενα! ")
wait()
say("Βιολόγος: ")
say("Θα πήγαινα να τα μαζέψω μόνος μου, ")
say("αλλά έχω πάρα πολλά να κάνω... ")
say("Θα ήταν πολύ ωραία αν μπορούσες ")
say("το κάνεις αυτό για μένα. ")
wait()
say("Βιολόγος: ")
say("Θέλω να μελετήσω τα Πιστοποιητικά Γιγάντων. ")
say("χρειάζομαι 30 Τεμάχια! ")
say("Ωστόσο τα Πιστοποιητικά είναι παλιά ")
say("και μερικά μπορεί να καταστραφούν ")
say("την ώρα που θα τα μελετώ! ")
say("")
set_state(collect_plates)
pc.setqf("duration",0)
pc.setqf("collect_count",0)
pc.setqf("drink_drug",0)
end
end
state collect_plates begin
when letter begin
send_letter("Η Αναζήτηση του Βιολόγου ")
end
when button or info begin
say_title("Πιστοποιητικά Γιγάντων ")
say("")
say("Ο Βιολόγος σου ζήτησε να μαζέψεις, ")
say("30 Πιστοποιητικά Γιγάντων μπορείς ")
say("να τα βρείς στην Γη των Γιγάντων! ")
say("Καλή Τύχη! ")
say("")
say_item_vnum(30166)
say_reward("Έχεις μαζέψει "..pc.getqf("collect_count").." Πιστοποιητικά Γιγάντων! ")
say("")
end

when 71035.use begin
if get_time() < pc.getqf("duration") then
say_title("Βιολόγος: ")
say("")
say("Δεν έχει έρθει ακόμα ο χρόνος ")
say("για να δώσεις Πιστοποιητικά Γιγάντων και δεν ")
say("μπορείς να χρησιμοποιήσεις το Ελιξήριο! ")
return
end
if pc.getqf("drink_drug")==1 then
say_title("Βιολόγος: ")
say("")
say("Έχεις χρησιμοποιήσει ήδη ένα Ελιξήριο! ")
say("")
return
end
if pc.count_item(30166)==0 then
say_title("Βιολόγος: ")
say("")
say("Δεν έχεις Πιστοποιητικά Γιγάντων και δεν ")
say("μπορείς να χρησιμοποιήσεις το Ελιξήριο! ")
say("")
return
end
say_title("Βιολόγος: ")
say("")
say("Χρησιμοποιήσες ένα Ελιξήριο οι ")
say("πιθανότητες να είναι καλό ανέβηκαν ")
say("κατά πολυ! ")
pc.remove_item(71035,1)
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 rand = number(0,99)
if rand<5 then pc.give_item2(30166, 1)
end
end
when 20084.chat."Πιστοποιητικά Γιγάντων " with pc.count_item(30166)>0 begin
if get_time()>pc.getqf("duration") then
say("Ω! Μου έφερες ένα Πιστοποιητικό Γιγάντων. ")
say("Ευχαριστώ πολύ!!! ")
say("Πρεπει να το εξέτασω πρωτα ... ")
say("Περίμενε ένα λεπτό! ")
say("")
pc.remove_item("30166", 1)
pc.setqf("duration",get_time() + 60*60*12)
wait()
local pass_percent
if pc.getqf("drink_drug")==0 then
pass_percent=50
else
pass_percent=90
end

local s= number(1,100)
if s<= pass_percent then
local count = pc.getqf("collect_count")+1
if count<30 then
pc.setqf("collect_count", count)
say("Βιολόγος: ")
say("Εξαιρετικά! ")
say("Αυτό το Πιστοποιητικό είναι καλό. ")
say("Φέρε μου σε παρακαλώ περισσότερα Πιστοποιητικά, ")
say("ώστε να μπορέσω να ολοκληρώσω την έρευνά μου. ")
say("")
say_reward("Έχεις μαζέψει "..pc.getqf("collect_count").." Πιστοποιητικά Γιγάντων! ")
say("")
pc.setqf("drink_drug",0)
else
say("Βιολόγος: ")
say("Συγχαρητήρια!! ")
say("Μάζεψες όλα τα Πιστοποιητικά Γιγάντων!! ")
say("Τώρα όμως χρειάζομαι ένα Λίθο. ")
say("Τον Λίθο Ψυχής των Γιγάντων. ")
say("Μπορείς να μου φέρεις αυτόν τον Λίθο; ")
say("")
say_reward("Μπορείς να τον πάρεις στην Γη των Γιγάντων. ")
pc.setqf("collect_count",0)
pc.setqf("duration",0)
pc.setqf("drink_drug",0)
set_state(collect_tugyis)
end
else
say("Βιολόγος: ")
say("Λυπάμαι, αλλά το Πιστοποιητικό ")
say("καταστράφηκε κατά τις έρευνες μου. ")
say("Σε παρακαλώ φέρε μου ένα ")
say("άλλο Πιστοποιητικό Γιγάντων! ")
pc.setqf("drink_drug",0)
end
else
say("Βιολόγος: ")
say("Δεν έχω μελετήσει ακόμα το Πιστοποιητικό ")
say("που μου έφερες..... ")
say("Σε παρακαλώ έλα σε 12 Ώρες. ")
if pc.count_item(50903) >0 then
say("")
say("Όπως βλέπω έχεις μια Απόδειξη. ")
say("Με αυτήν μπορείς να επηρεάσεις τον ")
say("χρόνο και να μην περιμένεις. ")
say_reward("Θέλεις να επηρρεάσεις τον χρόνο; ")
local s = select("Θέλω να επηρεάσω το Χρόνο ", "Περιμένω Κανονικά... ")
if s == 1 then
say("Ο Χρόνος επηρεάστηκε επιτυχώς! ")
pc.setqf("duration",0)
pc.remove_item(50903,1)
end
end
return;
end
end
end
state collect_tugyis begin
when letter begin
send_letter("Λίθος Ψυχής των Γιγάντων ")
end
when button or info begin
say_title("Λίθος Ψυχής των Γιγάντων ")
say("")
say("Συγκέντρωσες τα 30 Πιστοποιητικά Γιγάντων. ")
say("Τώρα λοιπόν πρέπει να βρεις ")
say("τον Λίθο Ψυχής των Γιγάντων! ")
say("")
say_item_vnum(30225)
say("Λες να περιέχει αυτός ο λίθος ")
say("την Ψυχή των Γιγάντων; ")
say("")
end
when 1401.kill or 1402.kill or 1403.kill or 1601.kill or 1602.kill or 1603.kill begin
if pc.count_item(30224)<1 then
local rand = number(0,99)
if rand<5 then pc.give_item2(30225, 1)
end
end
end
when 20084.chat."Λίθος Ψυχής των Γιγάντων " begin
if pc.count_item(30225)>0 then
say("Βιολόγος: ")
say("Χάρη στη βοήθειά σας, καταλαβαίνω τώρα ")
say("το μύθο του Λίθου Ψυχής των Γιγάντων. ")
say("Πολέμησες πολύ σκληρά. ")
say("Πήγαινε στον Baek-Go και αυτός θα ")
say("σε βοηθήσει να αναπτύξεις τις ")
say("Εσωτερικές σου Δυνάμεις! ")
say("")
pc.remove_item(30225,1)
set_state(tugyis_reward)
else
say("Βιολόγος: ")
say("Μου έφερες τα 30 Πιστοποιητικά Γιγάντων... ")
say("Αλλά τώρα χρειάζομαι να μου φέρεις ")
say("τον Λίθο Ψυχής των Γιγάντων. ")
say("Αυτόν μπορείς να το πάρεις από τα Τέρατα ")
say("στην Γη των Γιγάντων. ")
say("Πιστεύω πως είσαι αρκετά δυνατός ")
say("για να τα καταφέρεις! ")
say("")
end
end
end
state tugyis_reward begin
when letter begin
send_letter("Πήγαινε στον Baek-Go ")
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("Πήγαινε στον Baek-Go ")
say("Ο Βιολόγος ως ανταμοιβή για τις Πληροφορίες ")
say("που πήρε απά τα Πιστοποιητικά και τον Λίθο Ψυχής ")
say("σου έδωσε μία συνταγή για ένα μυστικό φίλτρο. ")
say("Πήγαινε στον Baek-Go, και αυτός ")
say("θα δημιουργήσει το Μυστικό Φίλτρο! ")
say("")
end
when __TARGET__.target.click or 20018.chat."Η ανταμοιβή του Βιολόγου " begin
target.delete("__TARGET__")
say_title("Baek-Go:")
say("Χμμ... ")
say("Αυτή είναι η συνταγή,που σου έδωσε; ")
say("Ωρίστε Λοίπον η Ανταμοιβή σου: ")
say("")
say_reward("Έλαβες: ")
say_reward("Ταχύτητα Επίθεσης +5% (Μόνιμα) ")
say_reward("Αύξηση Ζημιάς +10% (Μόνιμα) ")
say_reward("Μία Σφραγίδα Λευκού Λιονταριού ")
say("")
affect.add_collect(apply.ATT_SPEED,5,60*60*24*365* 60)
affect.add_collect_point(apply.POINT_ATT_BONUS,10, 60*60*24*365*60)
pc.give_item2("71124")
set_state(collect_quest_lv90)
end
end

----------------------------------
-- LvL 90 / Σημειώματα Αρχηγών
----------------------------------
state collect_quest_lv90 begin
when login or levelup with pc.level>79 begin
set_state(talk_to_disciple_lv90)
end
end
state talk_to_disciple_lv90 begin
when letter begin
local v = find_npc_by_vnum(20084)
if v != 0 then target.vid("__TARGET__", v, "Biologe")
end
send_letter("Η Αναζήτηση του Βιολόγου ")
end
when button or info begin
say_title("Η Αναζήτηση του Βιολόγου ")
say("")
say("Ο Βιολόγος Χρειάζεται και πάλι την βοήθεια σου! ")
say("Χρειάζεται βοήθεια για να βρεις ")
say("κάποια συγκεκριμένα αντικείμενα. ")
say("Πήγαινε σε αυτόν, ")
say("για να σου πει τι θέλει! ")
say("")
say_reward("Πήγαινε στον Βιολόγο! ")
say("")
end
when __TARGET__.target.click or 20084.chat."Σημειώματα Αρχηγών " begin
target.delete("__TARGET__")
say("Βιολόγος: ")
say("Καλώς τον... ")
say("Η Μελέτη για τα Πιστοποιητικά Γιγάντων. ")
say("Έχει τελείωσει! ")
say("Τώρα όμως χρειάζομαι να εξετάσω ")
say("κάποια νέα Αντικείμενα! ")
wait()
say("Βιολόγος: ")
say("Θα πήγαινα να τα μαζέψω μόνος μου, ")
say("αλλά έχω πάρα πολλά να κάνω... ")
say("Θα ήταν πολύ ωραία αν μπορούσες ")
say("το κάνεις αυτό για μένα. ")
wait()
say("Βιολόγος: ")
say("Θέλω να μελετήσω τα Σημειώματα Αρχηγών ")
say("χρειάζομαι 50 Τεμάχια! ")
say("Ωστόσο τα Σημειώματα είναι παλιά ")
say("και μερικά μπορεί να καταστραφούν ")
say("την ώρα που θα τα μελετώ! ")
say("")
set_state(collect_notices)
pc.setqf("duration",0)
pc.setqf("collect_count",0)
pc.setqf("drink_drug",0)
end
end
state collect_notices begin
when letter begin
send_letter("Η Αναζήτηση του Βιολόγου ")
end
when button or info begin
say_title("Σημειώματα Αρχηγών ")
say("")
say("Ο Βιολόγος σου ζήτησε να μαζέψεις, ")
say("50 Σημειώματα Αρχηγών μπορείς ")
say("να τα πάρεις από Boss! ")
say("Όπως Αρχηγός Ορκ, Βασίλισσα Αράχνη ")
say("Εννιά Ουρές κτλ. ")
say("Καλή Τύχη! ")
say("")
say_item_vnum(30168)
say_reward("Έχεις μαζέψει "..pc.getqf("collect_count").." Σημειώματα Αρχηγών! ")
say("")
end

when 71035.use begin
if get_time() < pc.getqf("duration") then
say_title("Βιολόγος: ")
say("")
say("Δεν έχει έρθει ακόμα ο χρόνος ")
say("για να δώσεις Σημειώματα Αρχηγών και δεν ")
say("μπορείς να χρησιμοποιήσεις το Ελιξήριο! ")
return
end
if pc.getqf("drink_drug")==1 then
say_title("Βιολόγος: ")
say("")
say("Έχεις χρησιμοποιήσει ήδη ένα Ελιξήριο! ")
say("")
return
end
if pc.count_item(30168)==0 then
say_title("Βιολόγος: ")
say("")
say("Δεν έχεις Σημειώματα Αρχηγών και δεν ")
say("μπορείς να χρησιμοποιήσεις το Ελιξήριο! ")
say("")
return
end
say_title("Βιολόγος: ")
say("")
say("Χρησιμοποιήσες ένα Ελιξήριο οι ")
say("πιθανότητες να είναι καλό ανέβηκαν ")
say("κατά πολυ! ")
pc.remove_item(71035,1)
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 rand = number(0,99)
if rand<5 then pc.give_item2(30168, 1)
end
end
when 20084.chat."Σημειώματα Αρχηγών " with pc.count_item(30168)>0 begin
if get_time()>pc.getqf("duration") then
say("Ω! Μου έφερες ένα Σημείωμα Αρχηγών. ")
say("Ευχαριστώ πολύ!!! ")
say("Πρεπει να το εξέτασω πρωτα ... ")
say("Περίμενε ένα λεπτό! ")
say("")
pc.remove_item("30168", 1)
pc.setqf("duration",get_time() + 60*60*15)
wait()
local pass_percent
if pc.getqf("drink_drug")==0 then
pass_percent=50
else
pass_percent=90
end

local s= number(1,100)
if s<= pass_percent then
local count = pc.getqf("collect_count")+1
if count<50 then
pc.setqf("collect_count", count)
say("Βιολόγος: ")
say("Εξαιρετικά! ")
say("Αυτό το Σημείωμα είναι καλό. ")
say("Φέρε μου σε παρακαλώ περισσότερα Σημειώματα, ")
say("ώστε να μπορέσω να ολοκληρώσω την έρευνά μου. ")
say("")
say_reward("Έχεις μαζέψει "..pc.getqf("collect_count").." Σημειώματα Αρχηγών! ")
say("")
pc.setqf("drink_drug",0)
else
say("Βιολόγος: ")
say("Συγχαρητήρια!! ")
say("Μάζεψες όλα τα Σημειώματα Αρχηγών!! ")
say("Τώρα όμως χρειάζομαι ένα Λίθο. ")
say("Τον Λίθο Ψυχής των Αρχηγών. ")
say("Μπορείς να μου φέρεις αυτόν τον Λίθο; ")
say("")
say_reward("Μπορείς να τον πάρεις από Boss. ")
pc.setqf("collect_count",0)
pc.setqf("duration",0)
pc.setqf("drink_drug",0)
set_state(collect_bossKey)
end
else
say("Βιολόγος: ")
say("Λυπάμαι, αλλά το Σημείωμα ")
say("καταστράφηκε κατά τις έρευνες μου. ")
say("Σε παρακαλώ φέρε μου ένα ")
say("άλλο Σημείωμα Αρχηγών! ")
pc.setqf("drink_drug",0)
end
else
say("Βιολόγος: ")
say("Δεν έχω μελετήσει ακόμα το Σημείωμα ")
say("που μου έφερες..... ")
say("Σε παρακαλώ έλα σε 15 Ώρες. ")
if pc.count_item(50903) >0 then
say("")
say("Όπως βλέπω έχεις μια Απόδειξη. ")
say("Με αυτήν μπορείς να επηρεάσεις τον ")
say("χρόνο και να μην περιμένεις. ")
say_reward("Θέλεις να επηρρεάσεις τον χρόνο; ")
local s = select("Θέλω να επηρεάσω το Χρόνο ", "Περιμένω Κανονικά... ")
if s == 1 then
say("Ο Χρόνος επηρεάστηκε επιτυχώς! ")
pc.setqf("duration",0)
pc.remove_item(50903,1)
end
end
return;
end
end
end
state collect_bossKey begin
when letter begin
send_letter("Λίθος Ψυχής των Αρχηγών ")
end
when button or info begin
say_title("Λίθος Ψυχής των Αρχηγών ")
say("")
say("Συγκέντρωσες τα 50 Σημειώματα Αρχηγών. ")
say("Τώρα λοιπόν πρέπει να βρεις ")
say("τον Λίθο Ψυχής των Αρχηγών! ")
say("")
say_item_vnum(30227)
say("Λες να περιέχει αυτός ο λίθος ")
say("την Ψυχή των Αρχηγών; ")
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
if pc.count_item(30227)<1 then
local rand = number(0,99)
if rand<5 then pc.give_item2(30227, 1)
end
end
end
when 20084.chat."Λίθος Ψυχής των Αρχηγών " begin
if pc.count_item(30227)>0 then
say("Βιολόγος: ")
say("Χάρη στη βοήθειά σας, καταλαβαίνω τώρα ")
say("το μύθο του Λίθου Ψυχής των Αρχηγών. ")
say("Πολέμησες πολύ σκληρά. ")
say("Πήγαινε στον Baek-Go και αυτός θα ")
say("σε βοηθήσει να αναπτύξεις τις ")
say("Εσωτερικές σου Δυνάμεις! ")
say("")
pc.remove_item(30227,1)
set_state(bossKey_reward)
else
say("Βιολόγος: ")
say("Μου έφερες τα 50 Σημειώματα Αρχηγών... ")
say("Αλλά τώρα χρειάζομαι να μου φέρεις ")
say("τον Λίθο Ψυχής των Αρχηγών. ")
say("Αυτόν μπορείς να το πάρεις από Boss ")
say("όπως τα Σημειώματα. ")
say("Πιστεύω πως είσαι αρκετά δυνατός ")
say("για να τα καταφέρεις! ")
say("")
end
end
end
state bossKey_reward begin
when letter begin
send_letter("Πήγαινε στον Baek-Go ")
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("Πήγαινε στον Baek-Go ")
say("Ο Βιολόγος ως ανταμοιβή για τις Πληροφορίες ")
say("που πήρε απά τα Σημειώματα και τον Λίθο Ψυχής ")
say("σου έδωσε μία συνταγή για ένα μυστικό φίλτρο. ")
say("Πήγαινε στον Baek-Go, και αυτός ")
say("θα δημιουργήσει το Μυστικό Φίλτρο! ")
say("")
end
when __TARGET__.target.click or 20018.chat."Η ανταμοιβή του Βιολόγου " begin
target.delete("__TARGET__")
say_title("Baek-Go:")
say("Χμμ... ")
say("Αυτή είναι η συνταγή,που σου έδωσε; ")
say("Ωρίστε Λοίπον η Ανταμοιβή σου: ")
say("")
say_reward("Έλαβες: ")
say_reward("Ταχύτητα Κίνησης +5% (Μόνιμα) ")
say_reward("Ταχύτητα Επίθεσης +5% (Μόνιμα) ")
say_reward("Μείωση Ζημιάς +5% (Μόνιμα) ")
say_reward("Αξία Επίθεσης +50 (Μόνιμα) ")
say_reward("Μία Σφραγίδα Λιονταριού ")
say("")
affect.add_collect(apply.MOV_SPEED, 5, 60*60*24*365*60)
affect.add_collect(apply.ATT_SPEED, 5, 60*60*24*365*60)
affect.add_collect(apply.ATT_GRADE_BONUS,25,60*60* 24*365*60)
affect.add_collect(apply.DEF_GRADE_BONUS,5,60*60*2 4*365*60)
pc.give_item2("71124")
set_state(collect_quest_lv100)
end
end

----------------------------------
-- LvL 100 / Tofusteak
----------------------------------
state collect_quest_lv100 begin
when login or levelup with pc.level>99 begin
set_state(talk_to_disciple_lv100)
end
end
state talk_to_disciple_lv100 begin
when letter begin
local v = find_npc_by_vnum(20084)
if v != 0 then target.vid("__TARGET__", v, "Biologe")
end
send_letter("Το Πάρτυ του Βιολόγου ")
end
when button or info begin
say_title("Το Πάρτυ του Βιολόγου ")
say("")
say("Ο Βιολόγος Χρειάζεται και πάλι την βοήθεια σου! ")
say("Χρειάζεται βοήθεια για να βρεις ")
say("κάποια συγκεκριμένα αντικείμενα. ")
say("Πήγαινε σε αυτόν, ")
say("για να σου πει τι θέλει! ")
say("")
say_reward("Πήγαινε στον Βιολόγο! ")
say("")
end
when __TARGET__.target.click or 20084.chat."Μπριζόλες Τόφου " begin
target.delete("__TARGET__")
say("Βιολόγος: ")
say("Η Μελέτη για τα Σημειώματα Αρχηγών ")
say("έχει τελείωσει! ")
say("Τώρα όμως χρειάζομαι κάποια νέα ")
say("Αντικείμενα, η κοπέλα που έχει ")
say("το Γενικό Κατάστημα έχει Γενέθλια ")
say("και εγώ θα διοργανώσω το πάρτυ! ")
wait()
say("Βιολόγος: ")
say("Θα πήγαινα να τα μαζέψω μόνος μου, ")
say("αλλά έχω πάρα πολλά να κάνω... ")
say("Χρεάζομαι Μπριζόλες Τόφου ")
say("για τους Καλεσμένους σε παρακαλώ ")
say("βοήθησε με και θα σε ανταμείψω! ")
wait()
say("Βιολόγος: ")
say("Θέλω να μαγειρέψω Μπριζόλες Τόφου. ")
say("χρειάζομαι 35 Τεμάχια! ")
say("Ωστόσο οι Μπριζόλες μπορεί να μην ")
say("είναι καλές και μερικές μπορεί να καούν ")
say("την ώρα που θα τις μαγειρεύω! ")
say("")
set_state(collect_tofu)
pc.setqf("duration",0)
pc.setqf("collect_count",0)
pc.setqf("drink_drug",0)
end
end
state collect_tofu begin
when letter begin
send_letter("Το Πάρτυ του Βιολόγου ")
end
when button or info begin
say_title("Μπριζόλες Τόφου ")
say("")
say("Ο Βιολόγος σου ζήτησε να μαζέψεις, ")
say("35 Μπριζόλες Τόφου μπορείς να τα πάρεις ")
say("από τους Εκατό Γίγα Πολεμιστές στην Γη των Γιγάντων! ")
say("Καλή Τύχη! ")
say("")
say_item_vnum(30068)
say_reward("Έχεις μαζέψει "..pc.getqf("collect_count").." Μπριζόλες Τόφου! ")
say("")
end

when 71035.use begin
if get_time() < pc.getqf("duration") then
say_title("Βιολόγος: ")
say("")
say("Δεν έχει έρθει ακόμα ο χρόνος ")
say("για να δώσεις Μπριζόλες Τόφου και δεν ")
say("μπορείς να χρησιμοποιήσεις το Ελιξήριο! ")
return
end
if pc.getqf("drink_drug")==1 then
say_title("Βιολόγος: ")
say("")
say("Έχεις χρησιμοποιήσει ήδη ένα Ελιξήριο! ")
say("")
return
end
if pc.count_item(30166)==0 then
say_title("Βιολόγος: ")
say("")
say("Δεν έχεις Μπριζόλες Τόφου και δεν ")
say("μπορείς να χρησιμοποιήσεις το Ελιξήριο! ")
say("")
return
end
say_title("Βιολόγος: ")
say("")
say("Χρησιμοποιήσες ένα Ελιξήριο οι ")
say("πιθανότητες να είναι καλή ανέβηκαν ")
say("κατά πολυ! ")
pc.remove_item(71035,1)
pc.setqf("drink_drug",1)
end
when 1603.kill begin
local rand = number(0,99)
if rand<5 then pc.give_item2(30068, 1)
end
end
when 20084.chat."Μπιζόλα Τόφου " with pc.count_item(30068)>0 begin
if get_time()>pc.getqf("duration") then
say("Ω! Μου έφερες μία Μπριζόλα Τόφου. ")
say("Ευχαριστώ πολύ!!! ")
say("Πρεπει να την εξέτασω πρωτα ... ")
say("Περίμενε ένα λεπτό! ")
say("")
pc.remove_item("30068", 1)
pc.setqf("duration",get_time() + 60*60*18)
wait()
local pass_percent
if pc.getqf("drink_drug")==0 then
pass_percent=50
else
pass_percent=90
end

local s= number(1,100)
if s<= pass_percent then
local count = pc.getqf("collect_count")+1
if count<35 then
pc.setqf("collect_count", count)
say("Βιολόγος: ")
say("Εξαιρετικά! ")
say("Αυτή η Μπριζόλα είναι καλή. ")
say("Φέρε μου σε παρακαλώ περισσότερες Μπριζόλες, ")
say("ώστε να μπορέσω να ολοκληρώσω το Φαγητό . ")
say("για το Πάρτυ! ")
say_reward("Έχεις μαζέψει "..pc.getqf("collect_count").." Μπριζόλες Τόφου! ")
say("")
pc.setqf("drink_drug",0)
else
say("Βιολόγος: ")
say("Συγχαρητήρια!! ")
say("Μάζεψες όλες τις Μπριζόλες Τόφου!! ")
say("Τώρα όμως χρειάζομαι μία Απόδειξη. ")
say("Την Απόδειξη των Αρχάριων. ")
say("Μπορείς να μου φέρεις αυτήν τον Απόδειξη; ")
say("")
say_reward("Μπορείς να την πάρεις στην Γη των Γιγάντων ")
say_reward("από τον Γίγαντα Χίλιοι Μαχητές. ")
say("")
pc.setqf("collect_count",0)
pc.setqf("duration",0)
pc.setqf("drink_drug",0)
set_state(collect_recipe)
end
else
say("Βιολόγος: ")
say("Λυπάμαι, αλλά η Μπριζόλα ")
say("κάηκε κατά το μαγείρεμα μου. ")
say("Σε παρακαλώ φέρε μου μία ")
say("άλλη Μπριζόλα Τόφου! ")
pc.setqf("drink_drug",0)
end
else
say("Βιολόγος: ")
say("Δεν έχω μαγειρέψει ακόμα τη Μπριζόλα ")
say("που μου έφερες..... ")
say("Σε παρακαλώ έλα σε 18 Ώρες. ")
if pc.count_item(50903) >0 then
say("")
say("Όπως βλέπω έχεις μια Απόδειξη. ")
say("Με αυτήν μπορείς να επηρεάσεις τον ")
say("χρόνο και να μην περιμένεις. ")
say_reward("Θέλεις να επηρρεάσεις τον χρόνο; ")
local s = select("Θέλω να επηρεάσω το Χρόνο ", "Περιμένω Κανονικά... ")
if s == 1 then
say("Ο Χρόνος επηρεάστηκε επιτυχώς! ")
pc.setqf("duration",0)
pc.remove_item(50903,1)
end
end
return;
end
end
end
state collect_recipe begin
when letter begin
send_letter("Απόδειξη Αρχάριων ")
end
when button or info begin
say_title("Απόδειξη Αρχάριων ")
say("")
say("Συγκέντρωσες τις 35 Μπριζόλες Τόφου. ")
say("Τώρα λοιπόν πρέπει να μου ")
say("φέρεις την Απόδειξη των Αρχάριων. ")
say("")
say_item_vnum(50902)
say("Η Απόδειξη Αρχάριων ")
say("περιέχει μία Μυστική Συνταγή! ")
end
when 1403.kill begin
if pc.count_item(50902)<1 then
local rand = number(0,99)
if rand<5 then pc.give_item2(50902, 1)
end
end
end
when 20084.chat."Απόδειξη Αρχάριων " begin
if pc.count_item(50902)>0 then
say("Βιολόγος: ")
say("Χάρη στη βοήθειά σου, τώρα ")
say("μπορώ να ετοιμάσω το φαγητό για το Πάρτυ. ")
say("Πολέμησες πολύ σκληρά. ")
say("Πήγαινε στον Baek-Go και αυτός θα ")
say("σε βοηθήσει να αναπτύξεις τις ")
say("Εσωτερικές σου Δυνάμεις! ")
say("")
pc.remove_item(50902,1)
set_state(recipe_reward)
else
say("Βιολόγος: ")
say("Μου έφερες τις 35 Μπριζόλες Τόφου... ")
say("Αλλά τώρα χρειάζομαι να μου φέρεις ")
say("την Απόδειξη Αρχάριων. ")
say("Αυτήν μπορείς να την πάρεις από τον Γίγαντα ")
say("Χίλιοι Μαχτητές στην Γη των Γιγάντων. ")
say("Πιστεύω πως είσαι αρκετά δυνατός ")
say("για να τα καταφέρεις! ")
say("")
end
end
end
state recipe_reward begin
when letter begin
send_letter("Πήγαινε στον Baek-Go ")
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("Πήγαινε στον Baek-Go ")
say("Ο Βιολόγος ως ανταμοιβή για τη Συνταγή ")
say("που πήρε απά την Απόδειξη Αρχάριων και φαγητό ")
say("που έφτιαξε από τις Μπριζόλες Τόφου. ")
say("Σου έδωσε μία συνταγή για ένα μυστικό φίλτρο. ")
say("Πήγαινε στον Baek-Go, και αυτός ")
say("θα δημιουργήσει το Μυστικό Φίλτρο! ")
say("")
end
when __TARGET__.target.click or 20018.chat."Η ανταμοιβή του Βιολόγου " begin
target.delete("__TARGET__")
say_title("Baek-Go:")
say("Χμμ... ")
say("Αυτή είναι η συνταγή,που σου έδωσε; ")
say("Ωρίστε Λοίπον η Ανταμοιβή σου: ")
say("")
say_reward("Έλαβες: ")
say_reward("Ταχύτητα Κίνησης +5% (Μόνιμα) ")
say_reward("Ταχύτητα Επίθεσης +5% (Μόνιμα) ")
say_reward("Μείωση Ζημιάς +5% (Μόνιμα) ")
say_reward("MAX. HP +5000 (Μόνιμα) ")
say_reward("Λίθο Ουράνιο Τόξου ")
say_reward("Δαχτυλίδι Αξιοπρέπειας ")
say("")
affect.add_collect(apply.MOV_SPEED, 5, 60*60*24*365*60)
affect.add_collect(apply.ATT_SPEED, 5, 60*60*24*365*60)
affect.add_collect(apply.DEF_GRADE_BONUS,10,60*60* 24*365*60)
affect.add_collect(apply.MAX_HP, 5000, 60*60*24*365*60)
pc.give_item2("50512")
pc.give_item2("70025")
complete_quest()
end
end
end
*Sorry for my bad english

Download Quest if you want test it..




MBoyJohnTz is offline  
Old 07/23/2014, 10:22   #2
 
elite*gold: 400
Join Date: Dec 2007
Posts: 6,577
Received Thanks: 6,298
Quote:
Originally Posted by MBoyJohnTz View Post
when someone finish quest after this quest has started again
What do you exactly mean by that..? Could you describe the scenario what the player does and what is wrong with that?

You should use [code]-Tags for code, not [quote], then the indenting will work :)

This belongs to the private server section btw


Mi4uric3 is offline  
Old 07/23/2014, 15:12   #3

 
elite*gold: 150
The Black Market: 147/0/0
Join Date: Jan 2014
Posts: 11,338
Received Thanks: 3,778
Der Thread gehört hier rein:
Und bei Interesse kann ich dir die kompletten Bios Buggfrei auf Deutsch geben.
Shigatu is offline  
Old 07/23/2014, 15:32   #4
 
elite*gold: 400
Join Date: Dec 2007
Posts: 6,577
Received Thanks: 6,298
Quote:
Originally Posted by Syciar View Post
Der Thread gehört hier rein:
Und bei Interesse kann ich dir die kompletten Bios Buggfrei auf Deutsch geben.
Dir ist aber bewusst, dass die Quest auf Griechisch ist und er auf Englisch geschrieben hat..?


Mi4uric3 is offline  
Old 07/24/2014, 17:34   #5


 
elite*gold: 1
Join Date: Aug 2008
Posts: 7,731
Received Thanks: 3,591
Arrow Metin2 Main - Discussions / Questions -> Metin2 PServer - Discussions / Questions

#moved


.aNNdii# is offline  
Closed Thread

Tags
problem quest



« Kann mir das jemand bei bringen? | Verschlüsselten Client entschlüsseln. »

Similar Threads
[Quest-PROBLEM]"Weiter"-Button, Quest schließt sich
02/01/2014 - Metin2 PServer - Discussions / Questions - 8 Replies
Servus Leute, ich habe folgendes Problem, meine "give_starter_set.quest" sieht wie folgt aus: quest give_starter_set begin state start begin when login begin say_title("Willkommen") say("Willkommen auf TEST")
Compile all quest without quest's files list // Kompilieren Sie alle Quest ohne Quest
07/17/2011 - Metin2 PServer Guides & Strategies - 3 Replies
ENGLISH Hello dear community, this is a very simple guide but at the same time useful. How to compile ALL quest in the folder "quest" without the files list in the file "locale_list"? Easy! Open the file "make" and replace the content of the file with this: for f in *.quest; do ./qc $f; done Oki. Now set the 0777 permission to the file. Finally open a SSH client and sign in. Write the command: cd /game_file_folder
[Problem] Problem with server starting - cannot find quest index for PaxHeader
12/22/2009 - Metin2 PServer - Discussions / Questions - 1 Replies
Hello! I have this same problem as here when i'm starting my server: http://www.elitepvpers.com/forum/metin2-pserver-discussions-questions/307143-metin2-serverfiles-quest-index-fehler.html But I didn't know the answer.. how to repair this? Greetings



All times are GMT +1. The time now is 02:14.


Powered by vBulletin®
Copyright ©2000 - 2018, Jelsoft Enterprises Ltd.
SEO by vBSEO ©2011, Crawlability, Inc.

Support | Contact Us | FAQ | Advertising | Privacy Policy | Abuse
Copyright ©2018 elitepvpers All Rights Reserved.