<?php
  $curlen = 4;
  if (isset($_GET['curlen'])) {
    $curlen = $_GET['curlen'];
  } else if ($_POST['curlen']) {
    $curlen = $_POST['curlen'];
  }
  $score = "2000";
  $outof = "0";
  $theword = "";
  $theunderline = "";
  if (isset($_POST['word'])) {
    $theword = $_POST['word'];
  } else {
    $theword = strtolower(file_get_contents("http://" . $_SERVER['SERVER_NAME'] . ":" . $_SERVER['SERVER_PORT'] . "/PHP/surprise.php?min=4&max=12&youllneverfindthis=y"));
  } 
  for ($i=0; $i<strlen($theword); $i++) {
    $theunderline .= "-";
  }
  if (isset($_GET['score'])) {
    $score=$_GET['score'];
  }
  if (isset($_GET['outof'])) {
    $outof=$_GET['outof'];
  }
  if (isset($_POST['score'])) {
    $score=$_POST['score'];
  }
  if (isset($_POST['outof'])) {
    $outof=$_POST['outof'];
  }
  
  function andmore($ins) {
    if (strlen($ins) >= 3) {
      $outs = " " . $ins . " ";
      $warr = split(" ", $ins);
      for ($ijk=0; $ijk<sizeof($warr); $ijk++) {
        if ($warr[$ijk] != "") {
          $outs = str_replace(" " . $warr[$ijk] . " ", " <a target=_blank href='http://www.thefreedictionary.com/" . $warr[$ijk] . "' title='" . $warr[$ijk] . "'>" . $warr[$ijk] . "</a> ", $outs);
        }
      }      
      return $outs;    
    } else {
      return $ins;
    }
  }
?>
<html>
<head>
<title>How Many - RJM Programming - 2014</title>
<script type="text/javascript">
var overgoes=0;
var score=0;
var outof=0;
var goes=0;
var first = 1;
var guess="";
var lettersdone="";
var was = <?php echo $curlen; ?>;

<?php
  if (isset($_GET['hm'])) {
    echo " was = " . $_GET['hm'] . "\n";
  } else if ($_POST['hm']) {
    echo " was = " . $_POST['hm'] . "\n";
  }
  if (isset($_GET['curlen'])) {
    echo " was = " . $_GET['curlen'] . "\n";
  } else if ($_POST['curlen']) {
    echo " was = " . $_POST['curlen'] . "\n";
  }
  echo "\n var versus='" . $theunderline . "'; \n";
  if (isset($_GET['score'])) {
    echo "\n score=" . $_GET['score'] . "; \n";
  }
  if (isset($_GET['outof'])) {
    echo "\n outof=" . $_GET['outof'] . "; \n";
  }
?>

function reassess(curlen) {
   was = curlen;
   var myhtb = "";
   var iwq=0, ois;
   for (iwq=0; iwq<10; iwq++) {
     ois = document.getElementById("guess" + iwq);
     if (iwq < curlen) {
       if (ois.value == " ") ois.value = "0";
       ois.style.display = 'block';
       myhtb = myhtb + ois.value;
     } else {
       if (ois.value != " ") ois.value = " ";
       ois.style.display = 'none';
     }
   }
   document.getElementById("hastobe").value = myhtb;
   document.getElementById("curlen").value = curlen;
   if (first == 1) {
      first = 0;
      document.getElementById("hm").value = curlen;
   }
}



function chgmade(really) {
   var myhtb = "";
   var iwq=0, ois;
   for (iwq=0; iwq<10; iwq++) {
     ois = document.getElementById("guess" + iwq);
     if (iwq < was) {
       if (ois.value == " ") ois.value = "0";
       ois.style.display = 'block';
       myhtb = myhtb + ois.value;
     } else {
       if (ois.value != " ") ois.value = " ";
       ois.style.display = 'none';
     }
   }
   if (really != 0) document.getElementById("hastobe").value = myhtb;
}

