From 67345d58c55e513f9b11a5b3e1af33164a4103ef Mon Sep 17 00:00:00 2001
From: nsensfel <SpamShield0@noot-noot.org>
Date: Fri, 24 Aug 2018 13:02:16 +0200
Subject: Working on the character editor...

---
 src/shared/reply/shr_set_inventory.erl | 32 ++++++++++++++++++++++++++++++++
 1 file changed, 32 insertions(+)
 create mode 100644 src/shared/reply/shr_set_inventory.erl

(limited to 'src/shared/reply/shr_set_inventory.erl')

diff --git a/src/shared/reply/shr_set_inventory.erl b/src/shared/reply/shr_set_inventory.erl
new file mode 100644
index 0000000..8c04606
--- /dev/null
+++ b/src/shared/reply/shr_set_inventory.erl
@@ -0,0 +1,32 @@
+-module(shr_set_inventory).
+
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+%% TYPES %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+%% EXPORTS %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+-export([generate/1]).
+
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+%% LOCAL FUNCTIONS %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+-spec encode_set (sets:set(binary())) -> list(binary()).
+encode_set (Set) -> sets:to_list(Set).
+
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+%% EXPORTED FUNCTIONS %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+-spec generate (shr_inventory:type()) -> {list(any())}.
+generate (Inventory) ->
+   {
+      [
+         {<<"msg">>, <<"set_inventory">>},
+         {<<"pts">>, encode_set(shr_inventory:get_portrait_ids(Inventory))},
+         {<<"gls">>, encode_set(shr_inventory:get_glyph_ids(Inventory))},
+         {<<"gbs">>, encode_set(shr_inventory:get_glyph_board_ids(Inventory))},
+         {<<"wps">>, encode_set(shr_inventory:get_weapon_ids(Inventory))},
+         {<<"ars">>, encode_set(shr_inventory:get_armor_ids(Inventory))}
+      ]
+   }.
-- 
cgit v1.2.3-70-g09d2