jw_cad 外部変形 - (1300) luaで文字フォントを取得する(cn"$<~>) -

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

 

luaで文字フォントを取得する(cn"$<~>)

:luaで文字フォントを取得する(cn"$<~>)
@echo off
for /f "delims=:" %%n in ('findstr /n "^#!" %0') do (
  copy jwc_temp.txt myfiles > nul
  more +%%n %0 | lua - myfiles > jwc_temp.txt
)
goto:eof

REM #jww
REM #e

#!この次の行からプログラムを書いてください
for line in io.lines(arg[1]) do
  if line:match("^cn\"\$<(.+)>") then
    font = line:match("^cn\"\$<(.+)>")
  end
end
print( ("h#font=%s"):format(font))