Крестики-нолики (пишу игрушку)

[Jasha]

Пишу крестики-нолики. Пока игра очень проста, нету даже проверки корректности ввода, но в ближайшее время буду дорабатывать. Пока что играть можно двум людям. Сюда буду кидать релизы, жду отзывов. В ближайшее время хочу добавить в игру:
> поддержку многих языков;
> справку
> меню
> игру против AI

З.Ы. О том, как ходить. Гляньте на "калькуляторный отдел" на клаве. "7" - это левое верхнее поле, "3" - правое нижнее, "5" - центр. Думаю, поняли.

[Nightwolf_ng]

Эм... Консольную что-ли???

Хрен она у меня выиграет, если всё по-честному

[NickLion]

3x3? Переходите на Рэндзю. Или гомоку - то же самое, но без запретов - проще.

[pcodr]

Лицензионное соглашение больше самой программы вышло

P.S. Бага:
108: writeln('Гра завершена.');

[Jasha]

Лицензионное соглашение больше самой программы вышло

нет, не больше.

P.S. Бага:
108: writeln('Гра завершена.');

Да, ничью я еще не сделал

3x3?

и что?

[NickLion]

3х3 - для большинства людей уже неинтересна.

UPD
Всего возможных комбинаций заполнения по очереди X и O поля - 126, что мало. Выиграшная стратегия выслеживается быстро.

[Portnov]

Правильный результат игры - ничья. Если второй игрок (ходящий вторым) делает хоть одну ошибку, первый выигрывает (если, конечно, сам действует разумно).

[Mage-Warrior]

Jasha, делайте! 3х3 - для быстрой дружеской передышки! Поддерживаю. Даже просто для интереса и получения навыков в программировании.

[Jasha]

Вынес ядро игры в отдельный модуль. Теперь лицензия действительно больше кода программы

Бага: 108: writeln('Гра завершена.');

fixed
Начинаю работу над модулем AI.

[Mage-Warrior]

Не работает у меня новая версия (старую пробовал на другой системе - работала). Выполнил strace ./XoXoX - результат во вложении. Обратите внимание на stat, который по циклической ссылке, видимо, уходит в глубокий цикл.

Добавлено: Старая версия на последней системе тоже не работает с такой же симптоматикой.

[Mage-Warrior]

Ой. Решил глянуть в исходники. Jasha, это у Вас курсовая? Откуда такой школьно-навязанный стиль (i,j)? По процедурам разбито, вроде, хорошо, логично. Но вот это повторение кода, вместо его гибкой математической реализации просто ужасает:

Код: Выделить всё

...
1 :if Board[3,1] = 0 then
       begin
         Board[3,1] := number;
         Move_done := true;
       end;
2 :if Board[3,2] = 0 then
        begin
          Board[3,2] := number;
          Move_done := true;
        end;
...

или

Код: Выделить всё

...
if i = 1 then line[1] := line[1] + Board[i,j];
if i = 2 then line[2] := line[2] + Board[i,j];
if i = 3 then line[3] := line[3] + Board[i,j];
...

Очень такой странный код. Где оптимизация? Вся куча if превращается в пару-тройку изящных строк. А представьте, что у Вас по заданию поле 20х20. Даже индусы бы поленились. Всегда представляйте, что задача будет расширена - тогда и код будет получаться красивым и приятным.
Пока что Ваш код "каменный" - и редактировать сложно и выглядит грубовато. Надеюсь, что реализация AI заставит задуматься.
На предыдущий мой пост плюньте - сначала красота должна быть наведена внутри, а уже потом...

[Denjs]

3x3? Переходите на Рэндзю. Или гомоку - то же самое, но без запретов - проще.

Даешь ГО!!!!!!!

[NickLion]

3x3? Переходите на Рэндзю. Или гомоку - то же самое, но без запретов - проще.

Даешь ГО!!!!!!!

Да, можно было бы, только чувствую нескоро результат хоть какой-то будет. До сих пор все программы играют в нее по упрощенным правилам, да и то не добились результатов хороших. На уровне середнячка играют.

[кодировщик]

offtop:
Писал когда-то и я такое, найду выложу.

[frp]

Автор, AI уже сделали?

Насчет выигрышной стратегии - есть стратегия, с которой проиграть не возможно (но выиграть у игрока, использующего эту же стратегию, тоже нельзя).
Первый игрок должен поставить крестик в центр.
Второй игрок должен поставить нулик где-нибудь в углу (где - неважно).
Дальше первый игрок должен пытаться добиться вот-такой ситуации:

Код: Выделить всё

 _ _ _
|X| |X|
| |X| |
| | | |

А второй пытается помешать первому достичь этой ситуации.
Надеюсь, вы меня поняли
PS. Эту идею я пока программно не реализовал, но реальным игрокам с ней никогда не проигрывал (правда, все мои знакомые давно эту стратегию изучили и постоянно игра завершается ничьей).

[drBatty]

PS. Эту идею я пока программно не реализовал, но реальным игрокам с ней никогда не проигрывал (правда, все мои знакомые давно эту стратегию изучили и постоянно игра завершается ничьей).

