Indexへ
(2256)//【2248】→(2253)
------------------------
【タイトル】各レイヤの線色一括変換
【記事番号】 2248 (*)
【 日時 】05/06/16 11:11
【 発言者 】k.sato kohichi1@dorf-arc.co.jp

　いつもJWW重宝しています。
題名の通りひとつのグループ内の各レイヤにデータがあるとして、
レイヤの移動はしないで線色のみ一括で各レイヤ指定色にする方法はありますか？


Indexへ
(2248)←【2253】→(2264)
------------------------
【タイトル】Re(1):各レイヤの線色一括変換
【記事番号】 2253 (2248)
【 日時 】05/06/16 13:38
【 発言者 】joker
【 リンク 】http://www.atsmile.com/jw/



▼k.satoさん：
>題名の通りひとつのグループ内の各レイヤにデータがあるとして、
>レイヤの移動はしないで線色のみ一括で各レイヤ指定色にする方法はありますか？

線色を変えたくないレイヤを　表示のみ　や　非表示　にして
範囲選択で　全選択　して
属性変更　で　線色を指定　すればいいと思います。


Indexへ
(2253)←【2264】→(2265)
------------------------
【タイトル】Re(2):各レイヤの線色一括変換
【記事番号】 2264 (2253)
【 日時 】05/06/16 18:41
【 発言者 】k.sato kohichi1@dorf-arc.co.jp

▼jokerさん：
>▼k.satoさん：
>線色を変えたくないレイヤを　表示のみ　や　非表示　にして
>範囲選択で　全選択　して
>属性変更　で　線色を指定　すればいいと思います。

申し訳ありません、説明不足でした。
その方法だと１レイヤのみの変換ですよね、希望は0〜Fレイヤまで
を一括で環境設定のレイヤ毎の線色の既定値に変換する機能なのです。

たとえば、環境設定でレイヤ毎の線色の既定値を設定してあるとして、
第３者から受け取った図面が、書込んであるレイヤはあっていて、
線の色だけが自分の環境既定色じゃない場合、一括で線色のみを各レイヤ既定色
にできたら便利だと思ったのですが・・・
１レイヤずつ16回範囲選択して変換するしかないのでしょうか？


Indexへ
(2264)←【2265】→(2266)
------------------------
【タイトル】Re(1):各レイヤの線色一括変換
【記事番号】 2265 (2248)
【 日時 】05/06/16 19:09
【 発言者 】コジマ

▼k.satoさん：
>　いつもJWW重宝しています。
>題名の通りひとつのグループ内の各レイヤにデータがあるとして、
>レイヤの移動はしないで線色のみ一括で各レイヤ指定色にする方法はありますか？

外部変形なら可能です。
この外部変形の実行には　mswin32 版 Ruby　のインストールが必要です。
以下で入手できます。
http://www61.tok2.com/home2/gravelroad/tips/inst_msw.html

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

◎バッチファイル（レイヤ線色変更.bat）

@REM 全レイヤの線色を一括変更する。
@echo off
REM　#jww
REM　#cd
REM　#ht10
REM　#ht40
REM　#zz
REM　#zw

REM　#h1
REM　#e
copy jwc_temp.txt temp.txt　> nul
del jwc_temp.txt　
ruby -Ks レイヤ線色変更.rb


◎スクリプトファイル（レイヤ線色変更.rb）

$deta=[];$lylc=[]
$deta << "hd"

puts "↓レイヤ0の線色を入力してください　(変更無:ENTER)"
ly0=gets.chop
$lylc<<"lc"+ly0

puts "↓レイヤ1の線色を入力してください (変更無:ENTER)"
ly1=gets.chop
$lylc<<"lc"+ly1

puts "↓レイヤ2の線色を入力してください (変更無:ENTER)"
ly2=gets.chop
$lylc<<"lc"+ly2

puts "↓レイヤ3の線色を入力してください (変更無:ENTER)"
ly3=gets.chop
$lylc<<"lc"+ly3

puts "↓レイヤ4の線色を入力してください (変更無:ENTER)"
ly4=gets.chop
$lylc<<"lc"+ly4

