home *** CD-ROM | disk | FTP | other *** search
/ The Best of Windows 95.com 1996 September / WIN95_09962.iso / vrml / MWE105.ZIP / EExamples / Greek.vxr < prev    next >
Text File  |  1996-01-25  |  921b  |  45 lines
  1. #VRML V1.0 ascii
  2.  
  3. Separator {
  4.     # Options: ON OFF AUTO
  5.     renderCulling AUTO
  6.     
  7.     OUTPUT_TO Greek.wrl
  8.     
  9.     DEF BackgroundColor Info {
  10.         string  ".1 .1 .4"
  11.     }
  12.     
  13.     # Define local parameters - used by Column.vxr
  14.     DEF parameters PARAMETERS {
  15.         fields [SFFloat columnRadius]
  16.         columnRadius .15
  17.     }
  18.  
  19.     DEF xAxis LOOP {
  20.         fields [SFLong start, SFLong end, SFLong position, SFLong step] 
  21.         start 0
  22.         end 5
  23.         
  24.         DEF zAxis LOOP {
  25.             fields [SFLong start, SFLong end, SFLong position, SFLong step] 
  26.             start 0
  27.             end 5
  28.             
  29.             Separator {
  30.                 Translation {
  31.                     translation xAxis:position 0 zAxis:position            
  32.                 }
  33.                 
  34.                 SELECT {
  35.                     fields [ SFLong whichChild ]
  36.                     whichChild if(xAxis:position==0&&zAxis:position==0)then(0)else(1)
  37.                     
  38.                     INCLUDE Column.vxr  # Include greekColumn definition only once
  39.                     
  40.                     USE greekColumn         # Use a reference the rest of the time
  41.                 }
  42.             }
  43.         }
  44.     }
  45. }