Sancaros/egs
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

egs_user_model: Add an item_nth function.

Browse Source
This commit is contained in:
Loïc Hoguin 2010-09-28 23:53:41 +02:00
parent d3156361fe
commit fe24d743fb
2 changed files with 10 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
src/egs_game.erl
View File

@ -379,9 +379,7 @@ event({item_description_request, ItemID}, State) ->
%% @todo TargetGID and TargetLID must be validated, they're either the player's or his NPC characters.
%% @todo Handle NPC characters properly.
event({item_equip, ItemIndex, TargetGID, TargetLID, A, B}, #state{gid=GID}) ->
{ok, User} = egs_user_model:read(GID),
Inventory = (User#egs_user_model.character)#characters.inventory,
case lists:nth(ItemIndex + 1, Inventory) of
case egs_user_model:item_nth(GID, ItemIndex) of
{ItemID, Variables} when element(1, Variables) =:= psu_special_item_variables ->
<< Category:8, _:24 >> = << ItemID:32 >>,
psu_game:send(<< 16#01050300:32, 0:64, TargetGID:32/little, 0:64, 16#00011300:32, GID:32/little, 0:64,
@ -416,9 +414,7 @@ event({item_equip, ItemIndex, TargetGID, TargetLID, A, B}, #state{gid=GID}) ->
end;
event({item_set_trap, ItemIndex, TargetGID, TargetLID, A, B}, #state{gid=GID}) ->
{ok, User} = egs_user_model:read(GID),
Inventory = (User#egs_user_model.character)#characters.inventory,
{ItemID, _Variables} = lists:nth(ItemIndex + 1, Inventory),
{ItemID, _Variables} = egs_user_model:item_nth(GID, ItemIndex),
egs_user_model:item_qty_add(GID, ItemIndex, -1),
<< Category:8, _:24 >> = << ItemID:32 >>,
psu_game:send(<< 16#01050300:32, 0:64, TargetGID:32/little, 0:64, 16#00011300:32, GID:32/little, 0:64,

9
src/egs_user_model.erl
View File

@ -19,7 +19,7 @@
-module(egs_user_model).
-behavior(gen_server).
-export([start_link/0, stop/0, count/0, read/1, select/1, write/1, delete/1, key_auth/3, login_auth/2, item_qty_add/3]). %% API.
-export([start_link/0, stop/0, count/0, read/1, select/1, write/1, delete/1, key_auth/3, login_auth/2, item_nth/2, item_qty_add/3]). %% API.
-export([init/1, handle_call/3, handle_cast/2, handle_info/2, terminate/2, code_change/3]). %% gen_server.
%% Use the module name for the server's name and for the table name.
@ -75,6 +75,9 @@ key_auth(GID, AuthKey, Socket) ->
login_auth(Username, Password) ->
gen_server:call(?SERVER, {login_auth, Username, Password}).
item_nth(GID, ItemIndex) ->
gen_server:call(?SERVER, {item_nth, GID, ItemIndex}).
item_qty_add(GID, ItemIndex, QuantityDiff) ->
gen_server:cast(?SERVER, {item_qty_add, GID, ItemIndex, QuantityDiff}).
@ -138,6 +141,10 @@ handle_call({login_auth, Username, Password}, _From, State) ->
egs_user_model:write(#egs_user_model{id=AuthGID, state={wait_for_authentication, AuthKey}, folder=Folder}),
{reply, {ok, AuthGID, AuthKey}, State};
handle_call({item_nth, GID, ItemIndex}, _From, State) ->
{atomic, [User]} = mnesia:transaction(fun() -> mnesia:read({?TABLE, GID}) end),
{reply, lists:nth(ItemIndex + 1, (User#egs_user_model.character)#characters.inventory), State};
handle_call(stop, _From, State) ->
{stop, normal, stopped, State};