jw_cad 外部変形 - (642) コマンドプロンプトで文字寸法を取得する(hcw,hch,hcd,hcc) -

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

 

コマンドプロンプトで文字寸法を取得する(hcw,hch,hcd,hcc)

/* コマンドプロンプトで文字寸法を取得する(hcw,hch,hcd,hcc)
@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 (/^hcw /i .test($_)) hcw = F;
    if (/^hch /i .test($_)) hch = F;
    if (/^hcd /i .test($_)) hcd = F;
    if (/^hcc /i .test($_)) hcc = F;
    if (/^cn(\d+)/i .test($_)) {
      pcn = RegExp.$1 * 1
      if (pcn == 0 && F.length > 1) {
        cw = F[1] * 1.0
        ch = F[2] * 1.0
        cd = F[3] * 1.0
        cc = F[4] * 1
        echo("h#cn" + [pcn, cw, ch, cd, cc].join(" "))
      } else {
        cw = hcw[pcn] * 1.0
        ch = hch[pcn] * 1.0
        cd = hcd[pcn] * 1.0
        cc = hcc[pcn] * 1
        echo("h#cn" + [pcn, cw, ch, cd, cc].join(" "))
      }
    }
  }
}

 

 

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