Quest Kelle Avcısı

quest kelle_avciligi begin
    state start begin
        when 20095.chat."SeumonDizayn - Kelle Avcısı" begin
            say_title("SeumonDizayn - Kelle Avcısı")
            local s = select("Ödül Koy", "Kapat")
            
            if s == 1 then
                say_title("SeumonDizayn - Kelle Avcısı")
                say("Hedef oyuncu ismi:")
                local hedef_isim = string.gsub(input(), "[^A-Za-z0-9]", "")
                local hedef_vid = find_pc_by_name(hedef_isim)
                
                if hedef_vid == 0 then
                    say_reward("Hata: Oyuncu çevrimiçi değil.")
                    return
                elseif hedef_isim == pc.get_name() then
                    say_reward("Hata: Kendi başına ödül koyamazsın.")
                    return
                end

                say_title("SeumonDizayn - Kelle Avcısı")
                say("Ödül miktarı (Min: 10M - Max: 500M):")
                local odul = tonumber(input())

                if odul == nil or odul < 10000000 or odul > 500000000 then
                    say_reward("Hata: Geçersiz miktar.")
                    return
                end

                if pc.get_gold() < odul then
                    say_reward("Hata: Paran yetersiz.")
                    return
                end

                pc.change_gold(-odul)
                game.set_event_flag("kelle_"..hedef_isim, odul)
                game.set_event_flag("kelle_koyan_"..hedef_isim, pc.get_player_id())
                
                notice_all("SeumonDizayn: " .. hedef_isim .. " başına " .. odul .. " Yang ödül kondu!")
                syschat("Ödül başarıyla ilan edildi.")
            end
        end

        when kill begin
            if npc.is_pc() then
                local kurban = pc.get_name()
                local katil_id = pc.get_player_id()
                local kelle_odul = game.get_event_flag("kelle_"..kurban)
                
                if kelle_odul > 0 then
                    local koyan_id = game.get_event_flag("kelle_koyan_"..kurban)
                    
                    if katil_id == koyan_id then
                        syschat("SeumonDizayn: Kendi koyduğun ödülü alamazsın.")
                        return
                    end

                    pc.change_gold(kelle_odul)
                    game.set_event_flag("kelle_"..kurban, 0)
                    game.set_event_flag("kelle_koyan_"..kurban, 0)
                    
                    notice_all("SeumonDizayn: " .. pc.get_name() .. ", " .. kurban .. " adlı oyuncuyu infaz etti ve " .. kelle_odul .. " Yang kazandı!")
                end
            end
        end
    end
end