Veba Görevi Questi

quest veba_gorevi begin   
 state start begin
        when login or levelup with pc.get_level() >= 75 begin
        local v = find_npc_by_vnum(20012)
            if v != 0 then
            target.vid("__TARGET__", v, "Yu-Rang")
            end
            send_letter("Veba")
        end
        
        when button or info begin
        say("Yu-Rang seni çağırıyor. Git ve neler")
        say("olduğunu öğren.")
        end
        
        when 20012.chat."Veba" begin    
        local remaining = pc.getqf("delay") - get_time()
            if pc.getqf("delay") - get_time() > 0 then
            say_title(mob_name(npc.get_race()))
            say("Henüz son görevinin üstünden yeterince zaman")
            say("geçmedi. "..remaining.." saniye daha bekle.")
            return
            end
        say_title(mob_name(npc.get_race()))
        say("Hey! Demek geldin. Yardımına ihtiyacımız var.")
        say("Lusifer ve cellatları şehre geldiklerinde")
        say("her şeyimizi talan ettiler ve şehre bir hastalık")
        say("yayıp gittiler. Bu hastalığın çaresini")
        say("bulamazsak bir kaç gün içinde burada insan")
        say("kalmayacak...")
        wait()
        say_title(mob_name(npc.get_race()))
        say("Bize her gün yeterince ilaç getir ki herkes")
        say("iyileşsin ve şehrimiz hastalıktan kurtulsun.")
        say("Hastalığın ilacını Şeytan Kulesi 9. katta")
        say("bulabilirsin.")
        set_state(info)
        end
    end
    
    state info begin
        when 20012.chat."Veba" begin    
        local remaining = pc.getqf("delay") - get_time()
            if pc.getqf("delay") - get_time() > 0 then
            say_title(mob_name(npc.get_race()))
            say("Hala elimizde yeterince ilaç var.")
            say(remaining.." saniye daha bekle.")
            return
            end
        say_title(mob_name(npc.get_race()))
        say("Bize her gün yeterince ilaç getir ki herkes")
        say("iyileşsin ve şehrimiz hastalıktan kurtulsun.")
        say("Hastalığın ilacını Şeytan Kulesi 9. katta")
        say("bulabilirsin.")
        set_state(kill)
        end
    end
    
    state kill begin
        when letter begin
        send_letter("Veba Tedavisi")
        end
        
        when button or info begin
        say("Şehrin salgından kurtulması için şu ilaca")
        say("ihtiyaç var:")
        say_item_vnum(30115)
        say_reward("Şeytani Canavarlardan alabilirsin.")
        end
        
        when 20012.chat."Veba Tedavisi" begin
        say_title(mob_name(npc.get_race()))
            if pc.count_item(30115) < 1 then
            say("Acele et! Her geçen gün daha fazla insan")
            say("ölüyor!")
            return
            end
        say("Ah! İşte burda. Çok teşekkür ederim. Bunun")
        say("karşılığında yaratıklarla daha kolay")
        say("savaşabilmen için sana yeni bir saç modeli")
        say("yapacağım...")
        say_reward("Hangisini istersin?")
        local s
            if pc.get_job() == 0 and pc.get_sex() == 0 then
            s = select(item_name(74017),item_name(74018),item_name(74019),"Vazgeç ")
                if s == 1 then
                pc.remove_item("30115",1)
                pc.give_item2("74017",1)
                elseif s == 2 then
                pc.remove_item("30115",1)
                pc.give_item2("74018",1)
                elseif s == 3 then
                pc.remove_item("30115",1)
                pc.give_item2("74019",1)
                else
                return
                end
            elseif pc.get_job() == 0 and pc.get_sex() == 1 then
            s = select(item_name(75017),item_name(75018),item_name(75019),"Vazgeç ")
                if s == 1 then
                pc.remove_item("30115",1)
                pc.give_item2("75017",1)
                elseif s == 2 then
                pc.remove_item("30115",1)
                pc.give_item2("75018",1)
                elseif s == 3 then
                pc.remove_item("30115",1)
                pc.give_item2("75019",1)
                else
                return
                end
            elseif pc.get_job() == 1 and pc.get_sex() == 0 then
            s = select(item_name(75217),item_name(75218),item_name(75219),"Vazgeç ")
                if s == 1 then
                pc.remove_item("30115",1)
                pc.give_item2("75217",1)
                elseif s == 2 then
                pc.remove_item("30115",1)
                pc.give_item2("75218",1)
                elseif s == 3 then
                pc.remove_item("30115",1)
                pc.give_item2("75219",1)
                else
                return
                end
            elseif pc.get_job() == 1 and pc.get_sex() == 1 then
            s = select(item_name(74267),item_name(74268),item_name(74269),"Vazgeç ")
                if s == 1 then
                pc.remove_item("30115",1)
                pc.give_item2("74267",1)
                elseif s == 2 then
                pc.remove_item("30115",1)
                pc.give_item2("74268",1)
                elseif s == 3 then
                pc.remove_item("30115",1)
                pc.give_item2("74269",1)
                else
                return
                end
            elseif pc.get_job() == 2 and pc.get_sex() == 0 then
            s = select(item_name(74517),item_name(74518),item_name(74519),"Vazgeç ")
                if s == 1 then
                pc.remove_item("30115",1)
                pc.give_item2("74517",1)
                elseif s == 2 then
                pc.remove_item("30115",1)
                pc.give_item2("74518",1)
                elseif s == 3 then
                pc.remove_item("30115",1)
                pc.give_item2("74519",1)
                else
                return
                end
            elseif pc.get_job() == 2 and pc.get_sex() == 1 then
            s = select(item_name(75417),item_name(75418),item_name(75419),"Vazgeç ")
                if s == 1 then
                pc.remove_item("30115",1)
                pc.give_item2("75417",1)
                elseif s == 2 then
                pc.remove_item("30115",1)
                pc.give_item2("75418",1)
                elseif s == 3 then
                pc.remove_item("30115",1)
                pc.give_item2("75419",1)
                else
                return
                end
            elseif pc.get_job() == 3 and pc.get_sex() == 0 then
            s = select(item_name(75617),item_name(75618),item_name(75619),"Vazgeç ")
                if s == 1 then
                pc.remove_item("30115",1)
                pc.give_item2("75617",1)
                elseif s == 2 then
                pc.remove_item("30115",1)
                pc.give_item2("75618",1)
                elseif s == 3 then
                pc.remove_item("30115",1)
                pc.give_item2("75619",1)
                else
                return
                end
            elseif pc.get_job() == 3 and pc.get_sex() == 1 then
            s = select(item_name(74767),item_name(74768),item_name(74769),"Vazgeç ")
                if s == 1 then
                pc.remove_item("30115",1)
                pc.give_item2("74767",1)
                elseif s == 2 then
                pc.remove_item("30115",1)
                pc.give_item2("74768",1)
                elseif s == 3 then
                pc.remove_item("30115",1)
                pc.give_item2("74769",1)
                else
                return
                end
            end
        say_title(mob_name(npc.get_race()))
        say("Yarın tekrar bu ilaca ihtiyacımız olacak.")
        say("Umarım geç kalmazsın...")
        set_state(info)
        end
        
        when 1071.kill begin
        local n = number(1,100)
            if n == 5 then
            pc.give_item2("30115",1)
            notice(mob_name(20012).."'a dön.")
            end
        end
    end
end