slides
:-object object_oo_8 : [slides]. var url = '@talk-oo-8.wrl'. var slideset = 'oo-8'. var interface = 'oo-8-interface'. main :- load(url), delay(5000), initialize, watch(slideset), connect(interface), delay(2000), !. :- end_object object_oo_8.