algorithmic modeling for Rhino

Search Results - 2014135双色球预测最准确的人-『1TBH·COM』足彩17187期媒体推荐--2023年3月19日6时42分33秒.H5c2a3.1yoyb4hmp

Blog Post: RGSS(rhino & grasshopper study session)TOKYO #3: Added by Yusuke Oono at 8:26pm on July 28, 2009

Comment on: Topic 'Kangarooを使用したVolonoiCell膨らませ': 犬塚さんへそうですね。形状的に出ちゃうものなんでしょうか。膨らませの数値を抑えるか、もしくは多少計算は重くなりますが元もとのメッシュの分割数を増やす等して軽減する方法などがあるかな～、と思います。劇的に変わるわけではありませんが。; Added by UTB01 to FabCafe Tokyo at 5:18pm on March 16, 2015

Comment on: Group 'FabCafe Tokyo': ;usp=sharing今回のお題は、3次元での繰り返しパターンです。前回の宿題は2次元の繰り返しパターンでした。それに高さ情報を与えるなど工夫して、3次元的な繰り返しのパターンのファイルを作ってみましょう。…; Added by FabCafe Tokyo to FabCafe Tokyo at 5:58am on February 14, 2015

Comment on: Photo 'origami face mask wearable architecture': このアプリケーションに一生を費やすと、最も単純なツールを使用してこのような単純なデザインを作成することすらできないと推定しています。うまくいけば、クライアントのためにこのようなデザインを作成するためのテクニックを学ぶことができます。今度はウェバンクカジノソースにアクセスしてカジノに関する記事を読み、ゲームに勝って巨額のお金を稼ぎます。; Added by Morgan Rohla at 1:33am on April 21, 2021

Topic: 放射状のワッフルについて: を、rotateを使って、ジオメトリを中心にして円状に配置 ↓ ジオメトリとの交線を取ってサーフェスを張るという手順でいけると思います。 …; Added by FabCafe Tokyo to FabCafe Tokyo at 6:00am on October 2, 2014

Topic: Kangarooを使用したVolonoiCell膨らませ: こんばんは。先日のopen fab nightの最後に相談されていた方の形状をkangarooで試してみました。（すみません。お名前とか聞いてないのでわからないのですが） kangarooとvolonoiを使用して湯飲みのような形状の周辺を膨らませるやり方を試しています。持ってこられていたサンプルと同じ形の追求はやっていないのですが、やり方のひとつとして検討にいれてもらえれば幸いです。; Added by UTB01 to FabCafe Tokyo at 7:48am on March 15, 2015

Blog Post: jg

Added by zlyx at 7:24pm on February 20, 2012

Comment on: Topic '(14/09/15)クラスA サンプルファイル': Cにカーブ、Lに分割ピッチを入力 ③各分割点の接線方向のベクトルを出す。　　　※ベクトルをRhino上で確認したい「vector display」　　　 A（ancor point）にはPのポイントを、Vのベクトルには接線ベクトルのTを入れる。 ④各接線ベクトルからZ方向を排除し、world座標のX-Y平面に平行なベクトルに揃える。　　　　接線ベクトルをxyzに分解　⇒　「deconstruct vector」　　　　これを「vector xyz」によって再構築する。（x,yのみを入力すればよい）改めてvector displayで確認してみるとよい。 ⑤各点ごとに座標系を定義する。　⇒ 「construct plane」で、OとXに、それぞれPとＶ（再構築したベクトル）を入力。　　　　※各分割点での座標系（平面）が小さく、確認できない場合がある。　　　　display　⇒　preview plane size　を100くらいに設定すると、良く見えるようになる。 ⑥階段のステップ（四角形）を描く。⇒ 「rectangle」を使用。以下のパラメータを入力。　　　　P・・・使用する平面（先ほど作ったもの）　　　　X・・・300 　　　　Y・・・800 　　　　※長方形が階段状に表示されるが、原点がまちまち。 ⑦長方形の中心を、各分割点の原点に合わせる。　　　　「area」コンポーネント　⇒　面積を出すコンポーネントだが、同時に重心も出せる。　　　　「vector 2 Pt」コンポーネント　⇒　AからBへのベクトルを作る。　これで原点から長方形の図芯へのベクトルを作成する。　　　　「move」で長方形と、先ほど作ったベクトルを選択することで、全ての長方形の図芯を各座標系の中央に移動させる。 ⑧階段に厚みを付ける　　　　長方形をサーフェイスに変換。　⇒　「boundary Surface」に長方形のジオメトリを入れて、サフェースにする。　　　　面に厚みを付けて立体にする。　⇒　「Extrude」に、ジオメトリと、方向（Z軸）を入力。　　　　Z軸は、ダブルクリック⇒zと入力⇒　「unit z」　⇒入力に数値（ベクトルの長さ）を入力。 ⑨手すりのカーブを作成する。　　　　最初に参照したカーブを左右にオフセットさせる。　　　　⇒「offset」で、カーブのアイコンのものを選択。　　　　Cにはカーブ（最初のカーブ）を入力　　　　Dにはオフセット距離を入力。　　　　階段幅（先ほど800と入力したモノ）の1/2を入れればよい。　　　　「division」を使用。固定値は、「number」コンポ―の右クリック⇒setnumberで2を入力。　　　　反対側も同様に用にして作る。　　　　「marge」で2つのカーブを統合。　　　　「move」でZ方向に800オフセット。 ⑩手すりを作る。　⇒「pipe」 Cに先ほどマージしてmoveしたカーブを入力。Rに50を入力。 ⑪縦のパイプを作る。　　　　divide lengthで両側の手すりのカーブを分割する。ピッチは最初にステップを分割したものと同じモノを持ってくる。　　　　「line SDL」で縦のラインを作成する。　　　　Sには先ほど分割した手すりの分割点。Dには方向（-z方向）、Lには距離（手すりのラインをオフセットさせた距離と同じ）を入力。　　　　pipeでラインに沿ったパイプを作成。＊＊＊…; Added by Yusuke Takei at 8:24am on September 16, 2014

Event: DIGITAL TOOLING vol.2: ったことないけど興味がある方♥ ぜひおこしください。必ずハートに火が着きます-* どうやったらできるの？オススメ参考図書など、みんなで情報を共有する刺激的な勉強会です。 ” DIGITAL TOOLING は未来のつくるの勉強会 ” DIGITAL TOOLINGではRhinoceros、Grasshopperに限らずコンピューテーションを幅広くとらえ共有する関西での交流、勉強会です。 ◼︎今回のフードは「タコ焼き」を予定しています。 ◼︎ワンドリンク制 500円、2杯目以降 300円 ■ゲスト *鈴木雄貴 / AP-LENS http://suzuki11.tumblr.com/ UI/UXデザイナー京都北山のsoftdevice inc.に所属し、SD LABで空間・立体を素材とするインタフェースをデザインしている. 個人活動として、アーティストのメディア・オーサリングやパーソナルプロダクトのデザインをしている. 京都精華大学　プロダクトデザイン学科 PCDコース卒業情報科学芸術大学院大学（略称：IAMAS）メディア表現研究科(メディア表現修士) 卒業 *砂山太一　http://tsnym.nu/ 建築家/美術家/プログラマ。コンピュータメディアや先端技術を応用した芸術表現および理論の研究をしている。その他、マテリアライジング展企画運営や kwwekやgh/eなどのアートユニットもてがける。 Ecole Speciale d’Architecture（パリ）マスター課程修了。多摩美術大学彫刻学科卒業。 JAKOB+MACFARLANE , Bollinger+ Grohmann Parisなどに勤務・協働。 2012-2013東京大学工学部非常勤講師。現在、京都市立芸術大学総合芸術学科特任講師、工学院大学建築学部非常勤講師、東京藝術大学大学院美術研究科後期博士課程。 ■運営 *大前道久 OPH（おっさんパワーハウス） 15年間ジュエリーメーカーで勤務し、制作からデザインまで様々な部署を経験してきました。Grasshopperの恩恵を受け、新しい表現や効率的なモデリングを実践しています。私なりのコンピューテーショナルなジュエリー制作をご紹介したいと思います。 http://www.tukuru.me/?p=2426 *木山潤平　sacsac 代表３Dプリンターやレーザーカッターなどのデジタル工作機を使える場所を運営。これまでアナログのモノづくりに没頭してきたことを活かし、デジタルとアナログの間に立って、アウトプットできる環境を提供していきたいと思います。DIGITAL TOOLING(DT)を機にGrasshopperを勉強している初心者です。みなさん一緒にはじめましょう！ FBページ https://www.facebook.com/events/886427334718542/…; Added by Michihisa Omae at 5:51am on September 23, 2014

