2011-09-25 04:56:03 -04:00
< ? php
/**
* Name : TicTac App
* Description : The TicTacToe game application
* Version : 1.0
* Author : Mike Macgirvin < http :// macgirvin . com / profile / mike >
2022-12-30 22:33:18 -05:00
* Status : unsupported
2011-09-25 04:56:03 -04:00
*/
2022-06-23 01:16:22 -04:00
use Friendica\App ;
2018-12-26 02:28:16 -05:00
use Friendica\Core\Hook ;
2020-01-18 16:07:06 -05:00
use Friendica\DI ;
2011-09-25 04:56:03 -04:00
2022-06-23 01:16:22 -04:00
function tictac_install ()
{
2018-12-26 02:28:16 -05:00
Hook :: register ( 'app_menu' , 'addon/tictac/tictac.php' , 'tictac_app_menu' );
2011-09-25 04:56:03 -04:00
}
2023-01-13 21:16:09 -05:00
function tictac_app_menu ( array & $b )
2022-06-23 01:16:22 -04:00
{
2020-01-18 14:52:33 -05:00
$b [ 'app_menu' ][] = '<div class="app-title"><a href="tictac">' . DI :: l10n () -> t ( 'Three Dimensional Tic-Tac-Toe' ) . '</a></div>' ;
2011-09-25 04:56:03 -04:00
}
2022-06-24 17:27:58 -04:00
/**
* This is a statement rather than an actual function definition . The simple
* existence of this method is checked to figure out if the addon offers a
* module .
*/
function tictac_module () {}
2011-09-25 04:56:03 -04:00
2023-01-13 21:16:09 -05:00
function tictac_content () {
2011-09-25 04:56:03 -04:00
$o = '' ;
if ( $_POST [ 'move' ]) {
2021-08-16 05:48:59 -04:00
$handicap = DI :: args () -> get ( 1 );
$mefirst = DI :: args () -> get ( 2 );
$dimen = DI :: args () -> get ( 3 );
$yours = DI :: args () -> get ( 4 );
$mine = DI :: args () -> get ( 5 );
2018-01-15 08:15:33 -05:00
2011-09-25 04:56:03 -04:00
$yours .= $_POST [ 'move' ];
}
2021-08-16 05:48:59 -04:00
elseif ( DI :: args () -> getArgc () > 1 ) {
$handicap = DI :: args () -> get ( 1 );
2011-09-25 04:56:03 -04:00
$dimen = 3 ;
}
else {
$dimen = 3 ;
}
2020-01-18 14:52:33 -05:00
$o .= '<h3>' . DI :: l10n () -> t ( '3D Tic-Tac-Toe' ) . '</h3><br />' ;
2011-09-25 04:56:03 -04:00
$t = new tictac ( $dimen , $handicap , $mefirst , $yours , $mine );
$o .= $t -> play ();
2020-01-18 14:52:33 -05:00
$o .= '<a href="tictac">' . DI :: l10n () -> t ( 'New game' ) . '</a><br />' ;
$o .= '<a href="tictac/1">' . DI :: l10n () -> t ( 'New game with handicap' ) . '</a><br />' ;
$o .= '<p>' . DI :: l10n () -> t ( 'Three dimensional tic-tac-toe is just like the traditional game except that it is played on multiple levels simultaneously. ' );
$o .= DI :: l10n () -> t ( 'In this case there are three levels. You win by getting three in a row on any level, as well as up, down, and diagonally across the different levels.' );
2018-01-15 08:15:33 -05:00
$o .= '</p><p>' ;
2020-01-18 14:52:33 -05:00
$o .= DI :: l10n () -> t ( 'The handicap game disables the center position on the middle level because the player claiming this square often has an unfair advantage.' );
2011-09-25 04:56:03 -04:00
$o .= '</p>' ;
return $o ;
}
class tictac {
private $dimen ;
private $first_move = true ;
private $handicap = 0 ;
private $yours ;
private $mine ;
2018-01-15 08:15:33 -05:00
private $winning_play ;
2011-09-25 04:56:03 -04:00
private $you ;
private $me ;
private $debug = 1 ;
2018-01-15 08:15:33 -05:00
private $crosses = [ '011' , '101' , '110' , '112' , '121' , '211' ];
2011-09-25 04:56:03 -04:00
/*
'001' , '010' , '011' , '012' , '021' ,
'101' , '110' , '111' , '112' , '121' ,
'201' , '210' , '211' , '212' , '221' );
*/
2018-01-15 08:15:33 -05:00
private $corners = [
2011-09-25 04:56:03 -04:00
'000' , '002' , '020' , '022' ,
2018-01-15 08:15:33 -05:00
'200' , '202' , '220' , '222' ];
private $planes = [
[ '000' , '001' , '002' , '010' , '011' , '012' , '020' , '021' , '022' ], // horiz 1
[ '100' , '101' , '102' , '110' , '111' , '112' , '120' , '121' , '122' ], // 2
[ '200' , '201' , '202' , '210' , '211' , '212' , '220' , '221' , '222' ], // 3
[ '000' , '010' , '020' , '100' , '110' , '120' , '200' , '210' , '220' ], // vert left
[ '000' , '001' , '002' , '100' , '101' , '102' , '200' , '201' , '202' ], // vert top
[ '002' , '012' , '022' , '102' , '112' , '122' , '202' , '212' , '222' ], // vert right
[ '020' , '021' , '022' , '120' , '121' , '122' , '220' , '221' , '222' ], // vert bot
[ '010' , '011' , '012' , '110' , '111' , '112' , '210' , '211' , '212' ], // left vertx
[ '001' , '011' , '021' , '101' , '111' , '221' , '201' , '211' , '221' ], // top vertx
[ '000' , '001' , '002' , '110' , '111' , '112' , '220' , '221' , '222' ], // diag top
[ '020' , '021' , '022' , '110' , '111' , '112' , '200' , '201' , '202' ], // diag bot
[ '000' , '010' , '020' , '101' , '111' , '121' , '202' , '212' , '222' ], // diag left
[ '002' , '012' , '022' , '101' , '111' , '121' , '200' , '210' , '220' ], // diag right
[ '002' , '011' , '020' , '102' , '111' , '120' , '202' , '211' , '220' ], // diag x
[ '000' , '011' , '022' , '100' , '111' , '122' , '200' , '211' , '222' ] // diag x
];
private $winner = [
[ '000' , '001' , '002' ], // board 0 winners - left corner across
[ '000' , '010' , '020' ], // down
[ '000' , '011' , '022' ], // diag
[ '001' , '011' , '021' ], // middle-top down
[ '010' , '011' , '012' ], // middle-left across
[ '002' , '011' , '020' ], // right-top diag
[ '002' , '012' , '022' ], // right-top down
[ '020' , '021' , '022' ], // bottom-left across
[ '100' , '101' , '102' ], // board 1 winners
[ '100' , '110' , '120' ],
[ '100' , '111' , '122' ],
[ '101' , '111' , '121' ],
[ '110' , '111' , '112' ],
[ '102' , '111' , '120' ],
[ '102' , '112' , '122' ],
[ '120' , '121' , '122' ],
[ '200' , '201' , '202' ], // board 2 winners
[ '200' , '210' , '220' ],
[ '200' , '211' , '222' ],
[ '201' , '211' , '221' ],
[ '210' , '211' , '212' ],
[ '202' , '211' , '220' ],
[ '202' , '212' , '222' ],
[ '220' , '221' , '222' ],
[ '000' , '100' , '200' ], // top-left corner 3d
[ '000' , '101' , '202' ],
[ '000' , '110' , '220' ],
[ '000' , '111' , '222' ],
[ '001' , '101' , '201' ], // top-middle 3d
[ '001' , '111' , '221' ],
[ '002' , '102' , '202' ], // top-right corner 3d
[ '002' , '101' , '200' ],
[ '002' , '112' , '222' ],
[ '002' , '111' , '220' ],
[ '010' , '110' , '210' ], // left-middle 3d
[ '010' , '111' , '212' ],
[ '011' , '111' , '211' ], // middle-middle 3d
[ '012' , '112' , '212' ], // right-middle 3d
[ '012' , '111' , '210' ],
[ '020' , '120' , '220' ], // bottom-left corner 3d
[ '020' , '110' , '200' ],
[ '020' , '121' , '222' ],
[ '020' , '111' , '202' ],
[ '021' , '121' , '221' ], // bottom-middle 3d
[ '021' , '111' , '201' ],
[ '022' , '122' , '222' ], // bottom-right corner 3d
[ '022' , '121' , '220' ],
[ '022' , '112' , '202' ],
[ '022' , '111' , '200' ]
];
2011-09-25 04:56:03 -04:00
function __construct ( $dimen , $handicap , $mefirst , $yours , $mine ) {
$this -> dimen = 3 ;
$this -> handicap = (( $handicap ) ? 1 : 0 );
$this -> mefirst = (( $mefirst ) ? 1 : 0 );
$this -> yours = str_replace ( 'XXX' , '' , $yours );
$this -> mine = $mine ;
$this -> you = $this -> parse_moves ( 'you' );
$this -> me = $this -> parse_moves ( 'me' );
if ( strlen ( $yours ))
$this -> first_move = false ;
}
function play () {
if ( $this -> first_move ) {
if ( rand ( 0 , 1 ) == 1 ) {
2020-01-18 14:52:33 -05:00
$o .= '<div class="error-message">' . DI :: l10n () -> t ( 'You go first...' ) . '</div><br />' ;
2011-09-25 04:56:03 -04:00
$this -> mefirst = 0 ;
$o .= $this -> draw_board ();
return $o ;
}
2020-01-18 14:52:33 -05:00
$o .= '<div class="error-message">' . DI :: l10n () -> t ( 'I\'m going first this time...' ) . ' </div><br />' ;
2011-09-25 04:56:03 -04:00
$this -> mefirst = 1 ;
}
if ( $this -> check_youwin ()) {
2020-01-18 14:52:33 -05:00
$o .= '<div class="error-message">' . DI :: l10n () -> t ( 'You won!' ) . '</div><br />' ;
2011-09-25 04:56:03 -04:00
$o .= $this -> draw_board ();
return $o ;
}
if ( $this -> fullboard ())
2020-01-18 14:52:33 -05:00
$o .= '<div class="error-message">' . DI :: l10n () -> t ( '"Cat" game!' ) . '</div><br />' ;
2011-09-25 04:56:03 -04:00
$move = $this -> winning_move ();
if ( strlen ( $move )) {
$this -> mine .= $move ;
$this -> me = $this -> parse_moves ( 'me' );
}
else {
$move = $this -> defensive_move ();
if ( strlen ( $move )) {
$this -> mine .= $move ;
$this -> me = $this -> parse_moves ( 'me' );
}
2018-01-15 08:15:33 -05:00
else {
2011-09-25 04:56:03 -04:00
$move = $this -> offensive_move ();
if ( strlen ( $move )) {
$this -> mine .= $move ;
$this -> me = $this -> parse_moves ( 'me' );
}
}
}
if ( $this -> check_iwon ())
2020-01-18 14:52:33 -05:00
$o .= '<div class="error-message">' . DI :: l10n () -> t ( 'I won!' ) . '</div><br />' ;
2011-09-25 04:56:03 -04:00
if ( $this -> fullboard ())
2020-01-18 14:52:33 -05:00
$o .= '<div class="error-message">' . DI :: l10n () -> t ( '"Cat" game!' ) . '</div><br />' ;
2011-09-25 04:56:03 -04:00
$o .= $this -> draw_board ();
return $o ;
}
function parse_moves ( $player ) {
if ( $player == 'me' )
$str = $this -> mine ;
if ( $player == 'you' )
$str = $this -> yours ;
2018-01-15 08:15:33 -05:00
$ret = [];
2011-09-25 04:56:03 -04:00
while ( strlen ( $str )) {
$ret [] = substr ( $str , 0 , 3 );
$str = substr ( $str , 3 );
}
return $ret ;
}
function check_youwin () {
for ( $x = 0 ; $x < count ( $this -> winner ); $x ++ ) {
if ( in_array ( $this -> winner [ $x ][ 0 ], $this -> you ) && in_array ( $this -> winner [ $x ][ 1 ], $this -> you ) && in_array ( $this -> winner [ $x ][ 2 ], $this -> you )) {
$this -> winning_play = $this -> winner [ $x ];
return true ;
}
}
return false ;
}
function check_iwon () {
for ( $x = 0 ; $x < count ( $this -> winner ); $x ++ ) {
if ( in_array ( $this -> winner [ $x ][ 0 ], $this -> me ) && in_array ( $this -> winner [ $x ][ 1 ], $this -> me ) && in_array ( $this -> winner [ $x ][ 2 ], $this -> me )) {
$this -> winning_play = $this -> winner [ $x ];
return true ;
}
}
return false ;
}
function defensive_move () {
for ( $x = 0 ; $x < count ( $this -> winner ); $x ++ ) {
if (( $this -> handicap ) && in_array ( '111' , $this -> winner [ $x ]))
continue ;
if ( in_array ( $this -> winner [ $x ][ 0 ], $this -> you ) && in_array ( $this -> winner [ $x ][ 1 ], $this -> you ) && ( ! in_array ( $this -> winner [ $x ][ 2 ], $this -> me )))
return ( $this -> winner [ $x ][ 2 ]);
if ( in_array ( $this -> winner [ $x ][ 0 ], $this -> you ) && in_array ( $this -> winner [ $x ][ 2 ], $this -> you ) && ( ! in_array ( $this -> winner [ $x ][ 1 ], $this -> me )))
return ( $this -> winner [ $x ][ 1 ]);
if ( in_array ( $this -> winner [ $x ][ 1 ], $this -> you ) && in_array ( $this -> winner [ $x ][ 2 ], $this -> you ) && ( ! in_array ( $this -> winner [ $x ][ 0 ], $this -> me )))
return ( $this -> winner [ $x ][ 0 ]);
}
return '' ;
}
function winning_move () {
for ( $x = 0 ; $x < count ( $this -> winner ); $x ++ ) {
if (( $this -> handicap ) && in_array ( '111' , $this -> winner [ $x ]))
continue ;
if ( in_array ( $this -> winner [ $x ][ 0 ], $this -> me ) && in_array ( $this -> winner [ $x ][ 1 ], $this -> me ) && ( ! in_array ( $this -> winner [ $x ][ 2 ], $this -> you )))
return ( $this -> winner [ $x ][ 2 ]);
if ( in_array ( $this -> winner [ $x ][ 0 ], $this -> me ) && in_array ( $this -> winner [ $x ][ 2 ], $this -> me ) && ( ! in_array ( $this -> winner [ $x ][ 1 ], $this -> you )))
return ( $this -> winner [ $x ][ 1 ]);
if ( in_array ( $this -> winner [ $x ][ 1 ], $this -> me ) && in_array ( $this -> winner [ $x ][ 2 ], $this -> me ) && ( ! in_array ( $this -> winner [ $x ][ 0 ], $this -> you )))
return ( $this -> winner [ $x ][ 0 ]);
}
}
function offensive_move () {
shuffle ( $this -> planes );
shuffle ( $this -> winner );
shuffle ( $this -> corners );
shuffle ( $this -> crosses );
if ( ! count ( $this -> me )) {
if ( $this -> handicap ) {
$p = $this -> uncontested_plane ();
foreach ( $this -> corners as $c )
2018-01-15 08:15:33 -05:00
if (( in_array ( $c , $p ))
2011-09-25 04:56:03 -04:00
&& ( ! $this -> is_yours ( $c )) && ( ! $this -> is_mine ( $c )))
return ( $c );
}
else {
if (( ! $this -> marked_yours ( 1 , 1 , 1 )) && ( ! $this -> marked_mine ( 1 , 1 , 1 )))
return '111' ;
$p = $this -> uncontested_plane ();
foreach ( $this -> crosses as $c )
if (( in_array ( $c , $p ))
&& ( ! $this -> is_yours ( $c )) && ( ! $this -> is_mine ( $c )))
return ( $c );
}
}
if ( $this -> handicap ) {
if ( count ( $this -> me ) >= 1 ) {
if ( count ( $this -> get_corners ( $this -> me )) == 1 ) {
if ( in_array ( $this -> me [ 0 ], $this -> corners )) {
$p = $this -> my_best_plane ();
foreach ( $this -> winner as $w ) {
2018-01-15 08:15:33 -05:00
if (( in_array ( $w [ 0 ], $this -> you ))
2011-09-25 04:56:03 -04:00
|| ( in_array ( $w [ 1 ], $this -> you ))
|| ( in_array ( $w [ 2 ], $this -> you )))
2018-01-15 08:15:33 -05:00
continue ;
if ( in_array ( $w [ 0 ], $this -> corners )
2011-09-25 04:56:03 -04:00
&& in_array ( $w [ 2 ], $this -> corners )
&& in_array ( $w [ 0 ], $p ) && in_array ( $w [ 2 ], $p )) {
if ( $this -> me [ 0 ] == $w [ 0 ])
return ( $w [ 2 ]);
elseif ( $this -> me [ 0 ] == $w [ 2 ])
return ( $w [ 0 ]);
}
}
}
}
else {
$r = $this -> get_corners ( $this -> me );
if ( count ( $r ) > 1 ) {
2018-01-15 08:15:33 -05:00
$w1 = []; $w2 = [];
2011-09-25 04:56:03 -04:00
foreach ( $this -> winner as $w ) {
if ( in_array ( '111' , $w ))
continue ;
if (( $r [ 0 ] == $w [ 0 ]) || ( $r [ 0 ] == $w [ 2 ]))
$w1 [] = $w ;
if (( $r [ 1 ] == $w [ 0 ]) || ( $r [ 1 ] == $w [ 2 ]))
$w2 [] = $w ;
}
if ( count ( $w1 ) && count ( $w2 )) {
foreach ( $w1 as $a ) {
foreach ( $w2 as $b ) {
2018-01-15 08:15:33 -05:00
if (( in_array ( $a [ 0 ], $this -> you ))
2011-09-25 04:56:03 -04:00
|| ( in_array ( $a [ 1 ], $this -> you ))
|| ( in_array ( $a [ 2 ], $this -> you ))
|| ( in_array ( $b [ 0 ], $this -> you ))
|| ( in_array ( $b [ 1 ], $this -> you ))
|| ( in_array ( $b [ 2 ], $this -> you )))
2018-01-15 08:15:33 -05:00
continue ;
2011-09-25 04:56:03 -04:00
if (( $a [ 0 ] == $b [ 0 ]) && ! $this -> is_mine ( $a [ 0 ])) {
return $a [ 0 ];
}
elseif (( $a [ 2 ] == $b [ 2 ]) && ! $this -> is_mine ( $a [ 2 ])) {
return $a [ 2 ];
}
}
}
}
}
}
}
}
//&& (count($this->me) == 1) && (count($this->you) == 1)
// && in_array($this->you[0],$this->corners)
// && $this->is_neighbor($this->me[0],$this->you[0])) {
2018-01-15 08:15:33 -05:00
// Yuck. You foiled my plan. Since you obviously aren't playing to win,
// I'll try again. You may keep me busy for a few rounds, but I'm
2011-09-25 04:56:03 -04:00
// gonna' get you eventually.
// $p = $this->uncontested_plane();
// foreach($this->crosses as $c)
// if(in_array($c,$p))
// return($c);
// }
// find all the winners containing my points.
2018-01-15 08:15:33 -05:00
$mywinners = [];
2011-09-25 04:56:03 -04:00
foreach ( $this -> winner as $w )
foreach ( $this -> me as $m )
if (( in_array ( $m , $w )) && ( ! in_array ( $w , $mywinners )))
$mywinners [] = $w ;
// find all the rules where my points are in the center.
2018-01-15 08:15:33 -05:00
$trythese = [];
2011-09-25 04:56:03 -04:00
if ( count ( $mywinners )) {
foreach ( $mywinners as $w ) {
foreach ( $this -> me as $m ) {
if (( $m == $w [ 1 ]) && ( $this -> uncontested_winner ( $w ))
&& ( ! in_array ( $w , $trythese )))
$trythese [] = $w ;
}
}
}
2018-01-15 08:15:33 -05:00
$myplanes = [];
2011-09-25 04:56:03 -04:00
for ( $p = 0 ; $p < count ( $this -> planes ); $p ++ ) {
if ( $this -> handicap && in_array ( '111' , $this -> planes [ $p ]))
continue ;
foreach ( $this -> me as $m )
2018-01-15 08:15:33 -05:00
if (( in_array ( $m , $this -> planes [ $p ]))
2011-09-25 04:56:03 -04:00
&& ( ! in_array ( $this -> planes [ $p ], $myplanes )))
$myplanes [] = $this -> planes [ $p ];
}
shuffle ( $myplanes );
// find all winners which share an endpoint, and which are uncontested
2018-01-15 08:15:33 -05:00
$candidates = [];
2011-09-25 04:56:03 -04:00
if ( count ( $trythese ) && count ( $myplanes )) {
foreach ( $trythese as $t ) {
foreach ( $this -> winner as $w ) {
if ( ! $this -> uncontested_winner ( $w ))
continue ;
if (( in_array ( $t [ 0 ], $w )) || ( in_array ( $t [ 2 ], $w ))) {
foreach ( $myplanes as $p )
if ( in_array ( $w [ 0 ], $p ) && in_array ( $w [ 1 ], $p ) && in_array ( $w [ 2 ], $p ) && ( $w [ 1 ] != $this -> me [ 0 ]))
if ( ! in_array ( $w , $candidates ))
$candidates [] = $w ;
}
}
}
}
// Find out if we are about to force a win.
// Looking for two winning vectors with a common endpoint
2018-01-15 08:15:33 -05:00
// and where we own the middle of both - we are now going to
2011-09-25 04:56:03 -04:00
// grab the endpoint. The game isn't yet over but we've already won.
if ( count ( $candidates )) {
foreach ( $candidates as $c ) {
if ( in_array ( $c [ 1 ], $this -> me )) {
// return endpoint
foreach ( $trythese as $t )
if ( $t [ 0 ] == $c [ 0 ])
return ( $t [ 0 ]);
elseif ( $t [ 2 ] == $c [ 2 ])
return ( $t [ 2 ]);
}
}
// find opponents planes
2018-01-15 08:15:33 -05:00
$yourplanes = [];
2011-09-25 04:56:03 -04:00
for ( $p = 0 ; $p < count ( $this -> planes ); $p ++ ) {
if ( $this -> handicap && in_array ( '111' , $this -> planes [ $p ]))
continue ;
if ( in_array ( $this -> you [ 0 ], $this -> planes [ $p ]))
$yourplanes [] = $this -> planes [ $p ];
}
shuffle ( $this -> winner );
foreach ( $candidates as $c ) {
// We now have a list of winning strategy vectors for our second point
// Pick one that will force you into defensive mode.
// Pick a point close to you so we don't risk giving you two
2018-01-15 08:15:33 -05:00
// in a row when you block us. That would force *us* into
2011-09-25 04:56:03 -04:00
// defensive mode.
// We want: or: not:
// X|O| X| | X| |
// |O| O|O| |O|
// | | | | |O|
if ( count ( $this -> you ) == 1 ) {
foreach ( $this -> winner as $w ) {
2018-01-15 08:15:33 -05:00
if ( in_array ( $this -> me [ 0 ], $w ) && in_array ( $c [ 1 ], $w )
&& $this -> uncontested_winner ( $w )
2011-09-25 04:56:03 -04:00
&& $this -> is_neighbor ( $this -> you [ 0 ], $c [ 1 ])) {
return ( $c [ 1 ]);
2018-01-15 08:15:33 -05:00
}
2011-09-25 04:56:03 -04:00
}
}
2018-01-15 08:15:33 -05:00
}
2011-09-25 04:56:03 -04:00
2018-01-15 08:15:33 -05:00
// You're somewhere else entirely or have made more than one move
2011-09-25 04:56:03 -04:00
// - any strategy vector which puts you on the defense will have to do
foreach ( $candidates as $c ) {
foreach ( $this -> winner as $w ) {
2018-01-15 08:15:33 -05:00
if ( in_array ( $this -> me [ 0 ], $w ) && in_array ( $c [ 1 ], $w )
2011-09-25 04:56:03 -04:00
&& $this -> uncontested_winner ( $w )) {
return ( $c [ 1 ]);
2018-01-15 08:15:33 -05:00
}
2011-09-25 04:56:03 -04:00
}
}
}
2018-01-15 08:15:33 -05:00
// worst case scenario, no strategy we can play,
2011-09-25 04:56:03 -04:00
// just find an empty space and take it
for ( $x = 0 ; $x < $this -> dimen ; $x ++ )
for ( $y = 0 ; $y < $this -> dimen ; $y ++ )
for ( $z = 0 ; $z < $this -> dimen ; $z ++ )
2018-01-15 08:15:33 -05:00
if (( ! $this -> marked_yours ( $x , $y , $z ))
2011-09-25 04:56:03 -04:00
&& ( ! $this -> marked_mine ( $x , $y , $z ))) {
if ( $this -> handicap && $x == 1 && $y == 1 && $z == 1 )
continue ;
return ( sprintf ( " %d%d%d " , $x , $y , $z ));
}
2018-01-15 08:15:33 -05:00
2011-09-25 04:56:03 -04:00
return '' ;
}
function marked_yours ( $x , $y , $z ) {
$str = sprintf ( " %d%d%d " , $x , $y , $z );
if ( in_array ( $str , $this -> you ))
return true ;
return false ;
}
function marked_mine ( $x , $y , $z ) {
$str = sprintf ( " %d%d%d " , $x , $y , $z );
if ( in_array ( $str , $this -> me ))
return true ;
return false ;
}
function is_yours ( $str ) {
if ( in_array ( $str , $this -> you ))
return true ;
return false ;
}
function is_mine ( $str ) {
if ( in_array ( $str , $this -> me ))
return true ;
return false ;
}
function get_corners ( $a ) {
2018-01-15 08:15:33 -05:00
$total = [];
2011-09-25 04:56:03 -04:00
if ( count ( $a ))
foreach ( $a as $b )
if ( in_array ( $b , $this -> corners ))
$total [] = $b ;
return $total ;
}
function uncontested_winner ( $w ) {
if ( $this -> handicap && in_array ( '111' , $w ))
return false ;
$contested = false ;
if ( count ( $this -> you )) {
foreach ( $this -> you as $you )
if ( in_array ( $you , $w ))
$contested = true ;
}
return (( $contested ) ? false : true );
}
function is_neighbor ( $p1 , $p2 ) {
list ( $x1 , $y1 , $z1 ) = sscanf ( $p1 , " %1d%1d%1d " );
list ( $x2 , $y2 , $z2 ) = sscanf ( $p2 , " %1d%1d%1d " );
if ((( $x1 == $x2 ) || ( $x1 == $x2 + 1 ) || ( $x1 == $x2 - 1 )) &&
(( $y1 == $y2 ) || ( $y1 == $y2 + 1 ) || ( $y1 == $y2 - 1 )) &&
(( $z1 == $z2 ) || ( $z1 == $z2 + 1 ) || ( $z1 == $z2 - 1 )))
return true ;
return false ;
}
function my_best_plane () {
2018-01-15 08:15:33 -05:00
$second_choice = [];
2011-09-25 04:56:03 -04:00
shuffle ( $this -> planes );
for ( $p = 0 ; $p < count ( $this -> planes ); $p ++ ) {
$contested = 0 ;
if ( $this -> handicap && in_array ( '111' , $this -> planes [ $p ]))
continue ;
if ( ! in_array ( $this -> me [ 0 ], $this -> planes [ $p ]))
continue ;
foreach ( $this -> you as $m ) {
if ( in_array ( $m , $this -> planes [ $p ]))
2018-01-15 08:15:33 -05:00
$contested ++ ;
2011-09-25 04:56:03 -04:00
}
if ( ! $contested )
return ( $this -> planes [ $p ]);
if ( $contested == 1 )
$second_choice = $this -> planes [ $p ];
}
return $second_choice ;
}
function uncontested_plane () {
$freeplane = true ;
shuffle ( $this -> planes );
$pl = $this -> planes ;
for ( $p = 0 ; $p < count ( $pl ); $p ++ ) {
if ( $this -> handicap && in_array ( '111' , $pl [ $p ]))
continue ;
foreach ( $this -> you as $m ) {
2018-01-15 08:15:33 -05:00
if ( in_array ( $m , $pl [ $p ]))
$freeplane = false ;
2011-09-25 04:56:03 -04:00
}
if ( ! $freeplane ) {
$freeplane = true ;
continue ;
}
if ( $freeplane )
return ( $pl [ $p ]);
}
2018-01-15 08:15:33 -05:00
return [];
2011-09-25 04:56:03 -04:00
}
function fullboard () {
return false ;
}
function draw_board () {
if ( ! strlen ( $this -> yours ))
$this -> yours = 'XXX' ;
$o .= " <form action= \" tictac/ { $this -> handicap } / { $this -> mefirst } / { $this -> dimen } / { $this -> yours } / { $this -> mine } \" method= \" post \" /> " ;
for ( $x = 0 ; $x < $this -> dimen ; $x ++ ) {
$o .= '<table>' ;
for ( $y = 0 ; $y < $this -> dimen ; $y ++ ) {
$o .= '<tr>' ;
for ( $z = 0 ; $z < $this -> dimen ; $z ++ ) {
$s = sprintf ( " %d%d%d " , $x , $y , $z );
$winner = (( is_array ( $this -> winning_play ) && in_array ( $s , $this -> winning_play )) ? " color: #FF0000; " : " " );
$bordertop = (( $y != 0 ) ? " border-top: 2px solid #000; " : " " );
$borderleft = (( $z != 0 ) ? " border-left: 2px solid #000; " : " " );
if ( $this -> handicap && $x == 1 && $y == 1 && $z == 1 )
2018-01-15 08:15:33 -05:00
$o .= " <td style= \" width: 25px; height: 25px; $bordertop $borderleft\ " align = \ " center \" > </td> " ;
2011-09-25 04:56:03 -04:00
elseif ( $this -> marked_yours ( $x , $y , $z ))
$o .= " <td style= \" width: 25px; height: 25px; $bordertop $borderleft $winner\ " align = \ " center \" >X</td> " ;
elseif ( $this -> marked_mine ( $x , $y , $z ))
$o .= " <td style= \" width: 25px; height: 25px; $bordertop $borderleft $winner\ " align = \ " center \" >O</td> " ;
else {
$val = sprintf ( " %d%d%d " , $x , $y , $z );
$o .= " <td style= \" width: 25px; height: 25px; $bordertop $borderleft\ " align = \ " center \" ><input type= \" checkbox \" name= \" move \" value= \" $val\ " onclick = \ " this.form.submit(); \" /></td> " ;
}
}
$o .= '</tr>' ;
}
$o .= '</table><br />' ;
}
$o .= '</form>' ;
return $o ;
}
}
