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

psu_proto: Review and move send_0d01 to psu_proto.

Browse Source
This commit is contained in:
Loïc Hoguin 2010-10-21 19:39:11 +02:00
parent 4ff129224f
commit 94ce201941
2 changed files with 14 additions and 18 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

20
src/psu/psu_game.erl
View File

@ -25,11 +25,10 @@
-include("include/missions.hrl").
%% @doc Load and send the character information to the client.
%% @todo Should wait for the 021c reply before doing area_change.
%% @todo Move this whole function directly to psu_proto, probably.
char_load(User, State) ->
send_0d01(User),
% 0246
psu_proto:send_0d01(User#egs_user_model.character, State),
%% 0246
send_0a0a((User#egs_user_model.character)#characters.inventory),
psu_proto:send_1006(5, 0, State), %% @todo The 0 here is PartyPos, save it in User.
psu_proto:send_1005(User#egs_user_model.character, State),
@ -39,7 +38,7 @@ char_load(User, State) ->
send_1500(User),
send_1501(),
send_1512(),
% 0303
%% 0303
send_1602(),
psu_proto:send_021b(State).
@ -424,19 +423,6 @@ send_0c10(Options) ->
send(<< 16#0c100300:32, 0:32, 16#00011300:32, GID:32/little-unsigned-integer, 0:64,
16#00011300:32, GID:32/little-unsigned-integer, 0:64, Options/binary >>).
%% @doc Send the data for the selected character.
%% @todo The large chunk of 0s can have some values set... but what are they used for?
%% @todo The values after the Char variable are the flags. Probably use bits to define what flag is and isn't set. Handle correctly.
send_0d01(User) ->
GID = User#egs_user_model.id,
CharBin = psu_characters:character_tuple_to_binary(User#egs_user_model.character),
OptionsBin = psu_characters:options_tuple_to_binary((User#egs_user_model.character)#characters.options),
send(<< 16#0d010300:32, 16#ffff:16, 0:144, 16#00011300:32, GID:32/little, 0:64, CharBin/binary,
16#ffbbef1c:32, 16#f8ff0700:32, 16#fc810916:32, 16#7802134c:32,
16#b0c0040f:32, 16#7cf0e583:32, 16#b7bce0c6:32, 16#7ff8f963:32,
16#3fd7ffff:32, 16#fff7ffff:32, 16#f3ff63e0:32, 16#1fe00000:32,
0:7744, OptionsBin/binary >>).
%% @doc Send the character list for selection.
%% @todo There's a few odd values blanked, also the last known location apparently.
send_0d03(Data0, Data1, Data2, Data3) ->

12
src/psu/psu_proto.erl
View File

@ -1421,7 +1421,17 @@ send_0c10(Options, #state{socket=Socket, gid=DestGID}) ->
Size = byte_size(Options),
packet_send(Socket, << 16#0c100300:32, 0:160, 16#00011300:32, DestGID:32/little, 0:64, 1, 0, Size:16/little, Options/binary >>).
%% @doc Send the character flags list. This is the whole list of available values, not the character's.
%% @doc Send the general data and flags for the selected character.
%% @todo Handle bitflags and value flags properly.
send_0d01(Character, #state{socket=Socket, gid=DestGID}) ->
CharBin = psu_characters:character_tuple_to_binary(Character),
OptionsBin = psu_characters:options_tuple_to_binary(Character#characters.options),
packet_send(Socket, << 16#0d010300:32, 16#ffff:16, 0:144, 16#00011300:32, DestGID:32/little, 0:64, CharBin/binary,
16#ffbbef1c:32, 16#f8ff0700:32, 16#fc810916:32, 16#7802134c:32, 16#b0c0040f:32, 16#7cf0e583:32,
16#b7bce0c6:32, 16#7ff8f963:32, 16#3fd7ffff:32, 16#fff7ffff:32, 16#f3ff63e0:32, 16#1fe00000:32,
0:7744, OptionsBin/binary >>).
%% @doc Send the flags list. This is the whole list of available values, not the character's.
%% Sent without fragmentation on official for unknown reasons. Do the same here.
send_0d05(#state{socket=Socket, gid=DestGID}) ->
{ok, Flags} = file:read_file("p/flags.bin"),