import rhinoscriptsyntax as rs
import random as rand
import flipped_classroom_lib as fc
import math


all_objects = rs.AllObjects()
rs.DeleteObjects(all_objects)


rs.EnableRedraw(False)



L_1 = 100
radius_1 = (L_1 * 0.0715)
radius_2 = (L_1 * 0.033)
H_1 = 10
H_2 = 10
B_1 = 10
B_2 = 5

Circle_1 = rs.AddCircle([0,0,0], radius_1)
Circle_2 = rs.AddCircle([0,0,0], radius_2)


fund = rs.AddPolyline(([radius_1,0,-H_1*0.5], [B_1*0.289,L_1*0.0654,0]))
first_line = rs.AddPolyline(([B_1*0.289,L_1*0.0654,0], [B_1*0.22,L_1*0.181,H_1*0.877]))
sec = rs.AddPolyline(([B_1*0.22,L_1*0.181,H_1*0.877], [B_1*0.289,L_1*0.2966,0]))
third = rs.AddPolyline(([B_1*0.289,L_1*0.2966,0], [B_1*0.619,L_1*0.52,-H_1*1.57]))
fourth = rs.AddPolyline(([B_1*0.619,L_1*0.52,-H_1*1.57], [B_1*0.289,L_1*0.7434,0]))
fifth = rs.AddPolyline(([radius_1,radius_1,-H_1*1.603], [B_1*0.153,L_1*0.2966,0])) 
sixth = rs.AddPolyline(([B_1*0.153, L_1*0.2966, 0], [B_1*0.153, L_1*0.52, H_1*1.487]))
seven = rs.AddPolyline(([B_1*0.153, L_1*0.52, H_1*1.487], [B_1*0.153, L_1*0.7434, 0]))


fillet = rs.AddFilletCurve(first_line, sec, radius_1)
fillet_2 = rs.AddFilletCurve(third, fourth, (radius_1 + 9))
fillet_3 = rs.AddFilletCurve(sixth, seven, (radius_1 + 5))

if fillet:
    fillet_start = rs.CurveStartPoint(fillet)
    fillet_end = rs.CurveEndPoint(fillet)
    
    first_line_domain = rs.CurveDomain(first_line)
    first_line_param = rs.CurveClosestPoint(first_line, fillet_start)
    rest = rs.TrimCurve(first_line, (first_line_domain[0], first_line_param), delete_input=True)
    
    sec_domain = rs.CurveDomain(sec)
    sec_param = rs.CurveClosestPoint(sec, fillet_end)
    rest_2 = rs.TrimCurve(sec, (sec_param, sec_domain[1]), delete_input=True)
    
    fillet_domain = rs.CurveDomain(fillet)
    mid_parameter = (fillet_domain[0] + fillet_domain[1]) / 2
    split_curves = rs.SplitCurve(fillet, mid_parameter, delete_input=True)
    
    if split_curves and len(split_curves) == 2:
        fillet_part1, fillet_part2 = split_curves
        rs.ObjectColor(fillet_part1, (0, 250, 0))
        rs.ObjectColor(fillet_part2, (255, 255, 80))

if fillet_2:
    fillet_start_2 = rs.CurveStartPoint(fillet_2)
    fillet_end_2 = rs.CurveEndPoint(fillet_2)
    
    third_domain = rs.CurveDomain(third)
    third_param = rs.CurveClosestPoint(third, fillet_start_2)
    rest_3 = rs.TrimCurve(third, (third_domain[0], third_param), delete_input=True)
    
    fourth_domain = rs.CurveDomain(fourth)
    fourth_param = rs.CurveClosestPoint(fourth, fillet_end_2)
    rest_4 = rs.TrimCurve(fourth, (fourth_param, fourth_domain[1]), delete_input=True)
    
    fillet_2_domain = rs.CurveDomain(fillet_2)
    mid_parameter_2 = (fillet_2_domain[0] + fillet_2_domain[1]) / 2
    split_curves_2 = rs.SplitCurve(fillet_2, mid_parameter_2, delete_input=True)
    
    if split_curves_2 and len(split_curves_2) == 2:
        fillet_2_part1, fillet_2_part2 = split_curves_2
        rs.ObjectColor(fillet_2_part1, (255, 0, 0))
        rs.ObjectColor(fillet_2_part2, (0, 200, 255))

