You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
290 lines
6.4 KiB
290 lines
6.4 KiB
/***************************************************************************
|
|
ball.pov - script for rendering Kolor Lines graphics
|
|
-------------------
|
|
begin : Fri May 19 2000
|
|
copyright : (C) 2000 by Roman Razilov
|
|
email : Roman.Razilov@gmx.de
|
|
***************************************************************************/
|
|
|
|
/***************************************************************************
|
|
* *
|
|
* This program is free software; you can redistribute it and/or modify *
|
|
* it under the terms of the GNU General Public License as published by *
|
|
* the Free Software Foundation; either version 2 of the License, or *
|
|
* (at your option) any later version. *
|
|
* *
|
|
***************************************************************************/
|
|
#version 3.0
|
|
|
|
// Objectname = Main View
|
|
// Objecttype = view
|
|
|
|
// This camera is build for ratio 451:277
|
|
#include "colors.inc"
|
|
#include "textures.inc"
|
|
#declare BallColor = Green
|
|
#include "clr.inc"
|
|
|
|
#declare CELLSIZE = 32
|
|
#declare PIXTIME = 10
|
|
#declare BALLDOWN = 3
|
|
#declare BALLSPACE = 4
|
|
|
|
#warning concat("XXXX clock:",str(clock,5,2),"\n")
|
|
|
|
#switch (clock)
|
|
// --------------------burning ball-------------------
|
|
#range (0,1.001)
|
|
|
|
#declare explosion = 1
|
|
#declare jump = 0
|
|
#declare n = 0
|
|
|
|
#declare t0 = 0
|
|
#declare t1 = 0.2
|
|
#declare t2 = 0.5
|
|
#declare t3 = 0.8
|
|
#declare t4 = 1
|
|
#declare tt = clock
|
|
#if ( tt = t0 )
|
|
//turbulence
|
|
#declare tur = 0
|
|
#declare trb = 0
|
|
#declare trf = 0
|
|
#declare pf = 0
|
|
#end
|
|
#if ( tt > t0 & tt <= t1 )
|
|
#declare tl = (tt - t0)/(t1-t0)
|
|
#declare tur = 3+(0.2-3)*tl
|
|
#declare trb = 0+(0-0)*tl
|
|
#declare trf = 1+(3-1)*tl
|
|
#declare pf = 0+(0.3-0)*t1
|
|
#end
|
|
#if ( tt > t1 & tt <= t2 )
|
|
#declare tl = (tt - t1)/(t2-t1)
|
|
#declare tur = 0.2+(0.5-0.1)*tl
|
|
#declare trb = 0+(1-0)*tl
|
|
#declare trf = 3+(1-3)*tl
|
|
#declare pf = 0.3+(0.2-0.3)*t1
|
|
#end
|
|
#if ( tt > t2 & tt <= t3 )
|
|
#declare tl = (tt - t2)/(t3-t2)
|
|
#declare tur = 0.5+(2-0.5)*tl
|
|
#declare trb = 1+(1-1)*tl
|
|
#declare trf = 1+(1-1)*tl
|
|
#declare pf = 0.2-(0.0-0.2)*t1
|
|
#end
|
|
#if ( tt > t3 )
|
|
#declare tl = (tt - t3)/(t4-t3)
|
|
#declare tur = 2+(5-2)*tl
|
|
#declare trb = 1+(1-1)*tl
|
|
#declare trf = 1+(0-1)*tl
|
|
#declare pf = 0.0-(0.0-0.0)*t1
|
|
#end
|
|
// ball position / size
|
|
#declare by = 0
|
|
#declare bh = CELLSIZE-2-BALLSPACE
|
|
#declare bw = CELLSIZE-2-BALLSPACE
|
|
#break
|
|
// ----------------borning ball----------------------
|
|
#range (5,6.001)
|
|
|
|
#declare explosion = 0
|
|
#declare jump = 0
|
|
|
|
// fire turbulence
|
|
#declare tur = 0
|
|
// trancperancy ball
|
|
#declare trb = 0
|
|
// trancperancy fire
|
|
#declare trf = 0
|
|
// lambda
|
|
#declare pf = 0
|
|
// relative clock
|
|
#declare tt = clock - 5
|
|
// y position
|
|
#declare by = 0
|
|
#declare r=sqrt(tt)
|
|
#declare bh = (CELLSIZE-2-BALLSPACE)*r
|
|
#declare bw = (CELLSIZE-2-BALLSPACE)*r
|
|
// normal
|
|
#declare n = (1-tt)*r*2
|
|
|
|
#break
|
|
|
|
// -------------jumping ball----------------------
|
|
#range (10,11.001)
|
|
#declare explosion = 0
|
|
#declare jump = 1
|
|
#declare tur = 0
|
|
#declare trb = 0
|
|
#declare trf = 0
|
|
#declare pf = 0
|
|
#declare n = 0
|
|
#declare tt = clock - 10
|
|
// ball free fall: y = -(g * t^2)/2
|
|
// ball jums on X*sin( sqrt(k)*(t0 - t1 + t ) )
|
|
// t whole motion time
|
|
// g - gravity acceleration
|
|
// A - frei movement amplitude
|
|
// BB way with deflation
|
|
#declare A = BALLDOWN
|
|
#declare B = BALLSPACE
|
|
#declare ta = PIXTIME
|
|
#declare k = (pi + 2*sqrt( B*(A+B))/A - acos( A/(A+2*B)) )/ta
|
|
#declare k = k*k
|
|
#warning concat("XXXX k:",str(k,5,2),"\n")
|
|
#declare g = k*A*A/(2*(A+B))
|
|
#warning concat("XXXX g:",str(g,5,2),"\n")
|
|
#declare t1 = sqrt(2*B/g)
|
|
#warning concat("XXXX t1:",str(t1,5,2),"\n")
|
|
#declare X = A*(A+2*B)/(2*(A+B))
|
|
#warning concat("XXXX X:",str(X,5,2),"\n")
|
|
|
|
#declare tc = PIXTIME - tt*PIXTIME
|
|
|
|
#warning concat("XXXX tc:",str(tc,5,2),"\n")
|
|
// ball position
|
|
#if (tc < t1)
|
|
#declare by = B/2 - g*tc*tc/2
|
|
#else
|
|
#declare by = -B/2 - g/k - X*cos( sqrt(k)*(ta-tc))
|
|
#end
|
|
#if ( by < -2 )
|
|
#declare bh=CELLSIZE-2+2*by
|
|
#declare bw = CELLSIZE-2-BALLSPACE+(-by-2)
|
|
#else
|
|
#declare bh = CELLSIZE-2-BALLSPACE
|
|
#declare bw = CELLSIZE-2-BALLSPACE
|
|
#end
|
|
|
|
#break
|
|
|
|
#else
|
|
#warning " ERROR, clock out of range !!! \n"
|
|
|
|
#end
|
|
|
|
|
|
#warning concat("XXXX clock:",str(clock,5,2),"\n")
|
|
|
|
#warning concat("XXXX tt:",str(tt,5,2),"\n")
|
|
|
|
|
|
|
|
|
|
|
|
camera
|
|
{
|
|
orthographic
|
|
location <0,0,-100>
|
|
look_at <0,0,0>
|
|
up (CELLSIZE-2)*y
|
|
right (CELLSIZE)*x
|
|
}
|
|
|
|
// Global settings
|
|
global_settings
|
|
{
|
|
ambient_light rgb<0.5,0.5,0.5>
|
|
}
|
|
light_source
|
|
{
|
|
<-400, 600, -600>
|
|
color White
|
|
cylinder
|
|
radius 200
|
|
falloff 1000
|
|
tightness 1
|
|
point_at <0,0,0>
|
|
}
|
|
// Background
|
|
background
|
|
{
|
|
color rgb<.5,.5,.5>
|
|
}
|
|
|
|
// fire
|
|
#if (explosion = 1)
|
|
sphere { 0, 1
|
|
pigment { color rgbt<0,0,0,1>
|
|
}
|
|
halo {
|
|
emitting
|
|
spherical_mapping
|
|
poly
|
|
max_value 40
|
|
exponent 0.1
|
|
linear
|
|
turbulence tur
|
|
// phase pf
|
|
lambda 2-pf
|
|
frequency 1
|
|
octaves 6
|
|
color_map {
|
|
[ 0 color rgbt <1, 0, 0, 1> ]
|
|
[ 0.2 color rgbt <1, 0, 0, 1-1*trf> ]
|
|
[ 0.5 color rgbt <1, 0, 0, 1-3*trf> ]
|
|
[ 0.9 color rgbt <1, 1, 0, 1-4*trf> ]
|
|
[ 1 color rgbt <1, 1, 0.5, 1-6*trf> ]
|
|
}
|
|
samples 30
|
|
}
|
|
hollow
|
|
scale<15,15,15>
|
|
translate <-0.5,-0.5,0>
|
|
}
|
|
#end
|
|
// Ball
|
|
#if ( trb < 1 & bh > 0 )
|
|
sphere
|
|
{
|
|
<0,0,0>,1
|
|
pigment {
|
|
|
|
wood
|
|
// agate_turb 0.5
|
|
turbulence .1
|
|
frequency 2
|
|
// lambda
|
|
rotate <30,10,15>
|
|
color_map {
|
|
[0.5 BallColor transmit trb]
|
|
[0.3 BallColor*0.95 transmit trb]
|
|
[0.2 BallColor*0.9 transmit trb]
|
|
}
|
|
}
|
|
no_shadow
|
|
#if ( n > 0 )
|
|
normal
|
|
{
|
|
//wood 0.5
|
|
//frequency 2
|
|
//turbulence .1
|
|
//rotate <30,10,15>
|
|
bumps n
|
|
scale 0.3
|
|
}
|
|
#end
|
|
finish {
|
|
ambient 0.3
|
|
diffuse 0.8
|
|
specular 1
|
|
roughness 0.001
|
|
reflection .1
|
|
phong 0.9 * ( 1-trb)
|
|
phong_size 60
|
|
|
|
}
|
|
#if (trb > 0)
|
|
hollow
|
|
#end
|
|
scale <bw/2,bh/2,bw/2>
|
|
translate <-0.5,by - 0.5,0>
|
|
|
|
#warning concat("XXXX by:",str(by,5,2),"\n")
|
|
#warning concat("XXXX bh:",str(bh,5,2),"\n")
|
|
#warning concat("XXXX bw:",str(bw,5,2),"\n")
|
|
}
|
|
#end
|