Packages

erlang_behaviour_trees

0.1.0
0.5.22 0.5.21 0.5.20 0.5.18 0.5.17 0.5.16 0.5.15 0.5.14 0.5.13 0.5.12 0.5.11 0.5.10 0.5.9 0.5.8 0.5.7 0.5.6 0.5.5 0.5.4 0.5.3 0.5.2 0.5.1 0.5.0 0.4.5 0.4.4 0.4.3 0.4.2 0.4.1 0.4.0 0.3.1 0.3.0 0.2.0 0.1.0

An implementation of behaviour trees in erlang.

Current section

Files

Jump to
Readme
32 Versions
3 Dependencies
Dependants
Files
Activity
erlang_behaviour_trees src bt_engine bt_engine.erl
Raw

src/bt_engine/bt_engine.erl 

%% a process for running an instance of the bt

-module(bt_engine).

-behaviour(gen_server).

-include("./bt_node_behaviours/nodes.hrl").



-record(state, {

  bt :: any(),

  blackboard :: blackboard()

}).



-export([

  %% api

  start_link/1,

  start_link/3,

  %% cb

  tick/2,

  init/1,

  handle_call/3,

  handle_cast/2

]).



%% API

start_link({Tree, BB}) ->

  gen_server:start_link(?MODULE, [Tree, BB], []).



start_link(RootFilePath, TreeName, Args) ->

  {Tree, BB} = parser:parse(RootFilePath, TreeName, Args),

  start_link({Tree, BB}).



tick(Pid, Event) ->

  gen_server:call(Pid, Event).



%% Callbacks

init([Tree, BB]) ->

  {ok,

    #state{

      bt = Tree,

      blackboard = BB

    }

  }.



handle_call(Event, _From, #state{bt = Tree, blackboard = BB}) ->

  {Status, NewTree, NewBB} = runner:run(Tree, BB, Event),

  {

    reply,

    Status,

    #state{

      bt = NewTree,

      blackboard = NewBB

    }

  }.



%% not using

handle_cast(_, State) -> {noreply, State}.