siren v0.14 線の情報を取得する

既にﾀｲﾄﾙがあやふやですが、こちらの続きです。
siren v0.14 線の種類を判断する - C#ATIA

実際には使わない事になりそうな・・・　あぁ後々の為の練習です。

#Siren_script
include Siren

fName = "/curves"
$inPath = ARGV[0] + fName + ".igs"
$exPath = ARGV[0] + fName + "-res.igs"

def Pause()
	str = gets
end

class  Siren::Edge
	def info()
		crv = self.curve
		arr = ["class : " + crv.class.name]
		arr <<  ["length : " + self.length.to_s]
		case crv.class.name
		when "Siren::Line" then
			arr <<  ["dir : " + crv.dir.to_s]
		when "Siren::Circle" then
			arr <<  ["length : " + crv.length.to_s]
			arr <<  ["radius : " + crv.radius.to_s]
			arr <<  ["center : " + crv.center.to_s]
			arr <<  ["area : " + crv.area.to_s]
			arr <<  ["normal : " + crv.normal.to_s]
			arr <<  ["dir : " + crv.dir.to_s]
		when "Siren::BSCurve" then
			arr <<  ["degree : " + crv.degree.to_s]		
			arr <<  ["knots : " + crv.knots.to_s]		
			arr <<  ["mults : " + crv.mults.to_s]		
			arr <<  ["poles : " + crv.poles.to_s]		
			arr <<  ["weights : " + crv.weights.to_s]		
		else
			#arr = ["non"]
		end
		return arr.join("\n ") + "\n "
	end
end

###########
comp = Siren.load_model $inPath
p "total_edges : " + comp.edges().size.to_s
edgelst = comp.to_a.select { |x| x.edge? == true }
edgelst.concat(comp.to_a.select { |x| x.wire? == true }.edges ).flatten

p "**************"
edgelst.each{|x| puts x.info }

begin
	Siren.save_model edgelst.to_comp , $exPath
rescue
	p "export errer!"
end
 
###########
puts "done."
Pause()

読み込んだIgesファイルの線を列挙して、取得できる情報を出力するだけです。
VBA脳の僕ならﾙｰﾌﾟさせて線種を判断して、線種毎に処理を分ける事を
真っ先に考えるのですが、mrubyにはｸﾗｽを拡張する方法があるんじゃないかな？
と思いやってみました。
結果はこんな感じです。

これ自体は使わないのですが、手法は勉強になりました。

本当はﾁﾏﾁﾏ書かずに、各ｸﾗｽのﾒｿｯﾄﾞを列挙して文字列としてﾒｿｯﾄﾞ呼び出し
出来るんじゃないのかな？　とも思ったのですがよくわかりませんでした。
僕のような凡人で思い付く様なｺｰﾄﾞは、mrubyで可能なんじゃないかと
思うのですが。

siren v0.14 NURBS曲線2

こちらの続きです。
siren v0.14 NURBS曲線 - C#ATIA

以前はIgesを読み込み、読み込んだ曲線をそのまま書き出していましたが
今度は読み込んだ曲線から各要素を読み取り、ｺﾝﾄﾛｰﾙﾎﾟｲﾝﾄのみを2倍にし
新たな曲線をsirenで作成し書き出してみました。

#!siren
# coding: utf-8
include Siren

fName = "/nurbs5"
$inPath = ARGV[0] + fName + ".igs"
$exPath = ARGV[0] + fName + "-res.igs"
$dpPath = ARGV[0] + fName + "_dump.txt"

def wDump(i)
  if i.kind_of?(String)
     open($dpPath, "a") {|f| f.write "\r\n" + i}
  end
end

def Pause()
	str = gets
end

wDump("start")
###########

shp = Siren.load_model $inPath
wDump(shp.to_s)

degree = shp.curve.degree
wDump(degree.to_s)

knots = shp.curve.knots
wDump(knots.to_s)

mults = shp.curve.mults
wDump(mults.to_s)

poles = shp.curve.poles
wDump(poles.to_s)

poles2 = poles.map{ |n| n.map{ |p| p * 2 }}
wDump(poles2.to_s)

weights = shp.curve.weights
wDump(weights.to_s)

crv= Siren.bscurve degree, knots, mults, poles2, weights
Siren.save_model crv, $exPath

###########
wDump("end")
puts "done."
Pause()

書き出したIgesと元の曲線を比べた結果がこちら

黄色が元の曲線で、水色が2倍な曲線です。（原点で2倍のｽｹｰﾘﾝｸﾞで一致します）

