; FEVF - FERROVIA ELETTRICA VALLE DI FIEMME
; by Roberto Benini - robertobenini@libero.it
; (C) 06/12/2005
; in caso di utilizzo citare fonte

; debiti: la struttura della carrozza e i carrelli  sono derivati dalla C53.CSV 
; di Luigi Cartello e Sergio Usai per la FGC
; la texture del tetto, con alcune modifiche, proviene da BKLB di Peter Shotz

; elettromotrice A1-A2-A3
; anno costruzione 1929 - Carminati Toselli - TIBB
; lunghezza 15.40 m
; interperno carrelli 9.40 m
; passo carrelli 2.2 m
; velocità massima 60 km/h
; colore giallo rosso (periodo 1930-1950)
; colore azzurro grigio successivamente al 1950
; 4 motori da 80 kw ora ciascuno

 ; - - - - - - tetto vagone
CreateMeshBuilder ;  parte centrale
AddVertex, -1.22  , 3.27 , 6.85
AddVertex, -1.22  , 3.27 ,-6.85
AddVertex, -1.15  , 3.40 , 6.85
AddVertex, -1.15  , 3.40 ,-6.85
AddVertex, -1.05  , 3.50 , 6.85
AddVertex, -1.05  , 3.50 ,-6.85
AddVertex, -0.60  , 3.57 , 6.85
AddVertex, -0.60  , 3.57 ,-6.85
AddVertex,  0.00  , 3.60 , 6.85
AddVertex,  0.00  , 3.60 ,-6.85
AddVertex,  0.60  , 3.57 , 6.85
AddVertex,  0.60  , 3.57 ,-6.85
AddVertex,  1.05  , 3.50 , 6.85
AddVertex,  1.05  , 3.50 ,-6.85
AddVertex,  1.15  , 3.40 , 6.85
AddVertex,  1.15  , 3.40 ,-6.85
AddVertex,  1.22  , 3.27 , 6.85
AddVertex,  1.22  , 3.27 ,-6.85
AddFace2, 2, 3, 1, 0
AddFace2, 4, 5, 3, 2
AddFace2, 6, 7, 5, 4
AddFace2, 8, 9, 7, 6
AddFace2,10,11, 9, 8
AddFace2,12,13,11,10
AddFace2,14,15,13,12
AddFace2,16,17,15,14
GenerateNormals
LoadTexture, tetto_chiaro.bmp
SetTextureCoordinates,0,0,0
SetTextureCoordinates,1,0 ,1
SetTextureCoordinates,2,0.0286,0.06
SetTextureCoordinates,3,0.0286,0.94
SetTextureCoordinates,4,0.0696,0.06
SetTextureCoordinates,5,0.0696,0.94
SetTextureCoordinates,6,0.2540,0.06
SetTextureCoordinates,7,0.2540,0.94
SetTextureCoordinates,8,0.50,0.06
SetTextureCoordinates,9,0.50,0.94
SetTextureCoordinates,10,0.746,0.06
SetTextureCoordinates,11,0.746,0.94
SetTextureCoordinates,12,0.9304,0.06
SetTextureCoordinates,13,0.9304,0.94
SetTextureCoordinates,14,0.9714,0.06
SetTextureCoordinates,15,0.9714,0.94
SetTextureCoordinates,16,1,0.06
SetTextureCoordinates,17,1,0.94
CreateMeshBuilder ;  parte anteriore
AddVertex, -1.22  , 3.27 ,-6.85
AddVertex, -1.12  , 3.27 ,-7.85
AddVertex, -1.15  , 3.40 ,-6.85
AddVertex, -1.12  , 3.28 ,-7.85
AddVertex, -1.05  , 3.50 ,-6.85
AddVertex, -1.05  , 3.38 ,-7.85
AddVertex, -0.60  , 3.57 ,-6.85
AddVertex, -0.60  , 3.50 ,-7.85
AddVertex,  0.00  , 3.60 ,-6.85
AddVertex,  0.00  , 3.53 ,-7.85
AddVertex,  0.60  , 3.57 ,-6.85
AddVertex,  0.60  , 3.50 ,-7.85
AddVertex,  1.05  , 3.50 ,-6.85
AddVertex,  1.05  , 3.38 ,-7.85
AddVertex,  1.15  , 3.40 ,-6.85
AddVertex,  1.12  , 3.28 ,-7.85
AddVertex,  1.22  , 3.27 ,-6.85
AddVertex,  1.12  , 3.27 ,-7.85
AddFace2, 2, 3, 1, 0
AddFace2, 4, 5, 3, 2
AddFace2, 6, 7, 5, 4
AddFace2, 8, 9, 7, 6
AddFace2,10,11, 9, 8
AddFace2,12,13,11,10
AddFace2,14,15,13,12
AddFace2,16,17,15,14
GenerateNormals
LoadTexture, tetto_chiaro.bmp
SetTextureCoordinates,0,0,0.94
SetTextureCoordinates,1,0 ,1
SetTextureCoordinates,2,0.0286,0.94
SetTextureCoordinates,3,0.0286,1
SetTextureCoordinates,4,0.0696,0.94
SetTextureCoordinates,5,0.0696,1
SetTextureCoordinates,6,0.2540,0.94
SetTextureCoordinates,7,0.2540,1
SetTextureCoordinates,8,0.50,0.94
SetTextureCoordinates,9,0.50,1
SetTextureCoordinates,10,0.746,0.94
SetTextureCoordinates,11,0.746,1
SetTextureCoordinates,12,0.9304,0.94
SetTextureCoordinates,13,0.9304,1
SetTextureCoordinates,14,0.9714,0.94
SetTextureCoordinates,15,0.9714,1
SetTextureCoordinates,16,1,0.94
SetTextureCoordinates,17,1,1
CreateMeshBuilder ;  parte posteriore
AddVertex, -1.12  , 3.27 , 7.85
AddVertex, -1.22  , 3.27 , 6.85
AddVertex, -1.12  , 3.28 , 7.85
AddVertex, -1.15  , 3.40 , 6.85
AddVertex, -1.05  , 3.38 , 7.85
AddVertex, -1.05  , 3.50 , 6.85
AddVertex, -0.60  , 3.50 , 7.85
AddVertex, -0.60  , 3.57 , 6.85
AddVertex,  0.00  , 3.53 , 7.85
AddVertex,  0.00  , 3.60 , 6.85
AddVertex,  0.60  , 3.50 , 7.85
AddVertex,  0.60  , 3.57 , 6.85
AddVertex,  1.05  , 3.38 , 7.85
AddVertex,  1.05  , 3.50 , 6.85
AddVertex,  1.12  , 3.28 , 7.85
AddVertex,  1.15  , 3.40 , 6.85
AddVertex,  1.12  , 3.27 , 7.85
AddVertex,  1.22  , 3.27 , 6.85
AddFace2, 2, 3, 1, 0
AddFace2, 4, 5, 3, 2
AddFace2, 6, 7, 5, 4
AddFace2, 8, 9, 7, 6
AddFace2,10,11, 9, 8
AddFace2,12,13,11,10
AddFace2,14,15,13,12
AddFace2,16,17,15,14
GenerateNormals
LoadTexture, tetto_chiaro.bmp
SetTextureCoordinates,0,0,0
SetTextureCoordinates,1,0 ,1
SetTextureCoordinates,2,0.0286,0
SetTextureCoordinates,3,0.0286,0.06
SetTextureCoordinates,4,0.0696,0
SetTextureCoordinates,5,0.0696,0.06
SetTextureCoordinates,6,0.2540,0
SetTextureCoordinates,7,0.2540,0.06
SetTextureCoordinates,8,0.50,0
SetTextureCoordinates,9,0.50,0.06
SetTextureCoordinates,10,0.746,0
SetTextureCoordinates,11,0.746,0.06
SetTextureCoordinates,12,0.9304,0
SetTextureCoordinates,13,0.9304,0.06
SetTextureCoordinates,14,0.9714,0
SetTextureCoordinates,15,0.9714,0.06
SetTextureCoordinates,16,1,0
SetTextureCoordinates,17,1,0.06


CreateMeshBuilder ; facciata alta anteriore (tolti 8 cm)
AddVertex, -1.10  , 3.20 ,-7.83
AddVertex, -1.10  , 3.27 ,-7.83
AddVertex, -1.10 , 3.20 ,-7.83
AddVertex, -1.05  , 3.37 ,-7.83
AddVertex, -1.05  , 3.20 ,-7.83
AddVertex, -0.60  , 3.49 ,-7.83
AddVertex, -0.60  , 3.20 ,-7.83
AddVertex,  0.00  , 3.52 ,-7.83
AddVertex,  0.00  , 3.20 ,-7.83
AddVertex,  0.60  , 3.49 ,-7.83
AddVertex,  0.60  , 3.20 ,-7.83
AddVertex,  1.05  , 3.37 ,-7.83
AddVertex,  1.05  , 3.20 ,-7.83
AddVertex,  1.10  , 3.27 ,-7.83
AddVertex,  1.10  , 3.20 ,-7.83
AddVertex,  1.10  , 3.20 ,-7.83
AddFace2, 0, 1, 2
AddFace2, 1,3,4,2
AddFace2, 3,5,6,4
AddFace2, 5,7,8,6
AddFace2, 7,9,10,8
AddFace2, 9,11,12,10
AddFace2,11,13,14,12
AddFace2,13,15,14
GenerateNormals
SetColor,230,228,204
CreateMeshBuilder ; facciata alta posteriore (tolti 8cm)
AddVertex, -1.10  , 3.20 ,-7.83
AddVertex, -1.10  , 3.27 ,-7.83
AddVertex, -1.10  , 3.20 ,-7.83
AddVertex, -1.05  , 3.37 ,-7.83
AddVertex, -1.05  , 3.20 ,-7.83
AddVertex, -0.60  , 3.49 ,-7.83
AddVertex, -0.60  , 3.20 ,-7.83
AddVertex,  0.00  , 3.52 ,-7.83
AddVertex,  0.00  , 3.20 ,-7.83
AddVertex,  0.60  , 3.49 ,-7.83
AddVertex,  0.60  , 3.20 ,-7.83
AddVertex,  1.05  , 3.37 ,-7.83
AddVertex,  1.05  , 3.20 ,-7.83
AddVertex,  1.10  , 3.27 ,-7.83
AddVertex,  1.10  , 3.20 ,-7.83
AddVertex,  1.10  , 3.20 ,-7.83
AddFace2, 0, 1, 2
AddFace2, 1,3,4,2
AddFace2, 3,5,6,4
AddFace2, 5,7,8,6
AddFace2, 7,9,10,8
AddFace2, 9,11,12,10
AddFace2,11,13,14,12
AddFace2,13,15,14
GenerateNormals
SetColor,230,228,204
Rotate,0,1,0,180

; grondaia
CreateMeshBuilder ;  grondaia laterale centrale sx e dx
AddVertex, -1.22  , 3.27 , 6.85
AddVertex, -1.22  , 3.27 ,-6.85
AddVertex, -1.22  , 3.20 , -6.85
AddVertex, -1.22  , 3.20 ,6.85
AddVertex, 1.22  , 3.27 , 6.85
AddVertex, 1.22  , 3.27 ,-6.85
AddVertex, 1.22  , 3.20 , -6.85
AddVertex, 1.22  , 3.20 ,6.85
AddFace2, 0, 1, 2, 3
AddFace2, 4, 5, 6, 7
SetColor,130,6,10

