###################################
### DM2_w25 # AGruber@tugraz.at ###
### hu_06 UN_headquaters  NYC   ### CRVs 4 ROLLER.COASTER | SETUP
###################################


##############################
import rhinoscriptsyntax as rs
import random, time, sys   ###
sys.path.append("P:/")     ###
import DM_lib as dm        ### dm.reload_lib(dm)
##############################      

rs.UnitSystem(4)                                            # meters = 4, cm = 3 etc
rs.ShowGrid(None, False)                                    # grid > False = off
rs.ShowGridAxes(None, True)                                 # y/y/z axen display > False/True = off/on
rs.ViewDisplayMode(rs.CurrentView(), "wireframe")
rs.Command("cplane w t enter", False)				        # cPlane World Top
dm.PointRadius(displayModeX=0, rad=3, styl=3)               # 0 => wireframe | info: (.., verbose=1)
dm.PointRadius(displayModeX=1, rad=4, styl=1)               # 1 => shaded    | info: (.., verbose=1)
dm.PointRadius(displayModeX=2, rad=2, styl=0)               # 2 => rendered  | info: (.., verbose=1)
dm.printDisplay(state=False)                                # nomen est omen
rs.EnableRedraw(False)



###_________________________________________#
### basic settings for grid to fit UN_slab  #
###                                         # ! no need 2 change !
floors = H  = dm.H = 40                     # default=40 / incl roof
slabs  = L  = dm.L = 11                     # default=11
depth  = D  = dm.D =  4                     # default= 4 / division in building_depth
floorHeight = fH = dm.fH = 4.0              # default= 4.0 / 4.0*(H-1) = 156 meters
                                            #
#############                               # get gridCoords L*D*H = 1760
UnoGridCoords = dm.getUnoGridCoords()       # get from DM_lib as dm
#################___________________________#


#######################
### my little helper: ###############
### gC (get_Coord) im UN_grid !     #
def gC(L,D,H): return dm.gC(L,D,H)  #
#####################################

##################
depthVec  = dVec = rs.VectorUnitize(rs.VectorSubtract( gC(0, 0, 0), gC(0, 2, 0) ))
lengthVec = lVec = rs.VectorUnitize(rs.VectorSubtract( gC(0, 0, 0), gC(1, 0, 0) ))
##################



dm.newEmptyLayer("UNO::setUp", [120,120,140])
if 1: ### SETUP >> dont' exec @ homework !
    if 0: 
        rs.AddPoints(UnoGridCoords)       ### just 4 reference
        rs.AddLine( gC(0, 0, 0), [0,0,0] )
        rs.AddLine( gC(0, 0, 39), [0,0,0] )
        rs.AddLine( gC(10, 3, 39), [0,0,0] )
        rs.AddLine( gC(0, -3, 0), [0,0,0] )
    
    if 1:
        rs.AddLine( gC(0, 0, 0), gC(10, 0, 0) )
        rs.AddLine( gC(0, 0, 0), gC(0,  3, 0) )
        rs.AddLine( gC(0, 0, 0), gC(0, 0, 39) )
        rs.ObjectColor(rs.AllObjects()[2], [0, 222, 0] ), rs.CurveArrows(rs.AllObjects()[0], 2)
        rs.ObjectColor(rs.AllObjects()[1], [222, 0, 0] ), rs.CurveArrows(rs.AllObjects()[1], 2)
        rs.ObjectColor(rs.AllObjects()[0], [0, 0, 222] ), rs.CurveArrows(rs.AllObjects()[2], 2)
        rs.ObjectPrintWidth( rs.AllObjects()[0:3], 0.5 )
        
        p0 = gC(  0, 0, 0)
        p1 = gC( 10, 0, 0)
        p2 = gC( 10, 3, 0)
        p3 = gC(  0, 3, 0)
        unoBaseCoords = [p0, p1, p2, p3, p0]
        unoBaseCrv = rs.AddCurve( unoBaseCoords, 1)
        unoTopCoords = [dm.gC(  0, 0, 39),
                        dm.gC( 10, 0, 39),
                        dm.gC( 10, 3, 39),
                        dm.gC(  0, 3, 39),
                        dm.gC(  0, 0, 39),
                       ]
        unoTopCrv = rs.AddCurve( unoTopCoords, 1)
        unoTopCrv = rs.AddCurve( unoTopCoords, 3)
        rs.ZoomExtents()
    if 0: ### long version
        coords = []
        for y in range(5):
            for z in range(0, 40, 2):
                for x in range(0, 4, 3):
                    coords.append( dm.gC(y,x,z) )
        rs.AddPoints( coords )
        dm.SetObjDisplayModeAllViewports(rs.AddPoints( coords ), displaymodeX=0, verbose=0)
    
    if 1: ### smart version / comprehension
        pnts = rs.AddPoints([ gC(y,x,z) for y in range(11) for z in range(0, 40, 2) for x in range(0, 4, 3) ])
        dm.SetObjDisplayModeAllViewports(pnts, displaymodeX=2, verbose=0) ### 2 == rendered


    
    
    #### CAMERA
    #### set / get camera
    if 1:
        print ("ViewNames :"),
        print (rs.ViewNames())
        
        cam = gC(5, -20, 19.5)
        tar = gC(5, 0, 19.5)
        #rs.AddLine( cam, tar )
        
        #dm.setCameraTarget( cam, tar, 20.0, 0, 0, 0)
        rs.ViewProjection(view='Perspective', mode=2)   ### 1 = parallel, 2 = perspective, 3 = two point perspective
        dm.getCameraTarget(view=rs.CurrentView(), verbose=1)
        #dm.setCameraTarget( [334.42526127, 493.18649387, 171.88081703], [756.84885751, 592.83573956, 82.0], lens=50.0, rota=0, upVec=[0,0,1] ) # ... danke, andi !
        #dm.setCameraTarget( [386.97907448, 403.59114546, 221.30429599], [758.16891279, 564.78380652, 78.0], lens=50.0, rota=0, upVec=[0,0,1] ) # ... danke, andi !

