""" Großes Rhombenkuboktaeder mit Tunnel 05.03.2021 www.3d-meier.de """ import c4d import math # Variablen und Konstanten Titel = 'Großes Rhombenkuboktaeder mit Tunnel' # Name NP = 64 # Anzahl Punkte N3 = 16 # Anzahl Dreiecke N4 = 28 # Anzahl Vierecke N6 = 8 # Anzahl Sechsecke N8 = 4 # Anzahl Achtecke Radius = 1.5 # Radius der Eckpunktkugeln a = (1 + math.sqrt(2))/2.0 # für Großes Rhombenkuboktaeder b = (1 + 2*math.sqrt(2))/2.0 # für Großes Rhombenkuboktaeder c = math.sqrt(2)/2 # für Kuboktaeder Punkte = [( 0.5, a, b), # Großes Rhombenkuboktaeder ( 0.5, a, -b), # Großes Rhombenkuboktaeder ( 0.5, -a, b), # Großes Rhombenkuboktaeder ( 0.5, -a, -b), # Großes Rhombenkuboktaeder (-0.5, a, b), # Großes Rhombenkuboktaeder (-0.5, a, -b), # Großes Rhombenkuboktaeder (-0.5, -a, b), # Großes Rhombenkuboktaeder (-0.5, -a, -b), # Großes Rhombenkuboktaeder ( a, b, 0.5), # Großes Rhombenkuboktaeder ( a, -b, 0.5), # Großes Rhombenkuboktaeder ( -a, b, 0.5), # Großes Rhombenkuboktaeder ( -a, -b, 0.5), # Großes Rhombenkuboktaeder ( a, b, -0.5), # Großes Rhombenkuboktaeder ( a, -b, -0.5), # Großes Rhombenkuboktaeder ( -a, b, -0.5), # Großes Rhombenkuboktaeder ( -a, -b, -0.5), # Großes Rhombenkuboktaeder ( b, 0.5, a), # Großes Rhombenkuboktaeder ( -b, 0.5, a), # Großes Rhombenkuboktaeder ( b, 0.5, -a), # Großes Rhombenkuboktaeder ( -b, 0.5, -a), # Großes Rhombenkuboktaeder ( b, -0.5, a), # Großes Rhombenkuboktaeder ( -b, -0.5, a), # Großes Rhombenkuboktaeder ( b, -0.5, -a), # Großes Rhombenkuboktaeder ( -b, -0.5, -a), # Großes Rhombenkuboktaeder ( b, a, 0.5), # Großes Rhombenkuboktaeder ( -b, a, 0.5), # Großes Rhombenkuboktaeder ( b, -a, 0.5), # Großes Rhombenkuboktaeder ( -b, -a, 0.5), # Großes Rhombenkuboktaeder ( b, a, -0.5), # Großes Rhombenkuboktaeder ( -b, a, -0.5), # Großes Rhombenkuboktaeder ( b, -a, -0.5), # Großes Rhombenkuboktaeder ( -b, -a, -0.5), # Großes Rhombenkuboktaeder ( a, 0.5, b), # Großes Rhombenkuboktaeder ( a, 0.5, -b), # Großes Rhombenkuboktaeder ( -a, 0.5, b), # Großes Rhombenkuboktaeder ( -a, 0.5, -b), # Großes Rhombenkuboktaeder ( a, -0.5, b), # Großes Rhombenkuboktaeder ( a, -0.5, -b), # Großes Rhombenkuboktaeder ( -a, -0.5, b), # Großes Rhombenkuboktaeder ( -a, -0.5, -b), # Großes Rhombenkuboktaeder ( 0.5, b, a), # Großes Rhombenkuboktaeder ( 0.5, -b, a), # Großes Rhombenkuboktaeder ( 0.5, b, -a), # Großes Rhombenkuboktaeder ( 0.5, -b, -a), # Großes Rhombenkuboktaeder (-0.5, b, a), # Großes Rhombenkuboktaeder (-0.5, -b, a), # Großes Rhombenkuboktaeder (-0.5, b, -a), # Großes Rhombenkuboktaeder (-0.5, -b, -a), # Großes Rhombenkuboktaeder ( c, c, 0.5), # Kuboktaeder ( c, -c, 0.5), # Kuboktaeder ( -c, c, 0.5), # Kuboktaeder ( -c, -c, 0.5), # Kuboktaeder ( c, 0, c+0.5), # Kuboktaeder ( c, 0, -c+0.5), # Kuboktaeder ( -c, 0, c+0.5), # Kuboktaeder ( -c, 0, -c+0.5), # Kuboktaeder ( 0, c, c+0.5), # Kuboktaeder ( 0, c, -c+0.5), # Kuboktaeder ( 0, -c, c+0.5), # Kuboktaeder ( 0, -c, -c+0.5), # Kuboktaeder ( c, 0, -c-0.5), # Würfel ( -c, 0, -c-0.5), # Würfel ( 0, c, -c-0.5), # Würfel ( 0, -c, -c-0.5)] # Würfel Dreiecke = [(55, 51, 59, 59), # Kuboktaeder (54, 58, 51, 51), # Kuboktaeder (55, 57, 50, 50), # Kuboktaeder (56, 54, 50, 50), # Kuboktaeder (52, 56, 48, 48), # Kuboktaeder (48, 57, 53, 53), # Kuboktaeder (58, 52, 49, 49), # Kuboktaeder (49, 53, 59, 59), # Kuboktaeder (56, 0, 4, 4), # Quadratkuppel 1 (54, 34, 38, 38), # Quadratkuppel 1 (58, 6, 2, 2), # Quadratkuppel 1 (52, 36, 32, 32), # Quadratkuppel 1 (62, 5, 1, 1), # Quadratkuppel 2 (60, 33, 37, 37), # Quadratkuppel 2 (63, 3, 7, 7), # Quadratkuppel 2 (61, 39, 35, 35)] # Quadratkuppel 2 Vierecke = [(12, 8, 24, 28), # Großes Rhombenkuboktaeder (10, 14, 29, 25), # Großes Rhombenkuboktaeder (46, 42, 1, 5), # Großes Rhombenkuboktaeder (40, 44, 4, 0), # Großes Rhombenkuboktaeder (43, 47, 7, 3), # Großes Rhombenkuboktaeder (15, 11, 27, 31), # Großes Rhombenkuboktaeder (45, 41, 2, 6), # Großes Rhombenkuboktaeder ( 9, 13, 30, 26), # Großes Rhombenkuboktaeder (22, 37, 33, 18), # Großes Rhombenkuboktaeder (39, 23, 19, 35), # Großes Rhombenkuboktaeder (21, 38, 34, 17), # Großes Rhombenkuboktaeder (36, 20, 16, 32), # Großes Rhombenkuboktaeder (56, 50, 57, 48), # Kuboktaeder (49, 52, 48, 53), # Kuboktaeder (59, 51, 58, 49), # Kuboktaeder (50, 54, 51, 55), # Kuboktaeder (59, 63, 61, 55), # Würfel (53, 60, 63, 59), # Würfel (57, 62, 60, 53), # Würfel (55, 61, 62, 57), # Würfel (56, 4, 34, 54), # Quadratkuppel 1 (54, 38, 6, 58), # Quadratkuppel 1 (58, 2, 36, 52), # Quadratkuppel 1 (52, 32, 0, 56), # Quadratkuppel 1 (62, 1, 33, 60), # Quadratkuppel 2 (60, 37, 3, 63), # Quadratkuppel 2 (63, 7, 39, 61), # Quadratkuppel 2 (61, 35, 5, 62)] # Quadratkuppel 2 Sechsecke = [(42, 12, 28, 18, 33, 1), ( 8, 40, 0, 32, 16, 24), (44, 10, 25, 17, 34, 4), (14, 46, 5, 35, 19, 29), (41, 9, 26, 20, 36, 2), (13, 43, 3, 37, 22, 30), (47, 15, 31, 23, 39, 7), (11, 45, 6, 38, 21, 27)] Achtecke = [(46, 14, 10, 44, 40, 8, 12, 42), (45, 11, 15, 47, 43, 13, 9, 41), (29, 19, 23, 31, 27, 21, 17, 25), (26, 30, 22, 18, 28, 24, 16, 20)] Faktor = 100 # Skalierungsfaktor k = 1 # 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 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 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 CreateSechsecke(): obj = c4d.BaseObject(c4d.Opolygon) obj.ResizeObject(NP, N6*2) obj.SetName('Sechsecke') # 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 zz = 0 # Zaehler fuer Polygone zuruecksetzen for i in xrange(N6): obj.SetPolygon(zz, c4d.CPolygon(Sechsecke[i][0], Sechsecke[i][1], Sechsecke[i][2], Sechsecke[i][5])) zz = zz + 1 obj.SetPolygon(zz, c4d.CPolygon(Sechsecke[i][2], Sechsecke[i][3], Sechsecke[i][4], Sechsecke[i][5])) zz = zz + 1 obj.Message(c4d.MSG_UPDATE) return obj #************************************************************************ def CreateAchtecke(): obj = c4d.BaseObject(c4d.Opolygon) obj.ResizeObject(NP, N8*3) obj.SetName('Achtecke') # 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 zz = 0 # Zaehler fuer Polygone zuruecksetzen for i in xrange(N8): obj.SetPolygon(zz, c4d.CPolygon(Achtecke[i][0], Achtecke[i][1], Achtecke[i][2], Achtecke[i][7])) zz = zz + 1 obj.SetPolygon(zz, c4d.CPolygon(Achtecke[i][2], Achtecke[i][3], Achtecke[i][6], Achtecke[i][7])) zz = zz + 1 obj.SetPolygon(zz, c4d.CPolygon(Achtecke[i][3], Achtecke[i][4], Achtecke[i][5], Achtecke[i][6])) zz = zz + 1 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 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 CreateSplineSechsecke(): obj = c4d.BaseObject(c4d.Ospline) obj.SetName("Spline-Sechsecke") obj.ResizeObject(N6*6) zz = 0 for i in xrange(N6): for j in xrange(6): x = Punkte[Sechsecke[i][j]][0] y = Punkte[Sechsecke[i][j]][1] z = Punkte[Sechsecke[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, N6) for i in range(0, N6): obj.SetSegment(i, 6, True) # Spline schliessen obj[c4d.SPLINEOBJECT_CLOSED] = True obj.Message(c4d.MSG_UPDATE) return obj #************************************************************************ def CreateSplineAchtecke(): obj = c4d.BaseObject(c4d.Ospline) obj.SetName("Spline-Achtecke") obj.ResizeObject(N8*8) zz = 0 for i in xrange(N8): for j in xrange(8): x = Punkte[Achtecke[i][j]][0] y = Punkte[Achtecke[i][j]][1] z = Punkte[Achtecke[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, N8) for i in range(0, N8): obj.SetSegment(i, 8, 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 = CreateDreiecke() plyobj2 = CreateVierecke() plyobj3 = CreateSechsecke() plyobj4 = CreateAchtecke() splobj1 = CreateSplineDreiecke() splobj2 = CreateSplineVierecke() splobj3 = CreateSplineSechsecke() splobj4 = CreateSplineAchtecke() 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(splobj4, nullobj3, None, True) doc.InsertObject(splobj3, nullobj3, None, True) doc.InsertObject(splobj2, nullobj3, None, True) doc.InsertObject(splobj1, nullobj3, None, True) doc.InsertObject(plyobj4, nullobj4, None, True) doc.InsertObject(plyobj3, nullobj4, 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()