buckeyevr

Untitled

Feb 19th, 2019
40
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.65 KB | None | 0 0
  1. //IntersectingPlanes.bvr\n\n//Intersecting planes -x-y+z=1\nip1=parametricSurface \nip1.setMinMax=s,-8,4\nip1.setMinMax=t,-2,4\nip1.setEquation=x,(t)\nip1.setEquation=y,(s)\nip1.setEquation=z,(1+t+s)\nip1.setSegmentCount=20\nip1.color=green\nip1.spawn\n\n//Intersecting planes x+z=1\nip2=parametricSurface\nip2.setMinMax=s,-8,4\nip2.setMinMax=t,-2,4\nip2.setEquation=x,(t)\nip2.setEquation=y,(s)\nip2.setEquation=z,(1-t)\nip2.setSegmentCount=20\nip2.color=red\nip2.spawn\n\n//Intersecting line\nl=parametricCurve\nl.setMinMax=t,-3,3\nl.setEquation=x,(1-t)\nl.setEquation=y,(-2+2*t)\nl.setEquation=z,(t)\nl.setSegmentCount=70\nl.setThickness=0.2\nl.color=blue\nl.spawn\n
Add Comment
Please, Sign In to add comment