Chat Commands

local ORG_MSG = "To Orgrimmar!"
local TB_MSG = "To Thunder Bluff!"
local UC_MSG = "To Undercity!"
local SM_MSG = "To Silvermoon City!"
local SW_MSG = "To Stormwind!"
local IF_MSG = "To Ironforge!"
local DARN_MSG = "To Darnassus!"
local EXO_MSG = "To Exodar!"
local DAL_MSG = "To Dalaran!"
local SHAT_MSG = "To Shattrath!"

function CityPorts_OnChat(event, player, message, type, language)

    if message == ORG_MSG then

        if(player:IsInCombat() == true) then
            player:SendAreaTriggerMessage("You can't port while in combat!")
            player:SendBroadcastMessage("You Can't port while in combat!")
        else
            player:Teleport(1, 1630.028, -4373.79, 31.5)
            player:SendAreaTriggerMessage("Welcome to Orgrimmar!")
            player:SendBroadcastMessage("Welcome to Orgrimmar!")
        end

    elseif message == TB_MSG then

        if(player:IsInCombat() == true) then
            player:SendAreaTriggerMessage("You can't port while in combat!")
            player:SendBroadcastMessage("You Can't port while in combat!")
        else
            player:Teleport(1, -1259.65, 40.17, 128.99)
            player:SendAreaTriggerMessage("Welcome to Thunder Bluff!")
            player:SendBroadcastMessage("Welcome to Thunder Bluff!")
        end

    elseif message == UC_MSG then

        if(player:IsInCombat() == true) then
            player:SendAreaTriggerMessage("You can't port while in combat!")
            player:SendBroadcastMessage("You Can't port while in combat!")
        else
            player:Teleport(0, 1587.08, 240.43, -52.14)
            player:SendAreaTriggerMessage("Welcome to Undercity!")
            player:SendBroadcastMessage("Welcome to Undercity!")
        end

    elseif message == SM_MSG then

        if(player:IsInCombat() == true) then
            player:SendAreaTriggerMessage("You can't port while in combat!")
            player:SendBroadcastMessage("You Can't port while in combat!")
        else
            player:Teleport(530, 9525.34, -7215.86, 16.13)
            player:SendAreaTriggerMessage("Welcome to Silvermoon City!")
            player:SendBroadcastMessage("Welcome to Silvermoon City!")
        end

    elseif message == SW_MSG then

        if(player:IsInCombat() == true) then
            player:SendAreaTriggerMessage("You can't port while in combat!")
            player:SendBroadcastMessage("You Can't port while in combat!")
        else

            player:Teleport(0, -8930.86, 615.35, 99.52)
            player:SendAreaTriggerMessage("Welcome to Stormwind!")
            player:SendBroadcastMessage("Welcome to Stormwind!")
        end

    elseif message == IF_MSG then

        if(player:IsInCombat() == true) then
            player:SendAreaTriggerMessage("You can't port while in combat!")
            player:SendBroadcastMessage("You Can't port while in combat!")
        else
            player:Teleport(0, -4890.94, -991.96, 503.94)
            player:SendAreaTriggerMessage("Welcome to Ironforge!")
            player:SendBroadcastMessage("Welcome to Ironforge!")
        end

    elseif message == DARN_MSG then

        if(player:IsInCombat() == true) then
            player:SendAreaTriggerMessage("You can't port while in combat!")
            player:SendBroadcastMessage("You Can't port while in combat!")
        else
            player:Teleport(1, 9939.39, 2512.87, 1317.80)
            player:SendAreaTriggerMessage("Welcome to Darnassus!")
            player:SendBroadcastMessage("Welcome to Darnassus!")
        end

    elseif message == EXO_MSG then

        if(player:IsInCombat() == true) then
            player:SendAreaTriggerMessage("You can't port while in combat!")
            player:SendBroadcastMessage("You Can't port while in combat!")
        else
            player:Teleport(530, -3918.96, -11548.18, -150.15)
            player:SendAreaTriggerMessage("Welcome to Exodar!")
            player:SendBroadcastMessage("Welcome to Exodar!")
        end

    elseif message == DAL_MSG then

        if(player:IsInCombat() == true) then
            player:SendAreaTriggerMessage("You can't port while in combat!")
            player:SendBroadcastMessage("You Can't port while in combat!")
        else
            player:Teleport(571, 5967.30, 613.54, 650.62)
            player:SendAreaTriggerMessage("Welcome to Dalaran!")
            player:SendBroadcastMessage("Welcome to Dalaran!")
        end

    elseif message == SHAT_MSG then

        if(player:IsInCombat() == true) then
            player:SendAreaTriggerMessage("You can't port while in combat!")
            player:SendBroadcastMessage("You Can't port while in combat!")
        else
            player:Teleport(530, -2026.03, 5349.17, -9.35)
            player:SendAreaTriggerMessage("Welcome to Shattrath!")
            player:SendBroadcastMessage("Welcome to Shattrath!")
        end
    end
