buckeyevr

Untitled

Feb 22nd, 2019
95
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.01 KB | None | 0 0
  1. // Mobius Strip \nmobiusStrip.bvr \n// Parametric surface\nc=parametricSurface\nc.setMinMax=s,-1,1\nc.setMinMax=t,0,6.6\nc.setEquation=x,((3+s*cos(t/2))*cos(t))\nc.setEquation=y,((3+s*cos(t/2))*sin(t))\nc.setEquation=z,(s*sin(t/2))\nc.setSegmentCount=20\nc.color=yell0w\nc.spawn\n\n//Curve\ncurve1=parametricCurve\ncurve1.setMinMax=t,0,13.2\ncurve1.setEquation=x,((1/5)*((-3*cos(t)*sin(t/2))/((9*cos(t)*cos(t)*sin(t/2)*sin(t/2)+9*sin(t)*sin(t)*sin(t/2)*sin(t/2)+(3*sin(t)*sin(t)*cos(t/2)+3*cos(t)*cos(t)*cos(t/2))^2)^(1/2)))+3*cos(t))\ncurve1.setEquation=y,((1/5)*((-3*sin(t)*sin(t/2))/((9*cos(t)*cos(t)*sin(t/2)*sin(t/2)+9*sin(t)*sin(t)*sin(t/2)*sin(t/2)+(3*sin(t)*sin(t)*cos(t/2)+3*cos(t)*cos(t)*cos(t/2))^2)^(1/2)))+3*sin(t)) \ncurve1.setEquation=z,((1/5)*((3*sin(t)*sin(t)*cos(t/2)+3*cos(t)*cos(t)*cos(t/2))/((9*cos(t)*cos(t)*sin(t/2)*sin(t/2)+9*sin(t)*sin(t)*sin(t/2)*sin(t/2)+(3*sin(t)*sin(t)*cos(t/2)+3*cos(t)*cos(t)*cos(t/2))^2)^(1/2))))\ncurve1.setSegmentCount=50\ncurve1.setThickness=0.2\ncurve1.color=magenta\ncurve1.spawn
Advertisement
Add Comment
Please, Sign In to add comment