出来てる・・・結構苦労したので、他人には伝わらないと思いますが
感動してます。

でも、multsの説明書きが一致していないような･･･単に理解できていないだけかな？

siren v0.14 NURBS曲線

どちらかと言うと、こちらの続き。
siren v0.13 NURBS曲線・Bスプライン曲線 - C#ATIA

githubにUpされていた数値をそのままお借りして再挑戦しました。

#!siren
# coding: utf-8
include Siren

fName = "/nurbu3"
$inPath = ARGV[0] + fName + ".igs"
$exPath = ARGV[0] + fName + "-res.igs"
$dpPath = ARGV[0] + fName + "_dump.txt"

def wDump(i)
  if i.kind_of?(String)
     open($dpPath, "a") {|f| f.write "\r\n" + i}
  end
end

def Pause()
	str = gets
end

wDump("start")
###########

degree = 2
wDump(degree.to_s)

knots = [0.0, 1.0, 2.0]
wDump(knots.to_s)

mults = [3, 1, 3]
wDump(mults.to_s)

poles = [[10, 0, 7], [7, 0, 7], [3, 0, 8], [0, 0, 7]]
wDump(poles.to_s)

weights = [1.0, 1.2, 1.0, 1.0]
wDump(weights.to_s)

shp = Siren.bscurve degree, knots, mults, poles, weights, 0.1, 1.2
puts shp.class.name

Siren.save_model shp , $exPath
###########
wDump("end")
puts "done."
Pause()

ずっとｴﾗｰで、NURBS曲線が作れなかったのですがやっと出来ました。
Reference manualを見ながらやっていたのですが、

shp = Siren.bscurve [degree, knots, mults, poles, weights, 0.1, 1.2]

これ（角括弧付き）ではNGでした。　Rubyの括弧の扱いがわからない・・・。

siren v0.14 線の種類を判断する

こちらの続きです。
siren v0.14 を試してみました - C#ATIA

開発者の方にちょっとｻﾝﾌﾟﾙｺｰﾄﾞを書いていただいたのですが、
回答として書いて頂いたこと以上に、重要な方法がｻﾝﾌﾟﾙに入っていました。

#Siren_script　Export_Curve_Test
include Siren

fName = "/curves"
$inPath = ARGV[0] + fName + ".igs"
$exPath = ARGV[0] + fName + "-res.igs"

def Pause()
	print "押して!"
	str = gets
end

###########
comp = Siren.load_model $inPath
p "total_edges : " + comp.edges().size.to_s

edgelst = comp.to_a.select { |x|
	x.edge? == true
}

edgelst = edgelst + comp.to_a.select { |x|
	x.wire? == true
}.edges.flatten

p "**************"
edgelst.each{|x|
	print x.to_s + " は " +  x.curve.class.name + " です\n"
}

cmp = edgelst.to_comp

begin
	Siren.save_model cmp , $exPath
rescue
	p "export errer!"
end
 
###########
puts "done."
Pause()

結果はこちら。

"BSCurve" は、BSplineCurveです。
GetEdgeType関数と言うｸｽﾞ関数は、要りませんでした。

ｴｯｼﾞのｸﾗｽ名を取得すると Siren::Edge が返って来る為、線種を取得できないと
思い込んでしたのですが

  edge.curve.class.name

とすると線種か返ってきました。　ｴｯｼﾞはｴｯｼﾞでｶｰﾌﾞじゃないんですね。
少し理解が深まりました。

siren v0.14 を試してみました

こちらの続きです。
siren v0.13 線の種類を判断する - C#ATIA

sirenをv0.14にして頂きました。
Release siren v0.14(draft version) binary package for MS-Windows · dyama/mruby-siren · GitHub

ﾅｶﾅｶ取り掛かれ無い為、前回のｽﾌﾟﾘｸﾄをv0.13とv0.14で
実行してみたのですが

左がv0.13で右がv0.14です。
to_sﾒｿｯﾄﾞの表記が変わったのは良いのですが、
最後の2本の線種が "curve" から "circle" になってしまい
正しく判断出来なくなりました･･･。
恐らくnurbs_defﾒｿｯﾄﾞが機能しなくなっているような気がしてます。

nurbs_defﾒｿｯﾄﾞが利用できないとなると、苦しいところです。

siren v0.13 線の種類を判断する

こちらの続きです。
siren v0.13 線の種類を判断したい - C#ATIA

業務が忙しく・・・。
こんな感じのﾃﾞｰﾀを作り、Igesでｴｸｽﾎﾟｰﾄ。