end

RegisterServerHook(16, "CityPorts_OnChat")

local BUFF_MSG = "Buff me!"

function Buffs_OnChat(event, player, message, type, language)

    if message == BUFF_MSG then

        if(player:IsInCombat() == true) then
            player:SendAreaTriggerMessage("I can't buff you while in combat!")
            player:SendBroadcastMessage("I can't buff you while in combat!")
        else
            player:CastSpell(47440) -- Commanding Shout
            player:CastSpell(48161) -- Power Fortitude
            player:CastSpell(48469) -- Mark of the Wild
            player:CastSpell(53307) -- Thorns
            player:CastSpell(20217) -- Blessing of Kings
            player:CastSpell(58449) -- Strength Buff
            player:CastSpell(58451) -- Agility Buff
            player:CastSpell(33081) -- Stamina Buff
            player:CastSpell(48099) -- Intellect Buff
            player:CastSpell(43197) -- Spirit Buff
            player:SendAreaTriggerMessage("Feel the power!")
            player:SendBroadcastMessage("Feel the power!")
        end
    end
end

RegisterServerHook(16, "Buffs_OnChat")

local GOLD_MSG = "I need gold!"

function Gold_OnChat(event, player, message, type, language)

    if message == GOLD_MSG then

        if(player:IsInCombat() == true) then
            player:SendAreaTriggerMessage("I can't give you money while in combat!")
            player:SendBroadcastMessage("I can't give you money while in combat!")
        else
            player:DealGoldMerit(10000000, 1) -- Upated, now just gives 10000g
            player:SendAreaTriggerMessage("Check your bags!")
            player:SendBroadcastMessage("Check your bags!")
        end
    end
end

RegisterServerHook(16, "Gold_OnChat")

local FOOD_MSG = "I need food!"
local WATER_MSG = "I need water!"

function FoodorWater_OnChat(event, player, message, type, language)

    if message == FOOD_MSG then

        if(player:IsInCombat() == true) then
            player:SendAreaTriggerMessage("I can't give you food while in combat!")
            player:SendBroadcastMessage("I can't give you food while in combat!")
        else
            player:AddItem(21215, 20)
            player:SendAreaTriggerMessage("Enjoy!")
            player:SendBroadcastMessage("Enjoy!")
        end

    elseif message == WATER_MSG then

        if(player:IsInCombat() == true) then
            player:SendAreaTriggerMessage("I can't give you water while in combat!")
            player:SendBroadcastMessage("I can't give you water while in combat!")
        else
            player:AddItem(21215, 20)
            player:SendAreaTriggerMessage("Enjoy!")
            player:SendBroadcastMessage("Enjoy!")
        end
    end
end

RegisterServerHook(16, "FoodorWater_OnChat")

local BAG_MSG = "I need bags!"

function Bags_OnChat(event, player, message, type, language)

    if message == BAG_MSG then

        if(player:IsInCombat() == true) then
            player:SendAreaTriggerMessage("I can't give you bags while in combat!")
            player:SendBroadcastMessage("I can't give you bags while in combat!")
        else
            player:AddItem(23162, 1)
            player:SendAreaTriggerMessage("There you are!")
            player:SendBroadcastMessage("There you are!")
        end
    end
