From 08a3d1e624d9fc935c81cb7c2d07d7daacfbbba9 Mon Sep 17 00:00:00 2001
From: nsensfel <SpamShield0@noot-noot.org>
Date: Tue, 4 Sep 2018 18:21:16 +0200
Subject: Adds plr_load.

---
 src/player/reply/plr_set_player.erl | 61 +++++++++++++++++++++++++++++++++++++
 1 file changed, 61 insertions(+)
 create mode 100644 src/player/reply/plr_set_player.erl

(limited to 'src/player/reply')

diff --git a/src/player/reply/plr_set_player.erl b/src/player/reply/plr_set_player.erl
new file mode 100644
index 0000000..46f3747
--- /dev/null
+++ b/src/player/reply/plr_set_player.erl
@@ -0,0 +1,61 @@
+-module(plr_set_player).
+
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+%% TYPES %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+%% EXPORTS %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+-export([generate/1]).
+
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+%% LOCAL FUNCTIONS %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+%% EXPORTED FUNCTIONS %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+-spec generate (shr_player:type()) -> {list(any())}.
+generate (Player) ->
+   MapList =
+      lists:map
+      (
+         fun shr_map_summary:encode/1,
+         array:to_list(shr_player:get_map_summaries(Player))
+      ),
+
+   CampaignList =
+      lists:map
+      (
+         fun shr_battle_summary:encode/1,
+         array:to_list(shr_player:get_campaign_summaries(Player))
+      ),
+
+   InvasionList =
+      lists:map
+      (
+         fun shr_battle_summary:encode/1,
+         array:to_list(shr_player:get_invasion_summaries(Player))
+      ),
+
+   EventList =
+      lists:map
+      (
+         fun shr_battle_summary:encode/1,
+         array:to_list(shr_player:get_event_summaries(Player))
+      ),
+
+   {
+      [
+         {<<"msg">>, <<"set_plr">>},
+         {<<"id">>, shr_player:get_id(Player)},
+         {<<"nme">>, shr_player:get_username(Player)},
+         {<<"maps">>, MapList},
+         {<<"cmps">>, CampaignList},
+         {<<"invs">>, InvasionList},
+         {<<"evts">>, EventList},
+         {<<"rtid">>, shr_player:get_roster_id(Player)},
+         {<<"ivid">>, shr_player:get_inventory_id(Player)}
+      ]
+   }.
-- 
cgit v1.2.3-70-g09d2