home *** CD-ROM | disk | FTP | other *** search
/ MacAddict 11 / MacAddict_011_1997_07.iso / media / MacAddict.ivr < prev    next >
Text File  |  1997-04-23  |  4KB  |  180 lines
  1. #VRML V2.0 utf8
  2.  
  3.  
  4. DEF NewWorld Vista {
  5.     type "CYLINDER"
  6.     filename "nw_hotspots.pic"
  7.     vFov -0.7684 0.7684
  8.     pitchRange -0.7684 0.7684
  9.     zoomRange .1 1
  10.     
  11.     children [
  12.         DEF MaxShipSpinner Transform {
  13.             children [
  14.                 Transform {
  15.                     translation 0 10 -15
  16.                         children [
  17.                             DEF MaxShip WorldIMob {
  18.                                 type "PICT"
  19.                                 filename "maxShip.pic"
  20.                                 width 1.57
  21.                                 height 1
  22.                                 blueScreen 0 0 0
  23.                                     }
  24.                                 ]
  25.                             }
  26.                     ]    
  27.             }
  28.         ]
  29.         
  30.     }
  31.  
  32. #-------------------------------------------------------
  33. #MaxShip
  34. DEF MaxShip_05 Script {
  35.     url "rst:link"
  36.     eventIn SFVec2f overPt
  37.     field SFString cursor "ARROW"
  38.     eventIn SFVec2f clickPt 
  39.     field SFVec2f xBounds 0 1
  40.     field SFVec2f yBounds 0 1  
  41.     eventOut SFBool goodClick    
  42. }
  43. DEF MaxShip_05_Script Script {
  44.     url "Lingo:mHotSpot_05"
  45.     eventIn SFBool activated
  46.     #field SFString data "MaxShip_05 was clicked."    
  47. }
  48. ROUTE MaxShip.overPt TO MaxShip_05.overPt
  49. ROUTE MaxShip.clickPt TO MaxShip_05.clickPt
  50. ROUTE MaxShip_05.goodClick TO MaxShip_05_Script.activated
  51. #-------------------------------------------------------
  52.  
  53.  
  54.  
  55. DEF MaxShipTimer TimeSensor {
  56.     cycleInterval 25
  57.     loop TRUE
  58. }
  59.  
  60. DEF MaxShipOrbit OrientationInterpolator {
  61.     key [ 0, 1 ]
  62.     keyValue [ 0 1 0 0, 0 1 0 6.2832 ]
  63. }
  64.  
  65. ROUTE MaxShipTimer.fraction_changed TO MaxShipOrbit.set_fraction
  66. ROUTE MaxShipOrbit.value_changed TO MaxShipSpinner.set_rotation
  67.  
  68.  
  69.  
  70.  
  71.  
  72. #---HotSpots
  73. #-------------------------------------------------------
  74. DEF HotSpot_01 Script {
  75.     url "rst:link"
  76.     eventIn SFVec2f overPt
  77.     field SFString cursor "ARROW"
  78.     eventIn SFVec2f clickPt 
  79.     field SFVec2f xBounds 0.05 .25
  80.     field SFVec2f yBounds 0.36 1  
  81.     eventOut SFBool goodClick
  82. }
  83. DEF HotSpot_01_Script Script {
  84.     url "Lingo:mHotSpot_01"
  85.     eventIn SFBool activated
  86.     #field SFString data "HotSpot_01 was clicked."    
  87. }
  88. ROUTE NewWorld.clickPt TO HotSpot_01.clickPt
  89. ROUTE NewWorld.overPt TO HotSpot_01.overPt
  90. ROUTE HotSpot_01.goodClick TO HotSpot_01_Script.activated
  91. #-------------------------------------------------------
  92.  
  93.  
  94. #-------------------------------------------------------
  95. DEF HotSpot_02 Script {
  96.     url "rst:link"
  97.     eventIn SFVec2f overPt
  98.     field SFString cursor "ARROW"
  99.     eventIn SFVec2f clickPt 
  100.     field SFVec2f xBounds 0.35 .58
  101.     field SFVec2f yBounds 0.36 1  
  102.     eventOut SFBool goodClick    
  103. }
  104. DEF HotSpot_02_Script Script {
  105.     url "Lingo:mHotSpot_02"
  106.     eventIn SFBool activated
  107.     #field SFString data "HotSpot_02 was clicked."    
  108. }
  109. ROUTE NewWorld.overPt TO HotSpot_02.overPt
  110. ROUTE NewWorld.clickPt TO HotSpot_02.clickPt
  111. ROUTE HotSpot_02.goodClick TO HotSpot_02_Script.activated
  112. #-------------------------------------------------------
  113.  
  114.  
  115. #-------------------------------------------------------
  116. DEF HotSpot_03 Script {
  117.     url "rst:link"
  118.     eventIn SFVec2f overPt
  119.     field SFString cursor "ARROW"
  120.     eventIn SFVec2f clickPt 
  121.     field SFVec2f xBounds 0.7 .94
  122.     field SFVec2f yBounds 0.29 1  
  123.     eventOut SFBool goodClick    
  124. }
  125. DEF HotSpot_03_Script Script {
  126.     url "Lingo:mHotSpot_03"
  127.     eventIn SFBool activated
  128.     #field SFString data "HotSpot_03 was clicked."    
  129. }
  130. ROUTE NewWorld.overPt TO HotSpot_03.overPt
  131. ROUTE NewWorld.clickPt TO HotSpot_03.clickPt
  132. ROUTE HotSpot_03.goodClick TO HotSpot_03_Script.activated
  133. #-------------------------------------------------------
  134.  
  135.  
  136. #-------------------------------------------------------
  137. #SPHERE
  138. DEF HotSpot_04 Script {
  139.     url "rst:link"
  140.     eventIn SFVec2f overPt
  141.     field SFString cursor "ARROW"
  142.     eventIn SFVec2f clickPt 
  143.     field SFVec2f xBounds 0.03 .07
  144.     field SFVec2f yBounds 0.1 .3  
  145.     eventOut SFBool goodClick    
  146. }
  147. DEF HotSpot_04_Script Script {
  148.     url "Lingo:mHotSpot_04"
  149.     eventIn SFBool activated
  150.     #field SFString data "HotSpot_04 was clicked."    
  151. }
  152. ROUTE NewWorld.overPt TO HotSpot_04.overPt
  153. ROUTE NewWorld.clickPt TO HotSpot_04.clickPt
  154. ROUTE HotSpot_04.goodClick TO HotSpot_04_Script.activated
  155. #-------------------------------------------------------
  156.  
  157.  
  158.  
  159. #--------
  160. DEF StartupTrigger TimeSensor {
  161.     startTime 0
  162.     stopTime 100
  163.     loop TRUE
  164.     ROUTE StartupTrigger.isActive TO StartView.on
  165. }
  166.  
  167. DEF StartView Script {
  168.     url "rst:setVal"
  169.     eventIn SFBool on
  170.     exposedField SFFloat val 1
  171.     ROUTE StartView.val_changed TO View.zoom
  172. }
  173.  
  174.  
  175. DEF View Script {
  176.     url "rst:setCamera"
  177.     eventIn    SFFloat zoom
  178.     field SFBool relative FALSE
  179. }
  180.