// 03-012-15 - moved js code to wordcode.js file
// 230525 - fix faulty word completion, must press 1st then last letter
   aboxtitle="Word Puzzle";
   splashscreen='<img src="word.png" class="splashimg" alt="" />';
// requires words.js
// puzzle dimensions
rowsize=20; // num of letters in row
colsize=14 // num of letters in column
twoclicks=0 // don't checkword till twoclicks
maxwords=words.length;

// split word list into two halves one for horizontal placement one for vertical placement
// allow for odd numbered lists
halfwords = Math.floor(maxwords / 2)
if(halfwords!=maxwords/2){halfwords=halfwords+1}

startword='';
finishword='';
timetaken=0; //set timetaken as global
newelement="<div id='cluetitle'>Clues</div>";

// preload sounds
 soundfiles=['correct1.mp3','wrong1.mp3'];
 for (i=0;i<soundfiles.length;i++){soundfiles[i]= new Object();}
 
wordloc=new Array(); //array of word locations

function locatehword(){  // place words in table
for(items=0;items<halfwords;items++)
   {do {flag=0;     //set flag to okay
        //pick a location where row and col allows whole word to be inserted on table.
        colnum=Math.floor(Math.random()*(colsize-words[items].length))+1;
        rownum=Math.floor(Math.random()*rowsize)+1;
        for (c=colnum;c<=colnum+words[items].length-1;c++)
            {testcell='r'+rownum+'c'+c;
             if(document.getElementById(testcell).innerHTML != '.')
               {flag=1} //we have a non dot value, try another row
            }
       }
    while(flag==1)
    
   //initialise a string to build up cell locations for all letters in word
   wordlocations='';  
   for (i=0;i<words[items].length;i++)  // write horizontal word into table
       {//get each letter of word in turn and position it
        letter=words[items].substr(i,1);

        // calculate row and col position for this letter
        letterpos='r'+rownum+'c'+colnum;
       
        // add each letter's position separated by a '-' to wordlocations string
        wordlocations=wordlocations+letterpos+'-';
        document.getElementById(letterpos).innerHTML=letter;
        
        colnum=colnum+1;   // next letter goes in next column
       }
    
  //store list of cells making up each word in the array wordloc
   wordlocations=wordlocations.substring(0,wordlocations.length-1);  //strip last - delimiter character
   wordloc[items]=wordlocations;
   }
   locatevword();
}

function locatevword(){
for(items=halfwords;items<maxwords;items++)
   {//pick any col for word not already used
   counter=0; //initialise counter used to ensure we don't try more 50 times to place aword
   do {flag=0;     //set flag to okay
          //pick a location where row allows whole word to be inserted on table.
          rownum=Math.floor(Math.random()*(rowsize-words[items].length))+1;
          colnum=Math.floor(Math.random()*colsize)+1;
          counter=counter+1;
          for (r=rownum;r<=rownum+words[items].length-1;r++)
              {testcell='r'+r+'c'+colnum;

               if(document.getElementById(testcell).innerHTML != '.')
                 {flag=1} //we have a non dot value, try another colnum
              }
       }
   while(flag==1&&counter<=100)
   
   if(counter>100)
          {alertboxer('<h1>Information</h1><p>Cannot locate a  word, please Reload page </p>'); }
   else{ // store start and end in wordloc array cell for word
         wordstart='r'+rownum+'c'+colnum;
         wordend='r'+(rownum+words[items].length-1)+'c'+colnum;
         wordloc[items]=wordstart+'-'+wordend;

          wordlocations='';  //initialise a string to build up cell locations for all letters in word
          // write vertical word into table
          for (i=0;i<words[items].length;i++)
               {//get each letter of word and position it
                 letter=words[items].substr(i,1);
                 // calculate row and col position for this letter
                 letterpos='r'+rownum+'c'+colnum;
                 wordlocations=wordlocations+letterpos+'-';
                 document.getElementById(letterpos).innerHTML=letter;
                 
                 rownum=rownum+1;  // next letter goes in next row               
               }
           } //endif
    
    wordlocations=wordlocations.substring(0,wordlocations.length-1);  //strip last - character
    wordloc[items]=wordlocations;
   }
   populate();
}

function populate(){// fill dot cells with random letter
for (i=1;i<=rowsize;i++)
     {for (j=1;j<=colsize;j++)
          {loc='r'+i+'c'+j;
           if (document.getElementById(loc).innerHTML=='.')
              // only populate dot cells
              {letter=String.fromCharCode(Math.floor(Math.random()*26)+65);
               document.getElementById(loc).innerHTML=letter;
              }
           }
     }
}

