Advertisement
dentia

scrabble

Aug 30th, 2014
279
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
PHP 1.42 KB | None | 0 0
  1. <?php
  2. /**
  3.  * Created by PhpStorm.
  4.  * User: dentia
  5.  * Date: 8/30/14
  6.  * Time: 8:13 PM
  7.  */
  8.  
  9.  
  10. $mainWord = $_GET['mainWord'];
  11. $mainWord = json_decode($mainWord);
  12. $words = $_GET['words'];
  13. $words = json_decode($words);
  14.  
  15. function lensort($a,$b){
  16.     return strlen($a)-strlen($b);
  17. }
  18.  
  19. usort($words,'lensort');
  20.  
  21. preg_match("/\d+/", key($mainWord), $mw);
  22. $mw = $mw[0];
  23. $mw = intval($mw)-1;
  24.  
  25.  
  26. $words = array_reverse($words);
  27.  
  28. $maw = (array)$mainWord;
  29. $maw = $maw[key($mainWord)];
  30.  
  31. $found = false;
  32. $wordIndex = -1;
  33. $letterIndex = -1;
  34.  
  35.  
  36.  
  37. for($i=0; $i<count($words); $i++) if(strlen($words[$i])<=strlen($maw)) {
  38.     $letter = $words[$i][intval($mw)];
  39.     for ($j = 0; $j < strlen($maw); $j++) {
  40.         if($letter==$maw[$j]){
  41.             $found = true;
  42.             $wordIndex = $i;
  43.             $letterIndex = $j;
  44.             break;
  45.         }
  46.     }
  47.     if($found) break;
  48. }
  49.  
  50.  
  51. $row = array_fill(0, strlen($maw), '');
  52.  
  53. for ($i = 0; $i < strlen($maw); $i++) {
  54.         $arr[$mw][$i] = $maw[$i];
  55. }
  56.  
  57. for ($j = 0; $j < strlen($maw); $j++)if($j!=$mw) {
  58.     $arr[$j] = $row;
  59. }
  60.  
  61. for ($i = 0; $i < strlen($words[$wordIndex]); $i++) {
  62.     $arr[$i][$letterIndex] = $words[$wordIndex][$i];
  63. }
  64.  
  65. echo $arr[4][0];
  66.  
  67. echo "<table>";
  68. for ($i = 0; $i < strlen($maw); $i++) {
  69.     echo "<tr>";
  70.     for ($j = 0; $j < strlen($maw); $j++) {
  71.         echo"<td>".$arr[$i][$j]."</td>";
  72.     }
  73.     echo "</tr>";
  74. }
  75. echo "</table>";
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement