anchor.diff:  -export([init/1, handle_call/3, handle_cast/2, handle_info/2, terminate/2, code_change/3]). %% gen_server.
   
   -record(state, {
  -	setid = 0 :: integer()
  +	setid = 0		:: integer(),
  +	objects = []	:: list()
   }).
   
   %% API.
  
positive.code: 	I;
  rand_setid(N, [Set|Tail], I) ->
  	rand_setid(N - Set, Tail, I + 1).
  
negative.code: init([UniID, QuestID, ZoneID, ZoneData]) ->
  	SetID = rand_setid(proplists:get_value(sets, ZoneData, [100])),
  	Set = egs_quests_db:set(QuestID, ZoneID, SetID),
  	Objects = create_units(Set),
  	{ok, #state{setid=SetID}}.
  
  handle_call(setid, _From, State) ->
  