""" Ikosaederstern 04.03.2021 www.3d-meier.de """ import c4d import math # Variablen und Konstanten Titel = 'Ikosaederstern' # Name NP = 32 # Anzahl Punkte N3 = 60 # Anzahl Dreiecke Radius = 2 # Radius der Eckpunktkugeln a = (1 + math.sqrt(5))/2.0 # Goldener Schnitt b = a/2.0 Punkte = [( 0.0, 0.5, b), ( 0.0, 0.5, -b), ( 0.0, -0.5, b), ( 0.0, -0.5, -b), ( 0.5, b, 0.0), ( 0.5, -b, 0.0), ( -0.5, b, 0.0), ( -0.5, -b, 0.0), ( b, 0.0, 0.5), ( -b, 0.0, 0.5), ( b, 0.0, -0.5), ( -b, 0.0, -0.5), ( a*a/2, -a*a/2, a*a/2), ( a*a/2, -a*a/2, -a*a/2), ( -a*a/2, -a*a/2, a*a/2), ( -a*a/2, -a*a/2, -a*a/2), ( -a*a/2, a*a/2, a*a/2), ( -a*a/2, a*a/2, -a*a/2), ( a*a/2, a*a/2, a*a/2), ( a*a/2, a*a/2, -a*a/2), ( 0.0, a*a*a/2, a/2), ( 0.0, a*a*a/2, -a/2), ( 0.0, -a*a*a/2, a/2), ( 0.0, -a*a*a/2, -a/2), ( a/2, 0.0, a*a*a/2), ( a/2, 0.0, -a*a*a/2), ( -a/2, 0.0, a*a*a/2), ( -a/2, 0.0, -a*a*a/2), ( a*a*a/2, a/2, 0.0), ( a*a*a/2, -a/2, 0.0), (-a*a*a/2, a/2, 0.0), (-a*a*a/2, -a/2, 0.0)] Dreiecke = [(19, 4, 10, 10), (19, 10, 1, 1), (19, 1, 4, 4), (28, 4, 8, 8), (28, 8, 10, 10), (28, 10, 4, 4), (18, 4, 0, 0), (18, 0, 8, 8), (18, 8, 4, 4), (20, 4, 6, 6), (20, 6, 0, 0), (20, 0, 4, 4), (16, 6, 9, 9), (16, 9, 0, 0), (16, 0, 6, 6), (17, 6, 1, 1), (17, 1, 11, 11), (17, 11, 6, 6), (27, 1, 3, 3), (27, 3, 11, 11), (27, 11, 1, 1), (15, 11, 3, 3), (15, 3, 7, 7), (15, 7, 11, 11), (31, 9, 11, 11), (31, 11, 7, 7), (31, 7, 9, 9), (14, 9, 7, 7), (14, 7, 2, 2), (14, 2, 9, 9), (22, 2, 7, 7), (22, 7, 5, 5), (22, 5, 2, 2), (12, 8, 2, 2), (12, 2, 5, 5), (12, 5, 8, 8), (29, 10, 8, 8), (29, 8, 5, 5), (29, 5, 10, 10), (13, 10, 5, 5), (13, 5, 3, 3), (13, 3, 10, 10), (25, 1, 10, 10), (25, 10, 3, 3), (25, 3, 1, 1), (23, 3, 5, 5), (23, 5, 7, 7), (23, 7, 3, 3), (24, 2, 8, 8), (24, 8, 0, 0), (24, 0, 2, 2), (26, 2, 0, 0), (26, 0, 9, 9), (26, 9, 2, 2), (30, 11, 9, 9), (30, 9, 6, 6), (30, 6, 11, 11), (21, 1, 6, 6), (21, 6, 4, 4), (21, 4, 1, 1)] Faktor = 100 # Skalierungsfaktor k = 1 # Korrekturfaktor fuer Kantenlaenge ku = 128 # Unterteilung der Kugeln rd = Faktor*k*a*math.sqrt(3)*(1+math.sqrt(5))/4 # Umkugelradius Dodekaeder ri = Faktor*k*math.sqrt(10+2*math.sqrt(5))/4 # Umkugelradius Ikosaeder #************************************************************************ def CreateNullobjekt1(): obj = c4d.BaseObject(c4d.Onull) obj.SetName(Titel) obj.Message(c4d.MSG_UPDATE) return obj #************************************************************************ def CreateNullobjekt2(): obj = c4d.BaseObject(c4d.Onull) obj.SetName('Ecken') obj.Message(c4d.MSG_UPDATE) return obj #************************************************************************ def CreateNullobjekt3(): obj = c4d.BaseObject(c4d.Onull) obj.SetName('Kanten') obj.Message(c4d.MSG_UPDATE) return obj #************************************************************************ def CreateNullobjekt4(): obj = c4d.BaseObject(c4d.Onull) obj.SetName('Polygone') obj.Message(c4d.MSG_UPDATE) return obj #************************************************************************ def CreateNullobjekt5(): obj = c4d.BaseObject(c4d.Onull) obj.SetName('Kugeln') obj.Message(c4d.MSG_UPDATE) return obj #************************************************************************ def CreateDreiecke(): obj = c4d.BaseObject(c4d.Opolygon) obj.ResizeObject(NP, N3) obj.SetName('Dreiecke') # Punkte uebergeben for i in xrange(NP): obj.SetPoint(i, c4d.Vector(Punkte[i][0]*Faktor*k, Punkte[i][1]*Faktor*k, Punkte[i][2]*Faktor*k)) # Dreiecke setzen for i in xrange(N3): obj.SetPolygon( i, c4d.CPolygon(Dreiecke[i][0], Dreiecke[i][1], Dreiecke[i][2], Dreiecke[i][3])) obj.Message(c4d.MSG_UPDATE) return obj #************************************************************************ def CreateSplineDreiecke(): obj = c4d.BaseObject(c4d.Ospline) obj.SetName("Spline-Dreiecke") obj.ResizeObject(N3*3) zz = 0 for i in xrange(N3): for j in xrange(3): x = Punkte[Dreiecke[i][j]][0] y = Punkte[Dreiecke[i][j]][1] z = Punkte[Dreiecke[i][j]][2] obj.SetPoint(zz, c4d.Vector(x*Faktor*k, y*Faktor*k, z*Faktor*k)) zz = zz + 1 # Segmente erzeugen obj.MakeVariableTag(c4d.Tsegment, N3) for i in range(0, N3): obj.SetSegment(i, 3, True) # Spline schliessen obj[c4d.SPLINEOBJECT_CLOSED] = True obj.Message(c4d.MSG_UPDATE) return obj #************************************************************************ def main(): nullobj1 = CreateNullobjekt1() nullobj2 = CreateNullobjekt2() # Ecken nullobj3 = CreateNullobjekt3() # Kanten nullobj4 = CreateNullobjekt4() # Polygone nullobj5 = CreateNullobjekt5() # Umkugel, etc. plyobj1 = CreateDreiecke() splobj1 = CreateSplineDreiecke() doc.InsertObject(nullobj1, None, None, True) doc.InsertObject(nullobj5, nullobj1, None, True) doc.InsertObject(nullobj4, nullobj1, None, True) doc.InsertObject(nullobj3, nullobj1, None, True) doc.InsertObject(nullobj2, nullobj1, None, True) doc.InsertObject(splobj1, nullobj3, None, True) doc.InsertObject(plyobj1, nullobj4, None, True) # Kugeln auf Eckpunkte setzen for i in range(0, NP): obj = c4d.BaseObject(c4d.Osphere) obj[c4d.PRIM_SPHERE_RAD] = Radius obj.SetName(str(i)) x = Punkte[i][0] y = Punkte[i][1] z = Punkte[i][2] obj.SetAbsPos(c4d.Vector(x*Faktor*k, y*Faktor*k, z*Faktor*k)) doc.InsertObject(obj, nullobj2, None, True) # Umkugel Dodekaeder erzeugen obj = c4d.BaseObject(c4d.Osphere) obj[c4d.PRIM_SPHERE_SUB] = ku obj[c4d.PRIM_SPHERE_RAD] = rd obj.SetName('Umkugel Dodekaeder') obj[c4d.ID_BASEOBJECT_VISIBILITY_EDITOR] = 1 obj[c4d.ID_BASEOBJECT_VISIBILITY_RENDER] = 1 doc.InsertObject(obj, nullobj5, None, True) # Umkugel Ikosaeder erzeugen obj = c4d.BaseObject(c4d.Osphere) obj[c4d.PRIM_SPHERE_SUB] = ku obj[c4d.PRIM_SPHERE_RAD] = ri obj.SetName('Umkugel Ikosaeder') obj[c4d.ID_BASEOBJECT_VISIBILITY_EDITOR] = 1 obj[c4d.ID_BASEOBJECT_VISIBILITY_RENDER] = 1 doc.InsertObject(obj, nullobj5, None, True) c4d.EventAdd() if __name__=='__main__': main()