quest collect_quest_lv215 begin
    state start begin
    end

    state run begin
        when login or levelup with pc.level >= 215 begin
            set_state(information)
        end
    end

    state information begin
        when letter begin
            local v = find_npc_by_vnum(9004)
            if v != 0 then
                target.vid("__TARGET__", v, "Πετράδια Ματαιότητας ")
            end
            send_letter_ex("Πετράδια Ματαιότητας ", "purple,ex", "scroll_open_purple.tga")
        end

        when button or info begin
            say_title("Πετράδια Ματαιότητας ")
            say("")
            say("Η Choo So Young ψάχνει να σε βρεί. ")
            say("Πήγαινε και βρες την. ")
            say("")
        end

        when __TARGET__.target.click or
            9004.chat."Πετράδια Ματαιότητας " begin
            target.delete("__TARGET__")
            say_title("Choo So Young: ")
            say("Γεία σου ταξιδιώτη! ")
            say("Αυτό τον καιρό ψάχνω να βρώ Πετράδια Ματαιότητας ώστε ")
            say("να κάνω το κόσμημα μου, ")
            say("πιστεύω ότι 40 μου φτάνουν. ")
            say("Καλή Επιτυχία ")
            say("")
            set_state(go_to_disciple200005)
            pc.setqf("duration200005",0)
            pc.setqf("collect_count200005",0)
            pc.setqf("drink_drug",0)
        end
    end

    state go_to_disciple200005 begin
        when letter begin
            send_letter_ex("Πετράδια Ματαιότητας ", "purple,ex", "scroll_open_purple.tga")
        end
        when button or info begin
            say_title("Πετράδια Ματαιότητας ")
            say("Η Choo So Young σου ζήτησε να μαζέψεις ")
            say("40 Πετράδια Ματαιότητας για την ευρενά της. ")
            say("")
            say_item_vnum(30268)
            say_reward("Έχεις παραδώσει: "..pc.getqf("collect_count200005").." πετυχημένα ")
            say_reward("Πετράδια Ματαιότητας ")
            say("")
        end

        when 71035.use begin
            if get_time() < pc.getqf("duration200005") then
                say("Δεν μπορείς να πιείς το Ελιξήριο του Ερευνητή ακόμα. ")
                say("")
                return
            end
            if pc.getqf("drink_drug")==1 then
                say("Έχεις ήδη χρησημοποιήσει το Ελιξίριο του Ερευνητή. ")
                say("")

                return
            end
            if pc.count_item(30268)==0 then
                say("Δεν έχεις κανένα Πετράδι της Ματαιότητας για να μελετήσω! ")
                say("Επέστρεψε όταν θα έχεις τουλάχιστον 1. ")
                say("")
                return
            end
            pc.remove_item(71035,1)
            pc.setqf("drink_drug",1)
        end

        when 50527.use begin
            if not pc.can_warp() then
                syschat("Περίμενε 10 δευτερόλεπτα ")
                return
            end
            if pc.count_item(50527) < 1 then
                syschat("Δεν έχεις το αντικείμενο ")
                return
            end
            pc.remove_item(50527, 1)
            pc.setqf("duration200005",0)
            syschat("Μπορείς να δώσεις αντικείμενο στην Choo So Young!")
        end

        when 9004.chat."Πετράδια Ματαιότητας " with pc.count_item(30268) >0 begin
            if pc.getqf("choo_so_young_quest") == 0 then
            if get_time() > pc.getqf("duration200005") then

                say_title("Choo So Young: ")
                say("Μου έφερες ένα! ")
                say("Δώσε μου ένα λεπτό να το εξετάσω, ")
                say("")
                pc.remove_item("30268", 1)
                if pc.is_gm() then
                    pc.setqf("duration200005",0)
                else
                    pc.setqf("duration200005",get_time()+60*60*8) -- 8 wres
                end
                wait()
                local pass_percent
                if pc.getqf("drink_drug")==0 then
                    pass_percent=55
                else
                    pass_percent=80
                end
                pass_percent=100
                local s= number(1,100)
                if s<= pass_percent  then
                   if pc.getqf("collect_count200005")< 39 then
                        local index =pc.getqf("collect_count200005")+1
                        pc.setqf("collect_count200005",index)
                        say_title("Choo So Young: ")
                        say("Αυτό το Πετράδι Ματαιότητας ήταν άψογης ποιότητας! ")
                        say("Απομένουν "..40-pc.getqf("collect_count200005").. " να μου παραδώσεις! ")
                        say("")
                        pc.setqf("drink_drug",0)
                        return
                    end
                    say_title("Choo So Young: ")
                    say("Συγκέντρωσες και τα 40 Πετράδια Ματαιότητας. ")
                    say("Πάνε στον Baek-Go και πάρε την αμοιβή σου. ")
                    say("")
                    pc.setqf("collect_count200005",0)
                    pc.setqf("drink_drug",0)
                    pc.setqf("duration200005",0)
                    set_state(__reward)
                    return
                else
                say_title("Choo So Young: ")
                say("Λυπάμαι πολύ μα αυτό το Πετράδι της Ματαιότητας.. ")
                say("ήταν πολύ κακής ποιότητος, ")
                say("Φέρε μου ένα άλλο! ")
                say("")
                pc.setqf("drink_drug",0)
                return
                end
        else
          say_title("Choo So Young: ")
          say("Λυπάμαι μα δεν έχω ολοκληρώσει την ευρενά μου. ")
          say("Χρειάζομαι 8 ώρες για να ολοκληρώσω την έρευνα. ")
          say("Απομένουν ακόμη "..math.floor((pc.getqf("duration200005")-get_time())/60).." λεπτά. ")
          say("")
          return
        end
        end

    end
