buckeyevr

Untitled

Feb 22nd, 2019
34
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\nmobius=parametricSurface\nmobius.setMinMax=s,-1,1\nmobius.setMinMax=t,0,6.6\nmobius.setEquation=x,((3+s*cos(t/2))*cos(t))\nmobius.setEquation=y,((3+s*cos(t/2))*sin(t))\nmobius.setEquation=z,(s*sin(t/2))\nmobius.setSegmentCount=20\nmobius.color=yell0w\nmobius.spawn\n\n//Curve\nc=parametricCurve\nc.setMinMax=t,0,13.2\nc.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))\nc.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)) \nc.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))))\nc.setSegmentCount=50\nc.setThickness=0.2\nc.color=magenta\nc.spawn
Add Comment
Please, Sign In to add comment