CreateMeshBuilder ;  grondaia laterale anteriore sx e dx
AddVertex, -1.22  , 3.27 , -6.85
AddVertex, -1.12  , 3.27 ,-7.85
AddVertex, -1.12  , 3.20 , -7.85
AddVertex, -1.22  , 3.20 ,-6.85
AddVertex, 1.22  , 3.27 , -6.85
AddVertex, 1.12  , 3.27 ,-7.85
AddVertex, 1.12  , 3.20 , -7.85
AddVertex, 1.22  , 3.20 ,-6.85
AddFace2, 0, 1, 2, 3
AddFace2, 4, 5, 6, 7
SetColor,130,6,10

CreateMeshBuilder ;  grondaia laterale posteriore sx e dx
AddVertex, -1.12  , 3.27 , 7.85
AddVertex, -1.22  , 3.27 ,6.85
AddVertex, -1.22  , 3.20 , 6.85
AddVertex, -1.12  , 3.20 ,7.85
AddVertex, 1.12  , 3.27 , 7.85
AddVertex, 1.22  , 3.27 ,6.85
AddVertex, 1.22  , 3.20 , 6.85
AddVertex, 1.12 , 3.20 ,7.85
AddFace2, 0, 1, 2, 3
AddFace2, 4, 5, 6, 7
SetColor,130,6,10

CreateMeshBuilder ; grondaia anteriore (tutti -7)
Addvertex, -1.12  , 3.13 ,-7.85;0 * 3.13
AddVertex, -1.12  , 3.20 ,-7.85;1
AddVertex, -1.12  , 3.28 ,-7.85;2
AddVertex, -1.12  , 3.20 ,-7.85;3 * 3.26
AddVertex, -1.05  , 3.38 ,-7.85;4 *
AddVertex, -1.04  , 3.31 ,-7.85;5 3.36 *
AddVertex, -0.60  , 3.50 ,-7.85;6
AddVertex, -0.60  , 3.43 ,-7.85;7
AddVertex,  0.00  , 3.53 ,-7.85;8
AddVertex,  0.00  , 3.46 ,-7.85;9
AddVertex,  0.60  , 3.50 ,-7.85;10
AddVertex,  0.60  , 3.43 ,-7.85;11
AddVertex,  1.05  , 3.38 ,-7.85;12 * 
AddVertex,  1.04  , 3.31 ,-7.85;13 *
AddVertex,  1.12  , 3.28 ,-7.85;14
AddVertex,  1.12  , 3.20 ,-7.85;15 * 3.26
AddVertex,  1.12  , 3.20 ,-7.85;16
AddVertex,  1.12  , 3.13 ,-7.85;17 * 3.13
AddFace2, 0, 1, 2, 3
AddFace2, 2,4,5,3
AddFace2, 4,6,7,5
AddFace2, 8,9,7,6
AddFace2, 8,10,11,9
AddFace2, 10,12,13,11
AddFace2,12,14,15,13
AddFace2,14,16,17,15
GenerateNormals
SetColor,130,6,10
CreateMeshBuilder ; grondaia posteriore
Addvertex, -1.12  , 3.13 ,7.85;0 * 3.13
AddVertex, -1.12  , 3.20 ,7.85;1
AddVertex, -1.12  , 3.28 ,7.85;2
AddVertex, -1.12  , 3.20 ,7.85;3 * 3.26
AddVertex, -1.05  , 3.38 ,7.85;4 *
AddVertex, -1.04  , 3.31 ,7.85;5 3.36 *
AddVertex, -0.60  , 3.50 ,7.85;6
AddVertex, -0.60  , 3.43 ,7.85;7
AddVertex,  0.00  , 3.53 ,7.85;8
AddVertex,  0.00  , 3.46 ,7.85;9
AddVertex,  0.60  , 3.50 ,7.85;10
AddVertex,  0.60  , 3.43 ,7.85;11
AddVertex,  1.05  , 3.38 ,7.85;12 * 
AddVertex,  1.04  , 3.31 ,7.85;13 *
AddVertex,  1.12  , 3.28 ,7.85;14
AddVertex,  1.12  , 3.20 ,7.85;15 * 3.26
AddVertex,  1.12  , 3.20 ,7.85;16
AddVertex,  1.12  , 3.13 ,7.85;17 * 3.13
AddFace2, 0, 1, 2, 3
AddFace2, 2,4,5,3
AddFace2, 4,6,7,5
AddFace2, 8,9,7,6
AddFace2, 8,10,11,9
AddFace2, 10,12,13,11
AddFace2,12,14,15,13
AddFace2,14,16,17,15
GenerateNormals
SetColor,130,6,10


; 5 - TETTUCCIO
CreateMeshBuilder
cube,0.70,0.20,2.20
SetColor,136,118,94
translate, 0, 3.65, -3

CreateMeshBuilder ; Tetto 
AddVertex, -0.92  , 3.27 , 2.2
AddVertex, -0.92  , 3.27 ,-2.2
AddVertex, -0.85  , 3.40 , 2.2
AddVertex, -0.85  , 3.40 ,-2.2
AddVertex, -0.75  , 3.50 , 2.2
AddVertex, -0.75  , 3.50 ,-2.2
AddVertex, -0.30  , 3.57 , 2.2
AddVertex, -0.30  , 3.57 ,-2.2
AddVertex,  0.00  , 3.60 , 2.2
AddVertex,  0.00  , 3.60 ,-2.2
AddVertex,  0.30  , 3.57 , 2.2
AddVertex,  0.30  , 3.57 ,-2.2
AddVertex,  0.75  , 3.50 , 2.2
AddVertex,  0.75  , 3.50 ,-2.2
AddVertex,  0.85  , 3.40 , 2.2
AddVertex,  0.85  , 3.40 ,-2.2
AddVertex,  0.92  , 3.27 , 2.2
AddVertex,  0.92  , 3.27 ,-2.2
AddFace2, 2, 3, 1, 0
AddFace2, 4, 5, 3, 2
AddFace2, 6, 7, 5, 4
AddFace2, 8, 9, 7, 6
AddFace2,10,11, 9, 8
AddFace2,12,13,11,10
AddFace2,14,15,13,12
AddFace2,16,17,15,14
GenerateNormals
LoadTexture, tetto_chiaro.bmp
SetTextureCoordinates,0,0,0
SetTextureCoordinates,1,0 ,1
SetTextureCoordinates,2,0.0286,0
SetTextureCoordinates,3,0.0286,1
SetTextureCoordinates,4,0.0696,0
SetTextureCoordinates,5,0.0696,1
SetTextureCoordinates,6,0.2540,0
SetTextureCoordinates,7,0.2540,1
SetTextureCoordinates,8,0.50,0
SetTextureCoordinates,9,0.50,1
SetTextureCoordinates,10,0.746,0
SetTextureCoordinates,11,0.746,1
SetTextureCoordinates,12,0.9304,0
SetTextureCoordinates,13,0.9304,1
SetTextureCoordinates,14,0.9714,0
SetTextureCoordinates,15,0.9714,1
SetTextureCoordinates,16,1,0
SetTextureCoordinates,17,1,1
Translate,0,0.37,-3
CreateMeshBuilder ; parte anteriore
AddVertex, -0.92  , 3.27 ,0
AddVertex, -0.92  , 3.27 ,0
AddVertex, -0.85  , 3.40 ,0
AddVertex, -0.85  , 3.27 ,-0.1
AddVertex, -0.75  , 3.50 ,0
AddVertex, -0.75  , 3.27 ,-0.2
AddVertex, -0.30  , 3.57 ,0
AddVertex, -0.30  , 3.27 ,-0.3
AddVertex,  0.00  , 3.60 ,0
AddVertex,  0.00  , 3.27 ,-0.3
AddVertex,  0.30  , 3.57 ,0
AddVertex,  0.30  , 3.27 ,-0.3
AddVertex,  0.75  , 3.50 ,0
AddVertex,  0.75  , 3.27 ,-0.2
AddVertex,  0.85  , 3.40 ,0
AddVertex,  0.85  , 3.27 ,-0.1
AddVertex,  0.92  , 3.27 ,0
AddVertex,  0.92  , 3.27 ,0
AddFace2, 2, 3, 1, 0
AddFace2, 4, 5, 3, 2
AddFace2, 6, 7, 5, 4
AddFace2, 8, 9, 7, 6
AddFace2,10,11, 9, 8
AddFace2,12,13,11,10
AddFace2,14,15,13,12
AddFace2,16,17,15,14
GenerateNormals
LoadTexture, tetto_chiaro.bmp
SetTextureCoordinates,0,0,0
SetTextureCoordinates,1,0 ,1
SetTextureCoordinates,2,0.0286,0
SetTextureCoordinates,3,0.0286,1
SetTextureCoordinates,4,0.0696,0
SetTextureCoordinates,5,0.0696,1
SetTextureCoordinates,6,0.2540,0
SetTextureCoordinates,7,0.2540,1
SetTextureCoordinates,8,0.50,0
SetTextureCoordinates,9,0.50,1
SetTextureCoordinates,10,0.746,0
SetTextureCoordinates,11,0.746,1
SetTextureCoordinates,12,0.9304,0
SetTextureCoordinates,13,0.9304,1
SetTextureCoordinates,14,0.9714,0
SetTextureCoordinates,15,0.9714,1
SetTextureCoordinates,16,1,0
SetTextureCoordinates,17,1,1
Translate,0,0.37,-5.20
CreateMeshBuilder ; parte posteriore
AddVertex, -0.92  , 3.27 ,0
AddVertex, -0.92  , 3.27 ,0
AddVertex, -0.85  , 3.40 ,0
AddVertex, -0.85  , 3.27 ,-0.1
AddVertex, -0.75  , 3.50 ,0
AddVertex, -0.75  , 3.27 ,-0.2
AddVertex, -0.30  , 3.57 ,0
AddVertex, -0.30  , 3.27 ,-0.3
AddVertex,  0.00  , 3.60 ,0
AddVertex,  0.00  , 3.27 ,-0.3
AddVertex,  0.30  , 3.57 ,0
AddVertex,  0.30  , 3.27 ,-0.3
AddVertex,  0.75  , 3.50 ,0
AddVertex,  0.75  , 3.27 ,-0.2
AddVertex,  0.85  , 3.40 ,0
AddVertex,  0.85  , 3.27 ,-0.1
AddVertex,  0.92  , 3.27 ,0
AddVertex,  0.92  , 3.27 ,0
AddFace2, 2, 3, 1, 0
AddFace2, 4, 5, 3, 2
AddFace2, 6, 7, 5, 4
AddFace2, 8, 9, 7, 6
AddFace2,10,11, 9, 8
AddFace2,12,13,11,10
AddFace2,14,15,13,12
AddFace2,16,17,15,14
GenerateNormals
GenerateNormals
LoadTexture, tetto_chiaro.bmp
SetTextureCoordinates,0,0,0
SetTextureCoordinates,1,0 ,1
SetTextureCoordinates,2,0.0286,0
SetTextureCoordinates,3,0.0286,1
SetTextureCoordinates,4,0.0696,0
SetTextureCoordinates,5,0.0696,1
SetTextureCoordinates,6,0.2540,0
SetTextureCoordinates,7,0.2540,1
SetTextureCoordinates,8,0.50,0
SetTextureCoordinates,9,0.50,1
SetTextureCoordinates,10,0.746,0
SetTextureCoordinates,11,0.746,1
SetTextureCoordinates,12,0.9304,0
SetTextureCoordinates,13,0.9304,1
SetTextureCoordinates,14,0.9714,0
SetTextureCoordinates,15,0.9714,1
SetTextureCoordinates,16,1,0
SetTextureCoordinates,17,1,1
Rotate,0,1,0,180
Translate,0,0.37,-0.80




