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

game: Initial sit-on-chair support.

Browse Source
This commit is contained in:
Loïc Hoguin 2010-05-20 00:09:03 +02:00
parent 7909582cd0
commit 8415a2e03a
1 changed files with 26 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

29
src/egs_game.erl
View File

@ -223,6 +223,7 @@ loop(CSocket, GID, Version) ->
%% @doc Game's main loop. %% @doc Game's main loop.
%% @todo Have some kind of clock process for keepalive packets. %% @todo Have some kind of clock process for keepalive packets.
%% @todo Handle 0102 and 0503 broadcasts correctly. %% @todo Handle 0102 and 0503 broadcasts correctly.
%% @todo Don't use SrcGID!!
loop(CSocket, GID, Version, SoFar) -> loop(CSocket, GID, Version, SoFar) ->
receive receive
@ -240,6 +241,18 @@ loop(CSocket, GID, Version, SoFar) ->
egs_proto:packet_send(CSocket, Send) egs_proto:packet_send(CSocket, Send)
end, end,
?MODULE:loop(CSocket, GID, Version, SoFar); ?MODULE:loop(CSocket, GID, Version, SoFar);
{psu_broadcast_0107, Data} ->
<< Before:96/bits, SrcGID:32/little-unsigned-integer, Middle:224/bits, _:32, After/bits >> = Data,
case egs_db:users_select(SrcGID) of
error ->
ignore;
User ->
LID = User#users.lid,
Send = << Before/binary, SrcGID:32/little-unsigned-integer, Middle/binary, LID:32/little-unsigned-integer, After/binary >>,
file:write_file("sendanim.bin", Send),
egs_proto:packet_send(CSocket, Send)
end,
?MODULE:loop(CSocket, GID, Version, SoFar);
{psu_broadcast_010f, Data} -> {psu_broadcast_010f, Data} ->
<< _:96, SrcGID:32/little-unsigned-integer, _:256, After/bits >> = Data, << _:96, SrcGID:32/little-unsigned-integer, _:256, After/bits >> = Data,
% TODO: assign the LID correctly when sending the character info for the player's character, not when broadcasting % TODO: assign the LID correctly when sending the character info for the player's character, not when broadcasting
@ -363,6 +376,12 @@ handle(16#0102, _, GID, _, Packet) ->
<< _:32, Data/bits >> = Packet, << _:32, Data/bits >> = Packet,
lists:foreach(fun(User) -> User#users.pid ! {psu_broadcast_0102, Data} end, egs_db:users_select_others(GID)); lists:foreach(fun(User) -> User#users.pid ! {psu_broadcast_0102, Data} end, egs_db:users_select_others(GID));
%% @doc Sit on chairs animation handler. Broadcast to all other players.
handle(16#0107, _, GID, _, Packet) ->
<< _:32, Data/bits >> = Packet,
lists:foreach(fun(User) -> User#users.pid ! {psu_broadcast_0107, Data} end, egs_db:users_select_others(GID));
%% @doc Lobby actions handler. Broadcast to all other players. %% @doc Lobby actions handler. Broadcast to all other players.
handle(16#010f, _, GID, _, Packet) -> handle(16#010f, _, GID, _, Packet) ->
@ -404,11 +423,15 @@ handle(16#0d07, _, GID, _, Packet) ->
User = egs_db:users_select(GID), User = egs_db:users_select(GID),
file:write_file(io_lib:format("save/~s/~b-character.options", [User#users.folder, User#users.charnumber]), Options); file:write_file(io_lib:format("save/~s/~b-character.options", [User#users.folder, User#users.charnumber]), Options);
%% @doc Lobby event handler. Do nothing for now. %% @doc Lobby event handler. Handle chairs!
%% Apparently used for elevator, sit on chairs, and more? %% Apparently used for elevator, sit on chairs, and more?
%% @todo Handle more than sit on chair. Handle sit on chair correctly.
handle(16#0f0a, _, GID, _, _) -> handle(16#0f0a, CSocket, GID, _, Orig) ->
log(GID, "lobby event"); << _:448, A:32/little-unsigned-integer, _:64, B:32/little-unsigned-integer, _/bits >> = Orig,
Packet = << 16#1211:16, 0:176, 16#00011300:32, GID:32/little-unsigned-integer, 0:64, A:32/little-unsigned-integer, B:32/little-unsigned-integer, 8:32/little-unsigned-integer, 0:32 >>,
egs_proto:packet_send(CSocket, Packet),
log(GID, "lobby event (can only chair so far)");
%% @doc Unknown command handler. Do nothing. %% @doc Unknown command handler. Do nothing.