Generative Design Through Coding 01

This research offers to transform double-curved surfaces into components generated through algorithms based on McNeel Rhinoceros scripting platform. The extracted points of surfaces are transferred into a text document which can be manipulated by the user. Rhino script works in two stages, in which first the location of the text document is specified and then the components are applied. The intent is to generate a process, in which computational surface is transformed into a component based model.
PART I
all NoktaOkuma()
Sub NoktaOkuma()
‘ Aktarılacak dosyanın yeri belirtilir
Dim strFilter, strFileName
strFilter = “Text File (*.txt)
*.txt
All Files (*.*)

“strFileName = Rhino.OpenFileName(“Noktaların bulunduğu dosyanın yerini belirtiniz”, strFilter)

If IsNull(strFileName) Then Exit Sub
‘ Dosya sistem cismi
Dim objFSO, objFile
Set objFSO = CreateObject(“Scripting.FileSystemObject”)
‘ Metin dosyasını açınız
On Error Resume Next
Set objFile = objFSO.OpenTextFile(strFileName, 1)
If Err Then
MsgBox Err.Description
…..
Advertisements

Leave a Reply

Fill in your details below or click an icon to log in:

WordPress.com Logo

You are commenting using your WordPress.com account. Log Out / Change )

Twitter picture

You are commenting using your Twitter account. Log Out / Change )

Facebook photo

You are commenting using your Facebook account. Log Out / Change )

Google+ photo

You are commenting using your Google+ account. Log Out / Change )

Connecting to %s