</script>
</head>
<?php
 if (isset($_GET['badluck'])) {
  echo "\n <body style=\"background-color: orange;\" onload=\" reassess(was);  \"> \n";
 } else {
  echo "\n <body style=\"background-color: orange;\" onload=\" reassess(was); \"> \n";
 }
?>
<div align="center">
<h1 id="gamename">How Many Such Words?</h1>
<?php
  global $score, $outof;
  echo "\n <h2 id='scoreis'>Score: " . $score . " from " . $outof . " goes</h2> \n";
  if (isset($_GET["wordlist"]) && isset($_GET["hastobe"]) && isset($_GET["total"]) && isset($_GET["howmany"])) {
    echo "\n <p id='wordsare'>Wordlist (" . $_GET["total"] . " Vs " . $_GET["howmany"] . ") for <i>" . str_replace("0", ".", $_GET["hastobe"]) . "</i> is " . andmore($_GET["wordlist"]) . "</p><br><br>";
  } else if (isset($_POST["wordlist"]) && isset($_POST["hastobe"]) && isset($_POST["total"]) && isset($_POST["howmany"])) {
    echo "\n <p id='wordsare'>Wordlist (" . $_POST["total"] . " Vs " . $_POST["howmany"] . ") for <i>" . str_replace("0", ".", $_POST["hastobe"]) . "</i> is " . andmore($_POST["wordlist"]) . "</p><br><br>";
  }
?>

