Posts Tagged ‘Non Self-similar Repetition’

Posted by Djordje Stojanovic 25 Oct 10


Goomitze or rubber band workshop combines a design method based on the consistent use of the single component to be multiplied according to some geometric protocol, and the inconsistent material behaviour or systems inherent capacity to flex and change according to some external influence. The exercise aims to initiate thinking about adaptable spatial configurations and introduce appropriate working techniques to be utilised throughout the semester.
Rubber band is produced in vast quantities and used for various practical reasons. It is known for its elasticity or the capacity to withstand transformation and return to the pre-deformed condition. In general rubber […]

Posted by Milutin Cerovic 08 May 08



Option Explicit
‘——————————————————————————-
‘ Subroutine: cheeweelook part 1
‘ Purpose: rotira tougao oko stranica + smanjuje trougao po tezishnoj duzi
‘ Author: Milutin Cerovic 2008
www.4ofseven.com
‘——————————————————————————–
Call Main()
Sub Main()
Dim i,j,Sf
Dim arrtemena1,arrTemp,arrNovoTeme,arraxis,arrSrfBochno(2)
Dim strTrougao
‘ input ————————————————————————–
strTrougao = Rhino.GetObject(“selektuj polyline trougao”)
arrtemena1 = Rhino.PolyLineVertices(strTrougao)
For i = 1 To 8 ‘ broj krugova
For j = 0 To 2 ‘ loop kroz stranice trougla
‘ rotacija trougla + dodavanje povrshine ———————————-
arrtemena1 = Rhino.PolyLineVertices(strTrougao)
Rhino.AddSrfPt arrtemena1
arrtemena1 = duplicateArr(arrtemena1)
arrTemp = arrtemena1
arraxis = Rhino.VectorCreate(arrtemena1(j),arrtemena1(j+1)) ‘ osa rotacije
strTrougao = Rhino.RotateObject(strTrougao,arrtemena1(j),-30,arraxis,vbTrue)
‘ 0.scale trougla po tezishtu —————————————————
arrtemena1 = Rhino.PolyLineVertices(strTrougao)
arrtemena1 = duplicateArr(arrtemena1)
arrNovoTeme = scaleTrougao(arrtemena1(j),arrtemena1(j+1),arrtemena1(j+2),3)
Rhino.EnableObjectGrips strTrougao
If j = 0 Then
Rhino.ObjectGripLocation strTrougao,2,arrNovoTeme
Else
If […]