# mona.ulmo
# by jason waltman

global::eye -24 5 4
global::at  8.5 4 -30
global::up 0 1 0
global::ambient 0.2 0.2 0.2
global::background 0.5 0.5 0.5

light::position 0 16 -14
light::color    1.0 0.96 0.88
light::size     20 0 0   0 0 20 
light::power    10

# floor and ceiling ####################################

set::define
reflective 0.05 0.05 marble 0.25  0.25  1  16
color-overwrite 0.8667 0.8627 0.7098

#A
triangle -10 0   0     10 0   0     14 0  -8
#B
triangle -10 0   0     14 0  -8    -14 0  -8
#C
triangle  10 0   0     20 0  -5     14 0  -8
#D
triangle  20 0  -5     14 0 -21     14 0  -8
#E
triangle  20 0  -5     18 0 -25     14 0 -21
#F
triangle  20 0  -5     23 0  -5     18 0 -25
#G
triangle  23 0  -5     23 0 -25     18 0 -25  
#H
triangle  14 0 -21     18 0 -25      8 0 -25
#I
triangle  18 0 -25     10 0 -35      8 0 -25
#J
triangle   8 0 -25     10 0 -35     -8 0 -25
#K
triangle  10 0 -35    -10 0 -35     -8 0 -25
#L
triangle  -8 0 -25    -10 0 -35    -18 0 -25
#M
triangle  -8 0 -25    -18 0 -25    -14 0 -21
#N
triangle -14 0 -21    -18 0 -25    -20 0  -5
#O
triangle -14 0 -21    -20 0  -5    -14 0  -8
#P
triangle -18 0 -25    -23 0  -5    -20 0  -5
#Q
triangle -18 0 -25    -23 0 -25    -23 0  -5
#R
triangle -20 0  -5    -10 0   0    -14 0  -8

#step AAA
triangle  -8 -1 -25      8 -1 -25      8  0 -25
triangle  -8 -1 -25      8  0 -25     -8  0 -25
#step BBB
triangle   8 -1 -25     14 -1 -21     14  0 -21
triangle   8 -1 -25     14  0 -21      8  0 -25
#step CCC
triangle  14 -1 -21     14 -1  -8     14  0  -8
triangle  14 -1 -21     14  0  -8     14  0 -21
#step DDD
triangle  14 -1  -8    -14 -1  -8    -14  0  -8
triangle  14 -1  -8    -14  0  -8     14  0  -8
#step EEE
triangle -14 -1  -8    -14 -1 -21    -14  0 -21
triangle -14 -1  -8    -14  0 -21    -14  0  -8
#step FFF
triangle -14 -1 -21     -8 -1 -25     -8  0 -25
triangle -14 -1 -21     -8  0 -25    -14  0 -21

color-normal
set::end

   xform::clear
   xform::scale 1 0.5 1
   generate-instance

   xform::clear
   xform::scale 1 -1 1
   xform::translate 0 15 0
   generate-instance


# main walls ###########################################

reflective 0.05 0.05 marble 0.25  0.25  1  16
color-overwrite 0.8667 0.8627 0.7098

#I
triangle -10  0 -35     10  0 -35    10 15 -35
triangle -10  0 -35     10 15 -35   -10 15 -35

#II
triangle  10  0 -35     18  0 -25    18 15 -25
triangle  10  0 -35     18 15 -25    10 15 -35

#III
triangle  18  0 -25     23  0 -25    23 15 -25
triangle  18  0 -25     23 15 -25    18 15 -25

#IV
triangle  23  0 -25     23  0  -5    23 15  -5
triangle  23  0 -25     25 15  -5    23 15 -25

#V
triangle  23  0  -5     20  0  -5    20 15  -5
triangle  23  0  -5     20 15  -5    23 15  -5

#VI
triangle  20  0  -5     10  0   0    10 15   0
triangle  20  0  -5     10 15   0    20 15  -5 

#VII
triangle  10  0   0    -10  0   0   -10 15   0
triangle  10  0   0    -10 15   0    10 15   0

#VIII
triangle -10  0   0    -20  0  -5   -20 15  -5
triangle -10  0   0    -20 15  -5   -10 15   0

#IX
triangle -20  0  -5    -23  0  -5   -23 15  -5
triangle -20  0  -5    -23 15  -5   -20 15  -5

#X
triangle -23  0  -5    -23  0 -25   -23 15 -25
triangle -23  0  -5    -23 15 -25   -23 15  -5
 
#XI
triangle -23  0 -25    -18  0 -25   -18 15 -25
triangle -23  0 -25    -18 15 -25   -23 15 -25

