jw_cad 外部変形 - (640) コマンドプロンプトで文字フォントを取得する(cn"$<~>) -

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

 

コマンドプロンプトで文字フォントを取得する(cn"$<~>)

/* コマンドプロンプトで文字フォントを取得する(cn"$<~>)
@cls & echo off
copy jwc_temp.txt myfiles > nul
cscript //nologo //e:jscript %0 < myfiles > jwc_temp.txt
goto:eof

REM #jww
REM #e
*/

with (WScript) {
  f = StdIn
  while (! f.AtEndOfStream) {
    F = ($_ = f.ReadLine()).split(/\s+/)
    if (/^cn\"\$\<(.+)\>/i .test($_)) {
      pfont = RegExp.$1
      echo("h#font=" + pfont)
    }
  }
}

 

 

外部変形のバッチファイルの構成は以下のとおりです。
/* タイトル
@cls & echo off
コマンドによるスクリプト
goto:eof
*/
jscriptによるスクリプト
=>コマンドによるスクリプトjscript のコメント文に記述しています。