#######################################
################ HERE YOU GO AS YOU GO:
dm.newEmptyLayer("myPROJ", [111,111,111])

p0 = gC(2, 0, 2)
p1 = gC(2, -10, 2)
p2 = gC(random.randint(-13, 13), 0, 20)
p3 = gC(13, 3+5, 20)
p4 = gC(5, 3+5, 37)
p5 = gC(5, 0, 37)

#crv_1 = rs.AddCurve( [p0, p1, p2, p3, p4, p5], 1)
crv_2 = rs.AddCurve( [p0, p1, p2, p3, p4, p5], 2)
#crv_3 = rs.AddCurve( [p0, p1, p2, p3, p4, p5], 3)
#crv_5 = rs.AddCurve( [p0, p1, p2, p3, p4, p5], 5)

#print rs.CurveDomain(crv_1)[1] 
print rs.CurveDomain(crv_2)[1] 
#print rs.CurveDomain(crv_3)[1] 
#print rs.CurveDomain(crv_5)[1] 

dom = rs.CurveDomain(crv_2)[1]

param = dom*0.9
cor = rs.EvaluateCurve( crv_2, param )
rs.AddPoint( cor )

radius = 8.1
number = 2**7
anzahl = 2**7
deltaAng = 360.0/anzahl
deltaParam = dom/number

allParams = []
allCoordLists = []
for i in range(number + 1):
    param = deltaParam*i
    allParams.append( param )
    #print param
    cor = rs.EvaluateCurve( crv_2, param )
    rs.AddPoint( cor )
    #nPlane = rs.CurvePerpFrame(crv_2, param )
    #circ = rs.AddCircle(nPlane, radius)
    #coords = rs.DivideCurve( circ, anzahl)
    #allCoordLists.append( coords )
    hVec = dm.vecCurvePerpXY(crv_2, param )
    hVec = rs.VectorScale( hVec, radius )
    hPnt = rs.VectorAdd( cor, hVec )
    rs.AddLine( cor, hPnt )
    tanX = rs.CurveTangent( crv_2, param )
    coords = []
    for a in range( anzahl ):
        hVecX = rs.VectorRotate( hVec, deltaAng*-a, tanX)
        hPntX = rs.VectorAdd( cor, hVecX )
        #rs.AddLine( cor, hPntX )
        coords.append( hPntX )
    allCoordLists.append( coords )

if 1:
    i = 0
    for i in range( int(anzahl/2), anzahl ):
        coords = []
        for coordList in allCoordLists:
            coords.append( coordList[i] )
        rs.AddInterpCurve( coords, 2)

### unoTopCrv

for param in allParams:
    cor = rs.EvaluateCurve( crv_2, param)
    nearParam = rs.CurveClosestPoint( unoTopCrv, cor )
    nearPnt = rs.EvaluateCurve( unoTopCrv,  nearParam)
    rs.AddLine( cor, nearPnt )
    







###coords = rs.DivideCurve( crv_2, number, False)
###rs.ObjectColor( rs.AddPoints(coords), [222,9,0])


########## EOS / EndOfScript
rs.EnableRedraw(True)     ### 4_the_MACs
#dm.eDup()                 ### delete duplicate objects 
dm.printDisplay(state=True, scale=1000)
dm.zA( 0.9 )
dm.newEmptyLayer("Default")
