46
Anim8or v0.98 Discussion Forum / Re: Avi materials
« on: November 16, 2008, 03:09:07 pm »
I believe Steven mentioned something about him working on avi or animated materials for the upcoming version. Keep your fingers crossed
Ian Ross has just released a book on Anim8or. It's perect for a beginner and a good reference for experienced users. It contains detailed chapters on every aspect, with many examples. Get your own copy here: "Anim8or Tutorial Book"

/*************************************************/
/*** Script in progress made to flatten points ***/
/*** Created by: VBSmiles ***/
/*************************************************/
/*** declaration ***/
#command("object"); /*1*//* To start as menu item ? */
point3 $c_point, $ModLoc; /*2*//* current point */
float $dist; /*6*//* Distance between points and ... */
shape $model;
int $test, $i, $NP;
file $file;
string $Output;
/*** Initialization ***/
$model = project.curObject.LookupShape("mesh01");
$ModLoc = $model.loc;
/*** Get the number of points in model ***/
if ($model != NULL)
{
$model.Open();
$NP = $model.GetNumPoints();
for $i = 0 to $NP do
{
/* Get the selected point */
$test = $model.GetPointSelected($i);
/*** if selected then store it's values ***/
if ($test == 1)
{
$c_point = $model.GetPoint ($i);
$c_point.y = $ModLoc.y;
/*** move the point ***/
$model.SetPoint ($i, $c_point);
}
}
$model.Close();
refresh();
$file.open("$console", "w");
$Output = PrintToString("Parent Location:%e", $ModLoc.y);
$file.print("\n" +$Output+ "\n");
$file.close;
} else
{
$file.open("$console", "w");
$file.print("\n\n where the hell is the model? \n\n");
$file.close;
}/*************************************************/
/*** Script in progress made to flatten points ***/
/*** Created by: VBSmiles ***/
/*************************************************/
/*** declaration ***/
#command("object"); /*1*//* To start as menu item ? */
point3 $c_point; /*2*//* current point */
float $dist; /*6*//* Distance between points and ... */
shape $model;
int $test, $i, $NP;
file $file;
string $Output;
/*** Initialization ***/
$model = project.curObject.LookupShape("mesh01");
/*** Get the number of points in model ***/
if ($model != NULL)
{
$model.Open();
$NP = $model.GetNumPoints();
for $i = 0 to $NP do
{
$Output = PrintToString("%d", $NP);
$file.open("$console", "w");
$file.print("\n\n Value of $NP: " +$Output+ "\n\n");
$Output = PrintToString("%d", $i);
$file.print("\n\n Value of $i: " +$Output+ "\n\n");
$file.close;
/* Get the selected point */
$test = $model.GetPointSelected($i);
/*** if selected then store it's values ***/
if ($test == 1)
{
$c_point = $model.GetPoint ($i);
/*** reset it's x componenet to 0 ***/
$c_point.y = 0;
/*** move the point ***/
$model.SetPoint ($i, $c_point);
}
}
$model.Close();
refresh();
} else
{
$file.open("$console", "w");
$file.print("\n\n where the hell is the model? \n\n");
$file.close;
}

A common mistake of mine. Maybe I should use my VB compiler to code. It makes those fixes by itself. Just too lazy to load it onto the computer.
VBSmiles, have you tried taking out the glass in the circles of your lamp and just keep the green cube ? Your image is rather dark so maybe you would get your shadows without anybody noticing that the glass is missing.