if fillet_3:
    fillet_start_3 = rs.CurveStartPoint(fillet_3)
    fillet_end_3 = rs.CurveEndPoint(fillet_3)
    
    sixth_domain = rs.CurveDomain(sixth)
    sixth_param = rs.CurveClosestPoint(sixth, fillet_start_3)
    rest_5 = rs.TrimCurve(sixth, (sixth_domain[0], sixth_param), delete_input=True)
    
    seven_domain = rs.CurveDomain(seven)
    seven_param = rs.CurveClosestPoint(seven, fillet_end_3)
    rest_6 = rs.TrimCurve(seven, (seven_param, seven_domain[1]), delete_input=True)
    
    fillet_3_domain = rs.CurveDomain(fillet_3)
    mid_parameter_3 = (fillet_3_domain[0] + fillet_3_domain[1]) / 2
    split_curves_3 = rs.SplitCurve(fillet_3, mid_parameter_3, delete_input=True)
    
    if split_curves_3 and len(split_curves_3) == 2:
        fillet_3_part1, fillet_3_part2 = split_curves_3
        rs.ObjectColor(fillet_3_part1, (0, 255, 0))
        rs.ObjectColor(fillet_3_part2, (255, 10, 0))

erste = rs.JoinCurves((rest, fillet_part1), delete_input=True)
mittel_2 = rs.JoinCurves((rest_3, fillet_2_part1), delete_input=True)
mittel_3 = rs.JoinCurves((rest_5, fillet_3_part1), delete_input=True)
rs.DeleteObjects((rest_2, rest_4, rest_6, fillet_part2, fillet_2_part2, fillet_3_part2))

mittel_Linie_1 = rs.AddPolyline(([0,L_1*0.0654,0], [0,L_1*0.181,H_1*0.877]))
mittel_Linie_2 = rs.AddPolyline(([0,L_1*0.181,H_1*0.877], [0,L_1*0.2966,0]))
fillet_4 = rs.AddFilletCurve(mittel_Linie_1, mittel_Linie_2, (radius_1))

if fillet_4:
    fillet_start_4 = rs.CurveStartPoint(fillet_4)
    fillet_end_4 = rs.CurveEndPoint(fillet_4)
    
    eight_domain = rs.CurveDomain(mittel_Linie_1)
    eight_param = rs.CurveClosestPoint(mittel_Linie_1, fillet_start_4)
    rest_7 = rs.TrimCurve(mittel_Linie_1, (eight_domain[0], eight_param), delete_input=True)
    
    nine_domain = rs.CurveDomain(mittel_Linie_2)
    nine_param = rs.CurveClosestPoint(mittel_Linie_2, fillet_end_4)
    rest_8 = rs.TrimCurve(mittel_Linie_2, (nine_param, nine_domain[1]), delete_input=True)
    
    fillet_4_domain = rs.CurveDomain(fillet_4)
    mid_parameter_4 = (fillet_4_domain[0] + fillet_4_domain[1]) / 2
    split_curves_4 = rs.SplitCurve(fillet_4, mid_parameter_4, delete_input=True)
    
    if split_curves_4 and len(split_curves_4) == 2:
        fillet_4_part1, fillet_4_part2 = split_curves_4
        rs.ObjectColor(fillet_4_part1, (0, 255, 0))
        rs.ObjectColor(fillet_4_part2, (255, 10, 0))

mittel_Haupt = rs.JoinCurves((rest_7, fillet_4_part1), delete_input=True)
rest_3 = rs.DeleteObjects((rest_8, fillet_4_part2))

