Jw_cad 相談室−その２
Jw_cad についての相談の場としてお使いください
情報の交換には Jw_cad 情報交換室 をご利用ください
なお、情報交換室と相談室の両方に同じ内容を投稿するのはご遠慮ください
2009年9月以前の発言は 過去ログのページからご覧ください。
それ以降の過去ログは消失しています。
申し訳ありませんが、復活の予定はありません。
Jw_cad Copyright (C)1997-2021 Jiro Shimizu & Yoshifumi Tanaka
Jw_cad についての相談の場としてお使いください
情報の交換には Jw_cad 情報交換室 をご利用ください
なお、情報交換室と相談室の両方に同じ内容を投稿するのはご遠慮ください
2009年9月以前の発言は 過去ログのページからご覧ください。
それ以降の過去ログは消失しています。
申し訳ありませんが、復活の予定はありません。
|
sugi - 24/4/19(金) 7:12 - |
点、円弧、ソリッドデータに対応してみました。
#!ruby -Ks
#y_plus.rb
#範囲選択の y値がマイナスのときにプラスになるよう持ち上げる
#zahyo_emf.bat一行修正
#（旧）copy jwc_temp.txt temp2.txt > nul
#（新）ruby -Ks y_plus.rb > temp2.txt
$stderr=open("tmp_err.txt","w")
txt=open("jwc_temp.txt").readlines
y=txt.detect{|e| %r|^hn|=~e}.split[2].to_f
yy=(y>0 ? 0 : -y+1.0)
txt.each{|line|
if %r<^c[^cn]|^pt|^s[ceog]|^BL>=~line
s=line.chomp.split(" ")
s[2]=(s[2].to_f+yy).to_s
puts s.join(" ")
elsif %r|^ [0-9.-]+|=~line
s=line.chomp.split(" ").map{|e| e.to_f}
s[1]=s[1]+yy
s[3]=s[3]+yy
puts " "+s.map{|e| e.to_s}.join(" ")
elsif %r|^hn (.*)|=~line
s=$1.chomp.split(" ").map{|e| e.to_f}
s[1]=s[1]+yy
s[3]=s[3]+yy
puts "hn "+s.map{|e| e.to_s}.join(" ")
elsif %r|^sl (.*)|=~line
s=$1.chomp.split(" ").map{|e| e.to_f}
s.each_with_index{|e,i| s[i]=e+yy if i%2==1}
puts "sl "+s.map{|e| e.to_s}.join(" ")
else
puts line
end}
#!ruby -Ks
#y_plus.rb
#範囲選択の y値がマイナスのときにプラスになるよう持ち上げる
#zahyo_emf.bat一行修正
#（旧）copy jwc_temp.txt temp2.txt > nul
#（新）ruby -Ks y_plus.rb > temp2.txt
$stderr=open("tmp_err.txt","w")
txt=open("jwc_temp.txt").readlines
y=txt.detect{|e| %r|^hn|=~e}.split[2].to_f
yy=(y>0 ? 0 : -y+1.0)
txt.each{|line|
if %r<^c[^cn]|^pt|^s[ceog]|^BL>=~line
s=line.chomp.split(" ")
s[2]=(s[2].to_f+yy).to_s
puts s.join(" ")
elsif %r|^ [0-9.-]+|=~line
s=line.chomp.split(" ").map{|e| e.to_f}
s[1]=s[1]+yy
s[3]=s[3]+yy
puts " "+s.map{|e| e.to_s}.join(" ")
elsif %r|^hn (.*)|=~line
s=$1.chomp.split(" ").map{|e| e.to_f}
s[1]=s[1]+yy
s[3]=s[3]+yy
puts "hn "+s.map{|e| e.to_s}.join(" ")
elsif %r|^sl (.*)|=~line
s=$1.chomp.split(" ").map{|e| e.to_f}
s.each_with_index{|e,i| s[i]=e+yy if i%2==1}
puts "sl "+s.map{|e| e.to_s}.join(" ")
else
puts line
end}
<Mozilla/5.0 (Windows NT 10.0; Win64; x64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/123.0.0.0 Safari/537.36
 |
 |
外部変形でemfファイル/svgファイル/canvas作成 Nakamura 24/4/17(水) 15:03 |
|
 |
Re:外部変形でemfファイル/svgファイル/canvas作成 sugi 24/4/18(木) 11:19 |
|
|
Re:外部変形でemfファイル/svgファイル/canvas作成 Nakamura 24/4/18(木) 15:56 |
|
|
Re:外部変形でemfファイル/svgファイル/canvas作成 sugi 24/4/18(木) 19:50 |
|
|
Re:外部変形でemfファイル/svgファイル/canvas作成 sugi 24/4/19(金) 7:12 | ≪ |
|
|
ありがとうございます Nakamura 24/4/19(金) 10:22 |