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
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
|
-module(btl_action_switch_weapons).
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%% TYPES %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-include("tacticians/conditions.hrl").
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%% EXPORTS %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-export
(
[
handle/2
]
).
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%% LOCAL FUNCTIONS %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%% EXPORTED FUNCTIONS %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-spec handle
(
btl_action:type(),
btl_character_turn_update:type()
)
-> btl_character_turn_update:type().
handle (Action, S0Update) ->
% TODO: assert actor is alive.
ActorIX = btl_action:get_actor_index(Action),
S0PerformSwitch = true,
{S1PerformSwitch, S1Update} =
btl_conditions:apply_to_character
(
ActorIX,
?CONDITION_TRIGGER_ABOUT_TO_SWITCH_WEAPONS,
Action,
S0PerformSwitch,
S0Update
),
{S2PerformSwitch, S2Update} =
btl_conditions:apply_to_battle
(
?CONDITION_TRIGGER_A_CHARACTER_IS_ABOUT_TO_SWITCH_WEAPONS,
Action,
S1PerformSwitch,
S1Update
),
case S2PerformSwitch of
false -> S2Update;
true ->
S0Battle = btl_character_turn_update:get_battle(S2Update),
{S0Actor, S1Battle} =
btl_battle:get_resolved_character(ActorIX, S0Battle),
S0BaseActor = btl_character:get_base_character(S0Actor),
{S1BaseActor, BaseActorAtaxicUpdate} =
shr_character:ataxia_switch_weapons(S0BaseActor),
{S1Actor, ActorAtaxicUpdate} =
btl_character:ataxia_set_base_character
(
S1BaseActor,
BaseActorAtaxicUpdate,
S0Actor
),
{S1Battle, BattleAtaxicUpdate} =
btl_battle:ataxia_set_character
(
ActorIX,
S1Actor,
ActorAtaxicUpdate,
S0Battle
),
TimelineItem =
btl_turn_result:new_character_switched_weapons(ActorIX),
S3Update =
btl_character_turn_update:add_to_timeline(TimelineItem, S2Update),
S4Update =
btl_character_turn_update:ataxia_set_battle
(
S1Battle,
BattleAtaxicUpdate,
S3Update
),
{_V0Nothing, S5Update} =
btl_conditions:apply_to_character
(
ActorIX,
?CONDITION_TRIGGER_HAS_SWITCHED_WEAPONS,
Action,
none,
S4Update
),
{_V1Nothing, S6Update} =
btl_conditions:apply_to_battle
(
?CONDITION_TRIGGER_A_CHARACTER_HAS_SWITCHED_WEAPONS,
Action,
none,
S5Update
),
S6Update
end.
|
