All-In-One NPC

--[[
    This script
    was created
    by Krinolin
--]]


function On_GossipMenu(unit, event, player)

    if (player:IsInCombat() == true) then
    unit:SendChatMessage(12, 0, "You can not do that when in combat!")
    else
    unit:GossipCreateMenu(100, player, 0)
    unit:GossipMenuAddItem(1, "Morph", 1, 0)
    unit:GossipMenuAddItem(2, "Full Heal", 2, 0)
    unit:GossipMenuAddItem(2, "Remove Resurrection Sickness", 3, 0)
    unit:GossipMenuAddItem(3, "Learn weapon skills", 4, 0)
    unit:GossipMenuAddItem(3, "Advance weapon skills", 5, 0)
    unit:GossipMenuAddItem(3, "Artisan Riding", 6, 0)
    unit:GossipSendMenu(player)
    end
end


function On_GossipSelect(unit, event, player, id, intid, code)


    if (intid == 1) then
    unit:GossipCreateMenu(100, player, 0)
    unit:GossipMenuAddItem(5, "Taunka", 10, 0)
    unit:GossipMenuAddItem(5, "Human Soldier", 11, 0)
    unit:GossipMenuAddItem(5, "Fel Orc", 12, 0)
    unit:GossipMenuAddItem(5, "Ogre", 13, 0)
    unit:GossipMenuAddItem(5, "Skeleton", 14, 0)
    unit:GossipMenuAddItem(5, "Undead", 15, 0)
    unit:GossipMenuAddItem(5, "Lich King", 18, 0)
    unit:GossipMenuAddItem(5, "Sesu", 19, 0)
    unit:GossipMenuAddItem(3, "Demorph", 16, 0)
    unit:GossipMenuAddItem(2, "Back to Main Menu", 17, 0)
    unit:GossipSendMenu(player)
    end

    if (intid == 2) then
    unit:SendChatMessage(12, 0, "There you go!")
    player:CastSpell(69693)
    On_GossipMenu(unit, event, player)
    end

    if (intid == 3) then
    unit:SendChatMessage(12, 0, "Resurrection Sickness have been removed!")
    player:RemoveAura(15007)
    On_GossipMenu(unit, event, player)
    end

    if (intid == 4) then
    unit:SendChatMessage(12, 0, "You have learned all weapon skills!")
    player:LearnSpell(201)
    player:LearnSpell(202)
    player:LearnSpell(196)
    player:LearnSpell(197)
    player:LearnSpell(227)
    player:LearnSpell(200)
    player:LearnSpell(266)
    player:LearnSpell(264)
    player:LearnSpell(5011)
    player:LearnSpell(3018)
    player:LearnSpell(198)
    player:LearnSpell(199)
    player:LearnSpell(1180)
    player:LearnSpell(2567)
    player:LearnSpell(2764)
    player:LearnSpell(5009)
    player:LearnSpell(5019)
    On_GossipMenu(unit, event, player)
    end

    if (intid == 5) then
    unit:SendChatMessage(12, 0, "Your weapon skills are now maxed!")
    player:AdvanceSkill (43, 399)
    player:AdvanceSkill (44, 399)
    player:AdvanceSkill (45, 399)
    player:AdvanceSkill (46, 399)
    player:AdvanceSkill (54, 399)
    player:AdvanceSkill (55, 399)
    player:AdvanceSkill (95, 399)
    player:AdvanceSkill (162, 399)
    player:AdvanceSkill (136, 399)
    player:AdvanceSkill (160, 399)
    player:AdvanceSkill (172, 399)
    player:AdvanceSkill (173, 399)
    player:AdvanceSkill (176, 399)
    player:AdvanceSkill (226, 399)
    player:AdvanceSkill (228, 399)
    player:AdvanceSkill (229, 399)
    player:AdvanceSkill (473, 399)
    On_GossipMenu(unit, event, player)
    end

    if (intid == 6) then
    unit:SendChatMessage (12, 0, "You have learned Artisan Riding!")
    player:LearnSpell(33388)
    player:LearnSpell(33391)
    player:LearnSpell(34090)
    player:LearnSpell(34091)
    On_GossipMenu(unit, event, player)
    end

    if (intid == 10) then
    player:SetModel(24970)
    player:GossipComplete()
    end

        if (intid == 11) then
    player:SetModel(16276)
    player:GossipComplete()
    end

        if (intid == 12) then
    player:SetModel(16332)
    player:GossipComplete()
    end

        if (intid == 13) then
    player:SetModel(597)
    player:GossipComplete()
    end

        if (intid == 14) then
    player:SetModel(7550)
    player:GossipComplete()
    end

        if (intid == 15) then
    player:SetModel(28589)
    player:GossipComplete()
    end

            if (intid == 18) then
    player:SetModel(24213)
    player:GossipComplete()
    end

            if (intid == 19) then
    player:SetModel(21249)
    player:GossipComplete()
    end

    if (intid == 16) then
    unit:SendChatMessage(12, 0, "There you go!")
    player:DeMorph()
    player:GossipComplete()
    end

    if (intid == 17) then
    On_GossipMenu(unit, event, player)
    end
end

RegisterUnitGossipEvent(112112, 1, On_GossipMenu)
RegisterUnitGossipEvent(112112, 2, On_GossipSelect)