SouthPark vendor script

-- by Runemaster of xx-xxx.xxx
-- adapted to Eluna by Slp13at420 of Emudevs.com for Blackwolfsden.dyndns-free.com
local Stan = {4080, 13955, 23087, 1154, 10740, 14621, 23577, 10835, 19031}
local Cartman = {14806, 2575, 8312, 23663, 8318, 8316, 4072, 3198}
local Kyle = {21157, 14289, 20654}
local Kenny = {10261, 10056, 6526, 6594, 5963, 10257, 12522, 21697, 15289}

function southpark_GossipOnTalk(Event, player, Unit)

    VendorRemoveAllItems(60000)
    player:GossipClearMenu()
    player:GossipMenuAddItem(0, "Give Me Stan's Armor! (Warrior)", 0, 1)
    player:GossipMenuAddItem(0, "Give Me Cartman's Armor! (Paladin)", 0, 2)
    player:GossipMenuAddItem(0, "Give Me Kyle's Armor! (Mage)", 0, 3)
    player:GossipMenuAddItem(0, "Give Me Kenny's Armor! (Range)", 0, 4)
    player:GossipMenuAddItem(7, "Nevermind...", 0, 5)
    player:GossipSendMenu(1, Unit)

end

function southpark_GossipOnSelect(Event, player, Unit, id, intid, code)

    if(intid == 1) then
        for i=1, #Stan do
            player:AddItem(Stan[i], 1)
            player:SendBroadcastMessage("Here is your armor, Stan!")
            player:GossipComplete()
        end
    end

    if(intid == 2) then
        for i=1, #Cartman do
            player:AddItem(Cartman[i], 1)
            player:SendBroadcastMessage("Here is your armor, Cartman!")
            player:GossipComplete()
        end
    end

    if(intid == 3) then
        for i=1, #Kyle do
            player:AddItem(Kyle[i], 1)
            player:SendBroadcastMessage("Here is your armor, Kyle!")
            player:GossipComplete()
        end
    end

    if(intid == 4) then
        for i=1, #Kenny do
            player:AddItem(Kenny[i], 1)
            player:SendBroadcastMessage("Here is your armor, Kenny!")
            player:GossipComplete()
        end
    end

    if(intid == 5) then
        player:GossipComplete()
    end
end

RegisterCreatureGossipEvent(60000, 1, southpark_GossipOnTalk)
RegisterCreatureGossipEvent(60000, 2, southpark_GossipOnSelect)