« 中心線作図 | トップページ | 2次元配列(数値)のソート »

2018年10月12日 (金)

座標作図

情報交換室の投稿より
原点からの相対座標を作図する外部変形です。
求める座標位置には、実点が必要です。

・書込みレイヤグループのみ
・書込み文字種で作図、文字基点(左下)

◇Math.round():四捨五入メソッド

@if(0==1) //座標作図
@echo off
REM #jww
REM #cd
REM #h1 範囲内のデータのみを選択
REM #hc 範囲選択してください
REM #0 原点を指示してください
REM #hr
REM #e
cscript //nologo //e:jscript %0
copy temp.txt jwc_temp.txt
del temp.txt
goto:eof
@end
//ファイルオープン
fso=new ActiveXObject("Scripting.FileSystemObject")
w=fso.CreateTextFile("temp.txt")
r=fso.OpenTextFile("jwc_temp.txt")
//初期設定
ts=1;te=0 //傾き(水平)
sp=" " //スペース
dq="\"" //ダブルコーテーション
//
var crd=new Array(3)
//データ読込み
while (!r.AtEndOfLine) {
line=r.ReadLine()
//点座標取得
if(/pt/.test(line)){ 
var crd=line.split(/\s+/)
//文字列⇒数値変換
var x=parseFloat(crd[1]) //X座標
var y=parseFloat(crd[2]) //Y座標
//四捨五入、小数点第3位まで
x=Math.round(x*1000)/1000 
y=Math.round(y*1000)/1000
//座標値作図
var crd=x+","+y 
chr="ch"+sp+x+sp+y+sp+ts+sp+te+sp+dq+crd
w.WriteLine(chr)
}else{}
 }
//ファイルクローズ
r.Close()
w.Close()
//
//範囲選択⇒左AM0 確定 基点(free)⇒原点指示
//2018.10.11 by somem

|

« 中心線作図 | トップページ | 2次元配列(数値)のソート »

コメント

コメントを書く



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




トラックバック


この記事へのトラックバック一覧です: 座標作図:

« 中心線作図 | トップページ | 2次元配列(数値)のソート »