puts "↓レイヤ5の線色を入力してください (変更無:ENTER)"
ly5=gets.chop
$lylc<<"lc"+ly5

puts "↓レイヤ6の線色を入力してください (変更無:ENTER)"
ly6=gets.chop
$lylc<<"lc"+ly6

puts "↓レイヤ7の線色を入力してください (変更無:ENTER)"
ly7=gets.chop
$lylc<<"lc"+ly7

puts "↓レイヤ8の線色を入力してください (変更無:ENTER)"
ly8=gets.chop
$lylc<<"lc"+ly8

puts "↓レイヤ9の線色を入力してください (変更無:ENTER)"
ly9=gets.chop
$lylc<<"lc"+ly9

puts "↓レイヤaの線色を入力してください (変更無:ENTER)"
lya=gets.chop
$lylc<<"lc"+lya

puts "↓レイヤbの線色を入力してください (変更無:ENTER)"
lyb=gets.chop
$lylc<<"lc"+lyb

puts "↓レイヤcの線色を入力してください (変更無:ENTER)"
lyc=gets.chop
$lylc<<"lc"+lyc

puts "↓レイヤdの線色を入力してください (変更無:ENTER)"
lyd=gets.chop
$lylc<<"lc"+lyd

puts "↓レイヤeの線色を入力してください (変更無:ENTER)"
lye=gets.chop
$lylc<<"lc"+lye

puts "↓レイヤfの線色を入力してください (変更無:ENTER)"
lyf=gets.chop
$lylc<<"lc"+lyf

open("temp.txt","r") { |f|
while line=f.gets
　　　　xy = line.split

　　　　if xy[0]=~ /^hq/

　　　　elsif xy[0]=~　/^ly/
　　　　　　　　ly=xy[0][2,1]
　　　　　　　　lylc=$lylc[ly.hex]

　　　　　　　　$deta << xy[0]

　　　　　　　　$deta <
　　　　elsif xy[0]=~　/^lc/
　　　　　　　　$deta << xy[0] if lylc ==("lc")

　　　　else
　　　　　　　　$deta << line
　　　　end
end
}

text=$deta

File.open("jwc_temp.txt","w"){
|file|;text.each{|line|;file.puts line;}
}


Indexへ
(2265)←【2266】→(2267)
------------------------
【タイトル】Re(2):各レイヤの線色一括変換
【記事番号】 2266 (2265)
【 日時 】05/06/16 20:49
【 発言者 】k.sato kohichi1@dorf-arc.co.jp

▼コジマさん：
>▼k.satoさん：
>>　いつもJWW重宝しています。
>>題名の通りひとつのグループ内の各レイヤにデータがあるとして、
>>レイヤの移動はしないで線色のみ一括で各レイヤ指定色にする方法はありますか？
>
>外部変形なら可能です。
>この外部変形の実行には　mswin32 版 Ruby　のインストールが必要です。
>以下で入手できます。
>http://www61.tok2.com/home2/gravelroad/tips/inst_msw.html
>
外部変形のことはあまり知識がないので、
いろいろやってみましたが出来ません。教えてほしいのですが
Ruby　のインストールはたぶん問題なくできたのですが、
コピペとはメモ帳をひらいて貼り付けでいいのでしょうか？

全角スペースを半角スペースに一括置換もして
保存後実行してみましたがうまくいきません。
申し訳ありませんが教えていただけないでしょうか？


Indexへ
(2266)←【2267】→(2272)
------------------------
【タイトル】Re(3):各レイヤの線色一括変換
【記事番号】 2267 (2266)
【 日時 】05/06/16 23:43
【 発言者 】コジマ

▼k.satoさん：
>▼コジマさん：
>>▼k.satoさん：
>>>　いつもJWW重宝しています。
>>>題名の通りひとつのグループ内の各レイヤにデータがあるとして、
>>>レイヤの移動はしないで線色のみ一括で各レイヤ指定色にする方法はありますか？
>>
>>外部変形なら可能です。
>>この外部変形の実行には　mswin32 版 Ruby　のインストールが必要です。
>>以下で入手できます。
>>http://www61.tok2.com/home2/gravelroad/tips/inst_msw.html
>>
>外部変形のことはあまり知識がないので、
>いろいろやってみましたが出来ません。教えてほしいのですが
>Ruby　のインストールはたぶん問題なくできたのですが、
>コピペとはメモ帳をひらいて貼り付けでいいのでしょうか？
>
>全角スペースを半角スペースに一括置換もして
>保存後実行してみましたがうまくいきません。
>申し訳ありませんが教えていただけないでしょうか？

