用erlang行为树

Erlang并没有内置的行为树实现，但可以通过编写自定义模块来实现行为树。

首先，需要定义行为树节点的接口，例如：

-module(bt_node).
-export([execute/1]).
 
%% 行为树节点的执行函数
%% 输入参数为行为树上下文，输出结果为执行结果
execute(Context) -> ok.

然后，可以定义不同类型的行为树节点，例如：

%% 顺序节点，按照子节点顺序依次执行
-module(bt_sequence).
-behaviour(bt_node).
-export([execute/1]).
 
execute(Context) ->
    case execute_children(Context) of
        {ok, _} ->
            {ok, Context};
        {error, Reason} ->
            {error, Reason}
    end.
 
%% 并行节点，所有子节点并发执行
-module(bt_parallel).
-behaviour(bt_node).
-export([execute/1]).
 
execute(Context) ->
    {ok, Results} = execute_children(Context),
    {ok, Results}.
 
%% 条件节点，根据条件选择执行哪个子节点
-module(bt_condition).
-behaviour(bt_node).
-export([execute/1]).
 
execute(Context) ->
    if
        check_condition(Context, 1) ->
            execute_child(Context, 1);
        check_condition(Context, 2) ->
            execute_child(Context, 2);
        true ->
            {error, invalid_condition}
    end.

最后，可以组合不同类型的行为树节点，构建出完整的行为树：

%% 行为树根节点
-module(bt_root).
-export([execute/1]).
 
execute(Context) ->
    bt_sequence:execute([bt_condition:execute([bt_parallel:execute(Context)])]).

这是一个简单的行为树示例，在实际应用中可能需要更复杂的节点类型和节点组合方式。