anchor.diff:  	end,
   	UCS2Message = << << X:8, 0:8 >> || X <- Message >>,
   	try
  -		Packet = << 16#02280300:32, 0:288, TypeID:32/little-unsigned-integer, Duration:32/little-unsigned-integer, UCS2Message/binary, 0, 0 >>,
  +		Packet = << 16#02280300:32, 0:288, TypeID:32/little, Duration:32/little, UCS2Message/binary, 0, 0 >>,
   		packet_send(CSocket, Packet)
   	catch
   		_:_ ->
  
positive.code: %% @doc Send a packet. The packet argument must not contain the size field.
  packet_send(CSocket, Packet) ->
  	{ok, Size, Padding} = packet_prepare(Packet),
  	packet_send(CSocket, << Size:32/little-unsigned-integer, Packet/binary, Padding/binary >>, Size).
  
  %% @doc Send a normal command.
  packet_send(CSocket, Packet, Size) when Size =< 16#4000 ->
  
negative.code: %% @todo We also probably should send the spawn to everyone in response to this command rather than on area_change.
  parse(Size, 16#010b, Channel, Data) ->
  	<<	_LID:16/little, VarA:16/little, VarB:32/little, HeaderGID:32/little, VarD:32/little, VarE:32/little, VarF:32/little, VarG:32/little, VarH:32/little, VarI:32/little,
  		BodyGID:32/little, _PartyPosOrLID:32/little, VarJ:16/little, _IntDir:16/little, _X:32/little-float, _Y:32/little-float, _Z:32/little-float,
  		VarK:32/little, VarL:32/little, _QuestID:32/little, _ZoneID:32/little, _MapID:32/little, _EntryID:32/little >> = Data,
  	?ASSERT_EQ(Size, 92),
  	?ASSERT_EQ(Channel, 2),
  