off0 = new Image();
off0.src = "balls/blank.gif";
off1 = new Image();
off1.src = "balls/ball1.gif";
off2 = new Image();
off2.src = "balls/ball2.gif";
off3 = new Image();
off3.src = "balls/ball3.gif";
on0 = new Image();
on0.src = "balls/blank.gif";
on1 = new Image();
on1.src = "balls/ball1on.gif";
on2 = new Image();
on2.src = "balls/ball2on.gif";
on3 = new Image();
on3.src = "balls/ball3on.gif";

//	Declare the total score and the winner variable.
//
total = 0;
winner = 0;

//	Bottom row array, used by the 
//	findAdjacent2() function.

bottom = new Array();
n = 0;
for (i = 0; i < 15; i++) 
{
  bottom[i] = n;
  n += 10;
}

//	Top row array, used by the 
//	findAdjacent2() function.

head = new Array();
n = 9;
for (i = 0; i < 15; i++) 
{
  head[i] = n;
  n += 10;
}

//	Main array, randomly seeds all
//	coordinates with a number
//	from 1-3.

main = new Array();
for (i = 0; i < 150; i++) 
{
  main[i] = random();
}

//	The random number function. Change the
//	ballCount variable to add more colors
//	(which would make the game harder).
//	If you do this you must preload more images.

function random() 
{
  ballCount = 3;
  randomNum = Math.floor((Math.random() * ballCount));
  randomNum++;
  return randomNum;
}

//	Uses findAdjacent() to find connected balls
//	of the same color. Called on mouseover, changes
//	the ball image to alert user of how many
//	balls will be removed. 

function onBall(numba) 
{
  if (main[numba] != 0) 
  {
    crayon = main[numba];
    findAdjacent(numba);
    if (adj.length > 1) 
	{
      for (n = 0; n < adj.length; n++) 
	  {
        document["img" + adj[n]].src = eval("on" + crayon + ".src");
        document.f1.click.value = (adj.length-2)*(adj.length-2);
      }
    }
  }
}

//	Uses findAdjacent() to find connected balls
//	of the same color. Turns off the alternate
//	balls on mouseout.

function offBall(numba) 
{
  if (main[numba] != 0) 
  {
    crayon = main[numba];
    findAdjacent(numba);
    if (adj.length > 1) 
	{
      for (n = 0; n < adj.length; n++) 
	  {
        document["img" + adj[n]].src = eval("off" + crayon + ".src");
        document.f1.click.value = 0;
      }
    }
  }
}

//	Uses findAdjacent() to find connected balls
//	of the same color. Removes selected balls by
//	changing the value to 0, cleans up columns
//	using slideBalls(), updates the game board
//	with startUp(), adjusts the score, and checks
//	to see if the game board is cleared with
//	checkwinner() or if all the removable pieces
//	are taken with checkLoser().

function clickBall(numba) 
{
  var message;
  if (main[numba] != 0) 
  {
    findAdjacent(numba);
    if (adj.length > 1) 
	{
      for (n=0; n<adj.length; n++) 
	  {
        main[adj[n]] = 0;
      }
      slideBalls();
      startUp();
      total = (adj.length - 2) * (adj.length - 2) + total;
      document.f1.score.value = total;
      document.f1.click.value = 0;
      winTotal = total + 1000;
      if (checkWinner()) 
	  {
        stopTimer();
      //Allows you to write high scores to a file.
	    message="\n\tCONGRATULATIONS ! ! !\n\n\tYou scored " +total+ " points.\n\n";
        alert(message);
		document.f1.submit();
        winner = 1;
      }
      q = 0;
      checkLoser();
      if (q == 60 && winner == 0) 
	  {
        stopTimer();
        message="\n\tGAME OVER ! ! !\n\n\tYou scored " +total+ " points.\n\n";
        alert(message);
		document.f1.submit();
      }
    }
  }
}

//	Rolls through the remaining balls
//	and checks to see if any more can
//	be removed with smallAdjacent().
//	If you set this function to check
//	much higher than main[60] Netscape
//	will give you a "too much recursion"
//	error, so there is a small chance that
//	this function will think the game is
//	over before it really is.

function checkLoser() 
{
  if (q == 60) 
  {
    return true
  }
  if (main[q] != 0) 
  {
    if (smallAdjacent(q)) 
	{
      return false;
    }
  }
  q++;
  checkLoser();
}

//	Checks to see if the game was won.
//	Simply checks main[0], and if it
//	equals 0 returns true

function checkWinner() 
{
  if (main[0] == 0) 
  {
    return true;
  }
}

//	A smaller faster version of
//	findAdjacent2(). Runs through
//	the balls until it finds the first
//	set of adjacent balls. Used by
//	checkLoser() to determine if the
//	game is over.

