hook.Add( "PlayerSay", "ChatDonateCommand", function(ply,text,teamonly)
    if(text=="!donate") then
        ply:SendLua('gui.OpenURL("YOURURLHERE")')
    end
end)