buckeyevr

Untitled

Feb 21st, 2019
114
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.75 KB | None | 0 0
  1. \n//CajesMobiusStrip.bvr\n\n//Parametric surface\nt=parametricSurface\nt.setMinMax=t,0,6.5\nt.setMinMax=s,-1,1\nt.setEquation=x,((3+(s*cos(t/2)))*cos(t))\nt.setEquation=y,((3+(s*cos(t/2)))*sin(t))\nt.setEquation=z,(s*sin(t/2))\nt.setSegmentCount=30 \nt.spawn\n\n//Parametric curve\nhelix=parametricCurve\nhelix.setMinMax=t,-6.5,6.5\nhelix.setEquation=x,(((1/5)*cos(t)*sin(t/2))+(3*cos(t)))\nhelix.setEquation=y,(((1/5)*sin(t)*sin(t/2))+(3*sin(t)))\nhelix.setEquation=z,((-1/5)*cos(t/2))\nhelix.setSegmentCount=70\nhelix.setThickness=0.15\nhelix.color=red\nhelix.spawn\n\n//Vector\nz=vectorDraw\nz.setTail=0,0,0\nz.setHead=0,0,2\nz.color=blue\nz.setRadius=0.25\nz.spawn\n\n//Text\ntxt=text\ntxt.text=Cajes Mobius Strip\ntxt.color=green\ntxt.position=0,0,4\ntxt.spawn\n
Advertisement
Add Comment
Please, Sign In to add comment