import rhinoscriptsyntax as rs

allobjs = rs.AllObjects()
rs.DeleteObjects(allobjs)
initial = "Lili"
size=40
hgt= 24

"""
#draw your closed curves
rs.Command("_Curve Degree=2 0,0,0 22,-15,0 38,12,0 31,26,0 10,35,0 0,0,0 _Enter")
crv = rs.FirstObject(select=True)
"""

#write Name
mytext = rs.AddText(initial,(0,0,0),height=size)
#crv = rs.ExplodeText(mytext,True)[0]
x = rs.ExplodeText(mytext,True)
for crv in x:
    rs.SelectObject(crv)
    
    #extrude the curves
    rs.Command("_ExtrudeCrv Solid=No {} _Enter".format(hgt))
    srf = rs.FirstObject(select=True)
    
    
    
    
    
    
    #move the points until you like the shape
    rs.Command("-_Rebuild UPointCount=10 VpointCount=4 UDegree=3 VDegree=3 DeleteInput=Yes _Enter")
    rs.EnableObjectGrips(srf, True)
    """
    pointlist = rs.ObjectGripLocations(srf)
    print pointlist 
    for i,pt in enumerate(pointlist):
        cmd = "-Dot {} {} _Enter".format(str(i),str(pt))
        rs.Command(cmd,False)
    """
    
    rs.SelectObjectGrip(srf,23)
    rs.Command("-_Move 0,0,0 16,0,0 _Enter")
    rs.UnselectAllObjects()
    
    rs.EnableObjectGrips(srf, False)
    rs.SelectObjectGrip(srf,10)
    rs.Command("-_Move 0,0,0 0,12,0 _Enter")
    rs.UnselectAllObjects()
    
    
    #front view
    #draw a circle
    #trim circle and tower shapes
    #blend surfaces
    #join all the shapes
    
    #contour vertical and extrude curves straight (volume)
    rs.SelectObject(srf)
    rs.Command("_Contour 0,0,0 0,0,1 3.0 _Enter")
    rs.Command("_ExtrudeCrv Solid=Yes 0.3 _Enter")
    
    #contour horizontal and pipe the curves
    rs.SelectObject(srf)
    rs.Command("_Contour 0,0,0 0,1,0 2.0 _Enter")
    rs.Command("_Pipe 0.2 _Enter")
    
    #for x in range(2):
        
    rs.DeleteObject(srf)