OSが WIN XP ならメモ帳で結構です。
（WIN 98 なら　ワードパッド　を使用してください・・・メモ帳に置換機能がない）


#※以下の文を　コピー　貼り付け　して　ファイル名を　レイヤ線色変更.bat　として保存してください。。(カタカナは全角)


@REM 全レイヤの線色を一括変更する。
@echo off
REM　#jww
REM　#cd
REM　#ht10
REM　#ht40
REM　#zz
REM　#zw
REM　#h1
REM　#e
copy jwc_temp.txt temp.txt　> nul
del jwc_temp.txt　
ruby -Ks レイヤ線色変更.rb
pause


#※以下の文を　コピー　貼り付け　して　ファイル名を　レイヤ線色変更.rb　として保存してください。(カタカナは全角)

$deta=[];$lylc=[]
$deta << "hd"

puts "↓レイヤ0の線色を入力してください (変更無:ENTER)"
ly0=gets.chop
$lylc<<"lc"+ly0

puts "↓レイヤ1の線色を入力してください (変更無:ENTER)"
ly1=gets.chop
$lylc<<"lc"+ly1

puts "↓レイヤ2の線色を入力してください (変更無:ENTER)"
ly2=gets.chop
$lylc<<"lc"+ly2

puts "↓レイヤ3の線色を入力してください (変更無:ENTER)"
ly3=gets.chop
$lylc<<"lc"+ly3

puts "↓レイヤ4の線色を入力してください (変更無:ENTER)"
ly4=gets.chop
$lylc<<"lc"+ly4

puts "↓レイヤ5の線色を入力してください (変更無:ENTER)"
ly5=gets.chop
$lylc<<"lc"+ly5

puts "↓レイヤ6の線色を入力してください (変更無:ENTER)"
ly6=gets.chop
$lylc<<"lc"+ly6

puts "↓レイヤ7の線色を入力してください (変更無:ENTER)"
ly7=gets.chop
$lylc<<"lc"+ly7

puts "↓レイヤ8の線色を入力してください (変更無:ENTER)"
ly8=gets.chop
$lylc<<"lc"+ly8

puts "↓レイヤ9の線色を入力してください (変更無:ENTER)"
ly9=gets.chop
$lylc<<"lc"+ly9

puts "↓レイヤaの線色を入力してください (変更無:ENTER)"
lya=gets.chop
$lylc<<"lc"+lya

puts "↓レイヤbの線色を入力してください (変更無:ENTER)"
lyb=gets.chop
$lylc<<"lc"+lyb

puts "↓レイヤcの線色を入力してください (変更無:ENTER)"
lyc=gets.chop
$lylc<<"lc"+lyc

puts "↓レイヤdの線色を入力してください (変更無:ENTER)"
lyd=gets.chop
$lylc<<"lc"+lyd

puts "↓レイヤeの線色を入力してください (変更無:ENTER)"
lye=gets.chop
$lylc<<"lc"+lye

puts "↓レイヤfの線色を入力してください (変更無:ENTER)"
lyf=gets.chop
$lylc<<"lc"+lyf

open("temp.txt","r") { |f|
while line=f.gets
　　xy = line.split

　　if xy[0]=~ /^hq/

　　elsif xy[0]=~ /^ly/
　　　　ly=xy[0][2,1]
　　　　lylc=$lylc[ly.hex]

　　　　$deta << xy[0]

　　　　$deta <
　　elsif xy[0]=~ /^lc/
　　　　$deta << xy[0] if lylc ==("lc")

　　else
　　　　$deta << line
　　end
end
}

text=$deta

File.open("jwc_temp.txt","w"){
|file|;text.each{|line|;file.puts line;}
}


#※うまくいかない時は、コマンドプロンプトのエラーメッセージがでますので、
その内容を記述してください。原因が探れます。