function smallAdjacent(numba) 
{
  isBottom = 0;
  isHead = 0;

  for (n = 0; n < 20; n++) 
  {
    if (numba == head[n]) 
	{
      isHead = 1;
    }
  }

  for (n = 0; n < 20; n++) 
  {
    if (numba == bottom[n]) 
	{
      isBottom = 1;
    }
  }

  if (main[numba + 1] == main[numba] && isHead != 1) 
  {
    return true;
  }

  if (main[numba + 10] == main[numba]) 
  {
    return true;
  }
  
  if (main[numba - 1] == main[numba] && isBottom != 1) 
  {
    return true;
  }

  if (main[numba - 10] == main[numba]) 
  {
    return true;
  }
  
  return false;
}

//	Slides all non-0 balls down the column
//	and places the zeroed balls at the top
//	of each column.
//	If all balls in a column are marked with
//	a 0, all subsequent columns are moved left
//	and the last column is zeroed out.

function slideBalls() 
{
  change = 0;
  for (i = 0; i < 15; i++) 
  {
    blankCount = 0;
    column = new Array();
    newColumn = new Array();
    for (c = 0; c < 10; c++) 
	{
      column[c] = main[c + change];
    }
    for (c = 0; c < 10; c++) 
	{
      if (column[c] == 0) 
	  {
        blankCount++;
        newColumn[10-blankCount] = 0;
      }
      else 
	  {
        newColumn[c - blankCount] = column[c];
      }
    }
    
	for (c = 0; c < 10; c++) 
	{
      main[c + change] = newColumn[c];
    }
    
	if (blankCount == 10) 
	{
      for (c = change; c < 150; c++) 
	  {
        main[c] = main[c + 10];
      }
      for (c = 140; c < 150; c++) 
	  {
        main[c] = 0;
      }
      change -= 10;
    }
    change += 10;
  }
}

//	Draws the balls on the game board based
//	on the values of the "main" Array.
//	0=blank  1=red  2=yellow  3=blue

function startUp() 
{
  document.f1.score.value = 0;
  for (i = 0; i < main.length; i++) 
  {
    crayon = main[i];
    document["img" + i].src = eval("off" + crayon + ".src");
  }
}

//	Take the ball which was clicked and
//	finds all connected balls of the same
//	color with findAdjacent2().

function findAdjacent(numba) 
{
  adj = new Array();
  adj[0] = numba;
  i = 0;
  c = 0;
  findAdjacent2(adj[c]);
}

//	Rolls through the "adj" Array and adds adjacent balls of
//	the same color to the "adj" Array.

//	Checks in this order: up, right, down, left
//	up=+1  right=+10  down=-1  left=-10.

//	isBottom and isHead checks to see if the ball
//	in question is on the top row or the bottom row.
//	If the ball in question is on the bottom row, the
//	down(-1) check is disabled, if it is on the top row
//	up(+1) is disabled.

//	Uses isAdjacent() to check whether or not the ball
//	in question is allready included in the "adj" Array.
//	Does not add the ball to the array if isAdjacent() returns
//	false.

function findAdjacent2(numba) 
{
  isBottom = 0;
  isHead = 0;
  for (n = 0; n < 20; n++) 
  {
    if (numba == head[n]) 
	{
      isHead = 1;
    }
  }
  
  for (n = 0; n < 20; n++) 
  {
    if (numba == bottom[n]) 
	{
      isBottom = 1;
    }
  }

  if (main[numba+1] == main[numba] && isHead != 1 && isAdjacent(numba+1)) 
  {
    i++;
    adj[i] = numba + 1;
  }
  
  if (main[numba+10] == main[numba] && isAdjacent(numba+10)) 
  {
    i++;
    adj[i] = numba + 10;
  }
  
  if (main[numba-1] == main[numba] && isBottom != 1 && isAdjacent(numba-1)) 
  {
    i++;
    adj[i] = numba - 1;
  }

  if (main[numba-10] == main[numba] && isAdjacent(numba-10)) 
  {
    i++;
    adj[i] = numba - 10;
  }

  c++;
  
  if (c == adj.length) 
  {
    blah = 500;
  }
  else 
  {
    findAdjacent2(adj[c]);
  }
}

//	Rolls through the "adj" Array, if the ball
//	in question is allready counted returns false.

function isAdjacent(numba) 
{
  isAdj = 1
  for (n=0; n<adj.length; n++) 
  {
    if (adj[n] == numba) 
	{
      isAdj = 0
    }
  }
  if (isAdj == 1) 
  {
    return true;
  }
  else 
  {
    return false;
  }
}


var t,tt,ttt
tt = 0
ttt=0

function timer()
{
  tt++
  document.f1.time.value = tt
  ttt = setTimeout("timer()",1000) 
}

function startTimer()
{
  clearTimeout(ttt)
  timer() 
}

function stopTimer()
{
   clearTimeout(ttt)
   //ttt = 0
}