anchor.diff:  	[{status, 1}, {char, Char}, {options, Options}] = char_load(User#users.folder, User#users.charnumber),
   	[{quest, Quest}, {zone, Zone}] = proplists:get_value(Map, ?MAPS, [{quest, "p/quest.gc1.nbl"}, {zone, "p/zone.gc1.nbl"}]),
   	try
  +		% broadcast spawn to other people
  +		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
   		send_packet_1005(CSocket, GID, Char),
  
positive.code: 		{psu_chat, ChatGID, ChatName, ChatMessage} ->
  			egs_proto:send_chat(CSocket, Version, ChatGID, ChatName, ChatMessage),
  			?MODULE:loop(CSocket, GID, Version);
  		{ssl, _, Data} ->
  			Packets = egs_proto:packet_split(Data),
  			[dispatch(CSocket, GID, Version, P) || P <- Packets],
  
negative.code: 
  %% @todo Figure out what the other things are.
  
  send_packet_201(CSocket, GID, Map, Entry, User, Char) ->
  	CharGID = User#users.gid,
  	CharLID = User#users.lid,
  	{ok, File} = file:read_file("p/packet0201.bin"),
  	<< _:96, A:32/bits, _:96, B:32/bits, _:256, D:96/bits, _:2592, After/bits >> = File,
  	Packet = << 16#0201:16, 0:48, A/binary, CharGID:32/little-unsigned-integer, 0:64, B/binary, GID:32/little-unsigned-integer,
  		0:64, CharLID:32/little-unsigned-integer, CharGID:32/little-unsigned-integer, 0:96, D/binary, Map:16/unsigned-integer,
  		0:16, Entry:16/unsigned-integer, 0:16, 0:320, Char/binary, After/binary >>,
  	egs_proto:packet_send(CSocket, Packet).
  
  