From b984be19b36226b02cb2d58d8597d2cff4be1eaf Mon Sep 17 00:00:00 2001 From: nsensfel Date: Mon, 20 Nov 2017 17:25:37 +0100 Subject: Trying to get character turns to register. --- src/battlemap_instance.erl | 33 +++++++++++++++++++++++++++++++++ 1 file changed, 33 insertions(+) create mode 100644 src/battlemap_instance.erl (limited to 'src/battlemap_instance.erl') diff --git a/src/battlemap_instance.erl b/src/battlemap_instance.erl new file mode 100644 index 0000000..ef573eb --- /dev/null +++ b/src/battlemap_instance.erl @@ -0,0 +1,33 @@ +-module(battlemap_instance). +-export +( + [ + get_char_instances/1, + get_char_instance/2, + set_char_instance/3 + ] +). + +-include("timed_cache_data.hrl"). + +get_char_instances (BattlemapInstance) -> + lists:map + ( + fun ({_K, V}) -> V end, + dict:to_list(BattlemapInstance#battlemap_instance.chars) + ). + +get_char_instance (BattlemapInstance, CharInstID) -> + {ok, dict:fetch(CharInstID, BattlemapInstance#battlemap_instance.chars)}. + +set_char_instance (BattlemapInstance, CharInstID, CharInst) -> + BattlemapInstance#battlemap_instance + { + chars = + dict:store + ( + CharInstID, + CharInst, + BattlemapInstance#battlemap_instance.chars + ) + }. -- cgit v1.2.3-70-g09d2