anchor.diff:  	PMName = "My PM",
   	UCS2PMName = << << X:8, 0:8 >> || X <- PMName >>,
   	EndPaddingSize = 8 * (64 - byte_size(UCS2PMName)),
  -	send(<< (header(16#1602))/binary, 0:32, Bin/binary, 0:MiddlePaddingSize, NbNPC, 0:24, UCS2PMName/binary, 0:EndPaddingSize >>).
  +	GID = get(gid),
  +	send(<< 16#16020300:32, 16#ffff:16, 0:144, 16#00011300:32, GID:32/little, 0:96, Bin/binary, 0:MiddlePaddingSize, NbNPC, 0:24, UCS2PMName/binary, 0:EndPaddingSize, 0:32 >>).
   
   %% @doc Party information.
   %% @todo Handle existing parties.
  
positive.code: send_020f(Filename, SetID, SeasonID) ->
  	{ok, File} = file:read_file(Filename),
  	Size = byte_size(File),
  	send(<< 16#020f0300:32, 0:288, SetID, SeasonID, 0:16, Size:32/little-unsigned-integer, File/binary >>).
  
  %% @doc Send the current UNIX time.
  send_0210() ->
  	CurrentTime = calendar:datetime_to_gregorian_seconds(calendar:now_to_universal_time(now()))
  		- calendar:datetime_to_gregorian_seconds({{1970, 1, 1}, {0, 0, 0}}),
  	send(<< (header(16#0210))/binary, 0:32, CurrentTime:32/little-unsigned-integer >>).
  
  %% @todo End of character loading. Just send it.
  send_021b() ->
  	send(header(16#021b)).
  
  %% @doc Send the list of available universes.
  send_021e() ->
  
negative.code: 
  %% @doc Send the player's current location.
  send_100e(QuestID, ZoneID, MapID, Location, CounterID) ->
  	GID = get(gid),
  	UCS2Location = << << X:8, 0:8 >> || X <- Location >>,
  	Packet = << 16#100e0300:32, 16#ffffffbf:32, 0:128, 16#00011300:32, GID:32/little, 0:64,
  		1:32/little, MapID:16/little, ZoneID:16/little, QuestID:32/little, UCS2Location/binary >>,
  	PaddingSize = (128 - byte_size(Packet) - 8) * 8,
  	case CounterID of
  		16#ffffffff ->
  