jw_cad 外部変形 - (713) パワーシェルで円環ソリッドを確認する(sg:楕円同一幅) -

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

 

パワーシェルで円環ソリッドを確認する(sg:楕円同一幅)

:パワーシェルで円環ソリッドを確認する(sg:楕円同一幅)
@echo off
for /f "delims=:" %%n in ('findstr /n "^#!" %0') do (
  more +%%n %0 | powershell -command -
)
goto:eof

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

#!ここから more +n %0 の n 行目:最初の行は 0 行
$sl = @(0)
(gc jwc_temp.txt) | foreach {
  switch -regex -case ($_)
  {
    '^sg \S+ \S+ \S+ \S+ \S+ \S+ \S+ \S+' {
      $sl += $_
      continue
    }
  }
}
&{
  "hd"
  $m = $sl.length - 1
  for ($i = 1; $i -le $m; $i++) {
    "lc$(6 + $i)"
    "$($sl[$i])"
  }
} | sc jwc_temp.txt

#ここまで powershell は 文末に必ず空白行を置いてください