end

RegisterServerHook(16, "Bags_OnChat")

local SPEED_MSG = "I need speed!"

function Speed_OnChat(event, player, message, type, language)

    if message == SPEED_MSG then

        player:CastSpell(11305)
        player:SendAreaTriggerMessage("Need for speed?")
        player:SendBroadcastMessage("Need for speed?")
    end
end

RegisterServerHook(16, "Speed_OnChat")

local MOUNT_MSG = "Mount up!"

function Mount_OnChat(event, player, message, type, language)

    if message == MOUNT_MSG then
        if(player:IsInCombat() == true) then
            player:SendAreaTriggerMessage("I can't mount you up while in comabt!")
            player:SendBroadcastMessage("I can't mount you up while in combat!")
        else
            player:CastSpell(42777)
            player:SendAreaTriggerMessage("Go go tiger!")
            player:SendBroadcastMessage("Go go tiger!")
        end
    end
end

RegisterServerHook(16, "Mount_OnChat")

local MSG_MAXS = "Max my skills!"

function MaxSkills_OnChat(event, player, message, type, language)

    if message == MSG_MAXS then
        if(player:IsInCombat() == true) then
            player:SendAreaTriggerMessage("I can't max your skills while in combat!")
            player:SendBroadcastMessage("I can't max your skills while in combat!")
        else
            player:AdvanceAllSkills(500)
            player:SendAreaTriggerMessage("Max skills!")
            player:SendBroadcastMessage("Max skills!")
        end
    end
end

RegisterServerHook(16, "MaxSkills_OnChat")

local REPAIR_MSG = "Repair me!"

function Repair_OnChat(even, player, message, type, language)

    if message == REPAIR_MSG then
        if(player:IsInCombat() == true) then
            player:SendAreaTriggerMessage("I can't repair you while in combat!")
            player:SendBroadcastMessage("I can't repair while in combat!")
        else
            player:RepairAllPlayerItems()
            player:SendAreaTriggerMessage("You are repaired!")
            player:SendBroadcastMessage("You are repaired!")
        end
    end
end

RegisterServerHook(16, "Repair_OnChat")

local PANDA_MSG = "I want to be a panda!"

function Panda_OnChat(even, player, message, type, language)

    if message == PANDA_MSG then
        if(player:IsInCombat() == true) then
            player:SendAreaTriggerMessage("I can't make you a panda while in combat!")
            player:SendBroadcastMessage("I can't make you a panda while in combat!")
        else
            player:SetModel(10990)
            player:AddItem(13583, 1)
            player:AddItem(49665, 1)
            player:SendAreaTriggerMessage("Panda Power!")
            player:SendBroadcastMessage("Panda Power!")
        end
    end
end

RegisterServerHook(16, "Panda_OnChat")

local CMD_MSG = "What can I do?"

function Commands_OnChat(even, player, message, type, language)

    if message == CMD_MSG then
        player:SendAreaTriggerMessage("You can say the following! To Orgrimmar! To Thunder Bluff! To Undercity! To Silvermoon City! To Stormwind! To Ironforge! To Darnassus! To Exodar! To Shattrath! To Dalaran! I need gold! I need speed! I need food! I need water! Buff me! I need bags! Mount up! Max my skills! Repair me! I want to be a panda! What can I do? That's alot of different things eh?")
        player:SendBroadcastMessage("You can say the following! To Orgrimmar! To Thunder Bluff! To Undercity! To Silvermoon City! To Stormwind! To Ironforge! To Darnassus! To Exodar! To Shattrath! To Dalaran! I need gold! I need speed! I need food! I need water! Buff me! I need bags! Mount up! Max my skills! Repair me! I want to be a panda! What can I do? That's alot of different things eh?")
    end
end

RegisterServerHook(16, Commands_OnChat)