home *** CD-ROM | disk | FTP | other *** search
/ Sony Community Place / BROWSER / APP / cpb20prD1bx.exe / DATA.Z / SpotLight.wrl < prev    next >
Encoding:
Text File  |  1997-05-14  |  1.9 KB  |  89 lines
  1. #VRML V2.0 utf8
  2.  
  3. # "$Id: SpotLight.wrl,v 1.5 1997/04/28 09:58:48 mizutani Exp $";
  4. #
  5. # This file is generated by Community Place Conductor Version 1.0 Alpha 2.
  6. # Sony Corporation 1997.
  7. #
  8.  
  9. NavigationInfo {
  10.   headlight FALSE
  11.   type      [ "WALK" ]
  12. }
  13.  
  14. Transform {
  15.   children [
  16.     DEF SLIGHT SpotLight {
  17.       cutOffAngle 0.785
  18.       radius      10
  19.     }
  20.   ]
  21. }
  22.  
  23. Transform {
  24.   translation 0 0 -5
  25.   children [
  26.     DEF TOUCH TouchSensor {}
  27.     Inline { url "shape\spheres.wrl" }
  28.     Transform {
  29.       translation 0 1.5 0
  30.       children [
  31.         Shape {
  32.           appearance Appearance {
  33.             material Material {
  34.               ambientIntensity 0
  35.               emissiveColor    0.16 0.16 0.16
  36.             }
  37.           }
  38.           geometry DEF MESSAGE Text {
  39.             fontStyle FontStyle {
  40.               justify "MIDDLE"
  41.               size    0.5
  42.             }
  43.             string "SpotLight"
  44.           }
  45.         }
  46.       ]
  47.     }
  48.   ]
  49. }
  50.  
  51. Transform {
  52.   children [
  53.     Viewpoint {
  54.       position    0 0 0
  55.       fieldOfView 1
  56.     }
  57.   ]
  58. }
  59.  
  60.  
  61. DEF TIME TimeSensor {
  62.   cycleInterval 0.1
  63.   loop          TRUE
  64. }
  65.  
  66.  
  67. DEF SCRIPT Script {
  68.   url "scripts/SpotLight.class"
  69.   eventIn  SFTime   evTime
  70.   eventIn  SFTime   evTouchTime
  71.   eventOut SFBool   evOn
  72.   eventOut SFFloat  evIntensity
  73.   eventOut SFColor  evColor
  74.   eventOut SFVec3f  evLocation
  75.   eventOut SFVec3f  evDirection
  76.   eventOut SFFloat  evCutOffAngle
  77.   eventOut MFString evMessage
  78. }
  79.  
  80. ROUTE TOUCH.touchTime      TO SCRIPT.evTouchTime
  81. ROUTE SCRIPT.evColor       TO SLIGHT.set_color
  82. ROUTE TIME.cycleTime       TO SCRIPT.evTime
  83. ROUTE SCRIPT.evIntensity   TO SLIGHT.set_intensity
  84. ROUTE SCRIPT.evLocation    TO SLIGHT.set_location
  85. ROUTE SCRIPT.evDirection   TO SLIGHT.set_direction
  86. ROUTE SCRIPT.evCutOffAngle TO SLIGHT.set_cutOffAngle
  87. ROUTE SCRIPT.evOn          TO SLIGHT.set_on
  88.  
  89.