Paylaşım Kelle Avcısı Quest

[KutlukHan]

OYUNCU 20095 KODLU NPCDEN (DEĞİŞTİRİLEBİLİR) KELLE AVCILIĞINI SEÇER.

BELİRLEDİĞİ OYUNCU İSMİNİ GİRER VE ÖDÜL KOYAR.

BELİRLEDİĞİ KİŞİYİ İLK ÖLDÜREN OYUNCUYA KELLE AVCILIĞINI BAŞLATAN OYUNCUDAN ÖDÜL AKTARILIR.
OYUNCU KENDİSİNE ÖDÜL KOYAMAZ VEYA KENDİSİ ÖDÜL ALAMAZ.

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