import rhinoscriptsyntax as rs
import random as ran

rs.EnableRedraw(False)

#delete everything von Null beginnen
allobjs = rs.AllObjects()
rs.DeleteObjects(allobjs)

#function to create box at centerpoint
def make_box(insertion=[0,0,0],xsize=10,ysize=10,zsize=10):
    corners = [[0,0,0], [xsize,0,0], [xsize,ysize,0], [0,ysize,0],
       [0,0,zsize], [xsize,0,zsize], [xsize,ysize,zsize], [0,ysize,zsize]]
    box = rs.AddBox(corners)
    rs.MoveObject(box, (-xsize/2, -ysize/2,0))
    rs.MoveObject(box,insertion)
    return(box)

#function to create box at cornerpoint
def make_podest(insertion=[0,0,0],xsize=10,ysize=10,zsize=10):
    corners = [[0,0,0], [xsize,0,0], [xsize,ysize,0], [0,ysize,0],
       [0,0,zsize], [xsize,0,zsize], [xsize,ysize,zsize], [0,ysize,zsize]]
    box = rs.AddBox(corners)
    rs.MoveObject(box,insertion)
    return(box)

#domino variables
A = 5
B = A/3
thick = 0.2
hgt = 2.7
xcol = 3
ycol = 4
levels = 5
f_height = 0.5
f_size = 0.8

#derived values
center_pt = [A*(xcol-1)/2,A*(ycol-1)/2, f_height]
p_width = A*(xcol-1)+2*B
p_length = A*(ycol-1) + f_size

#Feld um Fundamente zu machen
def make_foundations(A=5.0,f_size=0.8,f_height=0.5, xcol=2, ycol=3):
    fns =[]
    for i in range(xcol):
        for j in range (ycol):
            fns.append(make_box([i*A,j*A,0], f_size, f_size, f_height))
    return(fns)

#Feld um Saeulen zu machen
def make_columns(A=A, level=0.7, thick=thick, hgt=hgt, xcol=xcol, ycol=ycol):
    cls =[]
    for i in range(xcol):
        for j in range(ycol):
            cls.append(make_box([i*A,j*A,level], thick, thick, hgt))
    return(cls)

#funktion to create Halbkreise
def make_arc(insertion, rad, thick, hgt, orientation):
    segs=[]
    segs.append(rs.AddArc([0,0,0], rad, 180))
    segs.append(rs.AddArc([0,0,0], rad-thick, 180))
    segs.append(rs.AddLine([rad,0,0],[rad-thick,0,0]))
    segs.append(rs.AddLine([-rad,0],[-(rad-thick),0,0]))
    crv=rs.JoinCurves(segs, delete_input=True)
    path=rs.AddLine([0,0,0], [0,0,hgt])
    arc=rs.ExtrudeCurve(crv, path)
    rs.CapPlanarHoles(arc)
    rs.DeleteObject(crv)
    rs.DeleteObject(path)
    rs.RotateObject(arc, [0,0,0], orientation)
    rs.MoveObject(arc, insertion)
    return(arc)

#function to create terrace
def make_terrace(A=5.0, level=0.7, thick=0.2, hgt=3.0, xcol=2, ycol=3):
    cls =[]
    for i in range(xcol-1):
        for j in range (ycol-1):
            ori = ran.randint(0,6)
            if ori<4:
                orientation = ori*90
                cls.append(make_arc([i*A+A/2,j*A+A/2,level], A/2, thick, hgt, orientation))
    return(cls)

#function to create stair
def make_stair(start, th, tt, steps, thick, s_width):  
    pointlist=[start]
    for i in range(steps):
        pointlist.append([pointlist[-1][0],pointlist[-1][1],pointlist[-1][2]+th])
        pointlist.append([pointlist[-1][0]+tt,pointlist[-1][1],pointlist[-1][2]])
    pointlist.append([pointlist[-1][0],pointlist[-1][1],pointlist[-1][2]-thick])
    pointlist.append([pointlist[0][0],pointlist[0][1],pointlist[0][2]-thick])
    pointlist.append([pointlist[0][0],pointlist[0][1],pointlist[0][2]])
    s_outline=rs.AddPolyline(pointlist)
    path=rs.AddLine(start, [start[0],start[1]+s_width, start[2]])
    hull = rs.ExtrudeCurve(s_outline, path)
    rs.CapPlanarHoles(hull)
    rs.DeleteObject(s_outline)
    rs.DeleteObject(path)
    return(hull)


##########################################
#fassade erstellen
##########################################

# fassaden base

bsize = 1.8                                 # side length of box
dist = 0.1                                  # distance between boxes
hight = (levels-1) * (hgt+thick) +thick     # hoehe box
offs = bsize + dist                         # offset of boxes
num = 5                                     # number of boxes in one row

def make_box2(bsize=bsize, hight=hight):
    corners = [(0,0,0), (bsize,0,hight), (bsize,bsize,hight), (0,bsize,0),
               (0,0,bsize), (bsize,0,bsize), (bsize,bsize,bsize), (0,bsize,bsize)]
    box = rs.AddBox(corners)
    return[box]

def make_fassade(insertion=[0,0,0],p_width=p_width, p_length=p_length, f_height=f_height, levels=levels, hgt=hgt, f_size=f_size, B=B, A=A):
    fas=[]
    bsize = 1.8                                 # side length of box
    dist = 0.1                                  # distance between boxes
    hight = (levels-1) * (hgt+thick) +thick     # hoehe box
    offs = bsize + dist                         # offset of boxes
    num = 5                                     # number of boxes in one row
    
    my_line1 = rs.AddLine([0-B,0-(f_size/2),f_height],[p_width-B,0-(f_size/2),f_height])
    #oben kurz
    my_line2 = rs.AddLine([0-B,0+p_length-(f_size/2),f_height],[p_width-B,0+p_length-(f_size/2),f_height])
    #links lang
    my_line3 = rs.AddLine([0-B,p_length-f_size/2,f_height],[0-B,0-f_size/2,f_height])
    #rechts lang
    my_line4 = rs.AddLine([p_width-B,0-f_size/2,f_height],[p_width-B,p_length-f_size/2,f_height])
    my_lines = (my_line1, my_line2, my_line3, my_line4)
    
    #stirnseite
    my_pts2 = rs.DivideCurve(my_line2, 5, False, True)
    #lange seite links treppe
    my_pts3 = rs.DivideCurve(my_line3, 5, False, True)
    #lange seite rechts treppe
    my_pts4 = rs.DivideCurve(my_line4, 5, False, True)
    
    for p in my_pts2:
        box = make_box2(bsize=bsize, hight=hight)
        rs.MoveObject(box,p) 
        rs.MoveObject(box,[-bsize/2, bsize/2-bsize/2,0])
        fas.append(box)
    for p in my_pts3:
        box = make_box2(bsize=bsize, hight=hight)
        rs.MoveObject(box,p) 
        rs.MoveObject(box,[-bsize, -bsize,0])
        fas.append(box)
    for p in my_pts4:
        box = make_box2(bsize=bsize, hight=hight)
        rs.MoveObject(box,p) 
        rs.MoveObject(box,[bsize/2-bsize/2, -bsize,0])
        fas.append(box)
    
        rs.DeleteObject(my_line1)
        rs.DeleteObject(my_line2)
        rs.DeleteObject(my_line3)
        rs.DeleteObject(my_line4)
    return(fas)

#(fas)=make_fassade()


