jw_cad 外部変形 － (641) コマンドプロンプトで文字基準点を取得する(cc) －

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

コマンドプロンプトで文字基準点を取得する(cc)

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

REM #jww
REM #h4               データ選択をしない、読取可能データ全て書き出し
REM #zc
REM #e
*/

with (WScript) {
  f = StdIn
  while (! f.AtEndOfStream) {
    F = ($_ = f.ReadLine()).split(/\s+/)
    if (/^cc(\d+)/i .test($_)) {
      pcc = RegExp.$1 * 1
      echo("h#cc" + pcc)
    }
  }
}

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