jw_cad 外部変形 - (692) パワーシェルでスケールを取得する(hs) -

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

 

パワーシェルでスケールを取得する(hs)

:パワーシェルでスケールを取得する(hs)
@echo off
for /f "delims=:" %%n in ('findstr /n "^#!" %0') do (
  more +%%n %0 | powershell -command -
)
goto:eof

REM #jww
REM #e

#!ここから more +n %0 の n 行目:最初の行は 0 行
(gc jwc_temp.txt) | foreach {
  switch -regex -case ($_)
  {
    '^hs' {
      $F = [regex]::split($_,' +')
      $i = 0
      $hs = @{}
      $F[1..$F.length] | %{ $hs[$i] = [double] $_ ; $i++ }
      $hs += @{'0'=$($hs[0]);'1'=$($hs[1]);'2'=$($hs[2]);'3'=$($hs[3]);'4'=$($hs[4]);'5'=$($hs[5])}
      $hs += @{'6'=$($hs[6]);'7'=$($hs[7]);'8'=$($hs[8]);'9'=$($hs[9])}
      $hs += @{a=$($hs[10]);b=$($hs[11]);c=$($hs[12]);d=$($hs[13]);e=$($hs[14]);f=$($hs[15])}
    }
    '^lg[0-9a-f]' {
      $plg = $_.substring(2,1)
      if ($lg -eq $null) {$lg = $plg}
      "h#S=1/$($hs[$lg])"
    }
  }
} | sc jwc_temp.txt

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