Document & Eyewitness 2wb_bva2

Document & Eyewitness 2wb_bva2

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
//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