CreateMeshBuilder ; frontale anteriore
AddVertex, -1.10  , 0.7  ,-7.8  ; 1
AddVertex, -1.10  , 3.27 ,-7.8  ; 0 
AddVertex,  1.10  , 3.27 ,-7.8  ; 2 
AddVertex,  1.10  , 0.7  ,-7.8  ; 3
AddFace2, 0, 1,2,3
GenerateNormals
LoadTexture,A1_testata_rossa.bmp
SetTextureCoordinates,0,0,1
SetTextureCoordinates,1,0,0
SetTextureCoordinates,2,1,0
SetTextureCoordinates,3,1,1
SetDecalTransparentColor,0,0,0

CreateMeshBuilder; VETRI
AddVertex, -1.05  , 3.2, -7.7
AddVertex, 1.05 , 3.2,-7.7
AddVertex, 1.05 , 1.3,-7.7
AddVertex, -1.05  , 1.3,-7.7
AddFace,0,1,2,3
GenerateNormals
SetColor,50,50,50,130
CreateMeshBuilder; Parete divisoria
AddVertex, -1.05  , 3.2, -6.9
AddVertex, 1.05 , 3.2,-6.9
AddVertex, 1.05 , 1.0,-6.9
AddVertex, -1.05  , 1.0,-6.9
AddFace2,0,1,2,3
GenerateNormals
LoadTexture, parete_divisoria.bmp
SetTextureCoordinates,0,0,0.10
SetTextureCoordinates,1,1,0.10
SetTextureCoordinates,2,1,1
SetTextureCoordinates,3,0,1
SetDecalTransparentColor,0,0,0




CreateMeshBuilder ; frontale anteriore
AddVertex, -1.10  , 0.7  ,-7.8  ; 1
AddVertex, -1.10  , 3.27 ,-7.8  ; 0 
AddVertex,  1.10  , 3.27 ,-7.8  ; 2 
AddVertex,  1.10  , 0.7  ,-7.8  ; 3
AddFace2, 0, 1,2,3
GenerateNormals
LoadTexture,A1_testata_rossa.bmp
SetTextureCoordinates,0,0,1
SetTextureCoordinates,1,0,0
SetTextureCoordinates,2,1,0
SetTextureCoordinates,3,1,1
Rotate,0,1,0,180
SetDecalTransparentColor,0,0,0

CreateMeshBuilder; VETRI
AddVertex, -1.05  , 3.2, 7.7
AddVertex, 1.05 , 3.2,7.7
AddVertex, 1.05 , 1.3,7.7
AddVertex, -1.05  , 1.3,7.7
AddFace,3,2,1,0
GenerateNormals
SetColor,50,50,50,130
CreateMeshBuilder; Parete divisoria
AddVertex, -1.05  , 3.2, 6.9
AddVertex, 1.05 , 3.2,6.9
AddVertex, 1.05 , 1.0,6.9
AddVertex, -1.05  , 1.0,6.9
AddFace2,0,1,2,3
GenerateNormals
LoadTexture, parete_divisoria.bmp
SetTextureCoordinates,0,0,0.10
SetTextureCoordinates,1,1,0.10
SetTextureCoordinates,2,1,1
SetTextureCoordinates,3,0,1
SetDecalTransparentColor,0,0,0


; ------------ Fiancata sinistra  ----------------
CreateMeshBuilder
AddVertex, -1.10  , 0 , 7.8,		; 0
AddVertex, -1.10 , 3.3 , 7.8,	; 1
AddVertex, -1.10 , 3.3 , 6.84,	; 2
AddVertex, -1.10 , 0 , 6.84,		; 3	

AddVertex, -0.90  , 3.3 , 6.84,	; 4
AddVertex, -0.90  , 0 , 6.84,		; 5	

AddVertex, -0.90  , 3.3 , 5.99,	; 6
AddVertex, -0.90  , 0 , 5.99,		; 7

AddVertex, -1.2  , 3.3 , 5.99,	; 8 
AddVertex, -1.2  , 0 , 5.99,		; 9	

AddVertex, -1.2  , 3.3 , -6.10,	; 10
AddVertex, -1.2  , 0 , -6.10,		; 11

AddVertex, -0.90  , 3.3 , -6.10,	; 12
AddVertex, -0.90  , 0 , -6.10,	; 13

AddVertex, -0.90  , 3.3 , -6.86,	; 14
AddVertex, -0.90  , 0 , -6.86,	; 15

AddVertex, -1.10  , 3.3 , -6.86,	; 16
AddVertex, -1.10  , 0 , -6.86,		; 17

AddVertex, -1.10  , 3.3 , -7.80,	; 18
AddVertex, -1.10  , 0 , -7.80,	; 19

AddFace2,0,1,2,3
AddFace2,2,4,5,3
AddFace2,4,6,7,5
AddFace2,6,8,9,7
AddFace2,8,10,11,9
AddFace2,10,12,13,11
AddFace2,12,14,15,13
AddFace2,14,16,17,15
AddFace2,16,18,19,17


GenerateNormals
LoadTexture, A1_fiancata_rossa.bmp
SetTextureCoordinates,0,0,1
SetTextureCoordinates,1,0,0
SetTextureCoordinates,2,0.064,0
SetTextureCoordinates,3,0.064,1
SetTextureCoordinates,4,0.074,0
SetTextureCoordinates,5,0.074,1
SetTextureCoordinates,6,0.1205,0,; 0.121
SetTextureCoordinates,7,0.1205,1
SetTextureCoordinates,8,0.1205,0,; 0.122
SetTextureCoordinates,9,0.1205,1
SetTextureCoordinates,10,0.886,0,; 0.886
SetTextureCoordinates,11,0.886,1
SetTextureCoordinates,12,0.887,0,; 0.887
SetTextureCoordinates,13,0.887,1
SetTextureCoordinates,14,0.933,0,;0.937
SetTextureCoordinates,15,0.933,1
SetTextureCoordinates,16,0.938,0
SetTextureCoordinates,17,0.938,1
SetTextureCoordinates,18,1,0
SetTextureCoordinates,19,1,1
SetDecalTransparentColor,0,0,0

CreateMeshBuilder
AddVertex, -0.85  , 3.2 , 7.7
AddVertex, -0.85 , 3.2 ,-7.7
AddVertex, -0.85 , 1.3 ,-7.7
AddVertex, -0.85  , 1.3 , 7.7
AddFace2,0,1,2,3
GenerateNormals
SetColor,50,50,50,130



; ------------ Fiancata destra  ----------------
CreateMeshBuilder
AddVertex, -1.10 , 0 , 7.8,		; 0
AddVertex, -1.10  , 3.3 , 7.8,	; 1
AddVertex, -1.1  , 3.3 , 6.84,	; 2
AddVertex, -1.1  , 0 , 6.84,		; 3	

AddVertex, -0.90  , 3.3 , 6.84,	; 4
AddVertex, -0.90  , 0 , 6.84,		; 5	

AddVertex, -0.90  , 3.3 , 5.99,	; 6
AddVertex, -0.90  , 0 , 5.99,		; 7

AddVertex, -1.2  , 3.3 , 5.99,	; 8 
AddVertex, -1.2  , 0 , 5.99,		; 9	

AddVertex, -1.2  , 3.3 , -6.10,	; 10
AddVertex, -1.2  , 0 , -6.10,		; 11

AddVertex, -0.90  , 3.3 , -6.10,	; 12
AddVertex, -0.90  , 0 , -6.10,	; 13

AddVertex, -0.90  , 3.3 , -6.86,	; 14
AddVertex, -0.90  , 0 , -6.86,	; 15

AddVertex, -1.1  , 3.3 , -6.86,	; 16
AddVertex, -1.1  , 0 , -6.86,		; 17

AddVertex, -1.10  , 3.3 , -7.80,	; 18
AddVertex, -1.10  , 0 , -7.80,	; 19

AddFace2,0,1,2,3
AddFace2,2,4,5,3
AddFace2,4,6,7,5
AddFace2,6,8,9,7
AddFace2,8,10,11,9
AddFace2,10,12,13,11
AddFace2,12,14,15,13
AddFace2,14,16,17,15
AddFace2,16,18,19,17


GenerateNormals
LoadTexture, A1_fiancata_rossa.bmp
SetTextureCoordinates,0,0,1
SetTextureCoordinates,1,0,0
SetTextureCoordinates,2,0.064,0
SetTextureCoordinates,3,0.064,1
SetTextureCoordinates,4,0.074,0
SetTextureCoordinates,5,0.074,1
SetTextureCoordinates,6,0.1205,0,; 0.121
SetTextureCoordinates,7,0.1205,1
SetTextureCoordinates,8,0.1205,0,; 0.122
SetTextureCoordinates,9,0.1205,1
SetTextureCoordinates,10,0.886,0,; 0.886
SetTextureCoordinates,11,0.886,1
SetTextureCoordinates,12,0.887,0,; 0.887
SetTextureCoordinates,13,0.887,1
SetTextureCoordinates,14,0.933,0,;0.937
SetTextureCoordinates,15,0.933,1
SetTextureCoordinates,16,0.938,0
SetTextureCoordinates,17,0.938,1
SetTextureCoordinates,18,1,0
SetTextureCoordinates,19,1,1
SetDecalTransparentColor,0,0,0
Rotate,0,1,0,180

CreateMeshBuilder
AddVertex, -0.85  , 3.2 , 7.7
AddVertex, -0.85 , 3.2 ,-7.7
AddVertex, -0.85 , 1.3 ,-7.7
AddVertex, -0.85  , 1.3 , 7.7
AddFace2,0,1,2,3
GenerateNormals
SetColor,50,50,50,130
Rotate,0,1,0,180



; ------------ Pavimento ----------------
CreateMeshBuilder ; pavimento del salone 2.2 x 7.8 - ad altezza 1.2
AddVertex, -0.890  , 0.86, 7.7
AddVertex,  0.890  , 0.86, 7.7
AddVertex,  0.890  , 0.86,-7.7
AddVertex, -0.89  , 0.86,-7.7
AddFace2,0,1,2,3
GenerateNormals
SetColor,54,48,22


; ------------ Carrelli ----------------------
CreateMeshBuilder
AddVertex, 0, 0.8 , 1.6
AddVertex, 0, 0.8 ,-1.6
AddVertex, 0,-0.1 ,-1.6
AddVertex, 0,-0.1 , 1.6
AddFace2,0,1,2,3
GenerateNormals
LoadTexture, bogie.bmp
SetTextureCoordinates,0,1,0
SetTextureCoordinates,1,0,0
SetTextureCoordinates,2,0,1
SetTextureCoordinates,3,1,1
SetDecalTransparentColor,0,0,255
Translate,0.7,0.12,-4.95

CreateMeshBuilder
AddVertex, 0, 0.8 , 1.6
AddVertex, 0, 0.8 ,-1.6
AddVertex, 0,-0.1 ,-1.6
AddVertex, 0,-0.1 , 1.6
AddFace2,0,1,2,3
GenerateNormals
LoadTexture, bogie.bmp
SetTextureCoordinates,0,1,0
SetTextureCoordinates,1,0,0
SetTextureCoordinates,2,0,1
SetTextureCoordinates,3,1,1
SetDecalTransparentColor,0,0,255
Translate,-0.7,0.12,-4.95

