anchor.diff:    end,
       "Error stopping dns tcp listener, status ~p"),
     ok.
  +
  +create_ans(Result, NodesList) ->
  +  case (length(Result) > 1) or (length(NodesList) =< 1)  of
  +    true -> {ok, Result};
  +    false ->
  +      NodeNum = random:uniform(length(NodesList)),
  +      {NewNode, _} = lists:nth(NodeNum, NodesList),
  +      case Result =:= [NewNode] of
  +        true ->
  +          {NewNode2, _} = lists:nth((NodeNum rem length(NodesList) + 1) , NodesList),
  +          {ok, Result ++ [NewNode2]};
  +        false ->
  +          {ok, Result ++ [NewNode]}
  +      end
  +  end.
  +
  +make_ans_random(Result) ->
  +  Len = length(Result),
  +  case Len of
  +    0 -> [];
  +    1 -> Result;
  +    _ ->
  +      NodeNum = random:uniform(),
  +      NewRes = lists:sublist(Result, 1, NodeNum) ++ lists:sublist(Result, NodeNum + 1, Len),
  +      [lists:nth(NodeNum, Result) | NewRes]
  +  end.
positive.code:   New_DNS_State = DNS_State#dns_worker_state{workers_list = NewWorkersList},
    ok = gen_server:call(?MODULE, {updatePlugInState, New_DNS_State}),
  
  	case Module of
      control_panel ->
        {ok, Result2};
      _ ->
        case (length(Result2) > 1) or (length(NodesList) =< 1)  of
          true -> {ok, Result2};
          false ->
            {S1,S2,S3} = now(),
            random:seed(S1,S2,S3),
            NodeNum = random:uniform(length(NodesList)),
            {NewNode, _} = lists:nth(NodeNum, NodesList),
            case Result2 =:= [NewNode] of
              true ->
                {NewNode2, _} = lists:nth((NodeNum rem length(NodesList) + 1) , NodesList),
                {ok, Result2 ++ [NewNode2]};
              false ->
                {ok, Result2 ++ [NewNode]}
            end
        end
    end;
  
  handle(_ProtocolVersion, get_nodes) ->
  
negative.code: 
    case AvgLoad of
      0 ->
        Res = make_ans_random(lists:map(
          fun({Node, _}) ->
            Node
          end, NodesList)),
        {ok, Res};
      _ ->
        {S1,S2,S3} = now(),
        random:seed(S1,S2,S3),
  