anchor.diff:  send_welcome(SelfPid, WelcomeMsg) ->
   	SelfPid ! {SelfPid, text, WelcomeMsg}.
   	
  +%% @doc generate response 
  +-spec make_response(pid(), binary(), binary()) -> json().
  +make_response(FromPid, Xnest, Msg) ->
  +	Time = time2binary(erlang:localtime()),
  +	Msg_ = [ {<<"from">>, pid_to_list(FromPid)}
  +		,{<<"xnest">>, Xnest}
  +		,{<<"payload">>, Msg}
  +		,{<<"send_time">>, Time}
  +	],
  +	Response = jsx:encode(Msg_),
  +lager:info("~p", [Response]),
  +	Response.
   
  +%% @doc time to binary
  +-spec time2binary(tuple()) -> binary().
  +time2binary({{Y, M, D}, {H, I, S}}) ->
  +	Y_ = integer_to_binary(Y),
  +	M_ = integer_to_binary(M),
  +	D_ = integer_to_binary(D),
  +	H_ = integer_to_binary(H),
  +	I_ = integer_to_binary(I),
  +	S_ = integer_to_binary(S),
  +	<<Y_/binary, "-", M_/binary, "-", D_/binary, " ", H_/binary, ":", I_/binary, ":", S_/binary>>.
  
positive.code: 
  %% type()
  -type req() :: cowboy_http:req().
  
  
  %% @private
  
negative.code: %% @private
  %% @doc Receive Message from xnest and send it to client
  websocket_info({FromPid, text, Msg}, Req, State) ->
  	ResponseMsg = make_response(FromPid, State#state.xnest_name, Msg),
  	{reply, {text, ResponseMsg}, Req, State};
  
  %% @private
  