Indexへ
(9232)//【9233】→(9592)
------------------------
【タイトル】ruby による JW_CAD 外部変形 汎用ライブラリ試作の報告
【記事番号】 9233 (*)
【 日時 】07/03/09 23:40
【 発言者 】Kazuo Miyake qqza3hq89@aioros.ocn.ne.jp
【 リンク 】http://www17.ocn.ne.jp/~lite/



 ruby による JW_CAD 外部変形用 ライブ
ラリ を 試作しました。作図の基本動作の
コマンド集です。

 なんとか動くようになった段階ですが、
簡単なプログラムなら利用できるようにな
ってきましたのでご報告します。

 ライブラリは jw.rb という ひとつのフ
ァイルにまとめました。表計算のマクロの
ように JW_CAD 外部変形を利用しようと試
みた ruby による補助プログラムです。

 簡単な使用例を紹介します。

2点を結ぶ線を引く1行プログラムです。

@rem 【 線を引く 】
@echo off
ruby -rjw -e "['1','2'].line" > seen
del jwc_temp.txt
ren seen jwc_temp.txt
exit

REM #jw
REM #1- 始点を指示してください
REM #2 終点を指示してください
REM #e

正3〜8角形を同時に描くプログラムです。

@rem 正多角形
@echo off
ruby -rjw -x %~f0 > > seen
del jwc_temp.txt
ren seen jwc_temp.txt
exit

REM #jw
REM #1○点を指示 (L)free (R)Read
REM #e

#!ruby
for n in 3..8
    pt = '1'
    r = 50.scale #1辺の長さ
    d = 2*PI/n
    e = $hk.rad - d/2
    print "lc%s\n" % n
    for i in 1..n+1
        pt = polarto(pt.plot(""),r,d*i+e)
    end
end

 jw.rb には自動読取機能があります。そ
のため 指示点1 の 座標データは '1' と
表現すれば使えるようにしています。
 軸角の値は $hk という変数に 格納され
るようにしています。

 jw.rb に どのような効能があるのか い
まのところはっきりしていないのですが、
実験プログラムをいくつかホームページで
紹介していますので、興味のある方はどう
ぞ。( 題名 : いろはに ruby 外部変形 )

 皆様方のご健康とご活躍をお祈り申し上
げます。

 Lite & Seen Lite の ホームページは
 http://www17.ocn.ne.jp/~lite/ です。


       記録 2007.03.09 三宅


Indexへ
(9233)←【9592】//(9234)
------------------------
【タイトル】Re(1):ruby による JW_CAD 外部変形 汎用ライブラリ試作の報告
【記事番号】 9592 (9233)
【 日時 】07/05/12 20:06
【 発言者 】Kazuo Miyake qqza3hq89@aioros.ocn.ne.jp

 標準入力を jwc_temp.txt に切り替える
とバッチファイルが簡潔になりますことを
報告します。

 使用例で説明します。

2点を結ぶ線を引く1行プログラムです。

@rem 【 線を引く 】
@echo off
ruby -rjw -e "$>=files; [1,2].line"
exit

REM #jw
REM #1- 始点を指示してください
REM #2 終点を指示してください
REM #e

$>=files を 追加しています。

ただし

$>=$stdout
files=open("jwc_temp.txt","w")

です。


正3〜8角形を同時に描くプログラムです。

@rem 正多角形
@echo off
ruby -rjw -x %~f0
exit

REM #jw
REM #1○点を指示 (L)free (R)Read
REM #e

#!ruby
$>=files
for n in 3..8
    pt = '1'
    r = 50.scale #1辺の長さ
    d = 2*PI/n
    e = $hk.rad - d/2
    print "lc%s\n" % n
    for i in 1..n+1
        pt = polarto(pt.plot(""),r,d*i+e)
    end
end


通常のプログラムでも 標準出力を画面から
jwc_temp.txt へ切り替えて利用したほうが
すれば便利なものもあるかとは思います。

 皆様方のご健康とご活躍をお祈り申し上
げます。

 Lite & Seen Lite の ホームページは
 http://www17.ocn.ne.jp/~lite/ です。


       記録 2007.05.12 三宅