CreateMeshBuilder
AddVertex, 0, 0.8 , 1.6
AddVertex, 0, 0.8 ,-1.6
AddVertex, 0,-0.1 ,-1.6
AddVertex, 0,-0.1 , 1.6
AddFace2,0,1,2,3
GenerateNormals
LoadTexture, bogie.bmp
SetTextureCoordinates,0,1,0
SetTextureCoordinates,1,0,0
SetTextureCoordinates,2,0,1
SetTextureCoordinates,3,1,1
SetDecalTransparentColor,0,0,255
Translate,0.7,0.12,4.95

CreateMeshBuilder
AddVertex, 0, 0.8 , 1.6
AddVertex, 0, 0.8 ,-1.6
AddVertex, 0,-0.1 ,-1.6
AddVertex, 0,-0.1 , 1.6
AddFace2,0,1,2,3
GenerateNormals
LoadTexture, bogie.bmp
SetTextureCoordinates,0,1,0
SetTextureCoordinates,1,0,0
SetTextureCoordinates,2,0,1
SetTextureCoordinates,3,1,1
SetDecalTransparentColor,0,0,255
Translate,-0.7,0.12,4.95

; Route carrello anteriore
; ------------------
CreateMeshBuilder ; Ruota ant sin (3.25 + 0.75 = +4)
cylinder,10, 0.35, 0.38,0.1 
SetColor,24,24,24
rotate,0,0,1,90
translate,-0.55, 0.36, 5.90
CreateMeshBuilder ; Assale ant
cylinder,3, 0.08, 0.08 ,1.1 
SetColor,24,24,24
rotate,0,0,1,-90
translate, 0, 0.36, 5.90

CreateMeshBuilder ; Ruota ant des (3.25 + 0.75 = +4)
cylinder,10, 0.35, 0.38,0.1 
SetColor,24,24,24
rotate,0,0,1,-90
translate, 0.55, 0.36, 5.90

CreateMeshBuilder ; Ruota post sin (3.25 - 0.75 = +2.5)
cylinder,10, 0.35, 0.38,0.1 
SetColor,24,24,24
rotate,0,0,1,90
translate,-0.55, 0.36, 3.90

CreateMeshBuilder ; Assale post
cylinder,3, 0.08, 0.08 ,1.1 
SetColor,24,24,24
rotate,0,0,1,-90
translate, 0, 0.36, 3.90

CreateMeshBuilder ; Ruota post des (3.25 - 0.75 = +2.5)
cylinder,10, 0.35, 0.38,0.1 
SetColor,24,24,24
rotate,0,0,1,-90
translate, 0.55, 0.36, 3.90


; Ruote carrello posteriore
; ------------------
CreateMeshBuilder ; Ruota ant sin (-3.25 + 0.75 = -2.5)
cylinder,10, 0.35, 0.38,0.1 
SetColor,24,24,24
rotate,0,0,1,90
translate,-0.55, 0.36, -3.90

CreateMeshBuilder ; Assale ant
cylinder,3, 0.08, 0.08 ,1.1 
SetColor,24,24,24
rotate,0,0,1,-90
translate, 0, 0.36, -3.90

CreateMeshBuilder ; Ruota ant des (-3.25 + 0.75 = -2.5)
cylinder,10, 0.35, 0.38,0.1 
SetColor,24,24,24
rotate,0,0,1,-90
translate, 0.55, 0.36, -3.9

CreateMeshBuilder ; Ruota post sin (-3.25 - 0.75 = -4)
cylinder,10, 0.35, 0.38,0.1 
SetColor,24,24,24
rotate,0,0,1,90
translate,-0.55, 0.36, -5.90

CreateMeshBuilder ; Assale post
cylinder,3, 0.08, 0.08 ,1.1 
SetColor,24,24,24
rotate,0,0,1,-90
translate, 0, 0.36, -5.90

CreateMeshBuilder ; Ruota post des (-3.25 - 0.75 = -4)
cylinder,10, 0.35, 0.38,0.1 
SetColor,24,24,24
rotate,0,0,1,-90
translate, 0.55, 0.36, -5.90

CreateMeshBuilder ; Respingenti
cylinder,4, 0.12, 0.08 ,0.4 
SetColor,24,24,24
rotate,1,0,0,-90
translate, 0, 0.8, 7.95

CreateMeshBuilder
Cube,0.3,0.15,0.02
SetColor,24,24,24
translate, 0, 0.8, 8.15

CreateMeshBuilder ; Respingenti
cylinder,4, 0.08, 0.12 ,0.4 
SetColor,24,24,24
rotate,1,0,0,-90
translate, 0, 0.8, -7.95

CreateMeshBuilder
Cube,0.3,0.15,0.02
SetColor,24,24,24
translate, 0, 0.8, -8.15
; FeVF - Ferrovia Elettrica della Val di Fiemme
; Pantografo per carri lunghi 15 metri (Elettromotrice A1 e A2)
; by Roberto Benini robertobenini@libero.it
; dicembre 2005



; 1 - BASAMENTO pantografo
CreateMeshBuilder; sinistro
Cube, 0.10, 0.125, 1
Translate,-.50,3.5,4.70
SetColor,150,30,35
CreateMeshBuilder; destro
Cube, 0.10, 0.125, 1
Translate,.50,3.5,4.70
SetColor,150,30,35
CreateMeshBuilder; coprimotore
Cube, 0.10, 0.125, .50
Translate,0,3.67,4.75
SetColor,150,30,35


; 2 - PARTE DESTRA PANTOGRAFO

CreateMeshBuilder; molla
Cylinder,6,0.06, 0.06, 0.60
Rotate, 1,0,0,90
Translate, 0.50, 3.80, 4.75;  
SetColor,0,0,0
CreateMeshBuilder; tirante molla
Cylinder,6,0.015,0.015,0.90
Rotate, 1,0,0,90
Translate, 0.50, 3.80,4.75;  
SetColor,150,30,35

CreateMeshBuilder; sostegno
Cylinder,6,0.02, 0.02, 1.60
Rotate, 1,0,0,90
Translate, 0.50, 3.70, 4.75;  
SetColor,150,30,35

CreateMeshBuilder; basetta isolante anteriore
Cylinder,6,0.035, 0.035, 0.15
Translate, 0.50, 3.65, 5.38;  
SetColor, 255,255,255,

CreateMeshBuilder; basetta isolante posteriore
Cylinder,6,0.035, 0.035, 0.15
Translate, 0.50, 3.65, 4.12;  
SetColor, 255,255,255,

; isolatore anteriore
; parte prima
CreateMeshBuilder; cilindro conico inferiore
Cylinder, 8, 0.033, 0.04, 0.04
Translate, 0.0, 0.00525, 0
SetColor, 255,255,255; bianco
Rotate, 1, 0, 0, 90
Translate,0.50,3.70,5.50
CreateMeshBuilder; cilindro conico superiore
Cylinder, 8, 0.02, 0.033, 0.015
Translate, 0.0, 0.03225, 0
SetColor, 255,255,255; bianco
Rotate, 0, 0, 1, 90
Translate,0.50,3.70,5.50
CreateMeshBuilder; isolante ceramico
Cylinder, 8, 0.02, 0.08, 0.025
Translate, 0.0, -0.02225, 0
SetColor, 255,255,255; bianco
Rotate, 1, 0, 0, 90
Translate,0.50,3.70,5.50
CreateMeshBuilder
Cylinder, 8, 0.06, 0.08, 0.015
Translate, 0.0, -0.03225, 0
SetColor, 255,255,255; bianco
Rotate, 1, 0, 0, 90
Translate,0.50,3.70,5.50
; parte seconda
CreateMeshBuilder; cilindro conico inferiore
Cylinder, 8, 0.033, 0.04, 0.04
Translate, 0.0, 0.00525, 0
SetColor, 255,255,255; bianco
Rotate, 1, 0, 0, 90
Translate,0.50,3.70,5.45
CreateMeshBuilder; cilindro conico superiore
Cylinder, 8, 0.02, 0.033, 0.015
Translate, 0.0, 0.03225, 0
SetColor, 255,255,255; bianco
Rotate, 0, 0, 1, 90
Translate,0.50,3.70,5.45
CreateMeshBuilder; isolante ceramico
Cylinder, 8, 0.02, 0.08, 0.025
Translate, 0.0, -0.02225, 0
SetColor, 255,255,255; bianco
Rotate, 1, 0, 0, 90
Translate,0.50,3.70,5.45
CreateMeshBuilder
Cylinder, 8, 0.06, 0.08, 0.015
Translate, 0.0, -0.03225, 0
SetColor, 255,255,255; bianco
Rotate, 1, 0, 0, 90
Translate,0.50,3.70,5.45

; isolatore posteriore
; parte prima
CreateMeshBuilder; cilindro conico inferiore
Cylinder, 8, 0.033, 0.04, 0.04
Translate, 0.0, 0.00525, 0
SetColor, 255,255,255; bianco
Rotate, 1, 0, 0, -90
Translate,0.50,3.70,4.00
CreateMeshBuilder; cilindro conico superiore
Cylinder, 8, 0.02, 0.033, 0.015
Translate, 0.0, 0.03225, 0
SetColor, 255,255,255; bianco
Rotate, 1, 0, 0, -90
Translate,0.50,3.70,4.00
CreateMeshBuilder; isolante ceramico
Cylinder, 8, 0.02, 0.08, 0.025
Translate, 0.0, -0.02225, 0
SetColor, 255,255,255; bianco
Rotate, 1, 0, 0, -90
Translate,0.50,3.70,4.00
CreateMeshBuilder
Cylinder, 8, 0.06, 0.08, 0.015
Translate, 0.0, -0.03225, 0
SetColor, 255,255,255; bianco
Rotate, 1, 0, 0, -90
Translate,0.50,3.70,4.00
; parte seconda
CreateMeshBuilder; cilindro conico inferiore
Cylinder, 8, 0.033, 0.04, 0.04
Translate, 0.0, 0.00525, 0
SetColor, 255,255,255; bianco
Rotate, 1, 0, 0, -90
Translate,0.50,3.70,4.05
CreateMeshBuilder; cilindro conico superiore
Cylinder, 8, 0.02, 0.033, 0.015
Translate, 0.0, 0.03225, 0
SetColor, 255,255,255; bianco
Rotate, 1, 0, 0, -90
Translate,0.50,3.70,4.05
CreateMeshBuilder; isolante ceramico
Cylinder, 8, 0.02, 0.08, 0.025
Translate, 0.0, -0.02225, 0
SetColor, 255,255,255; bianco
Rotate, 1, 0, 0, -90
Translate,0.50,3.70,4.05
CreateMeshBuilder
Cylinder, 8, 0.06, 0.08, 0.015
Translate, 0.0, -0.03225, 0
SetColor, 255,255,255; bianco
Rotate, 1, 0, 0, -90
Translate,0.50,3.70,4.05

; pantografo anteriore
CreateMeshBuilder; parte inferiore
Cylinder, 6, 0.03, 0.03, 1.30
SetColor,150,30,35
Rotate, 1, 0, 0, 45
Translate,0.50,4.15,5.55
CreateMeshBuilder; perno inferiore
Cylinder, 6, 0.015, 0.015, 1.00
SetColor,150,30,35
Rotate, 0, 0, 1, 90
Translate,0,3.70,5.10
CreateMeshBuilder; perno inferiore dx
Cylinder, 6, 0.05, 0.05, 0.05
SetColor,150,30,35
Rotate, 0, 0, 1, 90
Translate,0.55,3.70,5.10
CreateMeshBuilder; perno inferiore sx
Cylinder, 6, 0.05, 0.05, 0.05
SetColor,150,30,35
Rotate, 0, 0, 1, 90
Translate,-.550,3.70,5.10

