Beefy Boxes and Bandwidth Generously Provided by pair Networks
Clear questions and runnable code
get the best and fastest answer
 
PerlMonks  

vrml2

by Dr.Altaica (Scribe)
on May 09, 2002 at 11:34 UTC ( [id://165332]=note: print w/replies, xml ) Need Help??


in reply to Favorite programming language, other than Perl:

I would have to say my secont favorit languge would be VRML verson 2. i'm not talking about VRMLscript I mean pure VRML. who needs veriables or fancy control logic. I had a three story elevator but this is what I could quickly find on the web(and was mine)
#VRML V2.0 utf8 PROTO doorx [ field SFVec3f t 0 0 0 ] { Transform { translation IS t children [ DEF doorts TouchSensor { } DEF ts TimeSensor { cycleInterval 10 loop FALSE } DEF pi PositionInterpolator { key [ 0 .1 .9 1 ] keyValue [ .25 0 0 .75 0 0 .75 0 0 .25 0 0 ] } DEF pi2 PositionInterpolator { key [ 0 .1 .9 1 ] keyValue [ -.25 0 0 -.75 0 0 -.75 0 0 -.25 0 0 ] } DEF tr Transform { translation .25 0 0 children [ Shape { geometry Box { size .5 2.5 .01 } } ] } DEF tr2 Transform { translation -.25 0 0 children [ Shape { geometry Box { size .5 2.5 .01 } } ] } ] } ROUTE ts.fraction_changed TO pi.set_fraction ROUTE pi.value_changed TO tr.set_translation ROUTE doorts.touchTime TO ts.set_startTime ROUTE ts.fraction_changed TO pi2.set_fraction ROUTE pi2.value_changed TO tr2.set_translation }
|\_/|
/o o\
(>_<)
 `-'

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: note [id://165332]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this?Last hourOther CB clients
Other Users?
Others avoiding work at the Monastery: (5)
As of 2024-04-24 07:22 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found