NCF参数化建筑论坛

标题: 贴段代码，大家讨论一下rhino命令在rhinoscript中的应用 [打印本页]

作者: 1235813 时间: 2011-5-18 13:41
标题: 贴段代码，大家讨论一下rhino命令在rhinoscript中的应用
本帖最后由 1235813 于 2011-5-18 13:43 编辑

这是一段offset命令的批处理代码

Option Explicit
'Script written by <insert name>
'Script copyrighted by <insert company name>
'Script version 2011年5月18日 12:42:18
Call Main()
Sub Main()
dim arrcurve:arrcurve=rhino.getobjects("curves",4,true,true)
dim i,c()
for i=0 to ubound(arrcurve)
  rhino.UnselectAllObjects
  rhino.SelectObject(arrcurve(i))
  ' rhino.Command("_offset"&"Distance<2>"&"BothSides"&"_enter")
  redim preserve c(i)
  ' rhino.Sleep(100)
  rhino.Command("_offset Distance 1 bothsides enter")
  c(i)=Rhino.LastCreatedObjects
  rhino.UnselectObject(arrcurve(i))
  rhino.AddPlanarSrf(c(i) )
  rhino.DeleteObjects(c(i))
Next

End Sub

[attach]18812[/attach][attach]18813[/attach]
[attach]18813[/attach][attach]18814[/attach][attach]18815[/attach][attach]18816[/attach][attach]18817[/attach]

作者: 1235813 时间: 2011-5-18 17:57
自己觉得如果能把rhino命令编进script中，应当会带来很大的便利

作者: 123321123 时间: 2011-5-18 19:27
把rhino命令编进gh中,很大的便利

作者: 1235813 时间: 2011-5-18 21:14
rhino.Command("_offset Distance 1 bothsides enter")
很人性的string

作者: 龙龙 时间: 2011-5-19 09:52
hino.Command("_offset Distance 1 bothsides enter")
很人性的string

作者: wenchongyun 时间: 2011-9-7 17:59
感觉交互太多的话，会影响程序速度

作者: Tony 时间: 2011-11-2 22:42
同意楼上的意见

作者: kietsuc 时间: 2015-4-28 02:28
楼主，不好意思打扰了，我想问一下 ' rhino.Command("_offset"&"Distance<2>"&"BothSides"&"_enter") ' rhino.Sleep(100) 这两句前面的 ' 号，是代表什么意思？
还有，我用的是rhino5.0，运行到第十八句出现错误。。。
谢谢楼主。

作者: wikii 时间: 2015-4-28 23:34
rh在向autocad致敬。

欢迎光临 NCF参数化建筑论坛 (http://www.ncf-china.com/)