# dom-ino bauen
def make_domino(A=A, B=B, thick=thick, hgt=hgt, levels=levels, xcol=xcol, ycol=ycol, f_height=f_height, f_size=f_size):
    f_list =[]          #Liste Fundamente
    c_list =[]          #Liste Saeulen
    p_list =[]          #Liste Decken
    for i in range (levels):
        center_pt[2] = f_height + i*(thick+hgt)
        level = f_height + thick + (i-1)*(hgt+thick)
        if i ==0:
            f_list = make_foundations(A, f_size, f_height, xcol=xcol, ycol=ycol)
        else:
            c_list.extend(make_columns(A, level, thick, hgt, xcol, ycol))
            if(i%2):
                c_list.extend(make_terrace(A, level, thick, hgt, xcol, ycol))
        p_list.append(make_box(center_pt, p_width, p_length, thick))
    level=f_height + thick + (levels-1)*(hgt+thick)
    c_list.extend(make_terrace(A, level, thick, hgt, xcol, ycol))
    
    #builds the faassade on the domino
    (fas)=make_fassade(levels=levels)
    
    ################################
    #calculate stair values
    ################################
    steps = int((hgt+thick)/0.17)
    if steps%2:
        steps = steps-1
    th = (hgt+thick)/steps
    if(th>0.19):
        steps= steps+2
        th = (hgt+thick)/steps
    ###############################
    #stair parameters
    ###############################
    tt = 0.3              # step size
    s_width = 1.2         # s_with = stair width
    pod_w = B             # pod_w = depth of landing
    start = [pod_w,-(s_width*2+f_size/2), f_height+thick]    #startpoint of stair
    
    #loop to create staircase
    stair_l = []
    for i in range(levels):
            start[2] = f_height+thick + i*(thick+hgt)        #z-wert bei jeder Iteration neu gesetzt
            if i== levels-1:                                 #letztes podest
                stair_l.append(make_podest([start[0]-pod_w, start[1]+s_width, start[2]-thick], pod_w, s_width, thick))   #sonderpodest
            else:
                stair_l.append(make_podest([start[0]-pod_w, start[1], start[2]-thick], pod_w, s_width*2, thick))
                stair_l.append(make_stair(start, th, tt, int(steps/2), thick, s_width))
                stair_l.append(make_podest([start[0]+(steps/2)*tt, start[1], start[2]+(steps/2)*th-thick], pod_w, s_width*2, thick))
                stair_l.append(make_stair([start[0]+(steps/2)*tt, start[1]+s_width, start[2]+(steps/2)*th], th, -tt, int(steps/2), thick, s_width))
    return(f_list, c_list, p_list, stair_l, fas)

#(f_list, c_list, p_list, stair_l) = make_domino()




##########################################
#create city
##########################################

#rechteck zeichnen

plane = rs.WorldXYPlane()
#definert plane
my_rect = rs.AddRectangle(plane, 400, 200)

for i in range(20):
    xran = ran.randint(0,200)
    yran = ran.randint(0,200)
    levels= ran.randint(3,10)
    (f_list, c_list, p_list, stair_1,fas)= make_domino(levels=levels)
    rs.MoveObject(f_list+c_list+p_list+stair_1+fas, (xran,yran,1))


rs.DeleteObject(my_rect)

#########################################
#spirale
#########################################

"""
my_spi = rs.AddSpiral([0,0,0],(0,0,1), 0, 1, 20, 80)
#Startpunkt, Endpunkt, Hoehe, Umdrehungen, Radius1, Radius 2
my_s = rs.MoveObject(my_spi, center_pt)
rs.MoveObject(my_s, (0,15,-12))

my_pts = rs.DivideCurve(my_spi, 18, False, True) 

for p in my_pts: 
    (f_list, c_list, p_list, stair_1) = make_domino()
    rs.MoveObject((f_list+c_list+p_list+stair_1),p)
    param= rs.CurveClosestPoint(my_spi, p)
    normal= rs.CurveTangent(my_spi, param)
    angle= rs.Angle([0,0,0], normal)[0]
    rs.RotateObjects(f_list+c_list+p_list+stair_1, p, angle)

rs.DeleteObject(my_spi)
"""

rs.EnableRedraw(True)