quest madenal begin
    state start begin
		when 20003.chat."Elmas Almak İstiyorum." begin
            say_title(mob_name(20003))
            say("Elmas almak istiyorsan bana 100 adet")
            say("Elmas Taşı vermen gerekmektedir.Almak için")
            say("100 Adet Elmas Taşını üstüme sürüklemelisin.")  
            say_item_vnum(50601)
        end
        when 20003.take with item.vnum == 50601 begin
            say_title(mob_name(20003))
            say("100 Elmas Taşı karşılığında Elmas almak istermisin ?")
            say_item_vnum(50601,100)      
            say_item_vnum(50621)
            local ss = select("Evet","Hayır")  
                if ss == 1 then
      
            if pc . count_item ( 50601 ) < 100 then
            say_title(mob_name(20003))
            say ("Envanterinde yeterli Elmas Taşı yokken.")
            say ("Malesef veremem.")      
            return
        end
      
            pc.remove_item("50601",100)
            pc.give_item2("50621",1)
        end
                if ss == 2 then  
            say_title(mob_name(20003))
            say("Tamam , sen bilirsin.")
            say("Fikrini değiştirirsen bana uğra!")
            return
            end
        end
		when 20003.chat."Kehribar Almak İstiyorum." begin
            say_title(mob_name(20003))
            say("Kehribar almak istiyorsan bana 100 adet")
            say("Kehribar Taşı vermen gerekmektedir.Almak için")
            say("100 Adet Kehribar Taşını üstüme sürüklemelisin.")  
            say_item_vnum(50602)
        end
        when 20003.take with item.vnum == 50602 begin
            say_title(mob_name(20003))
            say("100 Kehribar Taşı karşılığında Kehribar almak istermisin ?")
            say_item_vnum(50602,100)      
            say_item_vnum(50622)
            local ss = select("Evet","Hayır")  
                if ss == 1 then
      
            if pc . count_item ( 50602 ) < 100 then
            say_title(mob_name(20003))
            say ("Envanterinde yeterli Kehribar Taşı yokken.")
            say ("Malesef veremem.")      
            return
        end
      
            pc.remove_item("50602",100)
            pc.give_item2("50622",1)
        end
                if ss == 2 then  
            say_title(mob_name(20003))
            say("Tamam , sen bilirsin.")
            say("Fikrini değiştirirsen bana uğra!")
            return
            end
        end
		when 20003.chat."Fosil Ağaç Almak İstiyorum." begin
            say_title(mob_name(20003))
            say("Fosil Ağaç almak istiyorsan bana 100 adet")
            say("Fosil Ağaç Gövdesi vermen gerekmektedir.Almak için")
            say("100 Adet Fosil Ağaç Gövdesini üstüme sürüklemelisin.")  
            say_item_vnum(50603)
        end
        when 20003.take with item.vnum == 50603 begin
            say_title(mob_name(20003))
            say("100 Fosil Ağaç Gövdesi karşılığında Fosil Ağaç almak istermisin ?")
            say_item_vnum(50603,100)      
            say_item_vnum(50623)
            local ss = select("Evet","Hayır")  
                if ss == 1 then
      
            if pc . count_item ( 50603 ) < 100 then
            say_title(mob_name(20003))
            say ("Envanterinde yeterli Fosil Ağaç Gövdesi yokken.")
            say ("Malesef veremem.")      
            return
        end
      
            pc.remove_item("50603",100)
            pc.give_item2("50623",1)
        end
                if ss == 2 then  
            say_title(mob_name(20003))
            say("Tamam , sen bilirsin.")
            say("Fikrini değiştirirsen bana uğra!")
            return
            end
        end
		when 20003.chat."Bakır Almak İstiyorum." begin
            say_title(mob_name(20003))
            say("Bakır almak istiyorsan bana 100 adet")
            say("Bakır Cevheri vermen gerekmektedir.Almak için")
            say("100 Adet Bakır Cevheri üstüme sürüklemelisin.")  
            say_item_vnum(50604)
        end
        when 20003.take with item.vnum == 50604 begin
            say_title(mob_name(20003))
            say("100 Bakır Cevheri karşılığında Bakır almak istermisin ?")
            say_item_vnum(50604,100)      
            say_item_vnum(50624)
            local ss = select("Evet","Hayır")  
                if ss == 1 then
      
            if pc . count_item ( 50604 ) < 100 then
            say_title(mob_name(20003))
            say ("Envanterinde yeterli Bakır Cevheri yokken.")
            say ("Malesef veremem.")      
            return
        end
      
            pc.remove_item("50604",100)
            pc.give_item2("50624",1)
        end
                if ss == 2 then  
            say_title(mob_name(20003))
            say("Tamam , sen bilirsin.")
            say("Fikrini değiştirirsen bana uğra!")
            return
            end
        end
		when 20003.chat."Gümüş Almak İstiyorum." begin
            say_title(mob_name(20003))
            say("Gümüş almak istiyorsan bana 100 adet")
            say("Gümüş Cevheri vermen gerekmektedir.Almak için")
            say("100 Adet Gümüş Cevheri üstüme sürüklemelisin.")  
            say_item_vnum(50605)
        end
        when 20003.take with item.vnum == 50605 begin
            say_title(mob_name(20003))
            say("100 Gümüş Cevheri karşılığında Gümüş almak istermisin ?")
            say_item_vnum(50605,100)      
            say_item_vnum(50625)
            local ss = select("Evet","Hayır")  
                if ss == 1 then
      
            if pc . count_item ( 50605 ) < 100 then
            say_title(mob_name(20003))
            say ("Envanterinde yeterli Gümüş Cevheri yokken.")
            say ("Malesef veremem.")      
            return
        end
      
            pc.remove_item("50605",100)
            pc.give_item2("50625",1)
        end
                if ss == 2 then  
            say_title(mob_name(20003))
            say("Tamam , sen bilirsin.")
            say("Fikrini değiştirirsen bana uğra!")
            return
            end
        end
		when 20003.chat."Altın Almak İstiyorum." begin
            say_title(mob_name(20003))
            say("Altın almak istiyorsan bana 100 adet")
            say("Altın Cevheri vermen gerekmektedir.Almak için")
            say("100 Adet Altın Cevheri üstüme sürüklemelisin.")  
            say_item_vnum(50606)
        end
        when 20003.take with item.vnum == 50606 begin
            say_title(mob_name(20003))
            say("100 Altın Cevheri karşılığında Altın almak istermisin ?")
            say_item_vnum(50606,100)      
            say_item_vnum(50626)
            local ss = select("Evet","Hayır")  
                if ss == 1 then
      
            if pc . count_item ( 50606 ) < 100 then
            say_title(mob_name(20003))
            say ("Envanterinde yeterli Altın Cevheri yokken.")
            say ("Malesef veremem.")      
            return
        end
      
            pc.remove_item("50606",100)
            pc.give_item2("50626",1)
        end
                if ss == 2 then  
            say_title(mob_name(20003))
            say("Tamam , sen bilirsin.")
            say("Fikrini değiştirirsen bana uğra!")
            return
            end
        end
		when 20003.chat."Yeşim Taşı Almak İstiyorum." begin
            say_title(mob_name(20003))
            say("Yeşim Taşı almak istiyorsan bana 100 adet")
            say("Yeşim Taşı Cevheri vermen gerekmektedir.Almak için")
            say("100 Adet Yeşim Taşı Cevheri üstüme sürüklemelisin.")  
            say_item_vnum(50607)
        end
        when 20003.take with item.vnum == 50607 begin
            say_title(mob_name(20003))
            say("100 Yeşim Taşı Cevheri karşılığında Yeşim Taşı almak istermisin ?")
            say_item_vnum(50607,100)      
            say_item_vnum(50627)
            local ss = select("Evet","Hayır")  
                if ss == 1 then
      
            if pc . count_item ( 50607 ) < 100 then
            say_title(mob_name(20003))
            say ("Envanterinde yeterli Yeşim Taşı Cevheri yokken.")
            say ("Malesef veremem.")      
            return
        end
      
            pc.remove_item("50607",100)
            pc.give_item2("50627",1)
        end
                if ss == 2 then  
            say_title(mob_name(20003))
            say("Tamam , sen bilirsin.")
            say("Fikrini değiştirirsen bana uğra!")
            return
            end
        end
		when 20003.chat."Abanoz Almak İstiyorum." begin
            say_title(mob_name(20003))
            say("Abanoz almak istiyorsan bana 100 adet")
            say("Abanoz Cevheri vermen gerekmektedir.Almak için")
            say("100 Adet Abanoz Cevheri üstüme sürüklemelisin.")  
            say_item_vnum(50608)
        end
        when 20003.take with item.vnum == 50608 begin
            say_title(mob_name(20003))
            say("100 Abanoz Cevheri karşılığında Abanoz almak istermisin ?")
            say_item_vnum(50608,100)      
            say_item_vnum(50628)
            local ss = select("Evet","Hayır")  
                if ss == 1 then
      
            if pc . count_item ( 50608 ) < 100 then
            say_title(mob_name(20003))
            say ("Envanterinde yeterli Abanoz Cevheri yokken.")
            say ("Malesef veremem.")      
            return
        end
      
            pc.remove_item("50608",100)
            pc.give_item2("50628",1)
        end
                if ss == 2 then  
            say_title(mob_name(20003))
            say("Tamam , sen bilirsin.")
            say("Fikrini değiştirirsen bana uğra!")
            return
            end
        end
		when 20003.chat."İnci Almak İstiyorum." begin
            say_title(mob_name(20003))
            say("İnci almak istiyorsan bana 100 adet")
            say("İnci Tanesi vermen gerekmektedir.Almak için")
            say("100 Adet İnci Tanesi üstüme sürüklemelisin.")  
            say_item_vnum(50609)
        end
        when 20003.take with item.vnum == 50609 begin
            say_title(mob_name(20003))
            say("100 İnci Tanesi karşılığında İnci almak istermisin ?")
            say_item_vnum(50609,100)      
            say_item_vnum(50629)
            local ss = select("Evet","Hayır")  
                if ss == 1 then
      
            if pc . count_item ( 50609 ) < 100 then
            say_title(mob_name(20003))
            say ("Envanterinde yeterli İnci Tanesi yokken.")
            say ("Malesef veremem.")      
            return
        end
      
            pc.remove_item("50609",100)
            pc.give_item2("50629",1)
        end
                if ss == 2 then  
            say_title(mob_name(20003))
            say("Tamam , sen bilirsin.")
            say("Fikrini değiştirirsen bana uğra!")
            return
            end
        end
		when 20003.chat."Beyaz Altın Almak İstiyorum." begin
            say_title(mob_name(20003))
            say("Beyaz Altın almak istiyorsan bana 100 adet")
            say("Beyaz Altın Cevheri vermen gerekmektedir.Almak için")
            say("100 Adet Beyaz Altın Cevheri üstüme sürüklemelisin.")  
            say_item_vnum(50610)
        end
        when 20003.take with item.vnum == 50610 begin
            say_title(mob_name(20003))
            say("100 Beyaz Altın Cevheri karşılığında Beyaz Altın almak istermisin ?")
            say_item_vnum(50610,100)      
            say_item_vnum(50630)
            local ss = select("Evet","Hayır")  
                if ss == 1 then
      
            if pc . count_item ( 50610 ) < 100 then
            say_title(mob_name(20003))
            say ("Envanterinde yeterli Beyaz Altın Cevheri yokken.")
            say ("Malesef veremem.")      
            return
        end
      
            pc.remove_item("50610",100)
            pc.give_item2("50630",1)
        end
                if ss == 2 then  
            say_title(mob_name(20003))
            say("Tamam , sen bilirsin.")
            say("Fikrini değiştirirsen bana uğra!")
            return
            end
        end
		when 20003.chat."Kristal Almak İstiyorum." begin
            say_title(mob_name(20003))
            say("Kristal almak istiyorsan bana 100 adet")
            say("Kristal Cevheri vermen gerekmektedir.Almak için")
            say("100 Adet Kristal Cevheri üstüme sürüklemelisin.")  
            say_item_vnum(50611)
        end
        when 20003.take with item.vnum == 50611 begin
            say_title(mob_name(20003))
            say("100 Kristal Cevheri karşılığında Kristal almak istermisin ?")
            say_item_vnum(50611,100)      
            say_item_vnum(50631)
            local ss = select("Evet","Hayır")  
                if ss == 1 then
      
            if pc . count_item ( 50611 ) < 100 then
            say_title(mob_name(20003))
            say ("Envanterinde yeterli Kristal Cevheri yokken.")
            say ("Malesef veremem.")      
            return
        end
      
            pc.remove_item("50611",100)
            pc.give_item2("50631",1)
        end
                if ss == 2 then  
            say_title(mob_name(20003))
            say("Tamam , sen bilirsin.")
            say("Fikrini değiştirirsen bana uğra!")
            return
            end
        end
		when 20003.chat."Ametist Almak İstiyorum." begin
            say_title(mob_name(20003))
            say("Ametist almak istiyorsan bana 100 adet")
            say("Ametist Cevheri vermen gerekmektedir.Almak için")
            say("100 Adet Ametist Cevheri üstüme sürüklemelisin.")  
            say_item_vnum(50612)
        end
        when 20003.take with item.vnum == 50612 begin
            say_title(mob_name(20003))
            say("100 Ametist Cevheri karşılığında Ametist almak istermisin ?")
            say_item_vnum(50612,100)      
            say_item_vnum(50632)
            local ss = select("Evet","Hayır")  
                if ss == 1 then
      
            if pc . count_item ( 50612 ) < 100 then
            say_title(mob_name(20003))
            say ("Envanterinde yeterli Ametist Cevheri yokken.")
            say ("Malesef veremem.")      
            return
        end
      
            pc.remove_item("50612",100)
            pc.give_item2("50632",1)
        end
                if ss == 2 then  
            say_title(mob_name(20003))
            say("Tamam , sen bilirsin.")
            say("Fikrini değiştirirsen bana uğra!")
            return
            end
        end
		when 20003.chat."Cennetin Gözyaşı Almak İstiyorum." begin
            say_title(mob_name(20003))
            say("Cennetin Gözyaşı almak istiyorsan bana 100 adet")
            say("Cennetin Gözyaşı Cevheri vermen gerekmektedir.Almak için")
            say("100 Adet Cennetin Gözyaşı Cevheri üstüme sürüklemelisin.")  
            say_item_vnum(50613)
        end
        when 20003.take with item.vnum == 50613 begin
            say_title(mob_name(20003))
            say("100 Cennetin Gözyaşı Cevheri karşılığında Cennetin Gözyaşı almak istermisin ?")
            say_item_vnum(50613,100)      
            say_item_vnum(50633)
            local ss = select("Evet","Hayır")  
                if ss == 1 then
      
            if pc . count_item ( 50613 ) < 100 then
            say_title(mob_name(20003))
            say ("Envanterinde yeterli Cennetin Gözyaşı Cevheri yokken.")
            say ("Malesef veremem.")      
            return
        end
      
            pc.remove_item("50613",100)
            pc.give_item2("50633",1)
        end
                if ss == 2 then  
            say_title(mob_name(20003))
            say("Tamam , sen bilirsin.")
            say("Fikrini değiştirirsen bana uğra!")
            return
            end
        end
    end     
end