jw_cad 外部変形 － (727) gawkで点と点マーカを円に変換する －

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

gawkで点と点マーカを円に変換する

:gawkで点と点マーカを円に変換する
@echo off
for /f %%n in ('gawk "/^#!/ { print NR }" %0') do (
  copy jwc_temp.txt myfiles > nul
  more +%%n %0 | gawk -f - myfiles > jwc_temp.txt
)
goto:eof

REM #jww
REM #h1
REM #g1
REM #hc 点と点マーカを選択してください
REM #bz
REM #e

#!ここから more +n %0 の n 行目:最初の行は 0 行
/^pt/ {
  print "ci", $2, $3, r = 10
  print; next
}
!/^hq/ {
  print
  if (/^pn/) print "lc"substr($0, 3)
}
/^hq/ { print "hd\nbz" }