jw_cad 外部変形 - (1267) luaで点と点マーカを円に変換する -

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

 

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

:luaで点と点マーカを円に変換する
@echo off
set pt=点を残す
:set pt=点を残さない
set r=10
for /f "delims=:" %%n in ('findstr /n "^#!" %0') do (
  copy jwc_temp.txt myfiles > nul
  more +%%n %0 | lua > jwc_temp.txt
)
goto:eof

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

#!この次の行からプログラムを書いてください
for line in io.lines("myfiles") do
  F = {}
  string.gsub(line, "%S+", function (x) table.insert(F, x) end)
  if line:match("^pt") then
    r = os.getenv('r') or 1
    print("ci", F[2], F[3], r)
    if os.getenv('pt') == "点を残す" then print(line) end
  elseif line:match("^pn") then
    --print("lc" .. table.concat(F, " ", 2))
    print(line)
  else
    if line:match("^hq") then
      print("hd\nbz")
    else
      print(line)
    end
  end
end