1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
|
-module(add_char).
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%% TYPES %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%% EXPORTS %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-export([generate/3]).
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%% LOCAL FUNCTIONS %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-spec attributes_as_json
(
attributes:struct()
) ->
{list({binary(), non_neg_integer()})}.
attributes_as_json (Attributes) ->
{
[
{<<"con">>, attributes:get_constitution(Attributes)},
{<<"dex">>, attributes:get_dexterity(Attributes)},
{<<"int">>, attributes:get_intelligence(Attributes)},
{<<"min">>, attributes:get_mind(Attributes)},
{<<"spe">>, attributes:get_speed(Attributes)},
{<<"str">>, attributes:get_strength(Attributes)}
]
}.
-spec encode
(
non_neg_integer(),
character_instance:struct(),
player:id()
)
-> binary().
encode (IX, CharacterInstance, PlayerID) ->
Character = character_instance:get_character(CharacterInstance),
Location = character_instance:get_location(CharacterInstance),
Attributes = character:get_attributes(Character),
{ActiveWeapon, SecondaryWeapon} = character:get_weapon_ids(Character),
OwnerID = character:get_owner_id(Character),
jiffy:encode
(
{
[
{<<"ix">>, IX},
{<<"nam">>, character:get_name(Character)},
{<<"ico">>, character:get_icon(Character)},
{<<"prt">>, character:get_portrait(Character)},
{
<<"hea">>,
character_instance:get_current_health(CharacterInstance)
},
{<<"lc">>, location:encode(Location)},
{<<"pla">>, OwnerID},
{
<<"ena">>,
(
character_instance:get_is_active(CharacterInstance)
and
(OwnerID == PlayerID)
)
},
{<<"att">>, attributes_as_json(Attributes)},
{<<"awp">>, ActiveWeapon},
{<<"swp">>, SecondaryWeapon}
]
}
).
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%% EXPORTED FUNCTIONS %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-spec generate
(
non_neg_integer(),
character_instance:struct(),
player:id()
)
-> list(binary()).
generate (IX, CharacterInstance, PlayerID) ->
[<<"add_char">>, encode(IX, CharacterInstance, PlayerID)].
|