mittel_Haupt_2 = rs.CopyObject(mittel_2, (-B_1*0.0675,0,0))
mittel_Haupt_3 = rs.CopyObject(mittel_3, (-B_1*0.153,0,0))

schnitt = rs.AddPolyline([B_1*0.41, L_1*0.5127, -H_1*1.203, B_1*0.3, L_1*0.5127, -H_1*1.203])

Haupt_unten_links = rs.CopyObject(mittel_Haupt_2, (-B_1*0.0675,0,0))



# Assuming schnitt and Haupt_unten_links are already defined

# Find the intersection between the two curves
intersection = rs.CurveCurveIntersection(Haupt_unten_links, schnitt)

if intersection:
    # Get the parameter of the intersection point on Haupt_unten_links
    trim_parameter = intersection[0][5]
    
    # Get the domain of Haupt_unten_links
    domain = rs.CurveDomain(Haupt_unten_links)
    
    # Create the trimming interval
    if trim_parameter < domain[1]/2:
        interval = [trim_parameter, domain[1]]
    else:
        interval = [domain[0], trim_parameter]
    
    # Trim the curve
    trimmed_curve = rs.TrimCurve(Haupt_unten_links, interval)

rs.DeleteObject(schnitt)




height_stair = H_1*0.003
tiefe_stair = B_1*0.027
Anzahl_stufen_1 = H_1*0.027


pts_1 = rs.DivideCurveLength(mittel_Haupt, Anzahl_stufen_1)

stair_max = B_1*0.578
stair_min = B_1*0.468
abzug = ((stair_max-stair_min)/len(pts_1))

def make_stair_1(pts_1, abzug, stair_min, stair_max):
    x = stair_max
    stairs_1 = []
    for p in pts_1:
        stair_1 = fc.make_box(p, xsize=x, ysize=tiefe_stair, zsize=height_stair)
        stairs_1.append(stair_1)
        x -= abzug
    return stairs_1

pts_2 = rs.DivideCurveLength(mittel_Haupt_2, Anzahl_stufen_1)

stair_max_2 = B_1*0.136
stair_min_2 = stair_max_2
abzug_2 = ((stair_max_2-stair_min_2)/len(pts_2))

def make_stair_2(pts_2, abzug_2, stair_min_2, stair_max_2):
    x_2 = stair_max_2
    stairs_2 = []
    for p in pts_2:
        stair_2 = fc.make_box(p, xsize=x_2, ysize=tiefe_stair, zsize=height_stair)
        stairs_2.append(stair_2)
        x_2 -= abzug_2
    return stairs_2

pts_3 = rs.DivideCurveLength(mittel_Haupt_3, Anzahl_stufen_1)

stair_max_3 = B_1*0.306
stair_min_3 = stair_max_3
abzug_3 = ((stair_max_3-stair_min_3)/len(pts_2))



def make_stair_3(pts_3, abzug_3, stair_min_3, stair_max_3):
    x_3 = stair_max_3
    stairs_3 = []
    for p in pts_3:
        stair_3 = fc.make_box(p, xsize=x_3, ysize=tiefe_stair, zsize=height_stair)
        stairs_3.append(stair_3)
        x_3 -= abzug_3
    return stairs_3


stairs_1 = make_stair_1(pts_1, abzug, stair_min, stair_max)
stairs_2 = make_stair_2(pts_2, abzug_2, stair_min_2, stair_max_2)
stairs_3 = make_stair_3(pts_3, abzug_3, stair_min_3, stair_max_3)


rs.MirrorObject((stairs_1), (0,18.1,6.94), (-2,18.1,6.94), copy=True)
rs.MirrorObject((erste), (2.34,18.1,6.94), (0,18.1,6.94), copy=True)

sweep_1 = rs.AddPolyline([[0,radius_1,0], [0,radius_2,0], [0,radius_2,height_stair], [0,radius_1,height_stair], [0,radius_1,0]])

Kreis = rs.AddSweep2([Circle_1, Circle_2], [sweep_1], closed=False)


