DP Tool Club 24/CD_ASCQ_24_0995.iso/voxrom/images/guelt/musee.art

Text File | 1995-07-24 | 6KB | 268 lines

// Un "musée" intergalactique
// par Sébastien GUELT

#inclure couleurs.inc

environnement
{
 position_camera 0 -100 100
 pointe_vers 0 0 40
 cote -0.5 0 1
 champ_visuel 50
 resolution 640 480
 anti_crenelage recursif
 seuil 4
 facteur_proportionnel 1.3333
 artefact
 caustiques
 fond .2 .05 .2
}


// La lumiere

source_lumineuse
                {
                 type point
                 position 500 -500 500
                 intensite .5 .5 .5
                 puissance 0
                }

source_lumineuse
                {
                 type point
                 position 0 -500 500
                 intensite .5 .5 .5
                 puissance 0
                }

source_lumineuse
                {
                 type point
                 position -500 -500 500
                 intensite .5 .5 .5
                 puissance 0
                }


// Le ciel

matiere
       {
        texture
               {
                echantillon fractal
                ajuster 3000 300 300
                deplacer 0 0 0
                transition 0
                cycle 5
                matiere
                       {
                        diffuse .2 .2 .2
                       }
                matiere
                       {
                        ambiante Noir
                        refraction 1 1 1
                        indice_refraction 1
                       }
               }
       }

sphere
      {
       centre 0 0 -1000
       rayon 10000
      }


// L'eau

matiere
       {
        diffuse .1 .1 .3
        reflexion .5 .5 .5
        bosses
              {
               turbulence
                         {
                          ajuster 5 2 2
                          deplacer 0 0 0
                          amplitude .4
                          cycle 3
                         }
              }
       }

sphere
      {
       centre 0 0 -1000
       rayon 1000
      }


// Les montagnes

matiere
       {
        texture
               {
                echantillon fractal
                ajuster 1 1 .1
                deplacer 0 0 0
                transition 0
                cycle 5
                matiere
                       {
                        diffuse Bois_Fonce
                       }
                matiere
                       {
                        diffuse .2 .2 .2
                       }
               }
       }

terrain
       {
        etendue 0 -200 -20
                300 500 0
                -300 500 0
        composantes .3 40 6
       }


// Les objets volants

#declarer cellule +
                 matiere +
                        { +
                         texture +
                                { +
                                 echantillon fractal +
                                 ajuster 1 1 .1 +
                                 deplacer 0 0 0 +
                                 transition 0 +
                                 cycle 5 +
                                 matiere +
                                        { +
                                         diffuse Gris_Clair +
                                        } +
                                 matiere +
                                        { +
                                         diffuse .2 .2 .2 +
                                        } +
                                } +
                        } +
                 terrain +
                        { +
                         etendue 0 -10 0 +
                                 8.66 15 0 +
                                 -8.66 15 0 +
                         composantes .5 10 6 +
                         decouper +
                                 { +
                                  centre 0 0 200 +
                                  rayon 200 +
                                  exterieur +
                                 } +
                        }

bloc
    {
     ajuster 1 1 1
     pivoter 0 0 0
     deplacer 8 -70 70
    }
cellule
bloc
    {
     ajuster 1 1 1
     deplacer 0 0 15
    }
matiere
       {
        texture
               {
                echantillon roche
                ajuster 1 1 1
                cycle 3
                matiere
                       {
                        diffuse Gris_Fonce
                        imperfection .3
                       }
                matiere
                       {
                        diffuse Gris
                        imperfection .3
                       }
               }
       }
trigonolithe beethove.raw
fin_bloc
fin_bloc

bloc
    {
     ajuster 1 1 1
     pivoter 0 0 0
     deplacer -20 -30 50
    }
cellule
bloc
    {
     ajuster 2.2 2.2 2.2
     deplacer 0 0 10
    }
matiere
       {
        texture
               {
                echantillon roche
                ajuster .3 .3 .3
                cycle 3
                matiere
                       {
                        diffuse Gris_Fonce
                        imperfection .3
                       }
                matiere
                       {
                        diffuse Gris
                        imperfection .3
                       }
               }
       }
#inclure statue.inc
fin_bloc
fin_bloc

bloc
    {
     ajuster 1 1 1
     pivoter 0 0 0
     deplacer 40 180 70
    }
cellule
fin_bloc

bloc
    {
     ajuster 1 1 1
     pivoter 0 0 0
     deplacer 0 130 10
    }
cellule
fin_bloc

bloc
    {
     ajuster 1 1 1
     pivoter 0 0 0
     deplacer -10 20 20
    }
cellule
fin_bloc