home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
DP Tool Club 9
/
CD_ASCQ_09_1193.iso
/
maj
/
luxart
/
scenes
/
aestus.art
next >
Wrap
Text File
|
1993-10-07
|
8KB
|
401 lines
// Une nouvelle vision d'AESTUS que j'avais, à l'origine,
// créé pour Persistence of Vision v1.0 en 1992.
#inclure couleurs.inc
environnement
{
position_camera 0 -31 9
pointe_vers 0 9 6
orientation_z 0 0 1
champ_visuel 70
resolution 640 480
anti_crenelage recursif
seuil 4
brouillard 0.0001
facteur_proportionnel 1.3333
fond Noir
}
source_lumineuse
{
type point
puissance 0
position 35 -110 70
intensite .5 .5 .5
}
source_lumineuse
{
type point
puissance 0
position -30 -110 70
intensite .5 .5 .5
}
source_lumineuse
{
type point
puissance 0
position 0 -8 40
intensite .3 .3 .3
}
// Un ciel
matiere
{
texture
{
echantillon fractal
ajuster 390 180 195
deplacer -190 200 0
cycle 3
transition .8
turbulence
{
amplitude 5
cycle 5
}
matiere { ambiante Blanc }
matiere { ambiante Noir }
}
}
disque
{
centre 0 0 275
normale 0 0 -1
rayon 10000
}
// Le carrelage (sous l'eau)
bloc { pivoter 0 0 -30 }
matiere
{
texture
{
echantillon damier
ajuster 4 4 0
matiere { diffuse Noir }
matiere { diffuse Blanc }
}
}
fin_bloc
disque
{
centre 0 0 0
normale 0 0 1
rayon 10000
}
// Les deux colonnes de marbre
matiere
{
texture
{
echantillon concentrique
turbulence
{
cycle 5
amplitude 4
}
transition .85
rayon 1
rayon 2
matiere { diffuse Rose speculaire 20 Blanc }
matiere { diffuse Vert_Chasseur speculaire 20 Blanc }
}
}
bloc { deplacer -12 0 0 }
#inclure colonne2.inc
fin_bloc
bloc { deplacer 12 0 0 }
#inclure colonne2.inc
fin_bloc
// Les parois métalliques qui délimitent la scène
matiere
{
diffuse Bois_Jeune
imperfection .15
speculaire 80 Blanc
reflexion .3 .3 .3
force_crenelage
}
polygone { sommets 4
sommet -16.1 4 0
sommet -16.1 4 16
sommet -16.1 -20 16
sommet -16.1 -20 0
}
polygone { sommets 4
sommet 16 4 0
sommet 16 4 16
sommet 16 -20 16
sommet 16 -20 0
}
polygone { sommets 4
sommet -16.1 4 0
sommet -16.1 4 16
sommet -10 4 16
sommet -10 4 0
}
polygone { sommets 4
sommet 16 4 0
sommet 16 4 16
sommet 10 4 16
sommet 10 4 0
}
polygone { sommets 4
sommet -10 4 16
sommet 10 4 16
sommet 10 4 13
sommet -10 4 13
}
// Le miroir accroché au mur
matiere
{
diffuse Noir
speculaire 10 Blanc
}
sphere { centre -15 -3 11 rayon .3 }
sphere { centre -15 -9 11 rayon .3 }
sphere { centre -16 -9 6 rayon .3 }
sphere { centre -16 -3 6 rayon .3 }
cylindre { base -15 -3 11 haut -15 -9 11 rayon .2 }
cylindre { base -16 -3 6 haut -16 -9 6 rayon .2 }
cylindre { base -16 -3 6 haut -15 -3 11 rayon .2 }
cylindre { base -16 -9 6 haut -15 -9 11 rayon .2 }
matiere
{
diffuse 0 0 0
reflexion 1 1 1 // réflexion parfaite...
}
polygone { sommets 4
sommet -15 -3 11
sommet -15 -9 11
sommet -16 -9 6
sommet -16 -3 6
}
// La mer perturbée par des vagues formées par le déplacement du radeau
// et par la chute d'un ballon..
matiere
{
diffuse 0 .2 .9
speculaire 40 Blanc
bosses
{
vague
{
centre -2 3 0 // début de la trajectoire du radeau...
crete_a_crete 2
amplitude .7
attenuation .8
}
vague
{
centre -.5 14 0 // ...fin de la trajectoire du radeau
crete_a_crete 2
amplitude .8
attenuation .8
}
vague
{
centre 2 5 0 // emplacement où a chuté le ballon
crete_a_crete 2
amplitude .9
attenuation .9
}
turbulence
{
ajuster 1 1 1
amplitude .4
cycle 3
}
}
reflexion .35 .35 .35
refraction .8 .8 .8
indice_refraction 1.34
}
disque
{
centre 0 0 2
normale 0 0 1
rayon 10000
}
// Le ballon qui flotte (il ne se voit pas très bien parcequ'il est à
// l'intérieur de la cage)
matiere { diffuse Prune_Fonce }
sphere { centre 2 6 2.3 rayon 2.5 }
// Le radeau fait de troncs d'arbres
// La texture de Bois décrite ci-après est celle contenue dans
// le fichier PIECE.ART
bloc { pivoter 0 0 -35 deplacer 5 -.5 0 }
matiere
{
texture
{
turbulence
{
ajuster .1 .9 1
amplitude 1.4
cycle 3
}
echantillon concentrique
ajuster 1 0 1
deplacer 0 0 5
transition .5
rayon .15
rayon .06
matiere
{
texture
{
echantillon fractal
ajuster 3 .03 .03
cycle 2
matiere { diffuse Brun speculaire 100 Blanc }
matiere { diffuse Bois_Moyen speculaire 100 Blanc }
}
}
matiere
{
texture
{
echantillon fractal
ajuster 3 .03 .03
cycle 2
matiere { diffuse Marron_Sombre speculaire 20 Blanc }
matiere { diffuse Ocre_Fonce speculaire 20 Blanc }
}
}
}
}
// Les cinq troncs
cylindre { base -3 -5.1 2 haut -3 -16.7 2 rayon 1.1 }
cylindre { base -.8 -5.2 2 haut -.8 -17.1 2 rayon 1.1 }
cylindre { base 1.4 -4.9 2 haut 1.4 -17 2 rayon 1.1 }
cylindre { base 3.6 -5 2 haut 3.6 -17.3 2 rayon 1.1 }
cylindre { base 5.8 -4.8 2 haut 5.8 -16.9 2 rayon 1.1 }
matiere
{
texture
{
echantillon concentrique
ajuster 1 1 0
turbulence
{
cycle 4
amplitude .4
}
transition .5
rayon .05
rayon .09
matiere { diffuse Bois_Clair imperfection .05 }
matiere { diffuse Bois_Fonce imperfection .05 }
}
}
disque { centre -3 -16.7 2 normale 0 1 0 rayon 1.1 }
disque { centre -.8 -17.1 2 normale 0 1 0 rayon 1.1 }
disque { centre 1.4 -17 2 normale 0 1 0 rayon 1.1 }
disque { centre 3.6 -17.3 2 normale 0 1 0 rayon 1.1 }
disque { centre 5.8 -16.9 2 normale 0 1 0 rayon 1.1 }
disque { centre -3 -5.1 2 normale 0 1 0 rayon 1.1 }
disque { centre -.8 -5.2 2 normale 0 1 0 rayon 1.1 }
disque { centre 1.4 -4.9 2 normale 0 1 0 rayon 1.1 }
disque { centre 3.6 -5 2 normale 0 1 0 rayon 1.1 }
disque { centre 5.8 -4.8 2 normale 0 1 0 rayon 1.1 }
// Le cordage qui les maintient serrés les uns aux autres
matiere { diffuse Jaune2 }
anneau { centre -3 -15 2 normale 0 1 0 rayon_interne 1.11 rayon_externe 1.18 }
anneau { centre -.8 -15 2 normale 0 1 0 rayon_interne 1.11 rayon_externe 1.18 }
anneau { centre 1.4 -15 2 normale 0 1 0 rayon_interne 1.11 rayon_externe 1.18 }
anneau { centre 3.6 -15 2 normale 0 1 0 rayon_interne 1.11 rayon_externe 1.18 }
anneau { centre 5.8 -15 2 normale 0 1 0 rayon_interne 1.11 rayon_externe 1.18 }
anneau { centre -3 -7 2 normale 0 1 0 rayon_interne 1.11 rayon_externe 1.18 }
anneau { centre -.8 -7 2 normale 0 1 0 rayon_interne 1.11 rayon_externe 1.18 }
anneau { centre 1.4 -7 2 normale 0 1 0 rayon_interne 1.11 rayon_externe 1.18 }
anneau { centre 3.6 -7 2 normale 0 1 0 rayon_interne 1.11 rayon_externe 1.18 }
anneau { centre 5.8 -7 2 normale 0 1 0 rayon_interne 1.11 rayon_externe 1.18 }
fin_bloc
// Une cage en guise de porte. Elle a été calculée à partir d'un algorithme
// L-Systems modifié qui génère des courbes de Von Koch. Le résultat est
// relativement intéressant.
matiere
{
texture
{
echantillon concentrique
ajuster 0 1 0
turbulence
{
cycle 7
amplitude 6
}
transition .8
rayon .5
rayon 2
matiere { diffuse Rouge speculaire 20 Blanc }
matiere { diffuse Chardon speculaire 20 Blanc }
}
}
bloc { ajuster 1.7 deplacer 0 12 5 }
#inclure cage.inc
bloc { pivoter 0 0 180 }
#inclure cage.inc
fin_bloc
bloc { pivoter 0 0 90 }
#inclure cage.inc
fin_bloc
bloc { pivoter 0 0 -90 }
#inclure cage.inc
fin_bloc
bloc { pivoter 0 90 0 }
#inclure cage.inc
fin_bloc
bloc { pivoter 0 -90 0 }
#inclure cage.inc
fin_bloc
fin_bloc