sweep_2 = rs.AddPolyline([[B_1*0.289,L_1*0.0654,-H_1*0.01], [B_1*0.289,L_1*0.0654,H_1*0.01], [B_1*0.299,L_1*0.0654,H_1*0.01], [B_1*0.299,L_1*0.0654,-H_1*0.01], [B_1*0.289,L_1*0.0654,-H_1*0.01]])

sweep_3 = rs.CopyObject(sweep_2,(-B_1*0.055, L_1*.1156, H_1*0.694)) 

rel_1 = rs.AddSweep1(erste, ([sweep_2, sweep_3]))

sweep_4 = rs.AddPolyline([[B_1*0.542,L_1*0.52,-H_1*1.215], [B_1*0.552,L_1*0.52,-H_1*1.215], [B_1*0.552,L_1*0.52,-H_1*1.195], [B_1*0.542,L_1*0.52,-H_1*1.195], [B_1*0.542,L_1*0.52,-H_1*1.215]])
sweep_5 = rs.MirrorObject((sweep_2), (0,18.1,6.94), (-2,18.1,6.94), copy=True)

rel_2 = rs.AddSweep1(mittel_2, ([sweep_5, sweep_4]))





sweep_6 = rs.AddPolyline([
    [B_1*0.148, L_1*0.2966, -H_1*0.01],
    [B_1*0.158, L_1*0.2966, -H_1*0.01],
    [B_1*0.158, L_1*0.2966, H_1*0.01],
    [B_1*0.148, L_1*0.2966, H_1*0.01],
    [B_1*0.148, L_1*0.2966, -H_1*0.01]
])

sweep_7 = rs.AddPolyline([
    [B_1*0.148, L_1*0.52, H_1*1.232],
    [B_1*0.158, L_1*0.52, H_1*1.232],
    [B_1*0.158, L_1*0.52, H_1*1.252],
    [B_1*0.148, L_1*0.52, H_1*1.252],
    [B_1*0.148, L_1*0.52, H_1*1.232]
])



rel_3 = rs.AddSweep1(mittel_3, ([sweep_6, sweep_7]))

sweep_8 = rs.CopyObject(sweep_2, [B_1*0.426, -L_1*0.0654, -H_1*0.5])

rel_4 = rs.AddSweep1(fund, ([sweep_8, sweep_2]))

sweep_9 = rs.CopyObject(sweep_6, (B_1*0.562, -L_1*0.2251, -H_1*1.603))

rel_5 = rs.AddSweep1(fifth, ([sweep_9, sweep_6]))


sweep_10 = rs.CopyObject(sweep_4, (-B_1*0.14,-L_1*0.0073,H_1*0.002))

rel_6 = rs.AddSweep1(trimmed_curve, ([sweep_6, sweep_10]))

start_point = (L_1 * 0.0289, L_1 * 0.0654, 0)
end_point = (L_1 * 0.0289, -L_1 * 0.0654, 0)
center_point = (0, 0, 0)

start_vector = rs.VectorCreate(start_point, center_point)
end_vector = rs.VectorCreate(end_point, center_point)
angle = rs.VectorAngle(start_vector, end_vector)

arc = rs.AddArc(rs.PlaneFromNormal(center_point, [0,0,1]), radius_1, angle)

start_angle = math.atan2(start_vector[1], start_vector[0])
start_angle_degrees = math.degrees(start_angle)

arc_r = rs.RotateObject(arc, (0,0,0), 113.84)




# Divide the curve
points = rs.DivideCurve(erste, 30, create_points=True)

pipe_guids = []

for point in points:
    # Calculate the end point of the pipe (0.9 meters high)
    end_point = rs.PointAdd(point, [0, 0, 0.9])
    
    # Create a line to serve as the path for the pipe
    path = rs.AddLine(point, end_point)
    
    # Create the pipe
    pipe_4 = rs.AddPipe(path, 0, 0.01, cap=1)
    
    # Add the pipe GUID to the list
    pipe_guids.append(pipe_4)
    
    # Delete the temporary line
    rs.DeleteObject(path)

# Group all the pipes
if pipe_guids:
    group_name = "Divided_Curve_Pipes"
    rs.AddGroup(group_name)
    rs.AddObjectsToGroup(pipe_guids, group_name)




points_1 = rs.DivideCurve(arc_r, 15, create_points=True)

pipe_guids_1 = []

for point_1 in points_1:
    # Calculate the end point of the pipe (0.9 meters high)
    end_point_1 = rs.PointAdd(point_1, [0, 0, 0.9])
    
    # Create a line to serve as the path for the pipe
    path_1 = rs.AddLine(point_1, end_point_1)
    
    # Create the pipe
    pipe_1 = rs.AddPipe(path_1, 0, 0.01, cap=1)
    
    # Add the pipe GUID to the list
    pipe_guids_1.append(pipe_1)
    
    # Delete the temporary line
    rs.DeleteObject(path_1)

# Group all the pipes
if pipe_guids_1:
    group_name_1 = "Divided_Curve_Pipes_1"
    rs.AddGroup(group_name_1)
    rs.AddObjectsToGroup(pipe_guids_1, group_name_1)



pipe_Kreis = rs.CopyObject(([arc_r]), (0,0,H_1*0.09))
pipe_4 = rs.AddPipe(pipe_Kreis, [0,1], [0.05, 0.05], cap=1)




Gel_1 = rs.CopyObjects(([mittel_3, trimmed_curve, mittel_2]), (0,0,H_1*0.09))

# Create pipes for each copied object
Pipes = []
for obj in Gel_1:
    if rs.IsCurve(obj):
        pipe = rs.AddPipe(obj, [0, 1], [0.05, 0.05], cap=1)
        if pipe:
            Pipes.append(pipe)

pipe_2 = rs.AddPipe(erste, [0,1], [0.05, 0.05])

pipe_3 = rs.MoveObject(pipe_2,(0,0,H_1*0.09)) 





group_objects = rs.ObjectsByGroup(group_name)
objects_to_mirror = group_objects + [pipe_2, rel_1]
mirror = rs.MirrorObjects(objects_to_mirror, (0, L_1*0.181, 0), (-B_1*0.01, L_1*0.181, 0), copy=True)


for obj in mirror:
    rs.MirrorObject(obj, (0, L_1*0.52, 0), (0, L_1*0.53, 0), copy=True)

for obj_1 in objects_to_mirror:
    rs.MirrorObject(obj_1, (0, L_1*0.52, 0), (0, L_1*0.53, 0), copy=True)



 
group_objects_1 = rs.ObjectsByGroup(group_name_1)

objects_to_mirror_1 = group_objects_1 + [pipe_4]
mirror_1 = rs.MirrorObjects(objects_to_mirror_1, (0,0,0), (0, L_1*0.001, 0), copy=True)



#jetzt beginnts



points_2 = rs.DivideCurve(mittel_2, 45, create_points=True)

pipe_guids_2 = []

for point_2 in points_2:
    # Calculate the end point of the pipe (0.9 meters high)
    end_point_2 = rs.PointAdd(point_2, [0, 0, 0.9])
    
    # Create a line to serve as the path for the pipe
    path_2 = rs.AddLine(point_2, end_point_2)
    
    # Create the pipe
    pipe_2 = rs.AddPipe(path_2, 0, 0.01, cap=1)
    
    # Add the pipe GUID to the list
    pipe_guids_2.append(pipe_2)
    
    # Delete the temporary line
    rs.DeleteObject(path_2)

# Group all the pipes
if pipe_guids_2:
    group_name_2 = "Divided_Curve_Pipes_2"
    rs.AddGroup(group_name_2)
    rs.AddObjectsToGroup(pipe_guids_2, group_name_2)






points_3 = rs.DivideCurve(mittel_3, 45, create_points=True)

pipe_guids_3 = []

for point_3 in points_3:
    # Calculate the end point of the pipe (0.9 meters high)
    end_point_3 = rs.PointAdd(point_3, [0, 0, 0.9])
    
    # Create a line to serve as the path for the pipe
    path_3 = rs.AddLine(point_3, end_point_3)
    
    # Create the pipe
    pipe_3 = rs.AddPipe(path_3, 0, 0.01, cap=1)
    
    # Add the pipe GUID to the list
    pipe_guids_3.append(pipe_3)
    
    # Delete the temporary line
    rs.DeleteObject(path_3)

# Group all the pipes
if pipe_guids_3:
    group_name_3 = "Divided_Curve_Pipes_3"
    rs.AddGroup(group_name_3)
    rs.AddObjectsToGroup(pipe_guids_3, group_name_3)



points_4 = rs.DivideCurve(trimmed_curve, 45, create_points=True)

pipe_guids_4 = []

for point_4 in points_4:
    # Calculate the end point of the pipe (0.9 meters high)
    end_point_4 = rs.PointAdd(point_4, [0, 0, 0.9])
    
    # Create a line to serve as the path for the pipe
    path_4 = rs.AddLine(point_4, end_point_4)
    
    # Create the pipe
    pipe_4 = rs.AddPipe(path_4, 0, 0.01, cap=1)
    
    # Add the pipe GUID to the list
    pipe_guids_4.append(pipe_4)
    
    # Delete the temporary line
    rs.DeleteObject(path_4)

# Group all the pipes
if pipe_guids_4:
    group_name_4 = "Divided_Curve_Pipes_4"
    rs.AddGroup(group_name_4)
    rs.AddObjectsToGroup(pipe_guids_4, group_name_4)




#Alles = rs.MirrorObjects(([mirror_1, 


rs.MirrorObject(rel_4, (0, L_1*0.52, 0), (0, L_1*0.53, 0), copy=True)

rs.MirrorObject(rel_5, (0, L_1*0.52, 0), (0, L_1*0.53, 0), copy=True)

rs.MirrorObject(rel_3, (0, L_1*0.52, 0), (0, L_1*0.53, 0), copy=True)

# Create the original stairs
stairs_2 = make_stair_2(pts_2, abzug_2, stair_min_2, stair_max_2)

# Define the mirror plane
mirror_start = (0, L_1*0.52, 0)
mirror_end = (0, L_1*0.53, 0)

# Mirror the stairs
mirrored_stairs_2 = rs.MirrorObjects(stairs_2, mirror_start, mirror_end, copy=True)

# Combine original and mirrored stairs
all_stairs_2 = stairs_2 + mirrored_stairs_2

rs.MirrorObject(rel_6, (0, L_1*0.52, 0), (0, L_1*0.53, 0), copy=True)

rs.MirrorObject(rel_2, (0, L_1*0.52, 0), (0, L_1*0.53, 0), copy=True)







# Define the mirror plane
mirror_start = (0, L_1*0.52, 0)
mirror_end = (0, L_1*0.53, 0)

#Create a list of objects to mirror
objects_to_mirror = Pipes + [pipe_3]


# Mirror the objects
mirrored_objects = rs.MirrorObjects(objects_to_mirror, mirror_start, mirror_end, copy=True)

# Define the mirror plane
mirror_start = (0, L_1*0.52, 0)
mirror_end = (0, L_1*0.53, 0)

# Create a list of objects to mirror
objects_to_mirror = pipe_guids_2 + pipe_guids_3 + pipe_guids_4

# Mirror the objects
mirrored_objects = rs.MirrorObjects(objects_to_mirror, mirror_start, mirror_end, copy=True)

# Group the mirrored objects
if mirrored_objects:
    mirrored_group_name = "Mirrored_Pipes"
    rs.AddGroup(mirrored_group_name)
    rs.AddObjectsToGroup(mirrored_objects, mirrored_group_name)
    print("Objects mirrored and grouped successfully")
else:
    print("Mirroring operation failed")



