Advertisement
buckeyevr

Untitled

Feb 22nd, 2019
69
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 2.17 KB | None | 0 0
  1. //legendre1.bvr\n\n//Parametric surface\nt=parametricSurface\nt.setMinMax=s,0,1.0\nt.setMinMax=t,0,6.5\nt.setEquation=x,(2*(3*cos(s)*cos(s)-1)*sin(s)*cos(t))\nt.setEquation=y,(2*(3*cos(s)*cos(s)-1)*sin(s)*sin(t))\nt.setEquation=z,(2*(3*cos(s)*cos(s)-1)*cos(s))\nt.setSegmentCount=30 \nt.color=blue\nt.spawn\n\ns=parametricSurface\ns.setMinMax=s,1.0,2.2\ns.setMinMax=t,0,6.5\ns.setEquation=x,(2*abs((3*cos(s)*cos(s)-1))*sin(s)*cos(t))\ns.setEquation=y,(2*abs((3*cos(s)*cos(s)-1))*sin(s)*sin(t))\ns.setEquation=z,(2*abs((3*cos(s)*cos(s)-1))*cos(s))\ns.setSegmentCount=30 \ns.color=red\ns.spawn\n\nu=parametricSurface\nu.setMinMax=s,2.2,3.3\nu.setMinMax=t,0,6.5\nu.setEquation=x,(2*abs((3*cos(s)*cos(s)-1))*sin(s)*cos(t))\nu.setEquation=y,(2*abs((3*cos(s)*cos(s)-1))*sin(s)*sin(t))\nu.setEquation=z,(2*abs((3*cos(s)*cos(s)-1))*cos(s))\nu.setSegmentCount=30 \nu.color=blue\nu.spawn\n\nl60=parametricCurve\nl60.setMinMax=t,0,2\nl60.setEquation=x,(t)\nl60.setEquation=y,(0)\nl60.setEquation=z,(t/2)\nl60.setThickness=0.06\nl60.setSegmentCount=20\nl60.color=green\nl60.spawn\n\nl30=parametricCurve\nl30.setMinMax=t,0,4\nl30.setEquation=x,(t/2)\nl30.setEquation=y,(0)\nl30.setEquation=z,(t)\nl30.setThickness=0.06\nl30.setSegmentCount=20\nl30.color=green\nl30.spawn\n\nl0=parametricCurve\nl0.setMinMax=t,0,5\nl0.setEquation=x,(0)\nl0.setEquation=y,(0)\nl0.setEquation=z,(t)\nl0.setThickness=0.06\nl0.setSegmentCount=20\nl0.color=green\nl0.spawn\n\nl90=parametricCurve\nl90.setMinMax=t,0,3\nl90.setEquation=x,(t)\nl90.setEquation=y,(0)\nl90.setEquation=z,(0)\nl90.setThickness=0.06\nl90.setSegmentCount=20\nl90.color=green\nl90.spawn\n\nl120=parametricCurve\nl120.setMinMax=t,0,2\nl120.setEquation=x,(t)\nl120.setEquation=y,(0)\nl120.setEquation=z,(-t/2)\nl120.setThickness=0.06\nl120.setSegmentCount=20\nl120.color=green\nl120.spawn\n\nl150=parametricCurve\nl150.setMinMax=t,0,4\nl150.setEquation=x,(t/2)\nl150.setEquation=y,(0)\nl150.setEquation=z,(-t)\nl150.setThickness=0.06\nl150.setSegmentCount=20\nl150.color=green\nl150.spawn\n\nl180=parametricCurve\nl180.setMinMax=t,0,5\nl180.setEquation=x,(0)\nl180.setEquation=y,(0)\nl180.setEquation=z,(-t)\nl180.setThickness=0.06\nl180.setSegmentCount=20\nl180.color=green\nl180.spawn\n
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement