import rhinoscriptsyntax as rs
#platz machen
allobjs = rs.AllObjects()
rs.DeleteObjects(allobjs)

"""versuch mittels create text outlines funktionierte nicht:(
rs.CreateTextOutlines("LG","Arial","40",int2,bool=true closeLoops,Plane plane,double smallCapsScale,double tolerance)
Curve[] CreateTextOutlines("text, Arial, "40", "0", True, plane, "30", "0")
"""

#stattdessen eine curve mittels coordinaten
rs.Command("_curve Degree=2 0,0,0 0,70,0 20,70,0 20,20,0 40,30,0 40,80,0 90,80,0 90,60,0 60,60,0 60,20,0 75,25,0 65,30,0 70,50,0 90,50,0 90,0,0 60,0,0 40,10,0 20,0,0 0,0,0 Close _Enter")
crv = rs.FirstObject(select=True)

#huelle errichten (hoehe 60m)
rs.Command("_ExtrudeCrv Solid=No 60 _Enter")
srf = rs.FirstObject(select=True)

#Horizontale Teilung und extrusion zum errichten der decken (Teilung alle 3m)
rs.Command("Contour 0,0,0 0,0,1 3.0 _Enter")
rs.Command("_ExtrudeCrv Solid=Yes 0.3 _Enter")

#Vertikale Teilung und extrusion zum errichten der Stuetzen (alle 5m)
rs.SelectObject(srf)
rs.Command("Contour 0,0,0 1,0,0 5.0 _Enter")
rs.Command("Pipe 0.2 _Enter")

#Wegnehmen der Bezugshülle srf of der die teilung erfolgte
rs.DeleteObject(srf)