anchor.diff:  
   %% @doc Handle all hits received.
   %% @todo Finish the work on it.
  +%% @todo Type EXP.
  +%% @todo Boxes give EXP too but it doesn't show up on the screen.
   
   %~ log_hits(Data) ->
   	%~ <<	A:32/unsigned-integer, B:32/unsigned-integer, C:32/unsigned-integer, D:32/unsigned-integer,
  
positive.code: 	ok;
  handle_hits(Data) ->
  	%~ log_hits(GID, Data),
  	<< A:224/bits, B:128/bits, _:288/bits, Rest/bits >> = Data,
  	GID = get(gid),
  	PlayerHP = 4401,
  	TargetHP = 0,
  	Damage = 58008,
  	send(<< 16#0e070300:32, 0:160, 16#00011300:32, GID:32/little-unsigned-integer, 0:64,
  		1:32/little-unsigned-integer, 16#01050000:32, Damage:32/little-unsigned-integer,
  		A/binary, 0:64, PlayerHP:32/little-unsigned-integer, 0:32, 16#01000200:32,
  		0:32, TargetHP:32, 0:32, B/binary, 16#04320000:32, 16#80000000:32, 16#26030000:32, 16#89068d00:32, 16#0c1c0105:32 >>),
  	handle_hits(Rest).
  
  %% @doc Build the packet header.
  
negative.code: 	{ok, File} = file:read_file("p/typesinfo.bin"),
  	GID = get(gid),
  	send(<< 16#01130300:32, 0:64, GID:32/little-unsigned-integer, 0:64, 16#00011300:32, GID:32/little-unsigned-integer, 0:64, GID:32/little-unsigned-integer, File/binary >>).
  
  %% @doc Update the character's EXP.
  
  send_0115(GID, TargetID, LV, EXP, Money) ->
  	send(<< 16#01150300:32, 0:64, GID:32/little-unsigned-integer, 0:64, 16#00011300:32, GID:32/little-unsigned-integer, 0:64, GID:32/little-unsigned-integer,
  		0:32, TargetID:32/little-unsigned-integer, LV:32/little-unsigned-integer, 0:32, 0:32, EXP:32/little-unsigned-integer, 0:32, Money:32/little-unsigned-integer, 16#f5470500:32, 0:96, 0:64,
  		16#01000000:32, 16#01000000:32, 16#01000000:32, 16#01000000:32, 16#01000000:32, 16#01000000:32, 16#01000000:32, 16#01000000:32,
  		16#01000000:32, 16#01000000:32, 16#01000000:32, 16#01000000:32, 16#01000000:32, 16#01000000:32, 16#01000000:32, 16#01000000:32 >>).
  
  %% @doc Send the zone initialization notification.
  
  