CreateMeshBuilder; parte superiore
Cylinder, 6, 0.02, 0.02, 1.5
SetColor,150,30,35
Rotate, 1, 0, 0, -55
Translate,0.50,5.05,5.35
CreateMeshBuilder; snodo
Cylinder, 8, 0.05, 0.05, 0.06
SetColor,150,30,35
Rotate, 0, 0, 1, 90
Translate,0.50,4.60,5.99

; pantografo posteriore
CreateMeshBuilder; parte inferiore
Cylinder, 6, 0.03, 0.03, 1.3
SetColor,150,30,35
Rotate, 1, 0, 0, -45
Translate,0.50,4.15,3.95
CreateMeshBuilder; perno inferiore
Cylinder, 6, 0.015, 0.015, 1.00
SetColor,150,30,35
Rotate, 0, 0, 1, 90
Translate,0,3.70,4.40
CreateMeshBuilder; perno inferiore dx
Cylinder, 6, 0.05, 0.05, 0.05
SetColor,150,30,35
Rotate, 0, 0, 1, 90
Translate,0.55,3.70,4.40
CreateMeshBuilder; perno inferiore sx
Cylinder, 6, 0.05, 0.05, 0.05
SetColor,150,30,35
Rotate, 0, 0, 1, 90
Translate,-.550,3.70,4.40

CreateMeshBuilder; parte superiore
Cylinder, 6, 0.02, 0.02, 1.5
SetColor,150,30,35
Rotate, 1, 0, 0, 55
Translate,0.50,5.05,4.15
CreateMeshBuilder; snodo
Cylinder, 8, 0.05, 0.05, 0.06
SetColor,150,30,35
Rotate, 0, 0, 1, 90
Translate,0.50,4.60,3.52

; 3 - PARTE SINISTRA PANTOGRAFO

CreateMeshBuilder; molla
Cylinder,6,0.06, 0.06, 0.60
Rotate, 1,0,0,90
Translate, -0.50, 3.80, 4.75;  
SetColor,0,0,0
CreateMeshBuilder; tirante molla
Cylinder,6,0.015,0.015,0.90
Rotate, 1,0,0,90
Translate, -0.50, 3.80,4.75;  
SetColor,150,30,35

CreateMeshBuilder; sostegno
Cylinder,6,0.02, 0.02, 1.60
Rotate, 1,0,0,90
Translate, -0.50, 3.70, 4.75;  
SetColor,150,30,35

CreateMeshBuilder; basetta isolante anteriore
Cylinder,6,0.035, 0.035, 0.15
Translate, -0.50, 3.65, 5.38;  
SetColor, 255,255,255,

CreateMeshBuilder; basetta isolante posteriore
Cylinder,6,0.035, 0.035, 0.15
Translate, -0.50, 3.65, 4.12;  
SetColor, 255,255,255,

; isolatore anteriore
; parte prima
CreateMeshBuilder; cilindro conico inferiore
Cylinder, 8, 0.033, 0.04, 0.04
Translate, 0.0, 0.00525, 0
SetColor, 255,255,255; bianco
Rotate, 1, 0, 0, 90
Translate,-0.50,3.70,5.50
CreateMeshBuilder; cilindro conico superiore
Cylinder, 8, 0.02, 0.033, 0.015
Translate, 0.0, 0.03225, 0
SetColor, 255,255,255; bianco
Rotate, 0, 0, 1, 90
Translate,-0.50,3.70,5.50
CreateMeshBuilder; isolante ceramico
Cylinder, 8, 0.02, 0.08, 0.025
Translate, 0.0, -0.02225, 0
SetColor, 255,255,255; bianco
Rotate, 1, 0, 0, 90
Translate,-0.50,3.70,5.50
CreateMeshBuilder
Cylinder, 8, 0.06, 0.08, 0.015
Translate, 0.0, -0.03225, 0
SetColor, 255,255,255; bianco
Rotate, 1, 0, 0, 90
Translate,-0.50,3.70,5.50
; parte seconda
CreateMeshBuilder; cilindro conico inferiore
Cylinder, 8, 0.033, 0.04, 0.04
Translate, 0.0, 0.00525, 0
SetColor, 255,255,255; bianco
Rotate, 1, 0, 0, 90
Translate,-0.50,3.70,5.45
CreateMeshBuilder; cilindro conico superiore
Cylinder, 8, 0.02, 0.033, 0.015
Translate, 0.0, 0.03225, 0
SetColor, 255,255,255; bianco
Rotate, 0, 0, 1, 90
Translate,-0.50,3.70,5.45
CreateMeshBuilder; isolante ceramico
Cylinder, 8, 0.02, 0.08, 0.025
Translate, 0.0, -0.02225, 0
SetColor, 255,255,255; bianco
Rotate, 1, 0, 0, 90
Translate,-0.50,3.70,5.45
CreateMeshBuilder
Cylinder, 8, 0.06, 0.08, 0.015
Translate, 0.0, -0.03225, 0
SetColor, 255,255,255; bianco
Rotate, 1, 0, 0, 90
Translate,-0.50,3.70,5.45

; isolatore posteriore
; parte prima
CreateMeshBuilder; cilindro conico inferiore
Cylinder, 8, 0.033, 0.04, 0.04
Translate, 0.0, 0.00525, 0
SetColor, 255,255,255; bianco
Rotate, 1, 0, 0, -90
Translate,-0.50,3.70,4.00
CreateMeshBuilder; cilindro conico superiore
Cylinder, 8, 0.02, 0.033, 0.015
Translate, 0.0, 0.03225, 0
SetColor, 255,255,255; bianco
Rotate, 1, 0, 0, -90
Translate,-0.50,3.70,4.00
CreateMeshBuilder; isolante ceramico
Cylinder, 8, 0.02, 0.08, 0.025
Translate, 0.0, -0.02225, 0
SetColor, 255,255,255; bianco
Rotate, 1, 0, 0, -90
Translate,-0.50,3.70,4.00
CreateMeshBuilder
Cylinder, 8, 0.06, 0.08, 0.015
Translate, 0.0, -0.03225, 0
SetColor, 255,255,255; bianco
Rotate, 1, 0, 0, -90
Translate,-0.50,3.70,4.00
; parte seconda
CreateMeshBuilder; cilindro conico inferiore
Cylinder, 8, 0.033, 0.04, 0.04
Translate, 0.0, 0.00525, 0
SetColor, 255,255,255; bianco
Rotate, 1, 0, 0, -90
Translate,-0.50,3.70,4.05
CreateMeshBuilder; cilindro conico superiore
Cylinder, 8, 0.02, 0.033, 0.015
Translate, 0.0, 0.03225, 0
SetColor, 255,255,255; bianco
Rotate, 1, 0, 0, -90
Translate,-0.50,3.70,4.05
CreateMeshBuilder; isolante ceramico
Cylinder, 8, 0.02, 0.08, 0.025
Translate, 0.0, -0.02225, 0
SetColor, 255,255,255; bianco
Rotate, 1, 0, 0, -90
Translate,-0.50,3.70,4.05
CreateMeshBuilder
Cylinder, 8, 0.06, 0.08, 0.015
Translate, 0.0, -0.03225, 0
SetColor, 255,255,255; bianco
Rotate, 1, 0, 0, -90
Translate,-0.50,3.70,4.05

; pantografo anteriore
CreateMeshBuilder; parte inferiore
Cylinder, 6, 0.03, 0.03, 1.30
SetColor,150,30,35
Rotate, 1, 0, 0, 45
Translate,-0.50,4.15,5.55

CreateMeshBuilder; parte superiore
Cylinder, 6, 0.02, 0.02, 1.5
SetColor,150,30,35
Rotate, 1, 0, 0, -55
Translate,-0.50,5.05,5.35
CreateMeshBuilder; snodo
Cylinder, 8, 0.05, 0.05, 0.06
SetColor,150,30,35
Rotate, 0, 0, 1, 90
Translate,-0.50,4.60,5.99

; pantografo posteriore
CreateMeshBuilder; parte inferiore
Cylinder, 6, 0.03, 0.03, 1.3
SetColor,150,30,35
Rotate, 1, 0, 0, -45
Translate,-0.50,4.15,3.95

CreateMeshBuilder; parte superiore
Cylinder, 6, 0.02, 0.02, 1.5
SetColor,150,30,35
Rotate, 1, 0, 0, 55
Translate,-0.50,5.05,4.15
CreateMeshBuilder; snodo
Cylinder, 8, 0.05, 0.05, 0.06
SetColor,150,30,35
Rotate, 0, 0, 1, 90
Translate,-0.50,4.60,3.52

; 4 - contatto superiore pantografo

CreateMeshBuilder
Cube, 0.525, 0.005, 0.04
Translate,0,5.49,4.80
SetColor, 132,98,71
CreateMeshBuilder
Cube, 0.525, 0.005, 0.04
Translate,0,5.49,4.70
SetColor, 132,98,71
CreateMeshBuilder ; spiovente dx
AddVertex, 0,0,.09
AddVertex, .15,-.10,.025
AddVertex, .15,-.10 ,-.025
AddVertex, 0,0 ,-.09
Addface2, 0,1,2,3
SetColor, 132,98,71
Translate,0.53,5.49,4.75
CreateMeshBuilder ; spiovente sx
AddVertex, 0,0,.09
AddVertex, 0.15,-.10,.025
AddVertex, 0.15,-.10 ,-.025
AddVertex, 0,0 ,-.09
Addface2, 0,1,2,3
SetColor, 132,98,71
Rotate,0,1,0,180
Translate,-0.53,5.49,4.75

; 5 - diagonali pantografo
CreateMeshBuilder; anteriore 
Cylinder, 6, 0.02, 0.02, 1.4
SetColor,150,30,35
Rotate,0,0,1,45
Rotate, 1, 0, 0,-55
Translate,0,5.05,5.35

CreateMeshBuilder; postriore
Cylinder, 6, 0.02, 0.02, 1.4
SetColor,150,30,35
Rotate,0,0,1,-45
Rotate, 1, 0, 0, 55
Translate,0,5.05,4.15





; 6 - ISOLATORI CONDUTTORI CORRENTE
; primo isolatore
; parte prima
CreateMeshBuilder; cilindro conico inferiore
Cylinder, 8, 0.033, 0.04, 0.04
Translate, 0.0, 0.00525, 0
SetColor, 255,255,255; bianco
Translate,0.50,3.70,4.00
CreateMeshBuilder; cilindro conico superiore
Cylinder, 8, 0.02, 0.033, 0.015
Translate, 0.0, 0.03225, 0
SetColor, 255,255,255; bianco
Translate,0.50,3.70,4.00
CreateMeshBuilder; isolante ceramico
Cylinder, 8, 0.02, 0.08, 0.025
Translate, 0.0, -0.02225, 0
SetColor, 255,255,255; bianco
Translate,0.50,3.70,4.00
CreateMeshBuilder
Cylinder, 8, 0.06, 0.08, 0.015
Translate, 0.0, -0.03225, 0
SetColor, 255,255,255; bianco
Translate,0.50,3.70,4.00