function checkword(clickedcell,cell){
  //260525 - rewrite to allow clicks for both ends of word
    twoclicks=twoclicks+1;
    if(twoclicks<2)
       {firstcell=cell; //keep 1st letter location
        document.getElementById(cell).className='firstletter';
        return;
       }
   secondcell=cell;
   document.getElementById(secondcell).className='firstletter';
   
   // work through all words location data, build array, letterlocation, with letter locations
   for (var i=0;i<maxwords;i++) 
       {letterlocation=wordloc[i].split('-');
        //if first selected letter at start or end of foundword, get word  
        if (firstcell==letterlocation[0]||firstcell==letterlocation[letterlocation.length-1])
           {startword=words[i]}            
         
        //if second selected letter at start or end of foundword, get word
        if (secondcell==letterlocation[0]||secondcell==letterlocation[letterlocation.length-1])    
           {finishword=words[i]}
       }
 
   // Check clicks are on same word 
   if ((startword==finishword)&&(startword!=''))
      {//words match and are not empty
       soundplayer('correct1');
       // remove clue
       document.getElementById(startword).className='foundclue';
               
       for (var i=0;i<maxwords;i++)
           {if (document.getElementById(startword).id==words[i])
               {//find the startword in wordloc and get its row col location
                // and  split it to build an array of valid letter positions
                validletters=wordloc[i].split("-");
               }
           }
               
       for(var j=0;j<=validletters.length-1;j++) //highlight all letters in foundword
          {currentletter=validletters[j]
           document.getElementById(currentletter).className='letterfound onepulser';}
       }
    else{// no match -  reset selected letters class 
        document.getElementById(firstcell).className='letter';
        document.getElementById(secondcell).className='letter';
        soundplayer('wrong1');
        twoclicks=0;
        }
        
     //cleanup and check for win      
     startword=''; //clear startword finishword
     finishword='';
     twoclicks=0;   //reset twoclicks           
     complete(); // is game over            
}

function complete(){ 

  // now check if game over by looking at color style of clues
  completeflag=1 //assume game over
  
  // test to see if any of the clues contains the wordlist class, if so game unfinished
  for (i=0;i<maxwords;i++)
      {if(document.getElementById(words[i]).classList.contains('wordlist'))
         {completeflag=0;}
      }
      
  if(completeflag==1)
    {clearTimeout(timerid); // stop timer, display time
     var secs = timetaken % 60; // modulus of 60 is remaing seconds
     var mins=Math.floor(timetaken/60); // num of minutes
     
     alertboxer('<h1>Congratulations !</h1><p>All Clues Found <br /> in '+mins+' mins '+secs+' seconds.</p>Game Over');
    // document.getElementById('restart').style.visibility='visible';
    }
    
}

function timer(){
     timetaken=timetaken+1;
     timerid=setTimeout('timer()',1000);
    
}

function startup(){

if (title=='')  // display title
     {document.getElementById('title').innerHTML='Word Puzzle';}
else {document.getElementById('title').innerHTML=title;} 


maketable(); // create a dynamic table

    // First make sure we start with dots in all cells for any restart
   for (i=1;i<=rowsize;i++)
     {for (j=1;j<=colsize;j++)
          {loc='r'+i+'c'+j;
           document.getElementById(loc).innerHTML='.';
           document.getElementById(loc).className='letter';
          }
     }
   newelement=''; //clear existing clues
   // hide restart button
   //document.getElementById('restart').style.visibility='hidden';
   
   // add clues to clue div
      for (i=0;i<maxwords;i++)
          {newelement=newelement+"<span class='wordlist' id='"+words[i]+"'>"+clues[i]+"</span> ";
           document.getElementById('clues').innerHTML=newelement;
          }
   
   locatehword();
   alertsetup();
   alertboxer(splashscreen);
   displayinstructions();
}

function maketable(){
// rowsize colsize from question file

  // this creates a new tbody tag needed by ie in memory
  newtablebody=document.createElement('tbody');
  newtablebody.setAttribute('id','tablebody');  //add an id to the tablebody
  
  //add the tbody tag to the table tag
  document.getElementById('puzzle').appendChild(newtablebody);

  for (i=1;i<=rowsize;i++)
      { // now build rows and columns
      
       newrow=document.createElement('tr');

       for (j=1;j<=colsize;j++)
         {
          newcell=document.createElement('td');  // create a new td element
          id='r'+i+'c'+j;
          newcell.setAttribute('id',id);  //add an id to the td tag
          newcell.setAttribute('class','letter');  //add a class to the td tag
          newcell.innerHTML='.'; // add a dot to start
          newrow.appendChild(newcell);        //add  cell to row
         }
       document.getElementById('tablebody').appendChild(newrow);  // add  new row to the table
      }
}


function soundplayer(x){  // use new html audio tag to play mp3's
   document.getElementById("sndplayer").src=x+".mp3";
   document.getElementById("sndplayer").play();
}

function displayinstructions(){
  if(document.getElementById('instructions').style.display=='block')
      {//document.getElementById('instructions').style.display='none';
       $("#instructions").slideUp("normal");}
  else{//document.getElementById('instructions').style.display='block';
          $("#instructions").slideDown("normal");}
}

function doafterclose(){ //after alertboxer closes
   // add pulser class via js once alertbox closes
      document.getElementById('instructionslink').className='boxes';
}

window.onload=function attachbehaviours(){

  startup();// now launch startup functions
  
   // Attach onclick behaviour to cells
   
   for (var r=1;r<=rowsize;r++)
       {for (var c=1;c<=colsize;c++)
            {
              cellstring="r"+r+"c"+c;
              document.getElementById(cellstring).onclick=function (){checkword(this,this.id)};
            }
       } 
  timer();
}