写一个创建redis连接函数的Erlang代码

好的，下面是一个示例代码，它演示了如何通过`eredis`库创建Redis连接对象的函数。

-module(redis_conn).
-export([connect/0]).

-define(REDIS_HOST, "localhost").
-define(REDIS_PORT, 6379).
-define(REDIS_PASSWORD, "password").

% 连接 Redis
connect() ->
    {ok, Conn} = eredis:start_link([{host, ?REDIS_HOST},
                                     {port, ?REDIS_PORT},
                                     {password, ?REDIS_PASSWORD}]),
    Conn.

在这个示例代码中，`connect/0`函数调用`eredis:start_link/1`函数创建Redis连接对象，并返回它。在创建连接对象时，我们使用了宏定义来指定Redis服务器的主机名、端口号和密码。你可以根据实际情况修改这些值。

需要注意的是，在使用`eredis`库时，需要先确保已经在应用中引入该库。可以通过在`.app`文件中添加`{applications, [eredis]}`来引入该库，或者在Erlang shell中使用`application:start(eredis)`来手动启动该库。