; parte seconda
CreateMeshBuilder; cilindro conico inferiore
Cylinder, 8, 0.033, 0.04, 0.04
Translate, 0.0, 0.00525, 0
SetColor, 255,255,255; bianco
Rotate, 1, 0, 0, -90
Translate,0.50,3.70,4.05
CreateMeshBuilder; cilindro conico superiore
Cylinder, 8, 0.02, 0.033, 0.015
Translate, 0.0, 0.03225, 0
SetColor, 255,255,255; bianco
Rotate, 1, 0, 0, -90
Translate,0.50,3.70,4.05
CreateMeshBuilder; isolante ceramico
Cylinder, 8, 0.02, 0.08, 0.025
Translate, 0.0, -0.02225, 0
SetColor, 255,255,255; bianco
Rotate, 1, 0, 0, -90
Translate,0.50,3.70,4.05
CreateMeshBuilder
Cylinder, 8, 0.06, 0.08, 0.015
Translate, 0.0, -0.03225, 0
SetColor, 255,255,255; bianco
Rotate, 1, 0, 0, -90
Translate,0.50,3.70,4.05

; filo conduttore


CreateMeshBuilder; curva anteriore
Cylinder, 8, 0.015, 0.015,1.00
SetColor,0,0,0
Rotate,1,0,0,90
Translate,1.55,3.70,3.20
Rotate,0,1,0,-15

CreateMeshBuilder; parte rettilinea
Cylinder, 8, 0.015, 0.015,3
SetColor,0,0,0
Rotate,1,0,0,90
Translate,.80,3.70,1.5

CreateMeshBuilder; curva posteriore
Cylinder, 8, 0.015, 0.015,.70
SetColor,0,0,0
Rotate,1,0,0,90
Rotate,0,1,0,15

Translate,0.70,3.70,-.30

; isolatore n. 1
;perno isolatore
CreateMeshBuilder; cilindro conico inferiore
Cylinder, 8, 0.015, 0.015,.20
Translate, 0,0,0
SetColor,0,0,0
Translate,0.80,3.60,0
; parte prima
CreateMeshBuilder; cilindro conico inferiore
Cylinder, 8, 0.033, 0.04, 0.04
Translate, 0.0, 0.00525, 0
SetColor, 255,255,255; bianco
;Rotate, 1, 0, 0, -90
Translate,0.80,3.60,0
CreateMeshBuilder; cilindro conico superiore
Cylinder, 8, 0.02, 0.033, 0.015
Translate, 0.0, 0.03225, 0
SetColor, 255,255,255; bianco
;Rotate, 1, 0, 0, -90
Translate,0.80,3.60,0
CreateMeshBuilder; isolante ceramico
Cylinder, 8, 0.02, 0.08, 0.025
Translate, 0.0, -0.02225, 0
SetColor, 255,255,255; bianco
;Rotate, 1, 0, 0, -90
Translate,0.80,3.60,0
CreateMeshBuilder
Cylinder, 8, 0.06, 0.08, 0.015
Translate, 0.0, -0.03225, 0
SetColor, 255,255,255; bianco
;Rotate, 1, 0, 0, -90
Translate,0.80,3.60,0
; parte seconda
CreateMeshBuilder; cilindro conico inferiore
Cylinder, 8, 0.033, 0.04, 0.04
Translate, 0.0, 0.00525, 0
SetColor, 255,255,255; bianco
;Rotate, 1, 0, 0, -90
Translate,0.80,3.65,0
CreateMeshBuilder; cilindro conico superiore
Cylinder, 8, 0.02, 0.033, 0.015
Translate, 0.0, 0.03225, 0
SetColor, 255,255,255; bianco
;Rotate, 1, 0, 0, -90
Translate,0.80,3.65,0
CreateMeshBuilder; isolante ceramico
Cylinder, 8, 0.02, 0.08, 0.025
Translate, 0.0, -0.02225, 0
SetColor, 255,255,255; bianco
;Rotate, 1, 0, 0, -90
Translate,0.80,3.65,0
CreateMeshBuilder
Cylinder, 8, 0.06, 0.08, 0.015
Translate, 0.0, -0.03225, 0
SetColor, 255,255,255; bianco
;Rotate, 1, 0, 0, -90
Translate,0.80,3.65,0




; isolatore n. 2
;perno isolatore
CreateMeshBuilder; cilindro conico inferiore
Cylinder, 8, 0.015, 0.015,.20
Translate, 0,0,0
SetColor,0,0,0
Translate,0.80,3.60,1
; parte prima
CreateMeshBuilder; cilindro conico inferiore
Cylinder, 8, 0.033, 0.04, 0.04
Translate, 0.0, 0.00525, 0
SetColor, 255,255,255; bianco
;Rotate, 1, 0, 0, -90
Translate,0.80,3.60,1
CreateMeshBuilder; cilindro conico superiore
Cylinder, 8, 0.02, 0.033, 0.015
Translate, 0.0, 0.03225, 0
SetColor, 255,255,255; bianco
;Rotate, 1, 0, 0, -90
Translate,0.80,3.60,1
CreateMeshBuilder; isolante ceramico
Cylinder, 8, 0.02, 0.08, 0.025
Translate, 0.0, -0.02225, 0
SetColor, 255,255,255; bianco
;Rotate, 1, 0, 0, -90
Translate,0.80,3.60,1
CreateMeshBuilder
Cylinder, 8, 0.06, 0.08, 0.015
Translate, 0.0, -0.03225, 0
SetColor, 255,255,255; bianco
;Rotate, 1, 0, 0, -90
Translate,0.80,3.60,1
; parte seconda
CreateMeshBuilder; cilindro conico inferiore
Cylinder, 8, 0.033, 0.04, 0.04
Translate, 0.0, 0.00525, 0
SetColor, 255,255,255; bianco
;Rotate, 1, 0, 0, -90
Translate,0.80,3.65,1
CreateMeshBuilder; cilindro conico superiore
Cylinder, 8, 0.02, 0.033, 0.015
Translate, 0.0, 0.03225, 0
SetColor, 255,255,255; bianco
;Rotate, 1, 0, 0, -90
Translate,0.80,3.65,1
CreateMeshBuilder; isolante ceramico
Cylinder, 8, 0.02, 0.08, 0.025
Translate, 0.0, -0.02225, 0
SetColor, 255,255,255; bianco
;Rotate, 1, 0, 0, -90
Translate,0.80,3.65,1
CreateMeshBuilder
Cylinder, 8, 0.06, 0.08, 0.015
Translate, 0.0, -0.03225, 0
SetColor, 255,255,255; bianco
;Rotate, 1, 0, 0, -90
Translate,0.80,3.65,1

; isolatore n. 3
;perno isolatore
CreateMeshBuilder; cilindro conico inferiore
Cylinder, 8, 0.015, 0.015,.20
Translate, 0,0,0
SetColor,0,0,0
Translate,0.80,3.60,2
; parte prima
CreateMeshBuilder; cilindro conico inferiore
Cylinder, 8, 0.033, 0.04, 0.04
Translate, 0.0, 0.00525, 0
SetColor, 255,255,255; bianco
;Rotate, 1, 0, 0, -90
Translate,0.80,3.60,2
CreateMeshBuilder; cilindro conico superiore
Cylinder, 8, 0.02, 0.033, 0.015
Translate, 0.0, 0.03225, 0
SetColor, 255,255,255; bianco
;Rotate, 1, 0, 0, -90
Translate,0.80,3.60,2
CreateMeshBuilder; isolante ceramico
Cylinder, 8, 0.02, 0.08, 0.025
Translate, 0.0, -0.02225, 0
SetColor, 255,255,255; bianco
;Rotate, 1, 0, 0, -90
Translate,0.80,3.60,2
CreateMeshBuilder
Cylinder, 8, 0.06, 0.08, 0.015
Translate, 0.0, -0.03225, 0
SetColor, 255,255,255; bianco
;Rotate, 1, 0, 0, -90
Translate,0.80,3.60,2
; parte seconda
CreateMeshBuilder; cilindro conico inferiore
Cylinder, 8, 0.033, 0.04, 0.04
Translate, 0.0, 0.00525, 0
SetColor, 255,255,255; bianco
;Rotate, 1, 0, 0, -90
Translate,0.80,3.65,2
CreateMeshBuilder; cilindro conico superiore
Cylinder, 8, 0.02, 0.033, 0.015
Translate, 0.0, 0.03225, 0
SetColor, 255,255,255; bianco
;Rotate, 1, 0, 0, -90
Translate,0.80,3.65,2
CreateMeshBuilder; isolante ceramico
Cylinder, 8, 0.02, 0.08, 0.025
Translate, 0.0, -0.02225, 0
SetColor, 255,255,255; bianco
;Rotate, 1, 0, 0, -90
Translate,0.80,3.65,2
CreateMeshBuilder
Cylinder, 8, 0.06, 0.08, 0.015
Translate, 0.0, -0.03225, 0
SetColor, 255,255,255; bianco
;Rotate, 1, 0, 0, -90
Translate,0.80,3.65,2

; isolatore n. 4
;perno isolatore
CreateMeshBuilder; cilindro conico inferiore
Cylinder, 8, 0.015, 0.015,.20
Translate, 0,0,0
SetColor,0,0,0
Translate,0.80,3.60,3
; parte prima
CreateMeshBuilder; cilindro conico inferiore
Cylinder, 8, 0.033, 0.04, 0.04
Translate, 0.0, 0.00525, 0
SetColor, 255,255,255; bianco
;Rotate, 1, 0, 0, -90
Translate,0.80,3.60,3
CreateMeshBuilder; cilindro conico superiore
Cylinder, 8, 0.02, 0.033, 0.015
Translate, 0.0, 0.03225, 0
SetColor, 255,255,255; bianco
;Rotate, 1, 0, 0, -90
Translate,0.80,3.60,3
CreateMeshBuilder; isolante ceramico
Cylinder, 8, 0.02, 0.08, 0.025
Translate, 0.0, -0.02225, 0
SetColor, 255,255,255; bianco
;Rotate, 1, 0, 0, -90
Translate,0.80,3.60,3
CreateMeshBuilder
Cylinder, 8, 0.06, 0.08, 0.015
Translate, 0.0, -0.03225, 0
SetColor, 255,255,255; bianco
;Rotate, 1, 0, 0, -90
Translate,0.80,3.60,3
; parte seconda
CreateMeshBuilder; cilindro conico inferiore
Cylinder, 8, 0.033, 0.04, 0.04
Translate, 0.0, 0.00525, 0
SetColor, 255,255,255; bianco
;Rotate, 1, 0, 0, -90
Translate,0.80,3.65,3
CreateMeshBuilder; cilindro conico superiore
Cylinder, 8, 0.02, 0.033, 0.015
Translate, 0.0, 0.03225, 0
SetColor, 255,255,255; bianco
;Rotate, 1, 0, 0, -90
Translate,0.80,3.65,3
CreateMeshBuilder; isolante ceramico
Cylinder, 8, 0.02, 0.08, 0.025
Translate, 0.0, -0.02225, 0
SetColor, 255,255,255; bianco
;Rotate, 1, 0, 0, -90
Translate,0.80,3.65,3
CreateMeshBuilder
Cylinder, 8, 0.06, 0.08, 0.015
Translate, 0.0, -0.03225, 0
SetColor, 255,255,255; bianco
;Rotate, 1, 0, 0, -90
Translate,0.80,3.65,3





; FEVF - FERROVIA ELETTRICA VALLE DI FIEMME
; by Roberto Benini - robertobenini@libero.it