"直線" "円弧" "曲線" "点" "ｻｰﾌｪｽ" "ｿﾘｯﾄﾞ"　が
混在しています。　このIgesから境界線等ではない
純粋な線の要素を抜き出します。

又、抜き出した線の種類を標準出力に表示します。

#Siren_script　Export_Curve_Test
include Siren

fName = "/curves"
$inPath = ARGV[0] + fName + ".igs"
$exPath = ARGV[0] + fName + "-res.igs"

def Pause()
	print "押して!"
	str = gets
end

def GetEdgeType(shp)
	return unless shp.edge?
	begin
		return "curve" unless shp.nurbs_def.size < 1
	rescue
	end
	
	begin
		return "line" if shp.to_pts.size < 3
	rescue
	end
	
	return "circle"
end

###########
comp = Siren.load_model $inPath
p "total_edges : " + comp.edges().size.to_s

edgelst = comp.to_a.select { |x|
	x.edge? == true
}

edgelst = edgelst + comp.to_a.select { |x|
	x.wire? == true
}.edges.flatten

p "**************"
edgelst.each{|x|
	print x.to_s + " は " +  GetEdgeType(x) + " です\n"
}

cmp = edgelst.to_comp

begin
	Siren.save_model cmp , $exPath
rescue
	p "export errer!"
end
 
###########
puts "done."
Pause()

悩んだ挙句、GetEdgeType関数を作り、各ﾒｿｯﾄﾞが成功するか?どうか?
で線のﾀｲﾌﾟを判断する　と言うかなりベタな方法しか思い付かない
上に、Rubyっぽさの微塵も感じないｺｰﾄﾞになりました。
(本来なら、もっと素敵なｺｰﾄﾞで実現できるはず･･･)

実行結果はこちらで、出来上がったIgesをｲﾝﾎﾟｰﾄすると

判断も出来てます。
本当は ".edge_type" みたいにしたいんだけどなぁ。

siren v0.13 線の種類を判断したい

こちらの続きです。
siren v0.13 NURBS曲線・Bスプライン曲線 - C#ATIA

通過点を指定するｽﾌﾟﾗｲﾝを試したところ出来たので、
NURBS曲線・Bｽﾌﾟﾗｲﾝ曲線はちょっと諦める事にしました。

次に線が "直線" "円弧" "曲線" を判断出来るようにしたい
所なんです。

こんなﾃﾞｰﾀをIgesで吐き出し

それを試しに読み込んで調べてみました。
試していくうちに、直線・円弧・曲線・面・点となってしまい
変数名等がおかしいですが･･･

#
include Siren

fName = "/curves"
$inPath = ARGV[0] + fName + ".igs"
$exPath = ARGV[0] + fName + "-res.igs"
$dpPath = ARGV[0] + fName + "_dump.txt"

def wDump(i)
  if i.kind_of?(String)
     open($dpPath, "a") {|f| f.write "\r\n" + i}
  end
end

def Pause()
  print "押して!"
  str = gets
end

open($dpPath, "w") {|f| f.write "start"}
###########
crvs = Siren.load_model $inPath
p "total : " + crvs.subshapes.size.to_s
shps = crvs.to_a

begin
 shps.each{|shp|
  p "***"
  p "to_s : " + shp.to_s	
  p "shapetype : " + shp.shapetype.to_s
  #p shp.shapetype.to_sname -ng
  #p shp.curvetype -ng
  #p shp.geomtype -ng
  #p shp.siren_curve_type -ng
 }
rescue
 p $@
end
###########
wDump("end")
puts "done."
Pause()

読み込んだIgesをﾊﾞﾗｼ、ﾙｰﾌﾟさせて1個づつ調べているのですが

やっと見つけたshapetypeで、線の種類を判断できると思ったの
ですが、直線・円弧・曲線　全て "6" が返って来ており
判断できません･･･。（恐らくSiren::Edgeが返って来ているのでしょう）

こちらにあったﾃｽﾄｺｰﾄﾞの最後の方に
mruby-siren/mruby-siren.rb at ae31b439725ec39b5c998239a547f0ca15ce6385 · dyama/mruby-siren · GitHub
".shapetype.to_sname" を見つけたのですが、ｴﾗｰになります。
(ｺｰﾄﾞ的にv0.13のものでは無いので･･･)

他にも "curvetype" "geomtype" "siren_curve_type" 等、それっぽい
ものも試したのですが全てﾀﾞﾒでした。

ん～諦めようかな･･･。