Документ взят из кэша поисковой машины. Адрес оригинального документа : http://star.arm.ac.uk/~csj/movies/povray/stars.inc Дата изменения: Fri Mar 29 18:09:21 2002 Дата индексирования: Tue Oct 2 07:47:25 2012 Кодировка: Поисковые слова: р п р п р п р п

/* Stars

declaration of different stellar sources for use
in making binary merger movies.

Shining_Dwarf_Core
Shining_Dwarf_Atmos
Shining_Dwarf_Light
Shining_Dwarf_Globe
Shining_Dwarf
Accretion_Core
Accretion_Envelope
Accretion_Fragment
Merger_Envelope

Dr C.Simon Jeffery
Armagh Observatory
2001 July

*/


#declare Shining_Dwarf_Core = sphere{
<0,0,0>, 0.99 hollow on
interior{
media{
absorption rgb<0.0, 0.0, 0.0>
scattering { 5 rgb<1.0, 1.0, 1.0> eccentricity +0.1 }
density { spherical
color_map{
[0.00 rgb <0,0,0>]
[0.05 rgb <0.1,0.1,0.5>]
[0.2 rgb <0.2,0.2,0.6>]
[0.5 rgb <0.5,0.5,0.8>]
[0.7 rgb <0.6,0.6,0.85>]
[0.9 rgb <0.7,0.7,0.95>]
[1.0 rgb <1.0,1.0,1.0>]
} } } }
texture {
pigment {color White 1.00 filter 1.00}
finish {
reflection 0.0
} }
}

#declare Shining_Dwarf_Atmos = difference{
sphere{ <0,0,0>, 1 }
sphere{ <0,0,0>, 0.99 }
hollow on
interior{
media{
absorption rgb<0., 0.05, 0.1>
scattering { 5 rgb<0.4, 0.3, 0.5> eccentricity +0.3 }
density { spherical
color_map{
[0.00 rgb <0,0,0.4>]
[0.01 rgb <0.1,0.1,0.5>]
[0.03 rgb <0.2,0.2,0.6>]
[0.1 rgb <0.3,0.2,0.7>]
[0.2 rgb <0.5,0.5,0.8>]
[0.5 rgb <0.6,0.6,0.85>]
[0.7 rgb <0.7,0.7,0.95>]
[1.0 rgb <1.0,1.0,1.0>]
} } } }
texture {
pigment {color White 1.00 filter 1.00}
finish {
reflection 0.0
} }
}

#declare Shining_Dwarf_Light = light_source { <0,0,0> color rgb<1.,1.,1.> }

#declare Shining_Dwarf_Globe = light_source {
<0,0,0> color rgb<1.,1.,1.>
looks_like {
sphere {
<0,0,0>, 0.10 hollow on
pigment { color White 1.0 filter 1.0 }
}
}
}

#declare Shining_Dwarf = union{
object { Shining_Dwarf_Core scale 1.0 }
object { Shining_Dwarf_Light scale 1.0 }
}



#declare Accretion_Core = sphere {
<0,0,0>, 0.99 hollow on
interior{
media{
absorption rgb<0.0, 0.0, 0.0>
scattering { 5 rgb<1.0, 1.0, 1.0> eccentricity +0.1 }
density { spherical
color_map{
[0.00 rgb <0,0,0>]
[0.05 rgb <0.1,0.1,0.5>]
[0.2 rgb <0.2,0.2,0.6>]
[0.5 rgb <0.5,0.5,0.7>]
[0.7 rgb <0.6,0.6,0.75>]
[0.9 rgb <0.7,0.7,0.8>]
[1.0 rgb <0.7,0.7,0.8>]
} } } }
texture {
pigment {color White 1.00 filter 1.00}
finish {
reflection 0.0
} }
}

#declare Merger_Envelope = sphere {
<0,0,0>, 1 hollow
interior{
media{
absorption rgb<0.9, 0.9, 0.99>
// emission rgb<1.00, 0.75, 0.90>
scattering { 5 rgb<1., 1., 1.> eccentricity +0.1 }
density { spherical
color_map {
[0.0 rgb <0,0,0.0>]
[0.1 rgb <0.03,0.01,0.01>]
[1.0 rgb <0.06,0.02,0.02>]
// [1.0 rgb <0.10,0.04,0.04>]
// [1.0 rgb <0.15,0.05,0.05>]
// [0.7 rgb <0.12,0.15,0.20>]
// [0.9 rgb <0.20,0.20,0.25>]
// [1.0 rgb <0.25,0.25,0.30>]
// [1.0 rgb <0.30,0.30,0.40>]
} } } }
texture {
pigment {color White 1.00 filter 1.00}
finish {
reflection 0.0
} }
}

#declare Accretion_Envelope = sphere {
<0,0,0>, 1 hollow
interior{
media{
absorption rgb<0.9, 0.9, 0.99>
// emission rgb<1.00, 0.75, 0.90>
scattering { 5 rgb<1., 1., 1.> eccentricity +0.1 }
density { spherical
color_map {
[0.0 rgb <0,0,0.0>]
[0.1 rgb <0.03,0.03,0.05>]
[0.3 rgb <0.05,0.05,0.08>]
[0.6 rgb <0.07,0.07,0.10>]
[1.0 rgb <0.10,0.10,0.15>]
// [0.7 rgb <0.12,0.15,0.20>]
// [0.9 rgb <0.20,0.20,0.25>]
// [1.0 rgb <0.25,0.25,0.30>]
// [1.0 rgb <0.30,0.30,0.40>]
} } } }
texture {
pigment {color White 1.00 filter 1.00}
finish {
reflection 0.0
} }
scale <5,1.5,5>
}

#declare Accretion_Fragment = intersection {
box { <0,-0.5,0>, <1.5,+0.5,1.5> hollow }
torus { 0.33, 0.1 hollow }
interior{
media{
absorption rgb<0.1, 0.1, 0.1>
// emission rgb<1.00, 0.75, 0.90> // clouds will be very hot.. thermal emission
scattering { 3 rgb<1., 1., 1.> } // use Rayleigh scattering
density { spherical
color_map {
[0.0 rgb <0,0,0.0>]
[0.1 rgb <0.03,0.03,0.05>]
[0.3 rgb <0.05,0.05,0.08>]
[0.6 rgb <0.07,0.07,0.10>]
[1.0 rgb <0.10,0.10,0.15>]
} } } }
texture {
pigment {color White 1.00 filter 0.90}
finish {
reflection 0.0
} }
// scale <2,1,2>
}