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

psu_proto: Review and move send_0200 to psu_proto.

Browse Source
This commit is contained in:
Loïc Hoguin 2010-09-25 19:22:13 +02:00
parent ba0c6dd9a5
commit e494e14767
3 changed files with 14 additions and 14 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/egs_game.erl
View File

@ -269,7 +269,7 @@ event({counter_enter, CounterID, FromZoneID, FromMapID, FromEntryID}, State=#sta
psu_proto:send_020e(QuestFile, State),
psu_proto:send_0a05(State),
psu_proto:send_010d(User#egs_user_model{lid=0}, State),
psu_game:send_0200(mission),
psu_proto:send_0200(0, mission, State),
psu_proto:send_020f(ZoneFile, 0, 255, State),
State2 = State#state{areanb=State#state.areanb + 1},
psu_proto:send_0205(User, 0, State2),

14
src/psu/psu_game.erl
View File

@ -161,7 +161,7 @@ area_load(AreaType, IsStart, SetID, OldUser, User, QuestFile, ZoneFile, AreaName
true -> ignore
end,
psu_proto:send_010d(User#egs_user_model{lid=0}, State),
send_0200(AreaType),
psu_proto:send_0200(ZoneID, AreaType, State),
psu_proto:send_020f(ZoneFile, SetID, SeasonID, State);
true -> ignore
end,
@ -286,18 +286,6 @@ send_0113() ->
GID = get(gid),
send(<< 16#01130300:32, 0:64, GID:32/little-unsigned-integer, 0:64, 16#00011300:32, GID:32/little-unsigned-integer, 0:64, GID:32/little-unsigned-integer, File/binary >>).
%% @doc Send the zone initialization notification.
send_0200(ZoneType) ->
case ZoneType of
mission ->
Var = << 16#06000500:32, 16#01000000:32, 0:64, 16#00040000:32, 16#00010000:32, 16#00140000:32 >>;
myroom ->
Var = << 16#06000000:32, 16#02000000:32, 0:64, 16#40000000:32, 16#00010000:32, 16#00010000:32 >>;
_ ->
Var = << 16#00040000:32, 0:160, 16#00140000:32 >>
end,
send(<< (header(16#0200))/binary, 0:32, 16#01000000:32, 16#ffffffff:32, Var/binary, 16#ffffffff:32, 16#ffffffff:32 >>).
%% @todo Not sure. Used for unspawning, and more.
send_0204(DestUser, TargetUser, Action) ->
DestGID = DestUser#egs_user_model.id,

12
src/psu/psu_proto.erl
View File

@ -1222,6 +1222,18 @@ send_0117(#egs_user_model{id=CharGID, lid=CharLID, character=#characters{current
packet_send(Socket, << 16#01170300:32, DestLID:16/little, 0:48, CharGID:32/little, 0:64, 16#00011300:32, DestGID:32/little, 0:64,
CharGID:32/little, CharLID:32/little, SE/binary, HP:32/little, 0:32 >>).
%% @doc Send the zone initialization command.
%% @todo Handle the LID properly in both places.
%% @todo Handle NbPlayers properly. There's more than 1 player!
send_0200(ZoneID, ZoneType, #state{socket=Socket, gid=DestGID}) ->
Var = case ZoneType of
mission -> << 16#06000500:32, 16#01000000:32, 0:64, 16#00040000:32, 16#00010000:32, 16#00140000:32 >>;
myroom -> << 16#06000000:32, 16#02000000:32, 0:64, 16#40000000:32, 16#00010000:32, 16#00010000:32 >>;
_ -> << 16#00040000:32, 0:160, 16#00140000:32 >>
end,
packet_send(Socket, << 16#02000300:32, 0:160, 16#00011300:32, DestGID:32/little, 0:64,
0:16, ZoneID:16/little, 1:32/little, 16#ffffffff:32, Var/binary, 16#ffffffff:32, 16#ffffffff:32 >>).
%% @doc Send character location, appearance and other information.
%% @todo Handle the DestLID properly.
send_0201(CharUser, #state{socket=Socket, gid=DestGID}) ->