#XII
triangle -18  0 -25    -10  0 -35   -10 15 -35
triangle -18  0 -25    -10 15 -35   -18 15 -25

color-normal

# lower floor, color 0 #################################

set::define
reflective 0.05 0.05 marble 0.25  0.25  1  16
color-overwrite 0.8667 0.8627 0.7098

#AA
triangle 0 0 -14      3 0 -25     -3 0 -25 
#BB
triangle 0 0 -14     14 0 -21      8 0 -25
#CC
triangle 0 0 -14     14 0  -8     14 0 -15 
#DD
triangle 0 0 -14     -3 0  -8      3 0  -8
#EE
triangle 0 0 -14    -14 0 -15    -14 0  -8
#FF
triangle 0 0 -14     -8 0 -25    -14 0 -21

color-normal
set::end

   xform::clear
   xform::translate 0 -0.5 0
   generate-instance


# lower floor, color 1 #################################

set::define
reflective 0.05 0.05 marble 0.25  0.25  1  16
color-overwrite 0.8078 0.7765 0.6549

#GG
triangle 0 0 -14      8 0 -25      3 0 -25
#HH
triangle 0 0 -14     14 0 -15     14 0 -21
#II
triangle 0 0 -14      3 0  -8     14 0  -8
#JJ
triangle 0 0 -14    -14 0  -8     -3 0  -8
#KK
triangle 0 0 -14    -14 0 -21    -14 0 -15
#LL
triangle 0 0 -14     -3 0 -25     -8 0 -25

color-normal
set::end

   xform::clear
   xform::translate 0 -0.5 0
   generate-instance

# lower floor center detail ############################

set::define
reflective 0.05 0.05 marble 0.25  0.25  1  16
color-overwrite 0.8667 0.8627 0.7098
include disk.ulmo
color-normal
set::end

   xform::clear
   xform::translate 0 -0.5 -14
   generate-instance


# columns ##############################################

set::define
reflective 0.05 0.05 marble 0.25  0.25  1  16
color-overwrite 0.8667 0.8627 0.7098
include column.ulmo
include column2.ulmo
include column3.ulmo
include column4.ulmo
include column5.ulmo
color-normal
set::end

   xform::clear
   xform::translate 6 0 -3
   generate-instance

   xform::clear
   xform::translate 13 0 -5
   generate-instance

   xform::clear
   xform::translate 18 0 -9
   generate-instance

   xform::clear
   xform::translate 18 0 -15
   generate-instance

   xform::clear
   xform::translate 18 0 -21
   generate-instance

   xform::clear
   xform::translate 13 0 -25
   generate-instance

   xform::clear
   xform::translate 10 0 -30
   generate-instance

   xform::clear
   xform::translate -10 0 -30
   generate-instance

   xform::clear
   xform::translate -13 0 -25
   generate-instance

   xform::clear
   xform::translate -18 0 -21
   generate-instance

   xform::clear
   xform::translate -18 0 -15
   generate-instance

   xform::clear
   xform::translate -18 0 -9
   generate-instance

   xform::clear
   xform::translate -13 0 -5
   generate-instance

   xform::clear
   xform::translate -6 0 -3
   generate-instance


# glass panes ##########################################

set::define
glass plain
color-overwrite 0.500 0.900 0.820
include box.ulmo
color-normal
set::end

   xform::clear
   xform::scale 4 4 0.05
   xform::translate 0 6 -29.25
   generate-instance
   xform::translate 0 0 -1.5
   generate-instance

   xform::clear
   xform::scale 0.05 4 0.75
   xform::translate -4 6 -30
   generate-instance
   xform::translate 8 0 0
   generate-instance

   xform::clear
   xform::scale 4 0.05 0.75
   xform::translate 0 10 -30
   generate-instance


# alter ################################################

set::define
reflective 0.05 0.05 marble 0.25  0.25  1  16
color-overwrite 0.8667 0.8627 0.7098
include alterbox.ulmo
color-normal
set::end

   xform::clear
   xform::translate 0 1 -30
   generate-instance


# mona #################################################

set::define
diffuse plain
color-overwrite 0.9 0.9 0.9
include box.ulmo
color-normal
set::end

   xform::clear
   xform::scale 1.5 1.85 0.125
   xform::translate 0 5 -30
   generate-instance

set::define
diffuse texture mona.rgb
triangle -1 0 0   1 0      0       1 2.6114 0   1 1 1     0 0   1 0   1 1 
triangle -1 0 0   1 2.6114 0      -1 2.6114 0   1 1 1     0 0   1 1   0 1
set::end

   xform::clear
   xform::translate 0 3.75 -29.874
   generate-instance

########################################################