Final Animation Still Images and Code

Coals:

Uwave (Creates wave effect)

if(((frame%120)==0)||(frame==1))

Goal=rand(.33);

uWave += (FinalCoalShader1_Goal - uWave)/(120-(frame%120));

Ramp Position (Changes Redness)

CoalRamp.position (.99 - ((pow(Temperature,0.33)-8.43)/5.64));

Noise (Creates hot spots)

Coal Noise = (pow(Temperature,.5)-24.4)/20;

Temperature

if((Wind == on)&&(Temperature<1190))  Heating

Temperature += WindSpeed/15;

else if(Temperature > 5)  Cooling With Newton's Law

Temperature = 90 +(Temperature - 90)*exp(-.00022667);

Glow Intensity (Based on approximations from research on glow temperatures)

CoalShader1.glowIntensity = .1 + (.0005833)*(coals1.Group_Temp - 600);

Lantern:

lanternPointLight1.change = frame%6; (counter)

if(lanternPointLight1.change == 0) 

{

lanternPointLight1.intensity = 6; (flicker back to default)

lanternPointLight1.intensity2 = 2+(deg_to_rad(rand(180*rand(2)))); (calculate new goal)

}

else lanternPointLight1.intensity +=      (lanternPointLight1.intensity2-lanternPointLight1.intensity)/(6-lanternPointLight1.change); (move closer to goal)

 

Steam:

If the hot rod of steel is plunged into the water trough and left the the system will eventually reach a stable state. The temperature of both the water and the steel in the stable state will be the same. The stable state temperature is derived from the following equation :

FT = ((Mw * Cw * ITw) + (Mr * Cr * ITr)) / ((Mw * Cw) + (Mr * Cr));
       where FT is the Final Temperature,
       Mw is the mass of Water
       Cw is the specific heat of Water in 
       ITW is the Inital Temperature of the Water
       Mr is the mass of the Rod
       Cr is the specific heat of steel
       ITr is the initial temperature of the rod       

The rod temperature approaches this stable state temperature along an exponential curve.

Tr = FT + ((FT - ITr)*(2^(-1/time)))

The water temperature approaches the stable state temperature along a logarithmic curve

Tw = FT - ((FT - ITw)*(2^(-1/time)))

The rate of steam emission is dependant on the temperature of the water, temperature of the steel rod and the surface area of the sword.

The speed at which the particles are emitted is high initially and then drops of with time.

Sword Master:

 

Full Scene:

Sword:

Temperature

if((contact == on)&&(Temperature<1190))  Heating

Temperature = Temperature + (CoalTemp-Temperature)*exp(-.00022667);

else if(Temperature > 5)  Cooling With Newton's Law

Temperature = 90 + (Temperature - 90)*exp(-.00022667);

Glow Intensity (Based on research of colors and temperatures)

if(temperature > 600)

glowIntensity = (Temperature-600)/100;

Color (Based on research of colors and temperatures)

if(temperature > 600)

{

Red = .6+(Temperature-600)/100;

Green = .7-(Temperature-600)/80;

Blue = .7-(Temperature-600)/80

}