Start3d();
Setparent(Cdyname()+"fig");
Setketcindyjs(["Remove=[O,X,Y,Z]"]);

Putaxes3d(5);//no ketjs
Xyzax3data("","x=[-5,5]","y=[-5,5]","z=[-5,5]");

Spacecurve("1","3*[cos(t),sin(t),0.1*t]","t=[0,4*pi]",["Num=100"]);
pA=[3,0,0];
pB=[3,0,3*0.1*4*pi];
Spaceline("1",[pA,pB]);

if(skeleflg==1,
 tmp=["ax3d","sc3d1","sl3d1"];
 Skeletonparadata("1",tmp,tmp,[1.5,"File=y"]);
 skeleflg=0;
);  

Figpdf();
Windispg();