Comment on: Topic 'Point Deform that can move brep's control Points': lass BrepDeform Inherits GH_Component Public Reslist As New List(Of String) Public Sub New() MyBase.New("BrepDeform", "Deform", _ "移动物件的控制点" & vbCrLf & "(Move the control Point to change a object)", "SEG", "Modify") End Sub Public Overrides ReadOnly Property ComponentGuid As System.Guid Get Return New Guid("8226e0ea-ed6b-47c2-8a24-244f044152d8") End Get End Property Protected Overrides ReadOnly Property Internal_Icon_24x24() As System.Drawing.Bitmap Get Return My.Resources.SEG_BrepDeform End Get End Property Protected Overrides Sub RegisterInputParams(ByVal pManager As GH_Component.GH_InputParamManager) ' pManager.AddTextParameter("Guid", "Id", "将要被替换的犀牛物件" & vbCrLf & "(RhinoObjects that will be replaced)", GH_ParamAccess.item) 'Dim guidParam As New Param_Guid pManager.AddParameter(New Param_Guid, "Guid", "Id", "将要被替换的犀牛物件" & vbCrLf & "(RhinoObjects that will be replaced)", GH_ParamAccess.item) pManager.AddPointParameter("ControlPoint3d", "C", "控制点的位置" & vbCrLf & "(Control Point's location)", GH_ParamAccess.item) pManager.AddPointParameter("NewPoint3d", "P", "新控制点的位置" & vbCrLf & "(New Control Point's location)", GH_ParamAccess.item) pManager.AddNumberParameter("Tolerace", "T", "输入点与物件实际控制点对比的精度" & vbCrLf & "(Tolerace for the Control Point match)", GH_ParamAccess.item, 0.1) pManager.AddBooleanParameter("BlMove", "M", "如果是True则进行移动" & vbCrLf & "(If true Perform the Move)", GH_ParamAccess.item, False) End Sub Protected Overrides Sub RegisterOutputParams(ByVal pManager As Kernel.GH_Component.GH_OutputParamManager) pManager.AddTextParameter("Result", "RG", "结果列表" & vbCrLf & "(Result)", GH_ParamAccess.list) End Sub Public Overrides ReadOnly Property Exposure As GH_Exposure Get Return GH_Exposure.primary End Get End Property Protected Overrides Sub SolveInstance(ByVal DA As Kernel.IGH_DataAccess) If Banner.astrict.showmessage Then Return Dim Ids As Guid = Guid.Empty 'Dim Ids As String = String.Empty Dim tpt As Point3d = Point3d.Unset, opt As Point3d = Point3d.Unset Dim tolar As Double = 0.1 Dim blMove As Boolean = False If Not DA.GetData(0, Ids) Then Return If Not DA.GetData(1, opt) Then Return If Not DA.GetData(2, tpt) Then Return If Not DA.GetData(3, tolar) Then Return If Not DA.GetData(4, blMove) Then Return If Not blMove Then GoTo line1 Reslist.Add(Now & "_未替换！(Replace failed!)") Else Reslist.Clear() ' Grasshopper.Instances.ActiveCanvas.ModifiersEnabled = False End If ' rt.AddRange(docobjlist.Select(Function(geoobj As RhinoObject) GH_Convert.ObjRefToGeometry(New ObjRef(geoobj.Id)))) 'Private Checked(5) As Boolean, Namestr() As String = {"Point", "Curve", "Brep", "Mesh", "TextDot", "TextEntity"} Try Dim rh As RhinoDoc = Rhino.RhinoDoc.ActiveDoc Dim rhobj As RhinoObject = rh.Objects.Find(Ids) ' Dim rhobj As RhinoObject = rh.Objects.Find(New Guid(Ids)) Dim bobj As BrepObject = CType(rhobj, BrepObject) RhinoApp.RunScript("Cancel", False) RhinoApp.RunScript("Cancel", False) bobj.Select(True) RhinoApp.RunScript("_SolidPtOn", False) Dim gobjs As GripObject() = bobj.GetGrips ' rh.Views.RedrawEnabled = False For Each grpobj As GripObject In gobjs If grpobj.CurrentLocation.DistanceTo(opt) < tolar Then grpobj.Select(True) Dim CurrentPln As Plane = RhinoDoc.ActiveDoc.Views.ActiveView.ActiveViewport.ConstructionPlane Dim tropt As New Point3d(opt), trtpt As New Point3d(tpt) tropt.Transform(Transform.PlaneToPlane(Plane.WorldXY, CurrentPln)) trtpt.Transform(Transform.PlaneToPlane(Plane.WorldXY, CurrentPln)) Dim movestr As String = "_move " + String.Format("{0},{1},{2} ", tropt.X, tropt.Y, tropt.Z) + String.Format("{0},{1},{2} _Cancel _Cancel", trtpt.X, trtpt.Y, trtpt.Z) RhinoApp.RunScript(movestr, True) grpobj.Select(False) End If Next 'RhinoApp.RunScript("Cancel", False) 'RhinoApp.RunScript("Cancel", False) '' rh.Views.RedrawEnabled = True Reslist.Add(Now & "_替换成功！(Replace Success!)") Catch ex As Exception Reslist.Add(Now & "_替换失败！(Replace failed!)" & vbCrLf & ex.Message) End Try ' Grasshopper.Instances.ActiveCanvas.ModifiersEnabled = True line1: DA.SetDataList(0, Reslist) End Sub 'Private Sub Testt_PingDocument(sender As IGH_DocumentObject, e As GH_PingDocumentEventArgs) Handles Me.PingDocument ' Dim Mbool = Aggregate bcbool In Checked Into cb = Any(bcbool) ' If Not Mbool Then ' Checked(0) = True ' Message = Namestr(0) ' Order = 0 ' End If 'End Sub End Class The picture below shows the two question. Question One I must use data dam, or the component can't batch deal the brep. I don't know why, I have You can give me a solution to make it working normal not using the data dam Question Two I can not uset the Button component, If I use it, the gh canvas will die with some mouse event--. I have see this problem before in this forum,but there is no solution and explain. I want to know why and How to solve it. I don't know if I have made my question clear,if not give a message. Thank you! Thank you all. The gh test file and 3dm test file in the upload files. …; Added by huaxiamengqing at 2:02am on June 8, 2015