ага. только возни много...
надо учитывать кучу поворотов, отражений... если забить все варианты(их вроде 4)

Код: Выделить всё

XX
 X


X X
 X

X
 XX

X
XX

в общем писать много и скучно...
но есть красивая идея:
записать все 6561 комбинаций после первого хода(или даже все 19683 с начала) в виде массива, и плюсовать нужную ячейку в случае победы(и минусовать в случае поражения). ну а для хода просто выбирать ту комбинацию, где число побольше(а значит - ведёт к победе). для того что-бы было не так скучно, нужно ввести эл-т случайности.
конечно мы устанем учить такого автомата, да и его обыграют, как только будет нестандартная стратегия(глупая с нашей ТЗ), но мы сделам хитрее: стравим 2 таких автомата!
на ночь.
с нашими компами они магистрами станут!
жаль идея не моя...
вроде здесь было: Математические головоломки и развлечения. Мартин Гарднер

[NickLion]

Дополнение к тому, что сказал drBatty
Не обязательно что-то вообще учить. Достаточно посторить граф переходов по этим состояниям (aka автомат). А строим так: финальные выигрышные состояния помечаем как +1, -1, 0 - победа проигрыш, ничья, нефинальные, допустим, - 2. Затем смотрим, если из какого-то состояния "2" можем получить состояние "+1", то ставим дугу и помечаем данное состояние "+1". Если перехода в "+1" нет, но есть "0" - ставим дугу в это состояние и помечаем "0". Ну и наконец, если есть переход только в "-1", то и данное состояние помечаем как "-1". Осторожно - надо учесть возможность, что есть переходы в неизвестные ("2") состояния, поэтому данное правилло применять только в случае наличия "+1" - однозначный выигрыш, либо, если переходов в "2" не осталось. Можно запускать рекурсию, если есть переходы в "2", чтобы избавиться от них. Зацикливание не произойдет, т.к. каждый переход увеличивает число заполненных ячеек, а их число ограничено.

UPD правильнее всего идти в обратную сторону - т.е. сначал помечаем все состяния, с числом ячеек 8 (все 9 - финальные, уже должны быть отмечены), затем 7, 6, и т.д. Таким способом мы избежим попадания в неизвестные состояния.

[drBatty]

Не обязательно что-то вообще учить.

конечно такой подход тоже разумен, но построение полного графа - долгая и сложная история...
ваш конечный автомат будет работать, но только после того, как пометит ВСЕ вершины. на поле 3х3 это не долго, а на полях большей размерности это просто невозможно.

[Jasha]

Проект умер.

[drBatty]

Проект умер.

а что так?

[кодировщик]

Ведь написано что фсеработает

[drBatty]

Ведь написано что фсеработает

автор остановился на создании AI, хотелось бы посмотреть? Или проект умер как GNU? теперь фсёзакрыто?

[fbi]

Jasha поставил на нём большой крест, а за ним жирный ноль!

[diesel]

Ведь написано что фсеработает

автор остановился на создании AI, хотелось бы посмотреть? Или проект умер как GNU? теперь фсёзакрыто?

видимо потому что понял/прочитал что никакого AI для 3х3 там не надо

[sim1]

Ведь написано что фсеработает

автор остановился на создании AI, хотелось бы посмотреть? Или проект умер как GNU? теперь фсёзакрыто?

видимо потому что понял/прочитал что никакого AI для 3х3 там не надо

для таких задач для AI достаточно простой Minimax -ной процедуры или Альфа-бета процедуры с оценочной функцией

[diesel]

Ведь написано что фсеработает

автор остановился на создании AI, хотелось бы посмотреть? Или проект умер как GNU? теперь фсёзакрыто?

видимо потому что понял/прочитал что никакого AI для 3х3 там не надо

для таких задач для AI достаточно простой Minimax -ной процедуры или Альфа-бета процедуры с оценочной функцией

не, для 3х3 все гораздо проще

[drBatty]

для таких задач для AI достаточно простой Minimax -ной процедуры или Альфа-бета процедуры с оценочной функцией

ага.
но ведь МОЖНО и ГА прикрутить - именно это я и предлагал

[Atolstoy]

Пишу крестики-нолики. Пока игра очень проста, нету даже проверки корректности ввода, но в ближайшее время буду дорабатывать. Пока что играть можно двум людям. Сюда буду кидать релизы, жду отзывов. В ближайшее время хочу добавить в игру:
> поддержку многих языков;
> справку
> меню
> игру против AI

З.Ы. О том, как ходить. Гляньте на "калькуляторный отдел" на клаве. "7" - это левое верхнее поле, "3" - правое нижнее, "5" - центр. Думаю, поняли.

Объясни пожалуйста, чем твоя программа лучше Bovo?
http://kdebovo.googlepages.com/

[diesel]

для таких задач для AI достаточно простой Minimax -ной процедуры или Альфа-бета процедуры с оценочной функцией

ага.
но ведь МОЖНО и ГА прикрутить - именно это я и предлагал

и переписать на sed'е (: