jw_cad 外部変形 - (667) パワーシェルで点と点マーカを円に変換する -

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

 

パワーシェルで点と点マーカを円に変換する

:パワーシェルで点と点マーカを円に変換する
@echo off
for /f "delims=:" %%n in ('findstr /n "^#!" %0') do (
  more +%%n %0 | powershell -command -
)
goto:eof

REM #jww
REM #h1
REM #g1
REM #bz
REM #e

#!ここから more +n %0 の n 行目:最初の行は 0 行
(gc jwc_temp.txt) | foreach {
  switch -regex -case ($_)
  {
    '^pt' { #点
      "ci $([regex]::split($_,' +')[1,2]) 10"
      "$_"
    }
    '^pn' { #点種
      "lc$($_.substring(2))"
      "$_"
    }
    default {
      if ($_ -match "^hq")  { "hd" } else { "$_" }
    }
  }
} | sc jwc_temp.txt

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