home *** CD-ROM | disk | FTP | other *** search
/ Sony Community Place / BROWSER / APP / CPB20A2.EXE / DATA.Z / SpotLight.wrl < prev    next >
Encoding:
Text File  |  1997-01-29  |  1.6 KB  |  84 lines

  1. #VRML V2.0 utf8
  2.  
  3. #
  4. # This file is generated by Community Place Conductor Version 1.0 Alpha 2.
  5. # Sony Corporation 1997.
  6. #
  7.  
  8. Background {}
  9.  
  10. NavigationInfo {
  11.   headlight FALSE
  12.   type      [ "WALK" ]
  13. }
  14.  
  15. Transform {
  16.   children [
  17.     DEF SLIGHT SpotLight {
  18.       cutOffAngle 0.785
  19.       radius      10
  20.     }
  21.   ]
  22. }
  23.  
  24. Transform {
  25.   translation 0 0 -5
  26.   children [
  27.     DEF TOUCH TouchSensor {}
  28.     Inline {
  29.       url "shape\spheres.wrl"
  30.     }
  31.     Transform {
  32.       translation 0 1.5 0
  33.       children [
  34.         Shape {
  35.           geometry DEF MESSAGE Text {
  36.             fontStyle FontStyle {
  37.               justify "MIDDLE"
  38.               size    0.5
  39.             }
  40.             string "SpotLight"
  41.           }
  42.         }
  43.       ]
  44.     }
  45.   ]
  46. }
  47.  
  48. Transform {
  49.   children [
  50.     Viewpoint {
  51.       position 0 0 0
  52.     }
  53.   ]
  54. }
  55.  
  56.  
  57. DEF TIME TimeSensor {
  58.   cycleInterval 0.1
  59.   loop          TRUE
  60. }
  61.  
  62.  
  63. DEF SCRIPT Script {
  64.   url "scripts/SpotLight.class"
  65.   eventIn  SFTime   evTime
  66.   eventIn  SFTime   evTouchTime
  67.   eventOut SFBool   evOn
  68.   eventOut SFFloat  evIntensity
  69.   eventOut SFColor  evColor
  70.   eventOut SFVec3f  evLocation
  71.   eventOut SFVec3f  evDirection
  72.   eventOut SFFloat  evCutOffAngle
  73.   eventOut MFString evMessage
  74. }
  75.  
  76. ROUTE TOUCH.touchTime      TO SCRIPT.evTouchTime
  77. ROUTE SCRIPT.evColor       TO SLIGHT.set_color
  78. ROUTE TIME.cycleTime       TO SCRIPT.evTime
  79. ROUTE SCRIPT.evIntensity   TO SLIGHT.set_intensity
  80. ROUTE SCRIPT.evLocation    TO SLIGHT.set_location
  81. ROUTE SCRIPT.evDirection   TO SLIGHT.set_direction
  82. ROUTE SCRIPT.evCutOffAngle TO SLIGHT.set_cutOffAngle
  83. ROUTE SCRIPT.evOn          TO SLIGHT.set_on
  84.