4 * Description: The TicTacToe game application
6 * Author: Mike Macgirvin <http://macgirvin.com/profile/mike>
11 use Friendica\Core\Hook;
14 function tictac_install()
16 Hook::register('app_menu', 'addon/tictac/tictac.php', 'tictac_app_menu');
19 function tictac_app_menu(App $a, array &$b)
21 $b['app_menu'][] = '<div class="app-title"><a href="tictac">' . DI::l10n()->t('Three Dimensional Tic-Tac-Toe') . '</a></div>';
25 * This is a statement rather than an actual function definition. The simple
26 * existence of this method is checked to figure out if the addon offers a
29 function tictac_module() {}
31 function tictac_content(App $a) {
36 $handicap = DI::args()->get(1);
37 $mefirst = DI::args()->get(2);
38 $dimen = DI::args()->get(3);
39 $yours = DI::args()->get(4);
40 $mine = DI::args()->get(5);
42 $yours .= $_POST['move'];
44 elseif(DI::args()->getArgc() > 1) {
45 $handicap = DI::args()->get(1);
52 $o .= '<h3>' . DI::l10n()->t('3D Tic-Tac-Toe') . '</h3><br />';
54 $t = new tictac($dimen,$handicap,$mefirst,$yours,$mine);
57 $o .= '<a href="tictac">' . DI::l10n()->t('New game') . '</a><br />';
58 $o .= '<a href="tictac/1">' . DI::l10n()->t('New game with handicap') . '</a><br />';
59 $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. ');
60 $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.');
62 $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.');
71 private $first_move = true;
72 private $handicap = 0;
75 private $winning_play;
79 private $crosses = ['011','101','110','112','121','211'];
82 '001','010','011','012','021',
83 '101','110','111','112','121',
84 '201','210','211','212','221');
88 '000','002','020','022',
89 '200','202','220','222'];
92 ['000','001','002','010','011','012','020','021','022'], // horiz 1
93 ['100','101','102','110','111','112','120','121','122'], // 2
94 ['200','201','202','210','211','212','220','221','222'], // 3
95 ['000','010','020','100','110','120','200','210','220'], // vert left
96 ['000','001','002','100','101','102','200','201','202'], // vert top
97 ['002','012','022','102','112','122','202','212','222'], // vert right
98 ['020','021','022','120','121','122','220','221','222'], // vert bot
99 ['010','011','012','110','111','112','210','211','212'], // left vertx
100 ['001','011','021','101','111','221','201','211','221'], // top vertx
101 ['000','001','002','110','111','112','220','221','222'], // diag top
102 ['020','021','022','110','111','112','200','201','202'], // diag bot
103 ['000','010','020','101','111','121','202','212','222'], // diag left
104 ['002','012','022','101','111','121','200','210','220'], // diag right
105 ['002','011','020','102','111','120','202','211','220'], // diag x
106 ['000','011','022','100','111','122','200','211','222'] // diag x
112 ['000','001','002'], // board 0 winners - left corner across
113 ['000','010','020'], // down
114 ['000','011','022'], // diag
115 ['001','011','021'], // middle-top down
116 ['010','011','012'], // middle-left across
117 ['002','011','020'], // right-top diag
118 ['002','012','022'], // right-top down
119 ['020','021','022'], // bottom-left across
120 ['100','101','102'], // board 1 winners
128 ['200','201','202'], // board 2 winners
136 ['000','100','200'], // top-left corner 3d
140 ['001','101','201'], // top-middle 3d
142 ['002','102','202'], // top-right corner 3d
146 ['010','110','210'], // left-middle 3d
148 ['011','111','211'], // middle-middle 3d
149 ['012','112','212'], // right-middle 3d
151 ['020','120','220'], // bottom-left corner 3d
155 ['021','121','221'], // bottom-middle 3d
157 ['022','122','222'], // bottom-right corner 3d
164 function __construct($dimen,$handicap,$mefirst,$yours,$mine) {
166 $this->handicap = (($handicap) ? 1 : 0);
167 $this->mefirst = (($mefirst) ? 1 : 0);
168 $this->yours = str_replace('XXX','',$yours);
170 $this->you = $this->parse_moves('you');
171 $this->me = $this->parse_moves('me');
174 $this->first_move = false;
179 if($this->first_move) {
181 $o .= '<div class="error-message">' . DI::l10n()->t('You go first...') . '</div><br />';
183 $o .= $this->draw_board();
186 $o .= '<div class="error-message">' . DI::l10n()->t('I\'m going first this time...') . ' </div><br />';
191 if($this->check_youwin()) {
192 $o .= '<div class="error-message">' . DI::l10n()->t('You won!') . '</div><br />';
193 $o .= $this->draw_board();
197 if($this->fullboard())
198 $o .= '<div class="error-message">' . DI::l10n()->t('"Cat" game!') . '</div><br />';
200 $move = $this->winning_move();
202 $this->mine .= $move;
203 $this->me = $this->parse_moves('me');
206 $move = $this->defensive_move();
208 $this->mine .= $move;
209 $this->me = $this->parse_moves('me');
212 $move = $this->offensive_move();
214 $this->mine .= $move;
215 $this->me = $this->parse_moves('me');
220 if($this->check_iwon())
221 $o .= '<div class="error-message">' . DI::l10n()->t('I won!') . '</div><br />';
222 if($this->fullboard())
223 $o .= '<div class="error-message">' . DI::l10n()->t('"Cat" game!') . '</div><br />';
224 $o .= $this->draw_board();
228 function parse_moves($player) {
234 while(strlen($str)) {
235 $ret[] = substr($str,0,3);
236 $str = substr($str,3);
242 function check_youwin() {
243 for($x = 0; $x < count($this->winner); $x ++) {
244 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)) {
245 $this->winning_play = $this->winner[$x];
251 function check_iwon() {
252 for($x = 0; $x < count($this->winner); $x ++) {
253 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)) {
254 $this->winning_play = $this->winner[$x];
260 function defensive_move() {
262 for($x = 0; $x < count($this->winner); $x ++) {
263 if(($this->handicap) && in_array('111',$this->winner[$x]))
265 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)))
266 return($this->winner[$x][2]);
267 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)))
268 return($this->winner[$x][1]);
269 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)))
270 return($this->winner[$x][0]);
275 function winning_move() {
277 for($x = 0; $x < count($this->winner); $x ++) {
278 if(($this->handicap) && in_array('111',$this->winner[$x]))
280 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)))
281 return($this->winner[$x][2]);
282 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)))
283 return($this->winner[$x][1]);
284 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)))
285 return($this->winner[$x][0]);
290 function offensive_move() {
292 shuffle($this->planes);
293 shuffle($this->winner);
294 shuffle($this->corners);
295 shuffle($this->crosses);
297 if(! count($this->me)) {
298 if($this->handicap) {
299 $p = $this->uncontested_plane();
300 foreach($this->corners as $c)
302 && (! $this->is_yours($c)) && (! $this->is_mine($c)))
306 if((! $this->marked_yours(1,1,1)) && (! $this->marked_mine(1,1,1)))
308 $p = $this->uncontested_plane();
309 foreach($this->crosses as $c)
311 && (! $this->is_yours($c)) && (! $this->is_mine($c)))
316 if($this->handicap) {
317 if(count($this->me) >= 1) {
318 if(count($this->get_corners($this->me)) == 1) {
319 if(in_array($this->me[0],$this->corners)) {
320 $p = $this->my_best_plane();
321 foreach($this->winner as $w) {
322 if((in_array($w[0],$this->you))
323 || (in_array($w[1],$this->you))
324 || (in_array($w[2],$this->you)))
326 if(in_array($w[0],$this->corners)
327 && in_array($w[2],$this->corners)
328 && in_array($w[0],$p) && in_array($w[2],$p)) {
329 if($this->me[0] == $w[0])
331 elseif($this->me[0] == $w[2])
338 $r = $this->get_corners($this->me);
341 foreach($this->winner as $w) {
342 if(in_array('111',$w))
344 if(($r[0] == $w[0]) || ($r[0] == $w[2]))
346 if(($r[1] == $w[0]) || ($r[1] == $w[2]))
349 if(count($w1) && count($w2)) {
352 if((in_array($a[0],$this->you))
353 || (in_array($a[1],$this->you))
354 || (in_array($a[2],$this->you))
355 || (in_array($b[0],$this->you))
356 || (in_array($b[1],$this->you))
357 || (in_array($b[2],$this->you)))
359 if(($a[0] == $b[0]) && ! $this->is_mine($a[0])) {
362 elseif(($a[2] == $b[2]) && ! $this->is_mine($a[2])) {
373 //&& (count($this->me) == 1) && (count($this->you) == 1)
374 // && in_array($this->you[0],$this->corners)
375 // && $this->is_neighbor($this->me[0],$this->you[0])) {
377 // Yuck. You foiled my plan. Since you obviously aren't playing to win,
378 // I'll try again. You may keep me busy for a few rounds, but I'm
379 // gonna' get you eventually.
381 // $p = $this->uncontested_plane();
382 // foreach($this->crosses as $c)
383 // if(in_array($c,$p))
389 // find all the winners containing my points.
391 foreach($this->winner as $w)
392 foreach($this->me as $m)
393 if((in_array($m,$w)) && (! in_array($w,$mywinners)))
396 // find all the rules where my points are in the center.
398 if(count($mywinners)) {
399 foreach($mywinners as $w) {
400 foreach($this->me as $m) {
401 if(($m == $w[1]) && ($this->uncontested_winner($w))
402 && (! in_array($w,$trythese)))
409 for($p = 0; $p < count($this->planes); $p ++) {
410 if($this->handicap && in_array('111',$this->planes[$p]))
412 foreach($this->me as $m)
413 if((in_array($m,$this->planes[$p]))
414 && (! in_array($this->planes[$p],$myplanes)))
415 $myplanes[] = $this->planes[$p];
419 // find all winners which share an endpoint, and which are uncontested
421 if(count($trythese) && count($myplanes)) {
422 foreach($trythese as $t) {
423 foreach($this->winner as $w) {
424 if(! $this->uncontested_winner($w))
426 if((in_array($t[0],$w)) || (in_array($t[2],$w))) {
427 foreach($myplanes as $p)
428 if(in_array($w[0],$p) && in_array($w[1],$p) && in_array($w[2],$p) && ($w[1] != $this->me[0]))
429 if(! in_array($w,$candidates))
436 // Find out if we are about to force a win.
437 // Looking for two winning vectors with a common endpoint
438 // and where we own the middle of both - we are now going to
439 // grab the endpoint. The game isn't yet over but we've already won.
441 if(count($candidates)) {
442 foreach($candidates as $c) {
443 if(in_array($c[1],$this->me)) {
445 foreach($trythese as $t)
448 elseif($t[2] == $c[2])
453 // find opponents planes
455 for($p = 0; $p < count($this->planes); $p ++) {
456 if($this->handicap && in_array('111',$this->planes[$p]))
458 if(in_array($this->you[0],$this->planes[$p]))
459 $yourplanes[] = $this->planes[$p];
462 shuffle($this->winner);
463 foreach($candidates as $c) {
465 // We now have a list of winning strategy vectors for our second point
466 // Pick one that will force you into defensive mode.
467 // Pick a point close to you so we don't risk giving you two
468 // in a row when you block us. That would force *us* into
475 if(count($this->you) == 1) {
476 foreach($this->winner as $w) {
477 if(in_array($this->me[0], $w) && in_array($c[1],$w)
478 && $this->uncontested_winner($w)
479 && $this->is_neighbor($this->you[0],$c[1])) {
486 // You're somewhere else entirely or have made more than one move
487 // - any strategy vector which puts you on the defense will have to do
489 foreach($candidates as $c) {
490 foreach($this->winner as $w) {
491 if(in_array($this->me[0], $w) && in_array($c[1],$w)
492 && $this->uncontested_winner($w)) {
499 // worst case scenario, no strategy we can play,
500 // just find an empty space and take it
502 for($x = 0; $x < $this->dimen; $x ++)
503 for($y = 0; $y < $this->dimen; $y ++)
504 for($z = 0; $z < $this->dimen; $z ++)
505 if((! $this->marked_yours($x,$y,$z))
506 && (! $this->marked_mine($x,$y,$z))) {
507 if($this->handicap && $x == 1 && $y == 1 && $z == 1)
509 return(sprintf("%d%d%d",$x,$y,$z));
515 function marked_yours($x,$y,$z) {
516 $str = sprintf("%d%d%d",$x,$y,$z);
517 if(in_array($str,$this->you))
522 function marked_mine($x,$y,$z) {
523 $str = sprintf("%d%d%d",$x,$y,$z);
524 if(in_array($str,$this->me))
529 function is_yours($str) {
530 if(in_array($str,$this->you))
535 function is_mine($str) {
536 if(in_array($str,$this->me))
541 function get_corners($a) {
545 if(in_array($b,$this->corners))
550 function uncontested_winner($w) {
551 if($this->handicap && in_array('111',$w))
554 if(count($this->you)) {
555 foreach($this->you as $you)
556 if(in_array($you,$w))
559 return (($contested) ? false : true);
563 function is_neighbor($p1,$p2) {
564 list($x1,$y1,$z1) = sscanf($p1, "%1d%1d%1d");
565 list($x2,$y2,$z2) = sscanf($p2, "%1d%1d%1d");
567 if((($x1 == $x2) || ($x1 == $x2+1) || ($x1 == $x2-1)) &&
568 (($y1 == $y2) || ($y1 == $y2+1) || ($y1 == $y2-1)) &&
569 (($z1 == $z2) || ($z1 == $z2+1) || ($z1 == $z2-1)))
575 function my_best_plane() {
578 shuffle($this->planes);
579 for($p = 0; $p < count($this->planes); $p ++ ) {
581 if($this->handicap && in_array('111',$this->planes[$p]))
583 if(! in_array($this->me[0],$this->planes[$p]))
585 foreach($this->you as $m) {
586 if(in_array($m,$this->planes[$p]))
590 return($this->planes[$p]);
592 $second_choice = $this->planes[$p];
594 return $second_choice;
603 function uncontested_plane() {
605 shuffle($this->planes);
608 for($p = 0; $p < count($pl); $p ++ ) {
609 if($this->handicap && in_array('111',$pl[$p]))
611 foreach($this->you as $m) {
612 if(in_array($m,$pl[$p]))
625 function fullboard() {
629 function draw_board() {
630 if(! strlen($this->yours))
631 $this->yours = 'XXX';
632 $o .= "<form action=\"tictac/{$this->handicap}/{$this->mefirst}/{$this->dimen}/{$this->yours}/{$this->mine}\" method=\"post\" />";
633 for($x = 0; $x < $this->dimen; $x ++) {
635 for($y = 0; $y < $this->dimen; $y ++) {
637 for($z = 0; $z < $this->dimen; $z ++) {
638 $s = sprintf("%d%d%d",$x,$y,$z);
639 $winner = ((is_array($this->winning_play) && in_array($s,$this->winning_play)) ? " color: #FF0000; " : "");
640 $bordertop = (($y != 0) ? " border-top: 2px solid #000;" : "");
641 $borderleft = (($z != 0) ? " border-left: 2px solid #000;" : "");
642 if($this->handicap && $x == 1 && $y == 1 && $z == 1)
643 $o .= "<td style=\"width: 25px; height: 25px; $bordertop $borderleft\" align=\"center\"> </td>";
644 elseif($this->marked_yours($x,$y,$z))
645 $o .= "<td style=\"width: 25px; height: 25px; $bordertop $borderleft $winner\" align=\"center\">X</td>";
646 elseif($this->marked_mine($x,$y,$z))
647 $o .= "<td style=\"width: 25px; height: 25px; $bordertop $borderleft $winner\" align=\"center\">O</td>";
649 $val = sprintf("%d%d%d",$x,$y,$z);
650 $o .= "<td style=\"width: 25px; height: 25px; $bordertop $borderleft\" align=\"center\"><input type=\"checkbox\" name=\"move\" value=\"$val\" onclick=\"this.form.submit();\" /></td>";
655 $o .= '</table><br />';