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

Add global messages feature. They can be sent using egs:global from the console.

Browse Source
This commit is contained in:
Loïc Hoguin 2010-05-19 19:26:24 +02:00
parent 117d685307
commit b579a5bbc3
2 changed files with 38 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
src/egs.erl
View File

@ -17,9 +17,11 @@
% along with EGS. If not, see <http://www.gnu.org/licenses/>.
-module(egs).
-export([start/0, reload/0]).
-export([start/0, reload/0, global/2]).
-define(MODULES, [egs_db, egs_game, egs_login, egs_patch, egs_proto]).
-include("include/records.hrl").
-define(MODULES, [egs, egs_db, egs_game, egs_login, egs_patch, egs_proto]).
%% @doc Start all the application servers. Return the PIDs of the listening processes.
@ -38,3 +40,8 @@ start() ->
reload() ->
[code:soft_purge(Module) || Module <- ?MODULES],
[code:load_file(Module) || Module <- ?MODULES].
%% @doc Send a global message.
global(Type, Message) ->
lists:foreach(fun(User) -> egs_proto:send_global(User#users.socket, Type, Message) end, egs_db:users_select_all()).

29
src/egs_proto.erl
View File

@ -245,6 +245,35 @@ send_game_server_info(CSocket, GID, IP, Port) ->
Packet = << 16#0216:16, 0:208, GID:32/little-unsigned-integer, 0:64, IP/binary, Port:32/little-unsigned-integer >>,
packet_send(CSocket, Packet).
%% @doc Shortcut for send_global/4.
send_global(CSocket, Type, Message) ->
send_global(CSocket, Type, Message, 2).
%% @doc Send a global message.
%% There are four types of global messages: dialog, top, scroll and timeout.
%% * dialog: A dialog in the center of the screen, which can be OK'd by players.
%% * top: Horizontal scroll on top of the screen, traditionally used for server-wide messages.
%% * scroll: Vertical scroll on the right of the screen, traditionally used for Player X joined the party.
%% * timeout: A dialog in the center of the screen that disappears after Duration seconds.
send_global(CSocket, Type, Message, Duration) ->
TypeID = case Type of
dialog -> 0;
top -> 1;
scroll -> 2;
timeout -> 3;
_ -> 1
end,
UCS2Message = << << X:8, 0:8 >> || X <- Message >>,
try
Packet = << 16#0228:16, 0:304, TypeID:32/little-unsigned-integer, Duration:32/little-unsigned-integer, UCS2Message/binary, 0, 0 >>,
packet_send(CSocket, Packet)
catch
_:_ ->
ignore
end.
%% @doc Say hello. Used by the game server where a temporary session ID isn't needed.
send_hello(CSocket) ->