//creat-lollipop.bvr\n\n//Parametricsurface\nc=parametricSurface\nc.setMinMax=s,0,3.3\nc.setMinMax=t,0,6.6\nc.setEquation=x,(4*cos(t)*sin(s))\nc.setEquation=y,(4*sin(t)*sin(s))\nc.setEquation=z,(4*cos(s))\nc.setSegmentCount=30\nc.color=blue\nc.spawn\n\n//Parametriccurve\nsp=parametricCurve\nsp.setMinMax=t,-20,20\nsp.setEquation=x,(4*cos(t)*cos(atan(.1*t)))\nsp.setEquation=y,(4*sin(t)*cos(atan(.1*t)))\nsp.setEquation=z,(-4*sin(atan(.1*t)))\nsp.setSegmentCount=200\nsp.setThickness=0.4\nsp.color=green\nsp.spawn\n\n//Parametriccurve\nl=parametricCurve\nl.setMinMax=t,-15,0\nl.setEquation=x,(0)\nl.setEquation=y,(0)\nl.setEquation=z,(t)\nl.setSegmentCount=20\nl.setThickness=0.4\nl.color=red\nl.spawn