##############################
###  DM2_w24  hu_03_setUp  ###
###  _diag  /  2024 10 17  ###
##############################
import rhinoscriptsyntax as rs
import random, time, sys   ###                                              
sys.path.append("C:/Users/annas/OneDrive/Dokumente/uni-dokumente/dm2")     ### add path where "DM_lib.py" can be found !!!                                              
import DM_lib as dm        #### reload(dm)    
############################## 

rs.EnableRedraw(0)
dm.eA()
#dm.setUp_hu_03()

#####sphere01

anz= 1000
rad = 100
center =[0,0,0]
deltaAngle = 360/anz
vec = [1,0,0]
for i in range(anz):
    angX = deltaAngle*i
    vecX = rs.VectorRotate(vec, angX, [random.uniform(-1,1),random.uniform(-1,1),random.uniform(-1,1)] )
    vecX = rs.VectorScale(vecX, rad)
    vecX = rs.VectorAdd(vecX, center)

###Farbe Sphere01
    rs.AddPoint(vecX)
    Sphere = rs.AddPoint(vecX)
    rs.ObjectColor(Sphere,[47,79,79])    ###funktioniert irgenwie nicht??

######sphere02

anz= 1000
rad = 300
center =[50,0,0]
deltaAngle = 360/anz
vec = [1,0,0]
for i in range(anz):
    angX = deltaAngle*i
    vecX = rs.VectorRotate(vec, angX, [random.uniform(-1,1),random.uniform(-1,1),random.uniform(-1,1)] )
    vecX = rs.VectorScale(vecX, rad)
    vecX = rs.VectorAdd(vecX, center)

###Farbe Sphere02
    rs.AddPoint(vecX)
    Sphere = rs.AddPoint(vecX)
    rs.ObjectColor(Sphere,[0,128,128])

#####sphere03
if 0:
    anz= 1000
    rad = 150
    center =[0,0,0]
    deltaAngle = 360/anz
    vec = [1,0,0]
    for i in range(anz):
        angX = deltaAngle*i
        vecX = rs.VectorRotate(vec, angX, [random.uniform(-1,1),random.uniform(-1,1),random.uniform(-1,1)] )
        vecX = rs.VectorScale(vecX, rad)
        vecX = rs.VectorAdd(vecX, center)
        
        rs.AddPoint(vecX)
        
        
#####cube01
length = 150

for i in range(10,length):
    for j in range(5,length):
        for k in range(10,length):
            if i% 5 == 0:                           ###Abstand zwischen Punkten ändern 
                if j% 5 == 0:
                    if k% 5 == 0:
                        pnt = rs.CreatePoint(i,j,k)
                        points = rs.AddPoint(pnt)

###Farbe cube01
                        rs.AddPoint(pnt)
                        Cube = rs.AddPoint(pnt)
                        rs.ObjectColor(Cube, [0,128,128])