""" Small rhombidodecahedron 28.05.2021 www.3d-meier.de """ import c4d import math # Variablen und Konstanten Titel = 'Small rhombidodecahedron' # Name NP = 60 # Anzahl Punkte N4 = 30 # Anzahl Vierecke N10 =12 # Anzahl Zehnecke Radius = 2 # Radius der Eckpunktkugeln phi = (1 + math.sqrt(5))/2.0 # Goldener Schnitt a = phi*phi*phi b = phi*phi c = phi d = 2.0*phi e = 2.0+phi Punkte = [( 1, 1, a), ( 1, 1, -a), ( 1, -1, a), ( 1, -1, -a), ( -1, 1, a), ( -1, 1, -a), ( -1, -1, a), ( -1, -1, -a), ( b, c, d), ( b, c, -d), ( b, -c, d), ( b, -c, -d), ( -b, c, d), ( -b, c, -d), ( -b, -c, d), ( -b, -c, -d), ( e, 0, b), ( e, 0, -b), ( -e, 0, b), ( -e, 0, -b), ( 1, a, 1), ( 1, -a, 1), ( -1, a, 1), ( -1, -a, 1), ( 1, a, -1), ( 1, -a, -1), ( -1, a, -1), ( -1, -a, -1), ( c, d, b), ( c, -d, b), ( -c, d, b), ( -c, -d, b), ( c, d, -b), ( c, -d, -b), ( -c, d, -b), ( -c, -d, -b), ( 0, b, e), ( 0, -b, e), ( 0, b, -e), ( 0, -b, -e), ( a, 1, 1), ( -a, 1, 1), ( a, 1, -1), ( -a, 1, -1), ( a, -1, 1), ( -a, -1, 1), ( a, -1, -1), ( -a, -1, -1), ( d, b, c), ( -d, b, c), ( d, b, -c), ( -d, b, -c), ( d, -b, c), ( -d, -b, c), ( d, -b, -c), ( -d, -b, -c), ( b, e, 0), ( -b, e, 0), ( b, -e, 0), ( -b, -e, 0)] Vierecke = [(13, 34, 38, 5), (34, 51, 57, 26), (26, 22, 20, 24), (24, 56, 50, 32), (32, 9, 1, 38), ( 3, 7, 5, 1), ( 7, 39, 35, 15), (15, 55, 47, 19), (51, 13, 19, 43), (43, 47, 45, 41), (45, 53, 14, 18), (59, 23, 31, 53), (55, 35, 27, 59), (25, 21, 23, 27), (33, 54, 58, 25), ( 3, 11, 33, 39), (54, 11, 17, 46), ( 9, 50, 42, 17), (46, 42, 40, 44), (16, 40, 48, 8), (48, 56, 20, 28), ( 8, 28, 36, 0), ( 4, 36, 30, 12), (22, 57, 49, 30), (12, 49, 41, 18), (14, 31, 37, 6), ( 0, 4, 6, 2), (29, 10, 2, 37), (10, 52, 44, 16), (52, 29, 21, 58)] Zehnecke = [( 9, 50, 56, 20, 22, 57, 51, 13, 5, 1), (38, 34, 51, 43, 47, 55, 35, 39, 3, 1), (54, 33, 39, 7, 5, 38, 32, 50, 42, 46), (16, 40, 42, 17, 11, 33, 25, 21, 29, 10), (53, 31, 37, 2, 0, 36, 30, 49, 41, 45), (36, 28, 48, 40, 44, 52, 29, 37, 6, 4), ( 6, 2, 10, 52, 58, 25, 27, 59, 53, 14), (59, 23, 21, 58, 54, 11, 3, 7, 15, 55), (23, 27, 35, 15, 19, 43, 41, 18, 14, 31), (49, 57, 26, 24, 56, 48, 8, 0, 4, 12), (26, 22, 30, 12, 18, 45, 47, 19, 13, 34), (20, 24, 32, 9, 17, 46, 44, 16, 8, 28)] Faktor = 100 # Skalierungsfaktor k = 0.5 # Korrekturfaktor fuer Kantenlaenge 1 #************************************************************************ 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 CreateVierecke(): obj = c4d.BaseObject(c4d.Opolygon) obj.ResizeObject(NP, N4) obj.SetName('Vierecke') # 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)) # Vierecke setzen for i in xrange(N4): obj.SetPolygon(i, c4d.CPolygon(Vierecke[i][0], Vierecke[i][1], Vierecke[i][2], Vierecke[i][3])) obj.Message(c4d.MSG_UPDATE) return obj #************************************************************************ def CreateZehnecke(): obj = c4d.BaseObject(c4d.Opolygon) obj.ResizeObject(NP, N10*5) obj.SetName('Zehnecke') # 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)) zz = 0 # Zaehler fuer Polygone zuruecksetzen for i in xrange(N10): obj.SetPolygon(zz, c4d.CPolygon(Zehnecke[i][0], Zehnecke[i][1], Zehnecke[i][9], Zehnecke[i][9])) zz = zz + 1 obj.SetPolygon(zz, c4d.CPolygon(Zehnecke[i][1], Zehnecke[i][2], Zehnecke[i][8], Zehnecke[i][9])) zz = zz + 1 obj.SetPolygon(zz, c4d.CPolygon(Zehnecke[i][2], Zehnecke[i][3], Zehnecke[i][7], Zehnecke[i][8])) zz = zz + 1 obj.SetPolygon(zz, c4d.CPolygon(Zehnecke[i][3], Zehnecke[i][4], Zehnecke[i][6], Zehnecke[i][7])) zz = zz + 1 obj.SetPolygon(zz, c4d.CPolygon(Zehnecke[i][4], Zehnecke[i][5], Zehnecke[i][6], Zehnecke[i][6])) zz = zz + 1 obj.Message(c4d.MSG_UPDATE) return obj #************************************************************************ def CreateSplineVierecke(): obj = c4d.BaseObject(c4d.Ospline) obj.SetName("Spline-Vierecke") obj.ResizeObject(N4*4) zz = 0 for i in xrange(N4): for j in xrange(4): x = Punkte[Vierecke[i][j]][0] y = Punkte[Vierecke[i][j]][1] z = Punkte[Vierecke[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, N4) for i in range(0, N4): obj.SetSegment(i, 4, True) # Spline schliessen obj[c4d.SPLINEOBJECT_CLOSED] = True obj.Message(c4d.MSG_UPDATE) return obj #************************************************************************ def CreateSplineZehnecke(): obj = c4d.BaseObject(c4d.Ospline) obj.SetName("Spline-Zehnecke") obj.ResizeObject(N10*10) zz = 0 for i in xrange(N10): for j in xrange(10): x = Punkte[Zehnecke[i][j]][0] y = Punkte[Zehnecke[i][j]][1] z = Punkte[Zehnecke[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, N10) for i in range(0, N10): obj.SetSegment(i, 10, 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 plyobj1 = CreateVierecke() plyobj2 = CreateZehnecke() splobj1 = CreateSplineVierecke() splobj2 = CreateSplineZehnecke() doc.InsertObject(nullobj1, None, None, True) doc.InsertObject(nullobj4, nullobj1, None, True) doc.InsertObject(nullobj3, nullobj1, None, True) doc.InsertObject(nullobj2, nullobj1, None, True) doc.InsertObject(splobj2, nullobj3, None, True) doc.InsertObject(splobj1, nullobj3, None, True) doc.InsertObject(plyobj2, nullobj4, 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) c4d.EventAdd() if __name__=='__main__': main()