# import Rhino Commands
import rhinoscriptsyntax as rs
import random as ran

# delete everything and start from scratch
allobjs = rs.AllObjects()
rs.DeleteObjects(allobjs)

#####################
# domino variables
#####################
A = 5                           # A = Module size (distance between columns)
B = A/3                         # B = Distance of columns to end of plate
thick = 0.18                    # thickness of all slabs
hgt = 2.7                       # height of room
xcol = 5                      # columns in x direction 
ycol = 6                      # columns in y direction
levels = 5                      # number of floor plates
f_height = 0.5                  # f_height = foundation height
f_size = 0.8                    # f_size = foundation edge size
####################
# derived values:
####################
center_pt = [A*(xcol-1)/2,A*(ycol-1)/2, f_height]  # insertion point of floor plate
p_width = A*(xcol-1)+2*B                    # width of floor plate (x)
p_length = A*(ycol-1) + f_size              # length of floor plate (y)

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

# function to create 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)

# function to create 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-thick),0,0],[-rad,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
#function to create 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.4
, 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)
    return(hull)


rs.EnableRedraw(False)

# create 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=[]           # list of foundations
    c_list=[]           # list of columns
    p_list=[]           # list of plates
    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))
            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))

    ###############
    #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_width = 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)    
        if i==levels-1:       
            stair_l.append(make_podest([start[0]-pod_w, start[1]+s_width, start[2]-thick], pod_w, s_width, thick)) 
        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)

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

#make domino
"""
for i in range(7):
    xran = ran.randint(0,200)
    yran = ran.randint(0,200)
    (f_list, c_list, p_list, stair_1)=make_domino()
    rs.MoveObjects(f_list+ c_list+ p_list+ stair_1,(xran,yran,0))
"""

#########################################
#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.EnableRedraw(False)
"""
#building a facade 
xsize = 0.3                 #side length x 
ysize = 0.9                 #side length y
zsize = hgt                 #side lenth z 
xbsize = xsize              #side length of box in long direction
ybsize = ysize              #side length of box in long direction 
numh = 2                    #number of boxes height
numb = 12                   #number of boxes length
dist = 1                    #distance boxes 
zoff = zsize+thick          #offset boxes z
xoff = xbsize + dist        #offset boxes x

#facade x-direction
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)]
           
#facade y-direction
corners2 = [(0,0,0), (xbsize,0,0), (xbsize,ybsize,0), (0,ybsize,0),
           (0,0,zsize), (xbsize,0,zsize), (xbsize,ybsize,zsize), (0,ybsize,zsize)]

#facade 1 y-direction
for i in range (numb+7):
    for j in range (numh+2):
        box = rs.AddBox(corners)
        rs.MoveObject(box,(0,i*xoff,j*zoff))
        rs.MoveObject(box,(-B,-f_size/2,f_height+thick))

#facade x direction 
for i in range(numb+6):
    for j in range(numh+2):
        box = rs.AddBox(corners)
        rs.MoveObject(box, (i*xoff,0,j*zoff))
        rs.MoveObject(box,(-B,(p_length-f_size/2)-ysize,f_height+thick))

#facade 2 y-direction 
for i in range (numb+8):
    for j in range (numh+2):
        box = rs.AddBox(corners)
        rs.MoveObject(box,(0,i*xoff,j*zoff))
        rs.MoveObject(box,(p_width-2,-f_size/2,f_height+thick))


curve = rs.AddCurve([[-100,-30,0], [4,90,0], [100,0,0], [120,30,0]], 5)
crv_pts = rs.DivideCurve(curve, 4)


for p in crv_pts:
    levels = ran.randint(6,20)
    (f_list, c_list, p_list, stair_l)= make_domino(levels = levels)
    rs.MoveObjects(f_list, p)
    rs.MoveObjects(c_list, p)
    rs.MoveObjects(p_list, p)
    rs.MoveObjects(stair_l, p)


#aufraeumen
rs.Command("_SelCrv _Enter")
crvs = rs.SelectedObjects()
rs.DeleteObjects(crvs)

rs.EnableRedraw(True)