""" Small cubicuboctahedron 15.05.2021 www.3d-meier.de """ import c4d import math # Variablen und Konstanten Titel = 'Small cubicuboctahedron' # Name NP = 24 # Anzahl Punkte N3 = 8 # Anzahl Dreiecke N4 = 6 # Anzahl Vierecke N8 = 6 # Anzahl Achtecke Radius = 2 # Radius der Eckpunktkugeln a = 1 + math.sqrt(2) Punkte = [( a, 1.0, 1.0), ( a, 1.0, -1.0), ( a, -1.0, 1.0), ( a, -1.0, -1.0), ( -a, 1.0, 1.0), ( -a, 1.0, -1.0), ( -a, -1.0, 1.0), ( -a, -1.0, -1.0), ( 1.0, a, 1.0), ( 1.0, a, -1.0), ( 1.0, -a, 1.0), ( 1.0, -a, -1.0), (-1.0, a, 1.0), (-1.0, a, -1.0), (-1.0, -a, 1.0), (-1.0, -a, -1.0), ( 1.0, 1.0, a), ( 1.0, 1.0, -a), ( 1.0, -1.0, a), ( 1.0, -1.0, -a), (-1.0, 1.0, a), (-1.0, 1.0, -a), (-1.0, -1.0, a), (-1.0, -1.0, -a)] Dreiecke = [( 17, 9, 1, 1), ( 0, 8, 16, 16), (20, 12, 4, 4), ( 5, 13, 21, 21), (18, 10, 2, 2), ( 3, 11, 19, 19), (23, 15, 7, 7), ( 6, 14, 22, 22)] Vierecke = [ (12, 8, 9, 13), (11, 10, 14, 15), ( 2, 3, 1, 0), (19, 23, 21, 17), ( 7, 6, 4, 5), (22, 18, 16, 20)] Achtecke = [(14, 10, 2, 0, 8, 12, 4, 6), (11, 15, 7, 5, 13, 9, 1, 3), (10, 11, 19, 17, 9, 8, 16, 18), (15, 14, 22, 20, 12, 13, 21, 23), ( 6, 22, 18, 2, 3, 19, 23, 7), ( 4, 20, 16, 0, 1, 17, 21, 5)] 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 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 # Zähler für Polygone zurücksetzen 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 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 = CreateAchtecke() splobj1 = CreateSplineDreiecke() splobj2 = CreateSplineVierecke() splobj3 = 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(splobj3, nullobj3, None, True) doc.InsertObject(splobj2, nullobj3, None, True) doc.InsertObject(splobj1, nullobj3, 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()