######




####

# Define the new mirror plane
mirror_start = (0, 52, 12.42)
mirror_end = (1, 52, 12.42)

# Create a list of all objects to mirror
objects_to_mirror = rs.AllObjects()

# Mirror all objects
mirrored_objects = rs.MirrorObjects(objects_to_mirror, mirror_start, mirror_end, copy=True)

# Group the mirrored objects
if mirrored_objects:
    mirrored_group_name = "Mirrored_Objects"
    rs.AddGroup(mirrored_group_name)
    rs.AddObjectsToGroup(mirrored_objects, mirrored_group_name)
    print("Objects mirrored and grouped successfully")
else:
    print("Mirroring operation failed")




#Buehne############

Steg = rs.AddPolyline([B_1*0.407, L_1*0.5127, -H_1*1.205, 
                       0, L_1*0.5127, -H_1*1.205, 
                       #0, L_1*0.52, -H_1*1.205, 
                       #B_1*0.407, L_1*0.52, -H_1*1.205, 
                       #B_1*0.407, L_1*0.5127, -H_1*1.205
                       ])


Steg_2 = rs.AddPolyline([0, L_1*0.5273, -H_1*1.205, 
                       B_1*0.407, L_1*0.5273, -H_1*1.205
                       ])


sweep_11 = rs.AddPolyline([B_1*0.407, L_1*0.5127, -H_1*1.205, B_1*0.407, L_1*0.5273, -H_1*1.205, B_1*0.407, L_1*0.5273, -H_1*1.205+height_stair, B_1*0.407, L_1*0.5127, -H_1*1.205+height_stair, B_1*0.407, L_1*0.5127, -H_1*1.205])

sweep_12 = rs.CopyObject(sweep_11, (-B_1*0.407,0,0))

Buehne = rs.AddSweep1(Steg, ([sweep_11, sweep_12]))




points_5 = rs.DivideCurve(Steg, 10, create_points=True)

pipe_guids_5 = []

for point_5 in points_5:
    # Calculate the end point of the pipe (0.9 meters high)
    end_point_5 = rs.PointAdd(point_5, [0, 0, 0.9])
    
    # Create a line to serve as the path for the pipe
    path_5 = rs.AddLine(point_5, end_point_5)
    
    # Create the pipe
    pipe_5 = rs.AddPipe(path_5, 0, 0.01, cap=1)
    
    # Add the pipe GUID to the list
    pipe_guids_5.append(pipe_5)
    
    # Delete the temporary line
    rs.DeleteObject(path_5)

# Group all the pipes
if pipe_guids_5:
    group_name_5 = "Divided_Curve_Pipes_5"
    rs.AddGroup(group_name_5)
    rs.AddObjectsToGroup(pipe_guids_5, group_name_5)


pipe_6 = rs.AddPipe(Steg, [0,1], [0.05, 0.05], cap=1)
pipe_7 = rs.MoveObject(pipe_6,(0,0,H_1*0.09))

group_objects_5 = rs.ObjectsByGroup(group_name_5)

objects_to_mirror_5 = group_objects_5 + [pipe_7]
mirror_5 = rs.MirrorObjects(objects_to_mirror_5, (0,L_1*0.52, -H_1*1.205), (B_1*0.01,L_1*0.52, -H_1*1.205), copy=True)



rs.MirrorObject(Buehne, (0, L_1*0.52, 0), (0, L_1*0.53, 0), copy=True)
rs.MirrorObjects(objects_to_mirror_5, (0, L_1*0.52, 0), (0, L_1*0.53, 0), copy=True)
rs.MirrorObjects(mirror_5, (0, L_1*0.52, 0), (0, L_1*0.53, 0), copy=True)
# Delete all curves and points
all_objects = rs.AllObjects()
curves_and_points = rs.ObjectsByType(rs.filter.curve | rs.filter.point, select=True, state=0)
rs.DeleteObjects(curves_and_points)

rs.EnableRedraw(True)