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

game: Initial damage handling. A default inventory is given.

Browse Source
This commit is contained in:
Loïc Hoguin 2010-05-31 18:50:24 +02:00
parent 4ae86af79a
commit e6063333ca
3 changed files with 56 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

BIN
p/packet0a06.bin Normal file
View File

Binary file not shown.

BIN
p/packet0a0a.bin Normal file
View File

Binary file not shown.

61
src/egs_game.erl
View File

@ -227,7 +227,9 @@ lobby_load(CSocket, GID, Quest, MapType, MapNumber, MapEntry) ->
lists:foreach(fun(Other) -> Other#users.pid ! {psu_player_spawn, User} end, egs_db:users_select_others(GID)),
% load lobby and character
egs_proto:send_character_selected(CSocket, GID, Char, Options),
% 0246 0a0a 1006
% 0246
send_packet_0a0a(CSocket, GID),
% 1006
send_packet_1005(CSocket, GID, Char),
% 1006 0210
egs_proto:send_universe_info(CSocket, GID),
@ -243,7 +245,7 @@ lobby_load(CSocket, GID, Quest, MapType, MapNumber, MapEntry) ->
% 100e 020c
egs_proto:send_load_quest(CSocket, GID),
send_packet_201(CSocket, GID, User, Char),
% 0a06
send_packet_0a06(CSocket, GID),
Users = egs_db:users_select_others(GID),
send_packet_233(CSocket, GID, Users),
egs_proto:send_loading_end(CSocket, GID),
@ -270,8 +272,9 @@ mission_load(CSocket, GID, Quest, MapType, MapNumber, MapEntry) ->
egs_proto:send_zone_init(CSocket, GID, mission),
egs_proto:send_zone(CSocket, ZoneFile),
egs_proto:send_map(CSocket, Quest, MapType, MapNumber, MapEntry),
% 100e 0215 0215 0c09 020c
% 100e 0215 0215
egs_proto:send_trial_start(CSocket, GID),
% 020c
% mandatory packet to make enemies appear
{ok, << _:32, Packet/bits >>} = file:read_file("p/packet1202.bin"),
@ -280,7 +283,7 @@ mission_load(CSocket, GID, Quest, MapType, MapNumber, MapEntry) ->
% 1204 1206 1207
egs_proto:send_load_quest(CSocket, GID),
send_packet_201(CSocket, GID, User, Char),
% 0a06
send_packet_0a06(CSocket, GID),
egs_proto:send_loading_end(CSocket, GID),
egs_proto:send_camera_center(CSocket, GID)
catch
@ -474,6 +477,23 @@ broadcast(Command, GID, Packet)
handle(16#0102, _, _, _, _) ->
ignore;
%% @doc Weapon change handler. Fake it.
%% @todo Others probably want to see that you changed your weapon.
handle(16#0105, CSocket, GID, _, Orig) ->
log(GID, "weapon change (and more probably)"),
<< _:384, Rest/bits >> = Orig,
Packet = << 16#01050300: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, Rest/binary >>,
egs_proto:packet_send(CSocket, Packet);
%% @doc Character death handler. Abort mission and redirect to 4th floor for now.
%% @todo Recover from death correctly.
handle(16#0110, CSocket, GID, _, _) ->
log(GID, "death (and more probably)"),
lobby_load(CSocket, GID, 1100000, 0, 4, 6);
%% @doc Keepalive handler. Do nothing.
handle(16#021c, _, _, _, _) ->
@ -533,6 +553,11 @@ handle(16#0304, _, GID, Version, Packet) ->
log(GID, io_lib:format("chat from ~s: ~s", [[re:replace(LogName, "\\0", "", [global, {return, binary}])], [re:replace(LogMessage, "\\0", "", [global, {return, binary}])]])),
lists:foreach(fun(User) -> User#users.pid ! {psu_chat, GID, ActualName, ChatModifiers, ChatMessage} end, egs_db:users_select_all());
%% @todo Handle this packet. Ignore for now.
handle(16#0402, _, _, _, _) ->
ignore;
%% @doc Map change handler.
%% Spaceports and my room are handled differently than normal lobbies.
%% @todo Load 'Your room' correctly.
@ -557,7 +582,7 @@ handle(16#0811, CSocket, GID, _, Packet) ->
log(GID, io_lib:format("mission counter (~b,~b,~b,~b)", [Quest,MapType, MapNumber, MapEntry])),
counter_load(CSocket, GID, Quest, MapType, MapNumber, MapEntry);
%% @doc Mission select handler?
%% @doc Mission select handler? Packet contains the selected mission number.
%% @todo Load more than one mission.
handle(16#0c01, CSocket, GID, _, _) ->
@ -599,6 +624,20 @@ handle(16#0d07, _, GID, _, Packet) ->
User = egs_db:users_select(GID),
file:write_file(io_lib:format("save/~s/~b-character.options", [User#users.folder, User#users.charnumber]), Options);
%% @doc Hit handler.
%% @todo Finish the work on it.
handle(16#0e00, CSocket, GID, _, Orig) ->
<< _:448, A:224/bits, B:128/bits, _/bits >> = Orig,
PlayerHP = 4401,
TargetHP = 0,
Damage = 58008,
Packet = << 16#0e070300:32, 0:160, 16#00011300:32, GID:32/little-unsigned-integer, 0:64,
1:32/little-unsigned-integer, 16#01050000:32, Damage:32/little-unsigned-integer,
A/binary, 0:64, PlayerHP:32/little-unsigned-integer, 0:32, 16#01000200:32,
0:32, TargetHP:32, 0:32, B/binary, 16#04320000:32, 16#80000000:32, 16#26030000:32, 16#89068d00:32, 16#0c1c0105:32 >>,
egs_proto:packet_send(CSocket, Packet);
%% @doc Lobby event handler. Handle chairs!
%% Apparently used for elevator, sit on chairs, and more?
%% @todo Handle more than sit on chair.
@ -685,6 +724,18 @@ build_packet_233_contents(Users) ->
Next = build_packet_233_contents(Rest),
<< Chunk/binary, Next/binary >>.
%% @todo Inventory related. Figure out everything in this packet and handle it correctly.
send_packet_0a06(CSocket, GID) ->
{ok, << _:32, A:96/bits, _:32, B:96/bits, _:32, C:1440/bits, _:32, D/bits >>} = file:read_file("p/packet0a06.bin"),
egs_proto:packet_send(CSocket, << A/binary, GID:32/little-unsigned-integer, B/binary, GID:32/little-unsigned-integer, C/binary, GID:32/little-unsigned-integer, D/binary >>).
%% @todo Inventory. Figure out everything in this packet and handle it correctly.
send_packet_0a0a(CSocket, GID) ->
{ok, << _:32, A:224/bits, _:32, B/bits >>} = file:read_file("p/packet0a0a.bin"),
egs_proto:packet_send(CSocket, << A/binary, GID:32/little-unsigned-integer, B/binary >>).
%% @todo Figure out what the packet is.
send_packet_1005(CSocket, GID, Char) ->