« 文字移動 | トップページ | 文字別レイヤ移動 »

2026年1月13日 (火)

文字移動2

各文字属性毎に、基準点/移動点を指定する外部変形。
※水平横文字・垂直横文字・縦字に適用。
※左AM0時 点指示終了で、#3,4,5,6 または、#5,6の指示点を省略可。

@REM 文字移動2
@echo off
REM #jww
REM #cd
REM #h3 文字選択
REM #hc 範囲選択してください
REM #1 水平横文字 基準点 
REM #2 水平横文字 移動点
REM #3 垂直横文字 基準点
REM #4 垂直横文字 移動点
REM #5 縦文字 基準点
REM #6 縦文字 移動点
REM #99# 点指示終了
REM #e
jgawk -f 文字移動.awk jwc_temp.txt>temp.txt
copy temp.txt jwc_temp.txt
del temp.txt
goto end
左AM0時 点指示終了
:end

###文字移動.awk
#####
/hq/{print "hd";next} #選択図形消去
#水平横文字
/hp1/{xh=$2;yh=$3;next}
/hp2/{dxh=$2-xh;dyh=$3-yh;next}
#垂直横文字
/hp3/{xhv=$2;yhv=$3;next}
/hp4/{dxhv=$2-xhv;dyhv=$3-yhv;next}
#縦文字
/hp5/{xv=$2;yv=$3;next}
/hp6/{dxv=$2-xv;dyv=$3-yv;next}
#水平/垂直横文字移動
/^c[hs]/{
if($5==0){$2=$2+dxh;$3=$3+dyh}
if($4==0){$2=$2+dxhv;$3=$3+dyhv}
print;next}
#縦字移動
/^cv/{$2=$2+dxv;$3=$3+dyv;print;next}
#再作図
{print}

|

« 文字移動 | トップページ | 文字別レイヤ移動 »

コメント

よろしくお願いいたします。

投稿: Since Dos | 2026年1月14日 (水) 15時08分

Since Dosさん、はじめまして。

情報交換室に返信しましたが、ご自身の使い勝手に合わせて
順番を並び変えてください。

投稿: somem | 2026年1月14日 (水) 18時54分

somemさん
いろいろと参考にさせていただいてます。φ(..;)メモメモ
ありがとうございました。

投稿: Since Dos | 2026年1月14日 (水) 19時21分

somem様
お世話になっております

ご相談なのですが
CAD図の中に
1~の通し番号(500程)
文字(樹木…擁壁…等 500程)
標高(131.598 等 500程)
一つのレイヤに混在しているのですが
番号、文字、小数点数値を個別にレイヤ移動
可能でしょうか?

ご一考頂ければ幸いです。

投稿: a.fuii | 2026年2月 7日 (土) 14時06分

a.fuii さん、こんにちは。

検証してお使いください。

投稿: somem | 2026年2月 8日 (日) 09時00分

コメントを書く



(ウェブ上には掲載しません)




« 文字移動 | トップページ | 文字別レイヤ移動 »