<form id="gform" method="POST" action="../PHP/surprise.php">
<input type="hidden" id="score" name="score" value="<?php echo $score; ?>" />
<input type="hidden" id="outof" name="outof" value="<?php echo $outof; ?>" />
<input type="hidden" id="curlen" name="curlen" value="<?php echo $curlen; ?>" />
<table style="font-size:24px">
<tr><td><select id="hm" name="hm" onchange="reassess(this.value);" style=" text-align:center; background-color: yellow; ">
<option value="4">4</option>
<option value="5">5</option>
<option value="6">6</option>
<option value="7">7</option>
<option value="8">8</option>
<option value="9">9</option>
<option value="10">10</option>
</select></td><td colspan=9>letters in word</td></tr>
<tr><td>
<select id="guess0" name="guess0" style=" text-align:center; background-color: pink; " onchange="chgmade(1);" title="(. is any letter below)">
<option value="0">.</option>
<option value="a">a</option>
<option value="b">b</option>
<option value="c">c</option>
<option value="d">d</option>
<option value="e">e</option>
<option value="f">f</option>
<option value="g">g</option>
<option value="h">h</option>
<option value="i">i</option>
<option value="j">j</option>
<option value="k">k</option>
<option value="l">l</option>
<option value="m">m</option>
<option value="n">n</option>
<option value="o">o</option>
<option value="p">p</option>
<option value="q">q</option>
<option value="r">r</option>
<option value="s">s</option>
<option value="t">t</option>
<option value="u">u</option>
<option value="v">v</option>
<option value="w">w</option>
<option value="x">x</option>
<option value="y">y</option>
<option value="z">z</option>
</select>
</td><td>
<select id="guess1" name="guess1" style=" text-align:center; background-color: pink; " onchange="chgmade(1);" title="(. is any letter below)">
<option value="0">.</option>
<option value="a">a</option>
<option value="b">b</option>
<option value="c">c</option>
<option value="d">d</option>
<option value="e">e</option>
<option value="f">f</option>
<option value="g">g</option>
<option value="h">h</option>
<option value="i">i</option>
<option value="j">j</option>
<option value="k">k</option>
<option value="l">l</option>
<option value="m">m</option>
<option value="n">n</option>
<option value="o">o</option>
<option value="p">p</option>
<option value="q">q</option>
<option value="r">r</option>
<option value="s">s</option>
<option value="t">t</option>
<option value="u">u</option>
<option value="v">v</option>
<option value="w">w</option>
<option value="x">x</option>
<option value="y">y</option>
<option value="z">z</option>
</select>
</td><td>
<select id="guess2" name="guess2" style=" text-align:center; background-color: pink; " onchange="chgmade(1);" title="(. is any letter below)">
<option value="0">.</option>
<option value="a">a</option>
<option value="b">b</option>
<option value="c">c</option>
<option value="d">d</option>
<option value="e">e</option>
<option value="f">f</option>
<option value="g">g</option>
<option value="h">h</option>
<option value="i">i</option>
<option value="j">j</option>
<option value="k">k</option>
<option value="l">l</option>
<option value="m">m</option>
<option value="n">n</option>
<option value="o">o</option>
<option value="p">p</option>
<option value="q">q</option>
<option value="r">r</option>
<option value="s">s</option>
<option value="t">t</option>
<option value="u">u</option>
<option value="v">v</option>
<option value="w">w</option>
<option value="x">x</option>
<option value="y">y</option>
<option value="z">z</option>
</select>
</td><td>
<select id="guess3" name="guess3" style=" text-align:center; background-color: pink; " onchange="chgmade(1);" title="(. is any letter below)">
<option value="0">.</option>
<option value="a">a</option>
<option value="b">b</option>
<option value="c">c</option>
<option value="d">d</option>
<option value="e">e</option>
<option value="f">f</option>
<option value="g">g</option>
<option value="h">h</option>
<option value="i">i</option>
<option value="j">j</option>
<option value="k">k</option>
<option value="l">l</option>
<option value="m">m</option>
<option value="n">n</option>
<option value="o">o</option>
<option value="p">p</option>
<option value="q">q</option>
<option value="r">r</option>
<option value="s">s</option>
<option value="t">t</option>
<option value="u">u</option>
<option value="v">v</option>
<option value="w">w</option>
<option value="x">x</option>
<option value="y">y</option>
<option value="z">z</option>
</select>
</td><td>
<select id="guess4" name="guess4" style=" display:none; text-align:center; background-color: pink; " onchange="chgmade(1);" title="(. is any letter below)">
<option value=" "> </option>
<option value="0">.</option>
<option value="a">a</option>
<option value="b">b</option>
<option value="c">c</option>
<option value="d">d</option>
<option value="e">e</option>
<option value="f">f</option>
<option value="g">g</option>
<option value="h">h</option>
<option value="i">i</option>
<option value="j">j</option>
<option value="k">k</option>
<option value="l">l</option>
<option value="m">m</option>
<option value="n">n</option>
<option value="o">o</option>
<option value="p">p</option>
<option value="q">q</option>
<option value="r">r</option>
<option value="s">s</option>
<option value="t">t</option>
<option value="u">u</option>
<option value="v">v</option>
<option value="w">w</option>
<option value="x">x</option>
<option value="y">y</option>
<option value="z">z</option>
</select>
</td><td>
<select id="guess5" name="guess5" style=" display:none; text-align:center; background-color: pink; " onchange="chgmade(1);" title="(. is any letter below)">
<option value=" "> </option>
<option value="0">.</option>
<option value="a">a</option>
<option value="b">b</option>
<option value="c">c</option>
<option value="d">d</option>
<option value="e">e</option>
<option value="f">f</option>
<option value="g">g</option>
<option value="h">h</option>
<option value="i">i</option>
<option value="j">j</option>
<option value="k">k</option>
<option value="l">l</option>
<option value="m">m</option>
<option value="n">n</option>
<option value="o">o</option>
<option value="p">p</option>
<option value="q">q</option>
<option value="r">r</option>
<option value="s">s</option>
<option value="t">t</option>
<option value="u">u</option>
<option value="v">v</option>
<option value="w">w</option>
<option value="x">x</option>
<option value="y">y</option>
<option value="z">z</option>
</select>
</td><td>
<select id="guess6" name="guess6" style=" display:none; text-align:center; background-color: pink; " onchange="chgmade(1);" title="(. is any letter below)">
<option value=" "> </option>
<option value="0">.</option>
<option value="a">a</option>
<option value="b">b</option>
<option value="c">c</option>
<option value="d">d</option>
<option value="e">e</option>
<option value="f">f</option>
<option value="g">g</option>
<option value="h">h</option>
<option value="i">i</option>
<option value="j">j</option>
<option value="k">k</option>
<option value="l">l</option>
<option value="m">m</option>
<option value="n">n</option>
<option value="o">o</option>
<option value="p">p</option>
<option value="q">q</option>
<option value="r">r</option>
<option value="s">s</option>
<option value="t">t</option>
<option value="u">u</option>
<option value="v">v</option>
<option value="w">w</option>
<option value="x">x</option>
<option value="y">y</option>
<option value="z">z</option>
</select>
</td><td>
<select id="guess7" name="guess7" style=" display:none; text-align:center; background-color: pink; " onchange="chgmade(1);" title="(. is any letter below)">
<option value=" "> </option>
<option value="0">.</option>
<option value="a">a</option>
<option value="b">b</option>
<option value="c">c</option>
<option value="d">d</option>
<option value="e">e</option>
<option value="f">f</option>
<option value="g">g</option>
<option value="h">h</option>
<option value="i">i</option>
<option value="j">j</option>
<option value="k">k</option>
<option value="l">l</option>
<option value="m">m</option>
<option value="n">n</option>
<option value="o">o</option>
<option value="p">p</option>
<option value="q">q</option>
<option value="r">r</option>
<option value="s">s</option>
<option value="t">t</option>
<option value="u">u</option>
<option value="v">v</option>
<option value="w">w</option>
<option value="x">x</option>
<option value="y">y</option>
<option value="z">z</option>
</select>
</td><td>
<select id="guess8" name="guess8" style=" display:none; text-align:center; background-color: pink; " onchange="chgmade(1);" title="(. is any letter below)">
<option value=" "> </option>
<option value="0">.</option>
<option value="a">a</option>
<option value="b">b</option>
<option value="c">c</option>
<option value="d">d</option>
<option value="e">e</option>
<option value="f">f</option>
<option value="g">g</option>
<option value="h">h</option>
<option value="i">i</option>
<option value="j">j</option>
<option value="k">k</option>
<option value="l">l</option>
<option value="m">m</option>
<option value="n">n</option>
<option value="o">o</option>
<option value="p">p</option>
<option value="q">q</option>
<option value="r">r</option>
<option value="s">s</option>
<option value="t">t</option>
<option value="u">u</option>
<option value="v">v</option>
<option value="w">w</option>
<option value="x">x</option>
<option value="y">y</option>
<option value="z">z</option>
</select>
</td><td>
<select id="guess9" name="guess9" style=" display:none; text-align:center; background-color: pink; " onchange="chgmade(1);" title="(. is any letter below)">
<option value=" "> </option>
<option value="0">.</option>
<option value="a">a</option>
<option value="b">b</option>
<option value="c">c</option>
<option value="d">d</option>
<option value="e">e</option>
<option value="f">f</option>
<option value="g">g</option>
<option value="h">h</option>
<option value="i">i</option>
<option value="j">j</option>
<option value="k">k</option>
<option value="l">l</option>
<option value="m">m</option>
<option value="n">n</option>
<option value="o">o</option>
<option value="p">p</option>
<option value="q">q</option>
<option value="r">r</option>
<option value="s">s</option>
<option value="t">t</option>
<option value="u">u</option>
<option value="v">v</option>
<option value="w">w</option>
<option value="x">x</option>
<option value="y">y</option>
<option value="z">z</option>
</select>
</td><td>


</td></tr></table><br><br><hr>
How many such words do you think there are? <input type="text" style="background-color: lightblue;" name="howmany" id="howmany" title="Your guess" value="0" onchange=" guessmade(this.value); "></input>&nbsp; (mismatch subtracted from your score ... try to stay positive for lots of goes)<br>
<br><input type="checkbox" name="wouldliketosee" id="wouldliketosee" value="Y" checked>Please list words found
<input type="hidden" id='hastobe' name='hastobe' value="0000"></input>
<br><br><input type="submit" name="submit" id="submit" value="Submit My Guess"></input>
</form>
<p id="information"></p>
</div>
</body>
</html>

