球と円柱により曲線を描画します。
//**********************************************************************************
入力
Lr:線の半径
V1:媒介変数の範囲<始点,終点,刻み幅>
Fn:式の登録番号
//**********************************************************************************
#macro Space_line2(Lr,V1,Fn)
#local P1=Line_function(V1.x,Fn);
#local Tp=V1.x; #while( Tp < V1.y )
#local P2=Line_function(Tp+V1.z,Fn);
cylinder { P1, P2, Lr } #if( Tp < V1.y-V1.z ) sphere { P2, Lr } #end
#local P1=P2;
#local Tp=Tp+V1.z; #end
#end
//**********************************************************************************