Top Kills 5

----------------------------------------------
-- TOP 5 per class                          //
-- Script by Kusanagy(EmuServers            //
----------------------------------------------

local NPC_ID = 60205
local SMSG_NPC_TEXT_UPDATE = 384
local MAX_GOSSIP_TEXT_OPTIONS = 8

function Player:GossipSetText(text)
    data = CreatePacket(SMSG_NPC_TEXT_UPDATE, 100);
    data:WriteULong(0x7FFFFFFF)
    for i = 1, MAX_GOSSIP_TEXT_OPTIONS do
        data:WriteFloat(0)     -- Probability
        data:WriteString(text) -- Text
        data:WriteString(text) -- Text
        data:WriteULong(0)     -- language
        data:WriteULong(0)     -- emote
        data:WriteULong(0)     -- emote
        data:WriteULong(0)     -- emote
        data:WriteULong(0)     -- emote
        data:WriteULong(0)     -- emote
        data:WriteULong(0)     -- emote
    end
    self:SendPacket(data)
end

local T = {
        [1] = {"|TInterface\\icons\\INV_Sword_27.png:13|t".."Warrior", "660000"},
        [2] = {"|TInterface\\icons\\INV_Hammer_01.png:13|t".."Paladin", "FF0099"},
        [3] = {"|TInterface\\icons\\INV_Weapon_Bow_07.png:13|t".."Hunter", "CC6611"},
        [4] = {"|TInterface\\icons\\INV_ThrowingKnife_04.png:13|t".."Rogue", "CCFF00"},
        [5] = {"|TInterface\\icons\\INV_Staff_30.png:13|t".."Priest", "FFFFFF"},
        [6] = {"|TInterface\\icons\\Spell_Deathknight_ClassIcon.png:13|t".."Death Knight", "4D4D51"},
        [7] = {"|TInterface\\icons\\inv_jewelry_talisman_04.png:13|t".."Shaman", "0000CC"},
        [8] = {"|TInterface\\icons\\INV_Staff_13.png:13|t".."Mage", "33FFFF"},
        [9] = {"|TInterface\\icons\\Spell_Nature_FaerieFire.png:13|t".."Warlock", "660099"},
        [11] = {"|TInterface\\icons\\Ability_Druid_Maul.png:13|t".."Druid", "FF6600"}
};

function clica(event, plr, unit)
        plr:GossipSetText("\nChoose the class : ")

        for k, v in pairs(T) do
                plr:GossipMenuAddItem(0, "[RatingPvP] |cff"..v[2]..v[1], 0, k)
        end

        plr:GossipSendMenu(0x7FFFFFFF, unit)
end

function seleciona(event, plr, unit, arg2, intid)
    if (intid > 0) then
        plr:SendBroadcastMessage("|cff"..T[intid][2]..T[intid][1])
        plr:GossipComplete()
        clica(event, plr, unit)

                local Q = CharDBQuery("SELECT name,totalKills FROM characters WHERE class='"..intid.."' ORDER BY totalKills DESC LIMIT 5")
        repeat
                        local playername = Q:GetString(0);
                        local kills = Q:GetUInt32(1);
                        plr:SendBroadcastMessage("|cFF33CCFFPlayer : |r ".. playername .." ,  |cFF33CCFFwith : |r" .. kills .. " Kills")
        until not Q:NextRow()
    end
end
RegisterCreatureGossipEvent(NPC_ID, 1, clica)
RegisterCreatureGossipEvent(NPC_ID, 2, seleciona)