home *** CD-ROM | disk | FTP | other *** search
/ VRML Tools for 3D Cyberspace / VRML_Tools_For_3D_Cyberspace.iso / vream / data.1 / turbo.vre < prev    next >
Text File  |  1996-02-09  |  2KB  |  60 lines
  1. // VREAM Extension File
  2.  
  3.       
  4. VRC_REFERENCE_OBJECT,S,ball;
  5.        vrc_hint,s,
  6.        "Click here to activate WIRL extensions";
  7.        vrc_auto_translate_relative_limits,s,0,0,1,0,0,0,0,-40,5;
  8.  
  9. VRC_REFERENCE_OBJECT,S,hand;
  10.        vrc_auto_rotate_relative_limits,s,0,0,1,0,0,0,0,-1.5,1.7;
  11.  
  12. VRC_REFERENCE_OBJECT,S,scooter;
  13.            vrc_auto_translate_relative_limits,s,0,1,0,0,0,-40,20,0,0;
  14. VRC_REFERENCE_OBJECT,S,world;
  15.                vrc_weight,s,30;
  16. vrc_links,s,1;
  17.  
  18. // initialize variable
  19. vrc_link,s,null,null,0,0,10;
  20.   vrc_initialize,c;
  21.   vrc_variable,r,set,@ui_0,0;
  22. vrc_link,s,null,plane,0,0,15;
  23.          vrc_initialize,c;
  24.          VRC_OBJECT_ROTATE_relative,R, 
  25.          -0.700000,0.000000,0.000000,0,
  26.          30.000000,30.000000,20.000000;
  27.  
  28. // test if first time the hand is picked
  29. vrc_link,s,null,null,0,0,20;
  30.   vrc_variable,c,eq,@ui_0,0;
  31.   vrc_and,r;
  32. vrc_link,s,ball,null,0,0,30;
  33.   vrc_object_picked,c,1;
  34.   vrc_variable,r,set,@ui_0,1;
  35. // if so then jack in all these extensions
  36. //      wave the hand
  37.  vrc_link,s,null,hand,0,0,40;
  38.   vrc_and,c;
  39.   vrc_auto_rotate_relative,r,0,0,0.2,0,0,0,-2.5;
  40. // drop the ball
  41. vrc_link,s,null,ball,0,0,50;
  42.   vrc_and,c;
  43.   vrc_auto_translate_relative,r,0,0,-2;
  44.  
  45. // loop the plane
  46. vrc_link,s,null,plane,0,0,60;
  47.   vrc_and,c;
  48.   vrc_auto_rotate_relative,r,0,0.1,0,0,30,30,10;
  49. // rotate the plane's propeller
  50. vrc_link,s,null,blades,0,0,70;
  51.   vrc_and,c;
  52.   vrc_auto_rotate_relative,r,0,0,0.5,0,0,0,2.5;
  53. // move the scooter
  54. vrc_link,s,null,scooter,0,0,80;
  55.   vrc_and,c;
  56.   vrc_auto_translate_relative,r,0,2.5,0;
  57.  
  58.  
  59.  
  60.