psu_proto: Review and rename send_global to send_0228. Send a message to all processes instead of sending everything from the console process.

src/egs.erl

@@ -49,12 +49,12 @@ stop() ->
 	Res.
 
 %% @doc Send a global message.
-global(Type, Message) ->
+global(Message) ->
 	if	length(Message) > 511 ->
 			io:format("global: message too long~n");
 		true ->
 			{ok, List} = egs_user_model:select(all),
-			lists:foreach(fun(User) -> psu_proto:send_global(User#egs_user_model.socket, Type, Message) end, List)
+			lists:foreach(fun(User) -> User#egs_user_model.pid ! {egs, notice, top, Message} end, List)
 	end.
 
 %% @doc Warp all players to a new map.

src/egs_game.erl

@@ -36,6 +36,9 @@ info({egs, cast, Command}, #state{gid=GID}) ->
 info({egs, chat, ChatTypeID, ChatGID, ChatName, ChatModifiers, ChatMessage}, _State) ->
 	psu_game:send_0304(ChatTypeID, ChatGID, ChatName, ChatModifiers, ChatMessage);
 
+info({egs, notice, Type, Message}, State) ->
+	psu_proto:send_0228(Type, 2, Message, State);
+
 %% @doc Inform the client that a player has spawn.
 %% @todo Should be something along the lines of 010d 0205 203 201.
 info({egs, player_spawn, _Player}, #state{gid=GID}) ->

src/psu/psu_proto.erl

@@ -1316,6 +1316,18 @@ send_0225(MOTD, CurrentPage, #state{socket=Socket, lid=DestLID}) ->
 	Length = byte_size(Msg) div 2 + 2,
 	packet_send(Socket, << 16#02250300:32, DestLID:16/little, 0:272, NbPages:8, CurrentPage:8, Length:16/little, Msg/binary, 0:16 >>).
 
+%% @doc Display a notice on the player's screen.
+%%      There are four types of notices: 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 rare missions obtention messages.
+%% * timeout: A dialog in the center of the screen that disappears after Duration seconds.
+send_0228(Type, Duration, Message, #state{socket=Socket, gid=DestGID}) ->
+	TypeInt = case Type of dialog -> 0; top -> 1; scroll -> 2; timeout -> 3 end,
+	UCS2Message = << << X:8, 0:8 >> || X <- Message >>,
+	packet_send(Socket, << 16#02280300:32, 16#ffff:16, 0:144, 16#00011300:32, DestGID:32/little, 0:64,
+		TypeInt:32/little, Duration:32/little, UCS2Message/binary, 0:16 >>).
+
 %% @doc Forward the player to a website. The website will open when the player closes the game. Used for login issues mostly.
 send_0231(URL, #state{socket=Socket, gid=DestGID, lid=DestLID}) ->
 	URLBin = list_to_binary(URL),
@@ -1482,33 +1494,6 @@ packet_fragment_send(CSocket, Packet, Size, Current) ->
 	ssl:send(CSocket, Fragment),
 	packet_fragment_send(CSocket, Rest, Size, Current + 16#4000).
 
-%% @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#02280300:32, 0:288, TypeID:32/little, Duration:32/little, UCS2Message/binary, 0, 0 >>,
-		packet_send(CSocket, Packet)
-	catch
-		_:_ ->
-			ignore
-	end.
-
 %% @doc Keepalive. Just send an empty packet, the game doesn't really care.
 %% @todo If there's an actual keepalive command, use it instead.
 send_keepalive(CSocket) ->