targ = argument0;
if targ.invData[4] > 1
{
     targ.invData[4] -= 1;
}
else if targ.invData[4] == 1
{
     with targ invSlotClear();
}

timer = 0;
canRegen = 1;
active = 1;

invData[7] = 30//7;
invData[8] = invData[7];
invData[11] = 5;
invData[13] = 0;
invData[14] = 0;
canDrop = 1;

item = objItemFurnaceStone;

fuelTimer = 0;
fuelTimerMax = 0;
furnPower = 0;
furnPowerMax = 300;

maxFurnaceResult = 0;
maxFuelItems = 0;

furnaceItem = instance_create(objInv.inv_x + (objInv.cell_width * 3.5), objInv.inv_y - objInv.cell_height*4, objInvCell);
furnaceItem.visible = 1;

furnaceFuel = instance_create(objInv.inv_x + (objInv.cell_width * 3.5), objInv.inv_y - objInv.cell_height*2, objInvCell);
furnaceFuel.visible = 1;

furnaceResult = instance_create(objInv.inv_x + (objInv.cell_width * 6), objInv.inv_y - objInv.cell_height*3, objInvCell);
furnaceResult.is_cell = 0;
furnaceResult.visible = 1;

tI = furnaceItem.invData[1];
iA = 0;

furnSetItems('Stone');

fuelTimer = max(fuelTimer - 1, 0);

if tI != furnaceItem.invData[1]
{
     tI = furnaceItem.invData[1];
     furnPower = 0;
}

if furnaceFuel.invData[1] == ''
&& fuelTimer == 0
{
     furnPower = 0;
}

for(i = 1; i <= maxFurnaceResult; i += 1)
{
     if furnaceItem.invData[1] == furnItems[i, 0]
     {
         if furnaceResult.invData[1] == ''
         {
             if furnaceFuel.invData[4] != 0
             {
                 if fuelTimer == 0
                 {
                     for(i = 1; i <= maxFuelItems; i += 1)
                     {
                         if furnaceFuel.invData[1] == fuelItems[i, 0]
                         {
                             fuelTimerMax = fuelItems[i, 1];
                             invSlotReduce(furnaceFuel);
                             fuelTimer = fuelTimerMax;
                             break;
                         }
                     }   
                 }
             }
             if fuelTimer > 0
             {
                 if furnPower != furnPowerMax
                 {
                     furnPower += 1;
                 }
                 else
                 {
                     for(i = 1; i <= maxFurnaceResult; i += 1)
                     {
                         if furnaceItem.invData[1] == furnItems[i, 0]
                         {
                             invItemSet(furnItems[i, 1], 1, furnaceResult);
                             invSlotReduce(furnaceItem);
                             furnPower = 0;
                             break;
                         }
                     }
                 }
             }
         }
         else if furnaceResult.invData[1] != ''
         {
             for(i = 1; i <= maxFurnaceResult; i += 1)
             {
                 if furnaceItem.invData[1] == furnItems[i, 0] && furnaceResult.invData[1] == furnItems[i, 1]  
                 {
                     iA = furnItems[i, 2];
                     break;
                 }
             }
             if iA <= (furnaceResult.invData[10] - furnaceResult.invData[4])
             {
                 if furnaceFuel.invData[4] != 0
                 {
                     if fuelTimer == 0
                     {
                         for(i = 1; i <= maxFuelItems; i += 1)
                         {
                             if furnaceFuel.invData[1] == fuelItems[i, 0]
                             {
                    fuelTimerMax = fuelItems[i, 1];
                    invSlotReduce(furnaceFuel);
                    fuelTimer = fuelTimerMax;
                    break;
                             }
                         }   
                     }
                 }
                 if fuelTimer > 0
                 {
                     if furnPower != furnPowerMax
                     {
                         furnPower += 1;
                     }
                     else
                     {
                         for(i = 1; i <= maxFurnaceResult; i += 1)
                         {
                             if furnaceItem.invData[1] == furnItems[i, 0] && furnaceResult.invData[1] == furnItems[i, 1]  
                             {
                    furnaceResult.invData[4] += furnItems[i, 2];
                    invSlotReduce(furnaceItem);
                    furnPower = 0;
                    exit;
                             }
                         }
                     }    
                 }
             }
             else
             {
                 furnPower = 0;
             }
         }
     }
}

with furnaceItem instance_destroy();
with furnaceFuel instance_destroy();
with furnaceResult instance_destroy();
event_inherited();

if !active exit;

xx = objInv.inv_x + (objInv.cell_width * 3.5) + 20;
yy = objInv.inv_y - objInv.cell_height*2 - 22;

draw_sprite_ext(sprFurnFuel, 0, view_xview + (xx), view_yview + (yy), 1, 1, 90, c_white, 1);
if fuelTimer > 0
{
     draw_sprite_general(sprFurnFuel, 1, 0, 0, ((fuelTimer / fuelTimerMax) * sprite_get_width(sprFurnFuel)),  
     sprite_get_height(sprFurnFuel), view_xview + (xx - 13), view_yview + (yy + 13), 1, 1, 90, c_white, c_white, c_white, c_white, 1);
}

xx = (objInv.inv_x + (objInv.cell_width * 3.5)) + 70;
yy = (objInv.inv_y - objInv.cell_height*2) - 16;

draw_sprite_ext(sprFurnPower, 0, view_xview + xx, view_yview + yy, 1, 1, 0, c_white, 1);
if fuelTimer > 0
{
     draw_sprite_general(sprFurnPower, 1, 0, 0, ((furnPower / furnPowerMax) * sprite_get_width(sprFurnPower)),  
     sprite_get_height(sprFurnPower), view_xview + (xx - 22), view_yview + (yy - 16), 1, 1, 0, c_white, c_white, c_white, c_white, 1);
}

event_inherited();

if argument0 == 'Stone'
{
     furnItemAdd('Iron Ore', 'Iron Bar', 1);
     furnItemAdd('Silver Ore', 'Silver Bar', 1);

     furnFuelAdd('Coal', 900);
     furnFuelAdd('Board', 450);
     furnFuelAdd('Stick', 300);
}

maxFurnaceResult += 1;
furnItems[maxFurnaceResult, 0] = argument0;
furnItems[maxFurnaceResult, 1] = argument1;
furnItems[maxFurnaceResult, 2] = argument2;

maxFuelItems += 1;

fuelItems[maxFuelItems, 0] = argument0;
fuelItems[maxFuelItems, 1] = argument1;