:- object agent : [bcilib].

var url = 'world.wrl'.

main :-
  loadURL(url),
  teller <- output('loading modules'),
  
  new(actuator,_),
  new(knowledge,_),
  new(controller(controller_queue),_),
  new(sensors(controller_queue),_),
  new(life,_),
  
  sleep(1000),
  teller <- output('ready').

:- end_object agent.