""" Rhombenkuboktaeder Tunnel 11.05.2021 www.3d-meier.de """ import c4d import math # Variablen und Konstanten Titel = 'Rhombenkuboktaeder Tunnel' # Name NP = 32 # Anzahl Punkte N3 = 16 # Anzahl Dreiecke N4 = 24 # Anzahl Vierecke Radius = 2 # Radius der Eckpunktkugeln a = math.sqrt(2) + 1 b = math.sqrt(2) - 1 Punkte = [( a, 1, 1), # Rhombenkuboktaeder ( a, 1, -1), # Rhombenkuboktaeder ( a, -1, 1), # Rhombenkuboktaeder ( a, -1, -1), # Rhombenkuboktaeder (-a, 1, 1), # Rhombenkuboktaeder (-a, 1, -1), # Rhombenkuboktaeder (-a, -1, 1), # Rhombenkuboktaeder (-a, -1, -1), # Rhombenkuboktaeder ( 1, a, 1), # Rhombenkuboktaeder ( 1, a, -1), # Rhombenkuboktaeder ( 1, -a, 1), # Rhombenkuboktaeder ( 1, -a, -1), # Rhombenkuboktaeder (-1, a, 1), # Rhombenkuboktaeder (-1, a, -1), # Rhombenkuboktaeder (-1, -a, 1), # Rhombenkuboktaeder (-1, -a, -1), # Rhombenkuboktaeder ( 1, 1, a), # Rhombenkuboktaeder ( 1, 1, -a), # Rhombenkuboktaeder ( 1, -1, a), # Rhombenkuboktaeder ( 1, -1, -a), # Rhombenkuboktaeder (-1, 1, a), # Rhombenkuboktaeder (-1, 1, -a), # Rhombenkuboktaeder (-1, -1, a), # Rhombenkuboktaeder (-1, -1, -a), # Rhombenkuboktaeder (-b, 1, -1), # Tunnel 1 ( 1, 1, b), # Tunnel 1 (-b, -1, -1), # Tunnel 1 ( 1, -1, b), # Tunnel 1 ( b, 1, 1), # Tunnel 2 (-1, 1, -b), # Tunnel 2 ( b, -1, 1), # Tunnel 2 (-1, -1, -b)] # Tunnel 2 Dreiecke = [( 0, 8, 16, 16), # Rhombenkuboktaeder ( 5, 13, 21, 21), # Rhombenkuboktaeder (18, 10, 2, 2), # Rhombenkuboktaeder (23, 15, 7, 7), # Rhombenkuboktaeder (17, 9, 24, 24), # Tunnel 1 (24, 9, 25, 25), # Tunnel 1 (25, 9, 1, 1), # Tunnel 1 ( 3, 11, 27, 27), # Tunnel 1 (27, 11, 26, 26), # Tunnel 1 (26, 11, 19, 19), # Tunnel 1 (20, 12, 28, 28), # Tunnel 2 (28, 12, 29, 29), # Tunnel 2 (29, 12, 4, 4), # Tunnel 2 ( 6, 14, 31, 31), # Tunnel 2 (31, 14, 30, 30), # Tunnel 2 (30, 14, 22, 22)] # Tunnel 2 Vierecke = [(12, 8, 9, 13), # Rhombenkuboktaeder (11, 10, 14, 15), # Rhombenkuboktaeder ( 2, 3, 1, 0), # Rhombenkuboktaeder ( 3, 19, 17, 1), # Rhombenkuboktaeder (19, 23, 21, 17), # Rhombenkuboktaeder (23, 7, 5, 21), # Rhombenkuboktaeder ( 7, 6, 4, 5), # Rhombenkuboktaeder ( 6, 22, 20, 4), # Rhombenkuboktaeder (22, 18, 16, 20), # Rhombenkuboktaeder (18, 2, 0, 16), # Rhombenkuboktaeder (22, 14, 10, 18), # Rhombenkuboktaeder ( 2, 10, 11, 3), # Rhombenkuboktaeder (19, 11, 15, 23), # Rhombenkuboktaeder ( 7, 15, 14, 6), # Rhombenkuboktaeder ( 1, 9, 8, 0), # Rhombenkuboktaeder (16, 8, 12, 20), # Rhombenkuboktaeder ( 4, 12, 13, 5), # Rhombenkuboktaeder (21, 13, 9, 17), # Rhombenkuboktaeder (19, 17, 24, 26), # Tunnel 1 (26, 24, 25, 27), # Tunnel 1 (27, 25, 1, 3), # Tunnel 1 (22, 20, 28, 30), # Tunnel 2 (30, 28, 29, 31), # Tunnel 2 (31, 29, 4, 6)] # Tunnel 2 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 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 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 main(): nullobj1 = CreateNullobjekt1() nullobj2 = CreateNullobjekt2() # Ecken nullobj3 = CreateNullobjekt3() # Kanten nullobj4 = CreateNullobjekt4() # Polygone plyobj1 = CreateDreiecke() plyobj2 = CreateVierecke() splobj1 = CreateSplineDreiecke() splobj2 = CreateSplineVierecke() 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()