; - - - - - struttura portante 
CreateMeshBuilder; longitudinale dx
Cube,0.05,0.15,7.65
SetColor,41,66,57,;236,228,191,;230,228,213,; 215,234,238
translate, 0.50, 0.67, 0
CreateMeshBuilder;longitudinale sx
Cube,0.05,0.15,7.65
SetColor,41,66,57,;236,228,191,;230,228,213,; 215,234,238
translate, -0.50, 0.67, 0
CreateMeshBuilder;trasversale anteriore
Cube,0.05,0.175,.65
SetColor,41,66,57,;236,228,191,;230,228,213,; 215,234,238
Rotate,0,1,0,90
translate, 0, 0.67, 7.65
CreateMeshBuilder;trasversale posteriore
Cube,0.05,0.175,.65
SetColor,41,66,57,;236,228,191,;230,228,213,; 215,234,238
Rotate,0,1,0,90
translate, 0, 0.67, -7.65

; ganci
CreateMeshBuilder ; anteriore 
AddVertex, 0  , 0.70 ,-0.15
AddVertex, 0  , 0.70, 0.15
AddVertex, 0  , 0.10 ,0.15
AddVertex, 0  , 0.10 ,-0.15
AddFace2,0,1,2,3
GenerateNormals
LoadTexture, gancio.bmp
SetTextureCoordinates,0,0,0
SetTextureCoordinates,1,1,0
SetTextureCoordinates,2,1,1
SetTextureCoordinates,3,0,1
SetDecalTransparentColor,0,0,0
Translate,0,0.00,7.8

CreateMeshBuilder ; posteriore 
AddVertex, 0  , 0.70 ,-0.15
AddVertex, 0  , 0.70, 0.15
AddVertex, 0  , 0.10 ,0.15
AddVertex, 0  , 0.10 ,-0.15
AddFace2,0,1,2,3
GenerateNormals
LoadTexture, gancio.bmp
SetTextureCoordinates,0,0,0
SetTextureCoordinates,1,1,0
SetTextureCoordinates,2,1,1
SetTextureCoordinates,3,0,1
SetDecalTransparentColor,0,0,0
Rotate,0,1,0,180
Translate,0,0.00,-7.8


; - - - - - -  meccanismi sottopianale
CreateMeshBuilder; cassa dx
Cube,0.50,0.15,0.55
SetColor,120,120,120
translate, 0.64, 0.45, -.30

CreateMeshBuilder; cassa sx
Cube,0.50,0.15,0.55
SetColor,120,120,120
translate, -0.64, 0.45, 0.30

CreateMeshBuilder ; anteriore 
AddVertex, 0  , 0.70 ,-0.15
AddVertex, 0  , 0.70, 0.15
AddVertex, 0  , 0.10 ,0.15
AddVertex, 0  , 0.10 ,-0.15
AddFace2,0,1,2,3
GenerateNormals
LoadTexture, gancio.bmp
SetTextureCoordinates,0,0,0
SetTextureCoordinates,1,1,0
SetTextureCoordinates,2,1,1
SetTextureCoordinates,3,0,1
SetDecalTransparentColor,0,0,0
Translate,0,0.00,7.8

CreateMeshBuilder ; serbatoio dx
cylinder,10, 0.20, 0.20 ,1 
SetColor,120,120,120
rotate,1,0,0,90
translate, 0.9, 0.55, 1.80

CreateMeshBuilder ; serbatoio sx
cylinder,10, 0.20, 0.20 ,1 
SetColor,120,120,120
rotate,1,0,0,90
translate, -0.9, 0.55, -1.80


; - - - - - - struttura laterale dx
CreateMeshBuilder; anteriore
Cube,0.02,0.02,1.27
SetColor,41,66,57,;236,228,191,;230,228,213,; 215,234,238
translate, -1.15, 0.08, 2.5
Rotate,1,0,0,-10
CreateMeshBuilder; centrale
Cube,0.02,0.02,1.25
SetColor,41,66,57,;236,228,191,;230,228,213,; 215,234,238
translate, -1.15, 0.30, 0
CreateMeshBuilder; posteriore
Cube,0.02,0.02,1.25
SetColor,41,66,57,;236,228,191,;230,228,213,; 215,234,238
translate, -1.15, 0.08, -2.5
Rotate,1,0,0,10
CreateMeshBuilder; verticale
Cube,0.02,0.25,.02
SetColor,41,66,57,;236,228,191,;230,228,213,; 215,234,238
translate, -1.15, 0.57, 1.27
CreateMeshBuilder; verticale
Cube,0.02,0.25,.02
SetColor,41,66,57,;236,228,191,;230,228,213,; 215,234,238
translate, -1.15, 0.57, -1.25


; - - - - - - struttura laterale sx
CreateMeshBuilder; anteriore
Cube,0.02,0.02,1.27
SetColor,41,66,57,
translate, 1.15, 0.08, 2.5
Rotate,1,0,0,-10
CreateMeshBuilder; centrale
Cube,0.02,0.02,1.25
SetColor,41,66,57,;236,228,191,;230,228,213,; 215,234,238
translate, 1.15, 0.30, 0
CreateMeshBuilder; posteriore
Cube,0.02,0.02,1.25
SetColor,41,66,57,;236,228,191,;230,228,213,; 215,234,238
translate, 1.15, 0.08, -2.5
Rotate,1,0,0,10
CreateMeshBuilder; verticale
Cube,0.02,0.25,.02
SetColor,41,66,57,;236,228,191,;230,228,213,; 215,234,238
translate, 1.15, 0.57, 1.27
CreateMeshBuilder; verticale
Cube,0.02,0.25,.02
SetColor,41,66,57,;236,228,191,;230,228,213,; 215,234,238
translate, 1.15, 0.57, -1.25

; - - - - - spartineve anteriore
CreateMeshBuilder ; superficie frontale 
AddVertex, -1.0  , 0.50 ,-0.05,	;0
AddVertex, 0  , 0.50 ,0.15	;1
AddVertex, 1  , .50 , -.05,;2	

AddVertex, -1.0  , 0.40 ,-0.10,;3
AddVertex, 0  , 0.40 ,0.10,;4
AddVertex, 1  , .40 , -.10,;5

AddVertex, -1.0  , 0.30 ,-.05,;6
AddVertex, 0  , 0.30 ,0.15,;7
AddVertex, 1  , .30 , -0.05,;8

AddVertex, -1.15 , 0.05 ,0.30,;9
AddVertex, 0  , 0.05 ,0.45,;10
AddVertex, 1.15,.05 , 0.30,;11

AddFace2, 0,1,4,3
Addface2, 1,2,5,4
Addface2, 3,4,7,6
Addface2, 4,5,8,7
Addface2,6,7,10,9
Addface2,7,8,11,10
Translate,0,0,6.95
SetColor,41,66,57,;236,228,191,;230,228,213,; 215,234,238

; supporto dx
CreateMeshBuilder
Cube,0.015,0.065,0.70
SetColor,41,66,57,;236,228,191,;230,228,213,; 215,234,238
translate, 0.65, 0.22, 6.33
CreateMeshBuilder
Cube,0.02,0.30,0.02
SetColor,41,66,57,;236,228,191,;230,228,213,; 215,234,238
rotate,1,0,0,-15
translate, 0.65, 0.52, 6.80

; supporto sx
CreateMeshBuilder
Cube,0.015,0.065,0.70
SetColor,41,66,57,;236,228,191,;230,228,213,; 215,234,238
translate, -0.65, 0.22, 6.33
CreateMeshBuilder
Cube,0.02,0.30,0.02
SetColor,41,66,57,;236,228,191,;230,228,213,; 215,234,238
rotate,1,0,0,-15
translate, -0.65, 0.52, 6.80

; - - - - - spartineve posteriore
CreateMeshBuilder ; superficie frontale 
AddVertex, -1.0  , 0.50 ,-0.05,	;0
AddVertex, 0  , 0.50 ,0.15	;1
AddVertex, 1  , .50 , -.05,;2	

AddVertex, -1.0  , 0.40 ,-0.10,;3
AddVertex, 0  , 0.40 ,0.10,;4
AddVertex, 1  , .40 , -.10,;5

AddVertex, -1.0  , 0.30 ,-.05,;6
AddVertex, 0  , 0.30 ,0.15,;7
AddVertex, 1  , .30 , -0.05,;8

AddVertex, -1.15 , 0.05 ,0.30,;9
AddVertex, 0  , 0.05 ,0.45,;10
AddVertex, 1.15,.05 , 0.30,;11

AddFace2, 0,1,4,3
Addface2, 1,2,5,4
Addface2, 3,4,7,6
Addface2, 4,5,8,7
Addface2,6,7,10,9
Addface2,7,8,11,10

Translate,0,0,6.95

SetColor,41,66,57,;236,228,191,;230,228,213,; 215,234,238
Rotate,0,1,0,180

; supporto dx
CreateMeshBuilder
Cube,0.015,0.065,0.70
SetColor,41,66,57,;236,228,191,;230,228,213,; 215,234,238
translate, 0.65, 0.22, 6.33
Rotate,0,1,0,180

CreateMeshBuilder
Cube,0.02,0.30,0.02
SetColor,41,66,57,;236,228,191,;230,228,213,; 215,234,238
rotate,1,0,0,-15
translate, 0.65, 0.52, 6.80
Rotate,0,1,0,180

; supporto sx
CreateMeshBuilder
Cube,0.015,0.065,0.70
SetColor,41,66,57,;236,228,191,;230,228,213,; 215,234,238
translate, -0.65, 0.22, 6.33
Rotate,0,1,0,180

CreateMeshBuilder
Cube,0.02,0.30,0.02
SetColor,41,66,57,;236,228,191,;230,228,213,; 215,234,238
rotate,1,0,0,-15
translate, -0.65, 0.52, 6.80
Rotate,0,1,0,180


; - - - - - - fanali ANTERIORI 
CreateMeshBuilder ; alto 
cylinder,10, 0.15, 0.15 ,0.250 
SetColor,0,0,0
rotate,1,0,0,90
translate, 0, 3.30, 7.75
CreateMeshBuilder ; immagine fanale 
AddVertex, 0.23  , 0.23 ,0
AddVertex, -0.23  , 0.23, 0
AddVertex, -0.23  , -0.23 ,0
AddVertex, 0.23 , -0.23 ,0
AddFace,0,1,2,3
GenerateNormals
LoadTexture, fanale.bmp
SetTextureCoordinates,0,0,0
SetTextureCoordinates,1,1,0
SetTextureCoordinates,2,1,1
SetTextureCoordinates,3,0,1
SetDecalTransparentColor,0,0,0
Translate,-0.02,3.31,7.90

CreateMeshBuilder ; basso dx 
cylinder,10, 0.15, 0.15 ,0.250 
SetColor,0,0,0
rotate,1,0,0,90
translate, 0.70, 1.39, 7.70
CreateMeshBuilder ; immagine fanale 
AddVertex, 0.23  , 0.23 ,0
AddVertex, -0.23  , 0.23, 0
AddVertex, -0.23  , -0.23 ,0
AddVertex, 0.23 , -0.23 ,0
AddFace,0,1,2,3
GenerateNormals
LoadTexture, fanale.bmp
SetTextureCoordinates,0,0,0
SetTextureCoordinates,1,1,0
SetTextureCoordinates,2,1,1
SetTextureCoordinates,3,0,1
SetDecalTransparentColor,0,0,0
Translate,0.68,1.40,7.85; delta rispetto a cylinder -0.02,0.01,0.15