end
    state __reward begin
        when letter begin
            send_letter_ex("Αναζήτηση Choo So Young ", "purple,ex", "scroll_open_purple.tga")

            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("Η Αποστολή Ολοκληρώθηκε ")
            say("Την Ανταμοιβή σου θα την λάβεις απο τον ")
            say("Baek-Go ")
            say("")
        end

        when __TARGET__.target.click or 20018.chat."Αμοιβή Choo So Young "  begin
                target.delete("__TARGET__")
                say("Η Αναζήτηση του Choo So Young είχε καρποφόρο ")
                say("Αποτέλεσμα, πλέον μπορώ να σου την φτιάξω ")
                say("Την συνταγή και να την εφαρμόσω πάνω σου. ")
                say("Διάλεξε πιο bonus θέλεις να σου δώσω μόνιμα: ")
                local s = select('Ενέργεια Ζωής +40','Ευφυΐα +40','Δύναμη +40','Ευκινησία +40','Ενέργεια Ζωής +15 & Δύναμη +15','Ευφυΐα +15 & Δύναμη +15','Ευφυΐα +15 & Ευκινησία +15','Δύναμη +15 & Ευκινησία +15')
                local bonuses = {
                    [1] = {3,40,"Ενέργεια Ζωής "},
                    [2] = {4,40,"Ευφυΐα "},
                    [3] = {5,40,"Δύναμη "},
                    [4] = {6,40,"Ευκινησία "},
                    [5] = {11,20,"Ενέργεια Ζωής & Δύναμη "},
                    [6] = {11,20,"Ευφυΐα & Δύναμη "},
                    [7] = {11,20,"Ευφυΐα & Ευκινησία "},
                    [8] = {11,20,"Δύναμη & Ευκινησία "},
                }
                affect.add(567, bonuses[s][1], bonuses[s][2], bonuses[s][3], bonuses[s][4], bonuses[s][5], bonuses[s][6], bonuses[s][7], bonuses[s][8], 60*60*24*365*2)
                say_reward("Έλαβες το μπόνους που διάλεξες για πάντα. ")
                pc.setqf("collect_quest_lv215",1)
                clear_letter()
                set_quest_state("collect_quest_lv1240", "run");
                set_state(__complete)
                end
        end
        state __giveup__ begin
                when 9004.chat."Μία άλλη πρόοδος." begin
                        say_title("Choo So Young:")
                        say("Έχω κάποια πιο απαιτητική αποστολή ")
                        say("για πιο μεγάλο επίπεδο.")
                        set_state(start)
             end
         end
        state __complete begin
        end
    end