import rhinoscriptsyntax as rs
import scriptcontext as sc
import random as ran

allobjs = rs.AllObjects()
rs.DeleteObjects(allobjs)

A = 5
B = A/3
thick = 0.2
hgt = 2.7
xcol = 3
ycol = 6
levels = 9
f_height = 0.5
f_size = 0.8

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

# create a box
#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]]
#rs.AddBox(corners)

# create a 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)

# create a 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)

# make_box([10,-3,0])

# Foundations
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)

# Columns
def make_columns(A=5.0,level=0.7, thick=0.2, hgt=3.0, xcol=2, ycol=3):
    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)

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,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)

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)

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)
    return(hull)

# Builing Dom-ino
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 = []
    c_list = []
    p_list = []
    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, ycol)
        else:
            c_list.extend(make_columns(A, level, thick, hgt, xcol, ycol))
            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))
    
    #stair calculator:
    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
    # Parameter Stiegen:
    tt = 0.3                                        # step size
    s_width = 1.2                                   # stair width
    pod_width = B                                   # depth of landing
    start= [pod_width,-(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 (immer neu)
        if i ==levels-1:                                        #letztes Podest
            stair_l.append(make_podest([start[0]-pod_width, start[1]+s_width, start[2]-thick], pod_width, s_width, thick))             #Sonderpodest    
        else:
            stair_l.append(make_podest([start[0]-pod_width, start[1], start[2]-thick], pod_width, 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_width, 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)

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

rs.AddLayer("Foundation")
rs.LayerColor("Foundation", (220,60,60))
rs.ObjectLayer(f_list, "Foundation")

rs.AddLayer("Column")
rs.LayerColor("Column", (60,220,60))
rs.ObjectLayer(c_list, "Column")

rs.AddLayer("Plates")
rs.LayerColor("Plates", (60,60,220))
rs.ObjectLayer(p_list, "Plates")