Indexへ
(2267)←【2272】→(2273)
------------------------
【タイトル】Re(4):各レイヤの線色一括変換
【記事番号】 2272 (2267)
【 日時 】05/06/17 13:41
【 発言者 】k.sato kohichi1@dorf-arc.co.jp

▼コジマさん：
>▼k.satoさん：
>>▼コジマさん：
>>>▼k.satoさん：
>>>>　いつもJWW重宝しています。
>>>>題名の通りひとつのグループ内の各レイヤにデータがあるとして、
>>>>レイヤの移動はしないで線色のみ一括で各レイヤ指定色にする方法はありますか？
>>>
>>>外部変形なら可能です。
>>>この外部変形の実行には　mswin32 版 Ruby　のインストールが必要です。
>>>以下で入手できます。
>>>http://www61.tok2.com/home2/gravelroad/tips/inst_msw.html
>>>
>>外部変形のことはあまり知識がないので、
>>いろいろやってみましたが出来ません。教えてほしいのですが
>>Ruby　のインストールはたぶん問題なくできたのですが、
>>コピペとはメモ帳をひらいて貼り付けでいいのでしょうか？
>>
>>全角スペースを半角スペースに一括置換もして
>>保存後実行してみましたがうまくいきません。
>>申し訳ありませんが教えていただけないでしょうか？
>
>OSが WIN XP ならメモ帳で結構です。
>（WIN 98 なら　ワードパッド　を使用してください・・・メモ帳に置換機能がない）
>
>
>#※以下の文を　コピー　貼り付け　して　ファイル名を　レイヤ線色変更.bat　として保存してください。。(カタカナは全角)
>
>

>
>#※うまくいかない時は、コマンドプロンプトのエラーメッセージがでますので、
>その内容を記述してください。原因が探れます。

何度もすみません、
BATとRBファイルは別々に保存してみて、
再度実行してみましたところ、

'ruby'は内部コマンドまたは外部コマンド
操作可能なプログラムまたはバッチファイルとして認識されていません。
続行するには何かキーを押してください。

と表示されます。なにが問題なのでしょうか？
お手数かけて申し訳ありません、宜しくお願いします。


Indexへ
(2272)←【2273】→(2286)
------------------------
【タイトル】Re(5):各レイヤの線色一括変換
【記事番号】 2273 (2272)
【 日時 】05/06/17 14:35
【 発言者 】コジマ

>'ruby'は内部コマンドまたは外部コマンド
>操作可能なプログラムまたはバッチファイルとして認識されていません。
>続行するには何かキーを押してください。
>
>と表示されます。なにが問題なのでしょうか？
>お手数かけて申し訳ありません、宜しくお願いします。

rubyをインストールしたフォルダにパスが通っていない？

rubyのインストール方法は以下で参照してください。
http://www61.tok2.com/home2/gravelroad/tips/inst_msw.html

rubyを解凍する時に、メインフォルダが作成された場合。
メインフォルダが邪魔をして、動作しません
（最近の解凍ソフトはそのようです。）

メインフォルダの中のフォルダとファイルだけを指定されたフォルダに移動してください。OSが　WIN XP ならば　WINDOWSフォルダ内の　sistem32フォルダに移動


Indexへ
(2273)←【2286】//(2254)
------------------------
【タイトル】Re(6):各レイヤの線色一括変換
【記事番号】 2286 (2273)
【 日時 】05/06/18 10:37
【 発言者 】k.sato kohichi1@dorf-arc.co.jp

>rubyをインストールしたフォルダにパスが通っていない？
>
> rubyのインストール方法は以下で参照してください。
>http://www61.tok2.com/home2/gravelroad/tips/inst_msw.html
>
>rubyを解凍する時に、メインフォルダが作成された場合。
>メインフォルダが邪魔をして、動作しません
>（最近の解凍ソフトはそのようです。）
>
>メインフォルダの中のフォルダとファイルだけを指定されたフォルダに移動してください。OSが　WIN XP ならば　WINDOWSフォルダ内の　sistem32フォルダに移動

出来ました、これを機に外部変形勉強してみたいと思います。
コジマさん本当にありがとうございました。