CreateMeshBuilder ; basso sx 
cylinder,10, 0.15, 0.15 ,0.250 
SetColor,0,0,0
rotate,1,0,0,90
translate, -0.70, 1.39, 7.70
CreateMeshBuilder ; immagine fanale 
AddVertex, 0.23  , 0.23 ,0
AddVertex, -0.23  , 0.23, 0
AddVertex, -0.23  , -0.23 ,0
AddVertex, 0.23 , -0.23 ,0
AddFace,0,1,2,3
GenerateNormals
LoadTexture, fanale.bmp
SetTextureCoordinates,0,0,0
SetTextureCoordinates,1,1,0
SetTextureCoordinates,2,1,1
SetTextureCoordinates,3,0,1
SetDecalTransparentColor,0,0,0
Translate,-0.72,1.40,7.85; delta rispetto a cylinder -0.02,0.01,0.15

; - - - - - - fanali POSTERIORI 
CreateMeshBuilder ; alto 
cylinder,10, 0.15, 0.15 ,0.250 
SetColor,0,0,0
rotate,1,0,0,90
translate, 0, 3.30, 7.75
Rotate,0,1,0,180

CreateMeshBuilder ; immagine fanale 
AddVertex, 0.23  , 0.23 ,0
AddVertex, -0.23  , 0.23, 0
AddVertex, -0.23  , -0.23 ,0
AddVertex, 0.23 , -0.23 ,0
AddFace,0,1,2,3
GenerateNormals
LoadTexture, fanale.bmp
SetTextureCoordinates,0,0,0
SetTextureCoordinates,1,1,0
SetTextureCoordinates,2,1,1
SetTextureCoordinates,3,0,1
SetDecalTransparentColor,0,0,0
Translate,-0.02,3.31,7.90
Rotate,0,1,0,180
CreateMeshBuilder ; basso dx 
cylinder,10, 0.15, 0.15 ,0.250 
SetColor,0,0,0
rotate,1,0,0,90
translate, 0.70, 1.39, 7.70
Rotate,0,1,0,180

CreateMeshBuilder ; immagine fanale 
AddVertex, 0.23  , 0.23 ,0
AddVertex, -0.23  , 0.23, 0
AddVertex, -0.23  , -0.23 ,0
AddVertex, 0.23 , -0.23 ,0
AddFace,0,1,2,3
GenerateNormals
LoadTexture, fanale.bmp
SetTextureCoordinates,0,0,0
SetTextureCoordinates,1,1,0
SetTextureCoordinates,2,1,1
SetTextureCoordinates,3,0,1
SetDecalTransparentColor,0,0,0
Translate,0.68,1.40,7.85; delta rispetto a cylinder -0.02,0.01,0.15
Rotate,0,1,0,180

CreateMeshBuilder ; basso sx 
cylinder,10, 0.15, 0.15 ,0.250 
SetColor,0,0,0
rotate,1,0,0,90
translate, -0.70, 1.39, 7.70
Rotate,0,1,0,180

CreateMeshBuilder ; immagine fanale 
AddVertex, 0.23  , 0.23 ,0
AddVertex, -0.23  , 0.23, 0
AddVertex, -0.23  , -0.23 ,0
AddVertex, 0.23 , -0.23 ,0
AddFace,0,1,2,3
GenerateNormals
LoadTexture, fanale.bmp
SetTextureCoordinates,0,0,0
SetTextureCoordinates,1,1,0
SetTextureCoordinates,2,1,1
SetTextureCoordinates,3,0,1
SetDecalTransparentColor,0,0,0
Translate,-0.72,1.40,7.85; delta rispetto a cylinder -0.02,0.01,0.15
Rotate,0,1,0,180

; FEVF - FERROVIA ELETTRICA VALLE DI FIEMME
; by Roberto Benini - robertobenini@libero.it
; (C) 06/12/2005
; in caso di utilizzo citare fonte

; - - - - - -  MANCORRENTI ANTERIORI

; DX 
CreateMeshBuilder ; orizzontale 
cylinder,5, 0.015, 0.015 ,0.500 
SetColor,111,109,84
rotate,1,0,0,90
translate, 0.4, 1.92, 7.75
CreateMeshBuilder ; diagonale 
cylinder,5, 0.015, 0.015 ,0.6200 
SetColor,111,109,84
rotate,1,0,0,45
translate, 0.4, 1.65, 7.805; delta z rispetto a cilinder 0.055
CreateMeshBuilder ; curva 1
cylinder,5, 0.015, 0.015 ,0.045 
SetColor,111,109,84
rotate,1,0,0,-45
translate, 0.40, 1.91, 8.01; delta z rispetto a cilinder 0.26
CreateMeshBuilder ; curva 2
cylinder,5, 0.015, 0.015 ,0.04 
SetColor,111,109,84
translate, 0.40, 1.88, 8.02,; delta z rispetto a cilinder 0.27
; SX 
CreateMeshBuilder ; orizzontale 
cylinder,5, 0.015, 0.015 ,0.500 
SetColor,111,109,84
rotate,1,0,0,90
translate, -0.4, 1.92, 7.75
CreateMeshBuilder ; diagonale 
cylinder,5, 0.015, 0.015 ,0.6200 
SetColor,111,109,84
rotate,1,0,0,45
translate, -0.4, 1.65, 7.805
CreateMeshBuilder ; curva 1
cylinder,5, 0.015, 0.015 ,0.045 
SetColor,111,109,84
rotate,1,0,0,-45
translate, -0.40, 1.91, 8.01
CreateMeshBuilder ; curva 2
cylinder,5, 0.015, 0.015 ,0.04 
SetColor,111,109,84
translate, -0.40, 1.88,8.02

; - - - - - -  MANCORRENTI posteriori

; DX 
CreateMeshBuilder ; orizzontale 
cylinder,5, 0.015, 0.015 ,0.500 
SetColor,111,109,84
rotate,1,0,0,90
translate, 0.4, 1.92, 7.75
rotate,0,1,0,180

CreateMeshBuilder ; diagonale 
cylinder,5, 0.015, 0.015 ,0.6200 
SetColor,111,109,84
rotate,1,0,0,45
translate, 0.4, 1.65, 7.805; delta z rispetto a cilinder 0.055
rotate,0,1,0,180

CreateMeshBuilder ; curva 1
cylinder,5, 0.015, 0.015 ,0.045 
SetColor,111,109,84
rotate,1,0,0,-45
translate, 0.40, 1.91, 8.01; delta z rispetto a cilinder 0.26
rotate,0,1,0,180

CreateMeshBuilder ; curva 2
cylinder,5, 0.015, 0.015 ,0.04 
SetColor,111,109,84
translate, 0.40, 1.88, 8.02,; delta z rispetto a cilinder 0.27
rotate,0,1,0,180

; SX 
CreateMeshBuilder ; orizzontale 
cylinder,5, 0.015, 0.015 ,0.500 
SetColor,111,109,84
rotate,1,0,0,90
translate, -0.4, 1.92, 7.75
rotate,0,1,0,180


CreateMeshBuilder ; diagonale 
cylinder,5, 0.015, 0.015 ,0.6200 
SetColor,111,109,84
rotate,1,0,0,45
translate, -0.4, 1.65, 7.805
rotate,0,1,0,180

CreateMeshBuilder ; curva 1
cylinder,5, 0.015, 0.015 ,0.045 
SetColor,111,109,84
rotate,1,0,0,-45
translate, -0.40, 1.91, 8.01
rotate,0,1,0,180

CreateMeshBuilder ; curva 2
cylinder,5, 0.015, 0.015 ,0.04 
SetColor,111,109,84
translate, -0.40, 1.88,8.02
rotate,0,1,0,180





; FEVF - FERROVIA ELETTRICA VALLE DI FIEMME
; by Roberto Benini - robertobenini@libero.it
; (C) 06/12/2005
; in caso di utilizzo citare fonte

; - - - - - -  MANICOTTO ANTERIORE 


CreateMeshBuilder ; tubo verticale
cylinder,8, 0.03, 0.03 ,1 
SetColor,40,40,40
translate, 0.5, 1.37,7.85

; 5 PEZZI DA 20x6 cm
CreateMeshBuilder ; 1 
cylinder,8, 0.03, 0.03 ,0.20 
SetColor,40,40,40
rotate,1,0,0,30
translate, 0.485, 1.08,7.90

CreateMeshBuilder ; 2 
cylinder,8, 0.03, 0.03 ,0.20 
SetColor,40,40,40
rotate,1,0,0,22.5
translate, 0.485, 1.255,7.99

CreateMeshBuilder ; 3 
cylinder,8, 0.03, 0.03 ,0.20 
SetColor,40,40,40
rotate,1,0,0,0
translate, 0.485, 1.43,8.025

CreateMeshBuilder ; 4 
cylinder,8, 0.03, 0.03 ,0.20 
SetColor,40,40,40
rotate,1,0,0,-22.5
translate, 0.485, 1.605,7.99

CreateMeshBuilder ; 5 
cylinder,8, 0.03, 0.03 ,0.20 
SetColor,40,40,40
rotate,1,0,0,-30
translate, 0.485, 1.775,7.90

; - - - - - -  MANICOTTO posteriore 


CreateMeshBuilder ; tubo verticale
cylinder,8, 0.03, 0.03 ,1 
SetColor,40,40,40
translate, 0.5, 1.37,7.85
rotate,0,1,0,180
; 5 PEZZI DA 20x6 cm
CreateMeshBuilder ; 1 
cylinder,8, 0.03, 0.03 ,0.20 
SetColor,40,40,40
rotate,1,0,0,30
translate, 0.485, 1.08,7.90
rotate,0,1,0,180

CreateMeshBuilder ; 2 
cylinder,8, 0.03, 0.03 ,0.20 
SetColor,40,40,40
rotate,1,0,0,22.5
translate, 0.485, 1.255,7.99
rotate,0,1,0,180

CreateMeshBuilder ; 3 
cylinder,8, 0.03, 0.03 ,0.20 
SetColor,40,40,40
rotate,1,0,0,0
translate, 0.485, 1.43,8.025
rotate,0,1,0,180

CreateMeshBuilder ; 4 
cylinder,8, 0.03, 0.03 ,0.20 
SetColor,40,40,40
rotate,1,0,0,-22.5
translate, 0.485, 1.605,7.99
rotate,0,1,0,180

CreateMeshBuilder ; 5 
cylinder,8, 0.03, 0.03 ,0.20 
SetColor,40,40,40
rotate,1,0,0,-30
translate, 0.485, 1.775,7.90
rotate,0,1,0,180


; - - - - - - SCALINI
; anteriore dx
CreateMeshBuilder
Cube,0.10,0.0125,0.378
SetColor,54,48,22
translate, 0.95, 0.54, 6.48
CreateMeshBuilder
Cube,0.15,0.0125,0.378
SetColor,54,48,22
translate, 1.05, 0.25, 6.48

; anteriore sx
CreateMeshBuilder
Cube,0.10,0.0125,0.378
SetColor,54,48,22
translate, 0.95, 0.54, 6.48
rotate,0,1,0,180
CreateMeshBuilder
Cube,0.15,0.0125,0.378
SetColor,54,48,22
translate, 1.05, 0.25, 6.48
rotate,0,1,0,180

; posteriore dx
CreateMeshBuilder
Cube,0.10,0.0125,0.42
SetColor,54,48,22
translate, 0.95, 0.54, -6.415
CreateMeshBuilder
Cube,0.15,0.0125,0.42
SetColor,54,48,22
translate, 1.05, 0.25, -6.415

; posteriore SX
CreateMeshBuilder
Cube,0.10,0.0125,0.42
SetColor,54,48,22
translate, 0.95, 0.54, -6.415
rotate,0,1,0,180
CreateMeshBuilder
Cube,0.15,0.0125,0.42
SetColor,54,48,22
translate, 1.05, 0.25, -6.415
rotate,0,1,0,180


