当方の「Script!3D」を使って立体を作ろう話その18。
今回は、円外形の円柱/円錐の作図命令です。円柱・楕円柱・扇形・弓形と同様、内接する多角形の弧と、それに外接するエッジ部分に囲まれた部分の押し出し形状になります。Jw_cad ユーザーにとってはおなじみ?の「円外ソリッド図形」のイメージでそれを押し出した形状です。



軸回転します。底面にRがあるのが分ります。

今回は、円外形の円柱/円錐の作図命令です。円柱・楕円柱・扇形・弓形と同様、内接する多角形の弧と、それに外接するエッジ部分に囲まれた部分の押し出し形状になります。Jw_cad ユーザーにとってはおなじみ?の「円外ソリッド図形」のイメージでそれを押し出した形状です。
円外形の円柱の作図簡単例です。
OCYLIND n,sp,rx,ry,ka,z,sa,ea,f1,f2,f
原点・作図軸・作図基準平面は、変換マトリックスとなります。
n : (out) 登録された最終図形要素番号(1〜)
sp : 分割数(3-1000)
設定画面の「円円弧分割数」を利用する場合は
変数 SetArcSep を指定して下さい。
円弧角> 90°:2で割り切れる数値
円弧角>180°:3で割り切れる数値
円弧角>270°:4で割り切れる数値として下さい
rx : 底面x軸半径[mm] (>0)
ry : 底面y軸半径[mm] (>0)
ka : 底面XY傾き角度[rad]
z : 高さ [mm] (>0)
sa : 開始角度[rad]
ea : 終了角度[rad]
f1 : 底面の表示 0:しない 1:する
f2 : 上面の表示 0:しない 1:する
f : 表裏逆フラグ 0:上側が表面 1:下側が表面
// 円外形の円柱の作図テスト01実行します。
#VAR
n
w1
w2
#DRAW
PEN 51
CAL w1 = 0/180*PI
CAL w2 = 90/180*PI
OCYLIND n,SetArcSep,100,75,0,50, w1,w2, 1,1,0

円外形底面体の作図簡単例です。
OTUBE n,sp,srx,sry,ska,sz,urx,ury,uka,ax,ay,sa,ea,f1,f2,f
原点・作図軸・作図基準平面は、変換マトリックスとなります。
n : (out) 登録された最終図形要素番号(1〜)
sp : 分割数(3-1000)
設定画面の「円円弧分割数」を利用する場合は
変数 SetArcSep を指定して下さい。
円弧角> 90°:2で割り切れる数値
円弧角>180°:3で割り切れる数値
円弧角>270°:4で割り切れる数値として下さい
srx: 底面x軸半径[mm] (>0)
sry: 底面y軸半径[mm] (>0)
ska: 底面XY傾き角度[rad]
sz : 高さ [mm] (>0)
urx: 上面x軸半径[mm] (>0)
ury: 上面y軸半径[mm] (>0)
uka: 上面XY傾き角度[rad]
ax : 上面偏心X [mm]
ay : 上面偏心Y [mm]
sa : 開始角度[rad]
ea : 終了角度[rad]
f1 : 底面の表示 0:しない 1:する
f2 : 上面の表示 0:しない 1:する
f : 表裏逆フラグ 0:外側が表面 1:内側が表面
// 円外形の底面体作図テスト01実行します。
#VAR
n
w1
w2
#DRAW
PEN 52
CAL w1 = 0/180*PI
CAL w2 = 90/180*PI
OTUBE n,SetArcSep,100,75,0,50, 80,50,0, 0,0, w1,w2, 1,1,0

円外形の円錐の作図簡単例です。
OCONE n,sp,srx,sry,ska,sz,ax,ay,sa,ea,f1,f
原点・作図軸・作図基準平面は、変換マトリックスとなります。
n : (out) 登録された最終図形要素番号(1〜)
sp : 分割数(3-1000)
設定画面の「円円弧分割数」を利用する場合は
変数 SetArcSep を指定して下さい。
円弧角> 90°:2で割り切れる数値
円弧角>180°:3で割り切れる数値
円弧角>270°:4で割り切れる数値として下さい
srx: 底面x軸半径[mm] (>0)
sry: 底面y軸半径[mm] (>0)
ska: 底面XY傾き角度[rad]
sz : 高さ [mm] (>0)
ax : 上面偏心X [mm]
ay : 上面偏心Y [mm]
sa : 開始角度[rad]
ea : 終了角度[rad]
f1 : 底面の表示 0:しない 1:する
f : 表裏逆フラグ 0:外側が表面 1:内側が表面
// 円外形の円錐作図テスト01実行します。
#VAR
n
w1
w2
#DRAW
PEN 53
CAL w1 = 0/180*PI
CAL w2 = 90/180*PI
OCONE n,SetArcSep,100,75,0,80, 0,0, w1,w2, 1,0

軸回転します。底面にRがあるのが分ります。



このブログにコメントするにはログインが必要です。
さんログアウト
この記事には許可ユーザしかコメントができません。