相談室(2)-T2823

Indexへ
(2826)//【2823】→(2824)
------------------------
【タイトル】ソリッド線の外変
【記事番号】 2823 (*)
【日時】05/06/30 12:48
【発言者】kiki

タールさん以外でソリッド線の外変プログラムがありましたら、どなたか教えてください。変換でも

 Indexへ
(2823)←【2824】→(2829)
------------------------
【タイトル】Re(1):ソリッド線の外変
【記事番号】 2824 (2823)
【日時】05/06/30 13:03
【発言者】siegel

▼kikiさん：
>タールさん以外でソリッド線の外変プログラムがありましたら、どなたか教えてください。変換でも

ご要望の主旨がわかりませんが、SUuSANさんの「line2sld」は、どうでしょう。
http://kats.s26.xrea.com:8080/pukiwiki.php?FrontPage

作者様　ありがとうございます。

Indexへ
(2824)←【2829】→(2830)
------------------------
【タイトル】Re(2):ソリッド線の外変
【記事番号】 2829 (2824)
【日時】05/06/30 14:27
【発言者】kiki

▼siegelさん：
>▼kikiさん：
>>タールさん以外でソリッド線の外変プログラムがありましたら、どなたか教えてください。変換でも
>
>ご要望の主旨がわかりませんが、SUuSANさんの「line2sld」は、どうでしょう。
>http://kats.s26.xrea.com:8080/pukiwiki.php?FrontPage
>
>作者様　ありがとうございます。

ありがとうございます
主旨はアウトライン文字をソリッドで着色し、文字の線もソリッドにして図形として保存したいのです。

Indexへ
(2829)←【2830】→(2831)
------------------------
【タイトル】線をソリッドに変換する外変
【記事番号】 2830 (2823)
【日時】05/06/30 17:37
【発言者】コジマ

線をソリッドに変換する外変です。
起動後、カラーパレットが表示されますので、自由に任意色が選択できます。

mswin32 版 Ruby のインストールが必要。
以下で入手できます。
http://www61.tok2.com/home2/gravelroad/tips/inst_msw.html

コピペ後、全角スペースを半角スペースに一括置換してください。

◎バッチファイル（線→ソリッド変更.bat）

@REM 線をソリッドに変更
@echo off
REM　#jww
REM　#cd
REM　#ht10
REM　#zz
REM　#zw
REM　#h1
REM　#e
copy jwc_temp.txt temp.txt　> nul
ruby -Ks 線→ソリッド変更.rb temp.txt > jwc_temp.txt

◎スクリプトファイル（線→ソリッド変更.rb）

require 'vr/vruby'
require 'vr/vrcontrol'

frm=VRLocalScreen.newform
def frm.construct
　　　　move 350,200,300,300
　　　　$a=chooseColorDialog.to_s
end

frm.create.show

puts "hd"
while ARGF.gets
　　　　xy=split
　　　　if xy[0]=~/^hq/
　　　　elsif xy[0]=~/^lc/
　　　　　　　　lc=xy[0]
　　　　elsif xy[0]=~/^\d|^-/
　　　　　　　　puts ["lc10",$a].join("\s")
　　　　　　　　print "sl"+"\s"+$_
　　　　　　　　puts lc
　　　　else
　　　　　　　　print $_
　　　　end
end

Indexへ
(2830)←【2831】→(2832)
------------------------
【タイトル】Re(1):線→ソリッド変更
【記事番号】 2831 (2830)
【日時】05/06/30 17:57
【発言者】paradiso2

▼コジマさん：
>線をソリッドに変換する外変です。
>起動後、カラーパレットが表示されますので、自由に任意色が選択できます。

おおっ、素晴らしい！見事にソリッドになってる！
しかも、色パレットで色数は無限に作れるし。
早速頂きました。
いつもありがとうございます。

Indexへ
(2831)←【2832】//(2825)
------------------------
【タイトル】Re(1):修正
【記事番号】 2832 (2830)
【日時】05/06/30 18:07
【発言者】コジマ

線以外の色が変わってしまいますね。

以下修正しました。（線以外は、属性を保持する。）

◎スクリプトファイル（線→ソリッド変更.rb）

require 'vr/vruby'
require 'vr/vrcontrol'

frm=VRLocalScreen.newform
def frm.construct
　　　　move 350,200,300,300
　　　　$a=chooseColorDialog.to_s
end

frm.create.show

puts "hd"
while ARGF.gets
　　　　xy=split
　　　　if xy[0]=~/^hq/
　　　　elsif xy[0]=~/^lc/
　　　　　　　　lc=xy[0]
　　　　　　　　print $_
　　　　elsif xy[0]=~/^\d|^-/
　　　　　　　　puts ["lc10",$a].join("\s")
　　　　　　　　print "sl"+"\s"+$_
　　　　　　　　puts lc
　　　　else
　　　　　　　　print $_
　　　　end
end