home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
OS/2 Shareware BBS: 10 Tools
/
10-Tools.zip
/
pose1os2.zip
/
EXAMPLES
/
CHASE
/
SCENE1
/
BALL7.SIM
< prev
next >
Wrap
Text File
|
1995-05-06
|
492b
|
31 lines
init
{
points["chase\misc\chase.pnt"];
index = 1;
x = points[1];
y = points[2];
z = points[3];
radius = .10;
pigment.color = "Red";
pigment.filter = 0.6;
finish.phong = .8;
start_frame = 13;
}
eval {
if(frame < start_frame)
return;
x = points[index];
y = points[index + 1];
z = points[index + 2];
index += 3;
if(index > 450) // there are 150 points x 3 vectors
index -= 3;
}