""" Deltoidalikositetraeder 16.01.2021 www.3d-meier.de """ import c4d import math # Variablen und Konstanten Titel = 'Deltoidalikositetraeder' # Name NP = 26 # Anzahl Punkte N4 = 24 # Anzahl Vierecke Radius = 2.0 # Radius der Eckpunktkugeln a = math.sqrt(2)/2 b = (2*math.sqrt(2)+1)/7 Punkte = [( 1, 0, 0), (-1, 0, 0), ( 0, 1, 0), ( 0, -1, 0), ( 0, 0, 1), ( 0, 0, -1), ( 0, a, a), ( 0, a, -a), ( 0, -a, a), ( 0, -a, -a), ( a, 0, a), ( a, 0, -a), (-a, 0, a), (-a, 0, -a), ( a, a, 0), ( a, -a, 0), (-a, a, 0), (-a, -a, 0), ( b, b, b), ( b, b, -b), ( b, -b, b), ( b, -b, -b), (-b, b, b), (-b, b, -b), (-b, -b, b), (-b, -b, -b)] Vierecke = [(14, 19, 7, 2), ( 2, 6, 18, 14), ( 6, 2, 16, 22), ( 7, 23, 16, 2), ( 8, 3, 15, 20), (24, 17, 3, 8), (25, 9, 3, 17), (21, 15, 3, 9), (24, 12, 1, 17), ( 8, 4, 12, 24), (20, 10, 4, 8), (15, 0, 10, 20), (21, 11, 0, 15), ( 9, 5, 11, 21), (25, 13, 5, 9), (17, 1, 13, 25), (18, 10, 0, 14), ( 6, 4, 10, 18), (22, 12, 4, 6), (16, 1, 12, 22), (23, 13, 1, 16), ( 7, 5, 13, 23), (19, 11, 5, 7), (14, 0, 11, 19)] Faktor = 100 # Skalierungsfaktor k = 1/math.sqrt(2-math.sqrt(2)) # Korrekturfaktor für Kantenlänge 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 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 = CreateVierecke() splobj1 = 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(splobj1, nullobj3, 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()