""" Hexaederstumpf Tunnel 06.01.2021 www.3d-meier.de """ import c4d import math # Variablen und Konstanten Titel = 'Hexaederstumpf Tunnel' # Name NP = 32 # Anzahl Punkte N3 = 16 # Anzahl Dreiecke N4 = 12 # Anzahl Vierecke N8 = 4 # Anzahl Achtecke Radius = 2 # Radius der Eckpunktkugeln a = math.sqrt(2)-1 Punkte = [( a, 1.0, 1.0), ( 1.0, 1.0, a), ( 1.0, a, 1.0), ( a, 1.0, -1.0), ( 1.0, -1.0, a), (-1.0, a, 1.0), ( a, -1.0, 1.0), (-1.0, 1.0, a), ( 1.0, a, -1.0), ( a, -1.0, -1.0), (-1.0, -1.0, a), (-1.0, a, -1.0), ( -a, 1.0, 1.0), ( 1.0, 1.0, -a), ( 1.0, -a, 1.0), ( -a, 1.0, -1.0), ( 1.0, -1.0, -a), (-1.0, -a, 1.0), ( -a, -1.0, 1.0), (-1.0, 1.0, -a), ( 1.0, -a, -1.0), ( -a, -1.0, -1.0), (-1.0, -1.0, -a), (-1.0, -a, -1.0), ( a, a, a), ( a, a, -a), ( a, -a, a), ( a, -a, -a), ( -a, a, a), ( -a, a, -a), ( -a, -a, a), ( -a, -a, -a)] Dreiecke = [(21, 22, 23, 23), (10, 18, 17, 17), ( 6, 4, 14, 14), (16, 9, 20, 20), ( 5, 12, 7, 7), (19, 15, 11, 11), ( 3, 13, 8, 8), ( 0, 2, 1, 1), (15, 29, 11, 11), ( 8, 25, 3, 3), ( 9, 27, 20, 20), (23, 31, 21, 21), ( 0, 24, 2, 2), ( 5, 28, 12, 12), (18, 30, 17, 17), (14, 26, 6, 6)] Vierecke = [( 3, 25, 29, 15), (20, 27, 25, 8), (21, 31, 27, 9), (11, 29, 31, 23), (31, 30, 26, 27), (29, 28, 30, 31), (25, 24, 28, 29), (27, 26, 24, 25), (12, 28, 24, 0), (17, 30, 28, 5), ( 6, 26, 30, 18), ( 2, 24, 26, 14)] Achtecke = [( 0, 1, 13, 3, 15, 19, 7, 12), ( 19, 11, 23, 22, 10, 17, 5, 7), ( 22, 21, 9, 16, 4, 6, 18, 10), ( 16, 20, 8, 13, 1, 2, 14, 4)] Faktor = 100 # Skalierungsfaktor k = 1/(2*(math.sqrt(2)-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 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()