-- Creer Et Traduit par Arsatisse / Hipili
-- Pour Zone-Emu !!! Longue vie au Lua.

local NPCID = 941285 -- ID du PNJ
-- si vous voulez echangez contre des items
local NEEDS_ITEM = nil -- nil = Non // mettez " true " si vous voulez.
local ITEM_ID = nil -- l'ID de l'item que vous voulez echangez contre les titres
local ITEM_AMOUNT = nil -- le nombre d'item
-- Si vous voulez echangez contre de l'or
local NEEDS_GOLD = true -- mettre true si vous voulez.
local GOLD_AMOUNT = 1500000 -- mettre le nombre de piece de cuivre . 1 po = 10000

-- NE RIEN MODIFIER APRES CECI

titles = {
{ "Private", 1},
{ "Caporal", 2},
{ "Sergent", 3},
{ "Sergent Chef", 4},
{ "Sergent-Major", 5},
{ "Chevalier", 6},
{ "Chevalier-lieutenant", 7},
{ "Chevalier-capitaine", 8},
{ "Chevalier-Champion", 9},
{ "Lieutenant Commandant", 10},
{ "Commandant", 11},
{ "Mar\195\169chal", 12},
{ "Grand mar\195\169chal", 13},
{ "Grand Mar\195\169chal", 14},
{ "\195\169claireur", 15},
{ "Grunt", 16},
{ "Sergent", 17},
{ "Sergent-chef", 18},
{ "Adjudant", 19},
{ "Garde de pierre", 20},
{ "Garde de Sang", 21},
{ "Legionnaire", 22},
{ "Centurion", 23},
{ "Champion", 24},
{ "Lieutenant-General", 25},
{ "G\195\169n\195\169ral", 26},
{ "Seigneur de guerre", 27},
{ "Grand Seigneur de guerre", 28},
{ "Gladiateur", 29},
{ "Duelliste", 30},
{ "Rival", 31},
{ "Competiteur", 32},
{ "Seigneur scarabee", 33},
{ "Conquerant", 34},
{ "Justicier", 35},
{ "Champion de Naaru", 36},
{ "Gladiateur impitoyable", 37},
{ "du Soleil bris\195\169", 38},
{ "Main d'A'dal", 39},
{ "Gladiateur vengeur", 40},
{ "Maitre de guerre", 41},
{ "Chercheur", 42},
{ "Ancien", 43},
{ "Gardien des flammes", 44},
{ "Garde-flammes", 45},
{ "\195\169xalte", 46},
{ "l'explorateur", 47},
{ "le diplomate", 48},
{ "Gladiateur brutal", 49},
{ "Maitre de l'arene", 50},
{ "loup de mer", 51},
{ "Chef", 52},
{ "le supreme", 53},
{ "des dix tempetes", 54},
{ "du r195\170ve d'emeraude", 55},
{ "Gladiateur", 56},
{ "Proph\195\169te", 57},
{ "le mal\195\169fique", 58},
{ "traqueur", 59},
{ "de la lame d'aubene", 60}, --
{ "Archimage", 61},
{ "Porteguerre", 62},
{ "Assassin", 63},
{ "Grand maitre des Alchimistes", 64},
{ "Grand maitre forgerons", 65},
{ "Cordon bleu", 66},
{ "Grand maitre des enchanteurs", 67},
{ "Grand maitre des Ing\195\169nieurs", 68},
{ "Docteur", 69},
{ "Grand maitre p\195\170cheur", 70},
{ "Grand maitre herboriste", 71},
{ "Grand maitre scribe", 72},
{ "Grand maitre joaillier", 73},
{ "Grand maitre travailleur du cuir", 74},
{ "Grand maitre mineur", 75},
{ "Grand maitre depeceur", 76},
{ "Grand maitre Tailleur", 77},
{ "de Quel Tha'las", 78},
{ "de Argus", 79},
{ "de Khas Modan", 80},
{ "de Gnomeregan", 81},
{ "au coeur de lion", 82},
{ "Champion d'Elune", 83},
{ "H\195\169ro d'Orgrimmar", 84},
{ "le coureur des plaines", 85},
{ "Des Sombrelances", 86},
{ "le reprouv\195\169", 87},
{ "le cherche-magie", 88},
{ "Vainqueur du cr\195\169puscule", 89},
{ "conqu\195\169rant de Naxxramas", 90},
{ "H\195\169ro de Northrend", 91},
{ "the Hallowed", 92},
{ "Maitre des traditions", 93},
{ "de l'Alliance", 94},
{ "de la Horde", 95},
{ "l'infaillible vainqueur", 96},
{ "Champion des terres gel\195\169es", 97},
{ "Ambassadeur", 98},
{ "Le champion d'argent", 99},
{ "Gardien de C\195\169narius", 100},
{ "maitre brasseur", 101},
{ "le joyeux", 102},
{ "au coeur d'artichaut", 103},
{ "Marraine", 104},
{ "Parrain", 105},
{ "tueur de l'obsidien", 106},
{ "du cr\195\169puscule", 107},
{ "l'Immortel", 108},
{ "l'increvable", 109},
{ "Jenkins", 110},
{ "Amiral de la voile sanglante", 111},
{ "le grand malade", 112},
{ "de l'Exodar", 113},
{ "de Darnassus", 114},
{ "de ForgeFer", 115},
{ "de hurlevent", 116},
{ "de Orgrimmar", 117},
{ "de Sen'jin", 118},
{ "de Lune-d'argent", 119},
{ "de Piton du tonerre", 120},
{ "de Fossoyeuse", 121},
{ "le Noble", 122},
{ "Crois\195\169 ", 123},
{ "faucheur de la Mort", 124},
{ "le d\195\169fenseur celeste", 125},
{ "Conqu\195\169rant d'Ulduar", 126},
{ "Champion d'Ulduar", 127},
{ "Vainqueur", 128},
{ "Mande-etoile", 129},
{ "le marcheur astral", 130},
{ "heraut des titans", 131},
{ "Gladiateur furieux ", 132},
{ "le p\195\169lerin", 133},
{ "Gladiateur implacable ", 134},
{ "Grand crois\195\169e ", 135},
{ "Le d\195\169fenseur d'argent", 136},
{ "l'assidu", 137},
{ "lumi\195\168 re de l'aube", 138},
{ "tourment du roi dechu", 139},
{ "le r\195\169gicide", 140},
{ "du Verdict des cendres", 141},
{ "Gladiateur courrouce", 142},
}

