ServerClientComm

-- /script SendAddonMessage("Eluna", "Ping", "GUILD")

local MName = "[ServerAddonHandler]"
print(MName.." Loaded")
local pfx = "Eluna"

function OnReceiveAddonMsg(event, plr, prefix, msg, type, target)
    if (prefix == pfx) then
        if (msg == "Ping") then
            print(MName..": Ping received by "..plr:GetName().."! Sending Pong.")
            plr:SendAddonMessage(pfx, "Pong", type, plr)
        elseif(msg == "GoldRequest") then
            print(MName..": Gold request received from Client.")
            plr:ModifyMoney(100)
        else
            print(MName..": Received unknown msg: "..msg)
        end
    else
        print(MName..": Received unknown prefix: "..prefix)
    end
end

RegisterServerEvent(30, OnReceiveAddonMsg)