均等割付解除

Jw_cadの文字コマンドで、均等割付を使用すると、
別のCADでは、正しく表示できないので、
均等割付を解除する外部変形です。
※gawk 3.1.5 用
2023.3.3 半角中点に対応

@REM 均等割付解除
@echo off
REM #jww
REM #cd
REM #h3 文字を選択
REM #hc 文字を範囲選択してください
REM #g1 全レイヤグループ
REM #e
jgawk "/hq/{print \"hd\";next}/^ch/{split($6,chr,\"[・･]\");$6=chr[1];print;next}{print}" jwc_temp.txt>temp.txt
copy temp.txt jwc_temp.txt
del temp.txt
goto end
jgawk '/hq/{print "hd";next}/^^ch/{split($6,chr,"[・･]");$6=chr[1];print;next}{print}' jwc_temp.txt>temp.txt
範囲選択から左AM0時「確定 基点（free）」を実行
:end