title = {}

function title.OnGossip(Unit, event, player)
    if(player:IsInCombat() == true) then
        player:SendAreaTriggerMessage("Vous êtes en combat !")
    else
        Unit:GossipCreateMenu(100, player, 0)
        for i = 1, 30 do
            Unit:GossipMenuAddItem(4, titles[i][1], titles[i][2], 0)
        end
        Unit:GossipMenuAddItem(0, "Page suivante", 9999, 0)
        Unit:GossipSendMenu(player)
    end
end

function title.OnGossipSelect(Unit, event, player, id, intid, Code, pMisc)
    if (intid >= 0) and (intid <= 142) and (NEEDS_ITEM == nil) and (NEEDS_GOLD == nil) then
        player:SetKnownTitle(titles[intid][2])
        player:GossipComplete()
    elseif (intid >= 0) and (intid <= 142) and (NEEDS_ITEM ~= nil) and (player:GetItemCount(ITEM_ID) >= ITEM_AMOUNT) then
    player:SetKnownTitle(titles[intid][2])
    player:GossipComplete()
    player:RemoveItem(ITEM_ID, ITEM_AMOUNT)
    elseif (intid >= 0) and (intid <= 142) and (NEEDS_ITEM ~= nil) and (player:GetItemCount(ITEM_ID) < ITEM_AMOUNT) then
    player:SendAreaTriggerMessage("Vous avez besoin de plus d'objet.")
    player:GossipComplete()
    elseif (intid >= 0) and (intid <= 142) and (NEEDS_ITEM == nil) and (NEEDS_GOLD ~= nil) and (player:GetCoinage() >= GOLD_AMOUNT) then
    player:DealGoldCost(GOLD_AMOUNT)
    player:SetKnownTitle(titles[intid][2])
    player:GossipComplete()
    elseif (intid >= 0) and (intid <= 142) and (NEEDS_ITEM == nil) and (NEEDS_GOLD ~= nil) and (player:GetCoinage() < GOLD_AMOUNT) then
    player:SendAreaTriggerMessage("Vous avez besoin de plus d'or")
    player:GossipComplete()
    end

    if (intid == 9999) then
        Unit:GossipCreateMenu(100, player, 0)
        for i = 31, 60 do
            Unit:GossipMenuAddItem(4, titles[i][1], titles[i][2], 0)
        end
        Unit:GossipMenuAddItem(0, "Next page", 99999, 0)
        Unit:GossipMenuAddItem(0, "Previous page", 999111, 0)
        Unit:GossipSendMenu(player)
    end

    if (intid == 99999) then
    Unit:GossipCreateMenu(100, player, 0)
        for i = 61, 90 do
            Unit:GossipMenuAddItem(4, titles[i][1], titles[i][2], 0)
        end
        Unit:GossipMenuAddItem(0, "Page suivante", 999999, 0)
        Unit:GossipMenuAddItem(0, "Page precedante", 9999, 0)
        Unit:GossipSendMenu(player)
    end

    if (intid == 999999) then
    Unit:GossipCreateMenu(100, player, 0)
        for i = 91, 112 do
            Unit:GossipMenuAddItem(4, titles[i][1], titles[i][2], 0)
        end
        Unit:GossipMenuAddItem(0, "Page suivante", 99998, 0)
        Unit:GossipMenuAddItem(0, "Page precedante", 99999, 0)
        Unit:GossipSendMenu(player)
    end

    if (intid == 99998) then
    Unit:GossipCreateMenu(100, player, 0)
        for i = 112, 142 do
            Unit:GossipMenuAddItem(4, titles[i][1], titles[i][2], 0)
        end
        Unit:GossipMenuAddItem(0, "Page precedante", 999999, 0)
        Unit:GossipSendMenu(player)
    end

    if (intid == 999111) then
    Unit:GossipCreateMenu(100, player, 0)
        for i = 1, 30 do
            Unit:GossipMenuAddItem(4, titles[i][1], titles[i][2], 0)
        end
        Unit:GossipMenuAddItem(0, "Page suivante", 9999, 0)
        Unit:GossipSendMenu(player)
    end


end

RegisterUnitGossipEvent(NPCID, 1, "title.OnGossip")
RegisterUnitGossipEvent(NPCID, 2, "title.OnGossipSelect")