media @ VU
[] readme course(s) preface I 1 2 II 3 4 III 5 6 7 IV 8 9 10 V 11 12 afterthought(s) appendix reference(s) example(s) resource(s) _

talk show tell print

annotate.pl (dlp )


  

annotate

extern


  
  %@include @phrase-annotate.txt
  %@include @vr/library-slides.pl
  
  

slides


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


(C) A. Eliëns 21/5/2007

You may not copy or print any of this material without explicit permission of the author or the publisher.
In case of other copyright issues, contact the author.