« 2023年6月 | トップページ | 2023年8月 »

2023年7月 7日 (金)

連番(線記号変形)

文字列に複数の数字を含む連番を作図する線記号変形

Photo_20230707205301
1-1 → 1-2 → 1-3 ・・・・・

0 連番
21000 00 0 0 1 0 10000 203 -11 "1-
21000 00 0.5 0 1 0 10000 003 -11 "1 "+
999

| | コメント (6)

2023年7月 3日 (月)

基点移動2

直線、円、円弧で構成される図形の基点を用紙左下に移動する外部変形
前回バッチファアイルの6行目に、REM #hpを追加

@REM 基点移動2
@echo off
REM #jww
REM #cd
REM #h4 読取り可能データ
REM #hp 基準点(0,0)用紙左下
REM #1 基点を指定してください
REM #e
gawk "/hq/{print \"hd\";next}/hp1/{dx=$2;dy=$3}/^ /{$1=$1-dx;$2=$2-dy;$3=$3-dx;$4=$4-dy;print;next}/ci/{$2=$2-dx;$3=$3-dy;print;next}{print}" jwc_temp.txt>temp.txt
copy temp.txt jwc_temp.txt
del temp.txt
goto end
:end

| | コメント (0)

2023年7月 1日 (土)

基点移動

直線、円、円弧で構成される図形の基点を用紙枠中央に移動する外部変形

@REM 基点移動
@echo off
REM #jww
REM #cd
REM #h4 読取り可能データ
REM #1 基点を指定してください
REM #e
gawk "/hq/{print \"hd\";next}/hp1/{dx=$2;dy=$3}/^ /{$1=$1-dx;$2=$2-dy;$3=$3-dx;$4=$4-dy;print;next}/ci/{$2=$2-dx;$3=$3-dy;print;next}{print}" jwc_temp.txt>temp.txt
copy temp.txt jwc_temp.txt
del temp.txt
goto end
:end

| | コメント (0)

« 2023年6月 | トップページ | 2023年8月 »