anchor.diff:  
   %% Time in milli seconds
   mtime() ->
  -    {A,B,C} = erlang:now(),
  +    {A,B,C} = erlang:timestamp(),
       A*1000000000+B*1000+(C div 1000).
   
  -%% random_init() ->
  -%%     {A,B,C} = now(),
  -%%     random:seed(A,B,C).
  -
  -%% random() ->
  -%%     10 * random:uniform(50).
  -
  
positive.code:     i(F, []).
  
  i(F, A) ->
      print(info, get(verbosity), now(), get(tc), "INF", F, A).
  
  
  d(F) ->
      d(F, []).
  
  d(F, A) ->
      print(debug, get(verbosity), now(), get(tc), "DBG", F, A).
  
  
  printable(_, debug)   -> true;
  printable(info, info) -> true;
  printable(_,_)        -> false.
  
  print(Severity, Verbosity, Ts, Tc, P, F, A) ->
      print(printable(Severity,Verbosity), Ts, Tc, P, F, A).
  
  print(true, Ts, Tc, P, F, A) ->
      io:format("*** [~s] ~s ~p ~s:~w ***"
  	      "~n   " ++ F ++ "~n", 
  	      [format_timestamp(Ts), P, self(), get(sname), Tc | A]);
  print(_, _, _, _, _, _) ->
      ok.
  
  format_timestamp({_N1, _N2, N3} = Now) ->
      {Date, Time}   = calendar:now_to_datetime(Now),
      {YYYY,MM,DD}   = Date,
      {Hour,Min,Sec} = Time,
      FormatDate = 
          io_lib:format("~.4w:~.2.0w:~.2.0w ~.2.0w:~.2.0w:~.2.0w 4~w",
                        [YYYY,MM,DD,Hour,Min,Sec,round(N3/1000)]),  
      lists:flatten(FormatDate).
  
  
  %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  
negative.code:     ET = [{text,tcp}, {text,udp}, {binary,tcp}, {binary,udp}],
      {ok, Mgc} = 
  	?MGC_START(MgcNode, {deviceName, "ctrl"}, ET, [], ?MGC_VERBOSITY),
      ?SLEEP(?SECONDS(1)),
  
      i("[MG] start"),    
      Mg1Mid = {deviceName, "mg1"},
  