:- consult('main.pl').
:- consult('../network/client.pl').


%:- start_client('134.100.6.149.

%:- asserta(sendmessage(Message) :- myID(ID),send(chat(ID,Message))).

%:- asserta((get_command(C):- unifiable(C, chat(ID,Msg),_), C = chat(ID,Msg),
%	atom_concat(ID,': ',Msg1), atom_concat(Msg1,Msg,Msg2),
%	atom_concat(Msg2, '\n', M),send(@chatwindow, append, M))).
%
