|
Document & eyewitness series
All Automatic Image Production Unit:2wb_bva2
CRT projection of a 4D-Camera shot
Orbital clock variation on 2wb_bvap
//Declaration of variables
/Determination of CLUT
//Colormap0
#declare Col00 = 0.8660
#declare Col01 = 0.1120
#declare Col02 = 0.0570
//Colormap1
#declare Col10 = 0.4880
#declare Col11 = 0.5550
#declare Col12 = 0.5000
//Colormap2
#declare Col20 = 0.6690
#declare Col21 = 0.0880
#declare Col22 = 0.1310
//Colormap3
#declare Col30 = 0.2330
#declare Col31 = 0.0110
#declare Col32 = 0.8930
//Determination of transformation
//and some global vars
//Fractrans0 #declare TRA00 = 0.0880 #declare TRA01 = 0.0830 #declare TRA02 = 0.7610 //Fractrans1
#declare TRA10 = 0.5880 #declare TRA11 = 0.8000 #declare TRA12 = 0.5390 //Fractrans2 #declare TRA20 = 0.2160 #declare TRA21 = 0.5990
#declare TRA22 = 0.1000
//Fractrans3
#declare TRA30 = 0.9850
#declare TRA31 = 0.5230
#declare TRA32 = 0.2040
//Fractrans4
#declare TRA40 = 0.2740
#declare TRA41 = 0.3030
#declare TRA42 = 0.5660
//Fractrans5
#declare TRA50 = 0.0010
#declare TRA51 = 0.1560
#declare TRA52 = 0.8080
//Fractrans6
#declare TRA60 = 0.6490
#declare TRA61 = 0.5540
#declare TRA62 = 0.7680
//Fractrans7
#declare TRA70 = 0.9530
#declare TRA71 = 0.8140
#declare TRA72 = 0.8070
//Fractrans8
#declare TRA80 = 0.2870
#declare TRA81 = 0.8470
#declare TRA82 = 0.4890
//Determination of fractal objects
//A_0 - 4 = q(quaternion) = x+yi+zj+wk
//as fourdimensional extension of the
//complex numbers.
//seen as a pars pro toto function it gives a
//detailed view of the inner state of the void (*object) //at a certain time
and
a certain space.
//Fractal0
#declare A00 = 0.2970
#declare A01 = 0.2490
#declare A02 = 0.2240
#declare A03 = 0.1150
//Fractal1
#declare A10 = 0.7240
#declare A11 = 0.2020
#declare A12 = 0.1370
#declare A13 = 0.0580
//Fractal2
#declare A20 = 0.8050
#declare A21 = 0.5780
#declare A22 = 0.3090
#declare A23 = 0.2730
#include "mapdec.inc"
//Redeclaration of CLUT
#declare CM0=
color_map{
[0.057 MCOL00]
[0.088 MCOL01]
[0.112 MCOL02]
[0.131 MCOL03] [0.488 MCOL04]
[0.500 MCOL05]
[0.555 MCOL06]
[0.669 MCOL07]
[0.866 MCOL08]
}
#declare CM1=
color_map{
[0.011 MCOL10]
[0.083 MCOL11]
[0.088 MCOL12]
[0.233 MCOL13]
[0.539 MCOL14]
[0.588 MCOL15]
[0.761 MCOL16]
[0.800 MCOL17]
[0.893 MCOL18]
}
#declare CM2=
color_map{
[0.100 MCOL20]
[0.204 MCOL21]
[0.216 MCOL22]
[0.274 MCOL23]
[0.303 MCOL24]
[0.523 MCOL25]
[0.566 MCOL26]
[0.599 MCOL27] [0.985 MCOL28]
}
#declare CM3= color_map{
[0.001 MCOL30]
[0.156 MCOL31]
[0.554 MCOL32]
[0.649 MCOL33]
[0.768 MCOL34]
[0.807 MCOL35]
[0.808 MCOL36]
[0.814 MCOL37]
[0.953 MCOL38]
}
>
//Determination of Viewpoint
for clock = .333
->
camera
location <.0, .0,-10.0>
up y
right x
angle 7
look_at <0,0,0>
rotate<45*clock*clock,-80*clock,0>
//Determination of Lightning
light
<.0, 0.0,-10.0> color rgb 0.98
rotate <12,5,0>
rotate<45*clock*clock,-80*clock,0>
// Berlin Inselstr.13
// Date : 1996:25:7
// Time : 16:00:24.09
// File : 2wb_bvap.inc
// Procurator: H.C.Wilp
|