anchor.diff:                          end,
                           {0, 0, 0},
                           Clients),
  -    {reply, Stats, Clients};
  +
  +    {Total, Connected, Disconnected} = Stats,
  +
  +    case Strategy of
  +        all          -> {reply, Stats, Clients};
  +        total        -> {reply, Total, Clients};
  +        connected    -> {reply, Connected, Clients};
  +        disconnected -> {reply, Disconnected, Clients}
  +    end;
   
   handle_call(ping, _, State) ->
       {reply, pong, State}.
  
positive.code:     Clients = loadurls(Filename,
                         fun (Url, Timeout) ->
                                 flood_utils:log("Starting new flood_fsm with url: ~s, and timeout: ~w",
                                                [Url, Timeout]),
                                 {ok, Pid} = flood_fsm:start_link(Url, Timeout),
                                 Pid
                         end),
  
negative.code: 
  -export([start_link/0, start_link/1, init/1, terminate/2, handle_call/3, handle_info/2]).
  
  -export([spawn_clients/1, disconnect_clients/1, kill_clients/1]).
  -export([clients_status/0, clients_status/1, ping/0]).
  
  %% Gen Server related
  
  