jw_cad 外部変形 - (651) コマンドプロンプトで円周ソリッドを確認する(se) -

外部変形は データのやり取りをテキストファイルで行うので プログラム言語は 自由に選ぶことができます。図形は機能的かつシンプルなため、数多くのユーザーに受け入れられています。

 

コマンドプロンプトで円周ソリッドを確認する(se)

/* コマンドプロンプトで円周ソリッドを確認する(se)
@cls & echo off
copy jwc_temp.txt myfiles > nul
cscript //nologo //e:jscript %0 < myfiles > jwc_temp.txt
goto:eof

REM #jww
REM #h1
REM #hc 円周ソリッドを選択してください
REM #e
*/

sl = []
i = 0
with (WScript) {
  f = StdIn
  while (! f.AtEndOfStream) {
    $_ = f.ReadLine()
    if (/^hq/i .test($_)) {
      echo("hd")
      continue
    }
    if (/^se \S+ \S+ \S+ \S+ \S+ \S+ \S+ \S+/i .test($_)) {
      i = i + 1
      sl[i] = $_
      continue
    }
  }
  m = sl.length - 1
  for (i = 1; i <= m; i++) {
    echo("lc" + (6+i))
    echo(sl[i])
  }
}

 

 

外部変形のバッチファイルの構成は以下のとおりです。
/* タイトル
@cls & echo off
コマンドによるスクリプト
goto:eof
*/
jscriptによるスクリプト
=>コマンドによるスクリプトjscript のコメント文に記述しています。