Игра "Пятнадцать спичек" (разновидность игры "Ним")

26.08.09

Задачи пользователя - Игры

+22 –
>
  • Внешний вид
  • Игра
Правила: 15-ть спичек выкладываются в три ряда, по 3, 5, 7 спички в ряду. Противники ходят по очереди. За один ход можно взять любое количество спичек из произвольного ряда (но только из одного ряда). Тот, кто взял последнюю спичку — проиграл.
Количество спичек, которые разрешается брать, — неограниченно. Можно первым же ходом "смести" весь первый ряд, забрав из него все 7 спичек. Но нельзя, например, взять одну спичку из первого ряда и еще одну — из второго.

Скачать файл

ВНИМАНИЕ: Файлы из Базы знаний - это исходный код разработки. Это примеры решения задач, шаблоны, заготовки, "строительные материалы" для учетной системы. Файлы ориентированы на специалистов 1С, которые могут разобраться в коде и оптимизировать программу для запуска в базе данных. Гарантии работоспособности нет. Возврата нет. Технической поддержки нет.

Наименование По подписке [?] Купить один файл
fifteen_matches.zip
.1251279778 16,59Kb
144
144 Скачать (1 SM) Купить за 1 850 руб.

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

Примечание: отчет/обработка всегда должен быть внешним.

+22 –

См. также

Мышонок в лабиринте бегает за сыром (игрушка)

Игры Платформа 1С v7.7 1C77 Бытовые услуги, сервис Абонемент ($m)

Краткая игра про мышонка на языке 1С.

1 стартмани

24.05.2021    4609    1    user1479164    8    

2
Ралли для 1С 7.7

Игры Платформа 1С v7.7 1C77 Абонемент ($m)

Игра "Ралли" для 1С 7.7

1 стартмани

18.05.2019    9202    0    Palmer1976    1    

2
Тетрис для 1С 7.7

Игры Платформа 1С v7.7 1C77 Абонемент ($m)

Игра "Тетрис" для 1С 7.7

1 стартмани

07.05.2019    9463    1    Palmer1976    1    

0
Расписной покер для 1с 7.7

Игры Платформа 1С v7.7 Россия Абонемент ($m)

Расписной покер - игра по которой раньше в СССР проводились чемпионаты. После некоторого забвения опять завоевывает интерес.

1 стартмани

30.08.2016    17513    0    ak_register    4    

2
131072 - игра 2048 для 7.7 с сохранением

Игры Платформа 1С v7.7 1C77 Россия Абонемент ($m)

Каждый, кто играл в эту игру хотя бы раз, задумывался о сохранении, так вот наконец-то это реализовано.

1 стартмани

22.09.2015    15609    0    sanek_kop    3    

1
Игра "2048" для 1с v7.7

Игры Платформа 1С v7.7 1C77 Абонемент ($m)

Внешняя обработка - игра "2048". Пример работы с таблицей в режиме ввода данных

1 стартмани

23.03.2015    14193    0    Tim72    1    

1
Головоломка

Игры Платформа 1С v7.7 1C77 Абонемент ($m)

Головоломка. Угадай мое число.

1 стартмани

03.11.2014    16332    0    whtblck    8    

1
Обработка - шутка, по известному "баяну" по перемешиванию букв в словах для 1C 7.7

Игры Платформа 1С v7.7 1C77 Абонемент ($m)

Пишите письма друзьям и коллегам по новому. Узнайте, с какого раза они заметят подвох!

1 стартмани

20.10.2014    13591    0    FlashC    4    

1
Комментарии
Подписаться на ответы Инфостарт бот Сортировка: Древо развёрнутое
Свернуть все
1. salexdv 2370 26.08.09 13:57 Сейчас в теме
В обед погонять - самое то! :) +
+ – Ответить
3. Tatitutu 3850 26.08.09 14:38 Сейчас в теме
чуть не убил компьютер. А чего он все время побеждает )))
(1) коротковат у тебя обед
+ – Ответить
4. salexdv 2370 26.08.09 14:42 Сейчас в теме
(3) Ну эт смотря как гонять :))))
+ – Ответить
5. Tatitutu 3850 26.08.09 14:47 Сейчас в теме
(4) Согласен. Не поспоришь.

" - А ты кто ?
- Говорящий пес Артемон. Гав !
- Так говорите у Вас нет коробка - боробка ?!?!!!" (с) КВН
+ – Ответить
2. venger 2126 26.08.09 13:58 Сейчас в теме
(0) Буду благодарен за тестирование алгоритма игры компа, писал на скорую руку, мог что-то и не учесть... Выиграть реально, если ходишь первым...
+ – Ответить
6. Ёпрст 1067 26.08.09 15:27 Сейчас в теме
Да... убери ты к едрени фени Это:
"Примечание: отчет/обработка всегда должен быть внешним."

И встроенный отчет можно открывать модально.
+ – Ответить
7. venger 2126 26.08.09 16:10 Сейчас в теме
(6) Как узнать "свое" имя во встроенном отчете/обработке? Я не в курсе просто... Подскажи, в общем, чего уж там...
+ – Ответить
9. Ёпрст 1067 26.08.09 16:44 Сейчас в теме
(7) Если нет ВК, то тупо прописать его в самом отчете.
А дальше проверять на Форма.МодальныйРежим()
+ – Ответить
15. venger 2126 26.08.09 16:52 Сейчас в теме
(9) Вот и я к тому, что если вставили в конфу с другим именем - то привет...
+ – Ответить
16. Ёпрст 1067 26.08.09 16:53 Сейчас в теме
(15) ну дык с умом нужно вставлять..
+ – Ответить
17. venger 2126 26.08.09 17:02 Сейчас в теме
(16) Со знанием, скорее:-) А кто просто чуток пользователь или админ, и особо не в курсе тонкостей 1С и конфигуратора, тому не лишне будет и написать, чтоб не парился, а тот, кто знает, тому оно не помешает.... ИМХО, конечно. Но все-равно спасибо, ибо не оскуднеет источник мастерства твоего, чтоб было всегда чему поучиться у тебя!
+ – Ответить
22. Tatitutu 3850 26.08.09 17:35 Сейчас в теме
(6) Сань конечно у тебя самомнение - Высший класс !!!
Или на лоха расчитано.
Я бы хотел посмотреть тому в глаза, кто бы твои "спички" прикрутил бы к конфигурации ЗИК или ПУБ.Я бы ему их в глаза бы и вставил )))
+ – Ответить
23. venger 2126 26.08.09 20:27 Сейчас в теме
(22) Грубоватая провокация:-)))) Но мож кто и клюнет:-))))
+ – Ответить
8. seven77782 52 26.08.09 16:16 Сейчас в теме
Все время выигрывает компьютер
+ – Ответить
11. Ёпрст 1067 26.08.09 16:45 Сейчас в теме
(8) я пока тоже не выиграл..
лень смотреть...
+ – Ответить
13. Арчибальд 2709 26.08.09 16:46 Сейчас в теме
(8) Ходи первым!
+ – Ответить
14. Ёпрст 1067 26.08.09 16:48 Сейчас в теме
(13) не спасает.
+ – Ответить
10. Ёпрст 1067 26.08.09 16:44 Сейчас в теме
+9 аналогично работают все кнопки "Обновить" и "Настройка" во всех типовых отчетах - тупо передается имя отчета, как из метаданных.
+ – Ответить
12. Ёпрст 1067 26.08.09 16:45 Сейчас в теме
+11 но чуствую - глобальное наипалово на всех уровнях общества :))
+ – Ответить
18. Tatitutu 3850 26.08.09 17:16 Сейчас в теме
Шурик на как вариант ))))

Процедура ПриОткрытии()
Если Форма.МодальныйРежим()=0 Тогда
Для Сч=1 По Метаданные.Отчет() Цикл
Если Прав(Метаданные.Отчет(Сч).Комментарий,6)="Венгер" Тогда
ОткрытьФормуМодально("Отчет."+Метаданные.Отчет(Сч).Идентификатор);
СтатусВозврата(0);
Прервать;
КонецЕсли;
КонецЦикла;
Для Сч=1 По Метаданные.Обработка() Цикл
Если Прав(Метаданные.Отчет(Сч).Комментарий,6)="Венгер" Тогда
ОткрытьФормуМодально("Обработка."+Метаданные.Отчет(Сч).Идентификатор);
СтатусВозврата(0);
Прервать;
КонецЕсли;
КонецЦикла;
КонецЕсли;
КонецПроцедуры
+ – Ответить
19. Ёпрст 1067 26.08.09 17:23 Сейчас в теме
(18) И откуда Комментарий брать во внешнем отчете ?...
+ – Ответить
21. Tatitutu 3850 26.08.09 17:29 Сейчас в теме
(19) )))) молодца - быстро мышей ловишь. Как вариант )))
+ – Ответить
20. venger 2126 26.08.09 17:28 Сейчас в теме
(18) Комментарий и синоним во внешнем не остается... Если его вставить в конфу, то комментарий будет пуст.... только что пробовал... Но юмор заценил...:-)))
+ – Ответить
24. venger 2126 26.08.09 20:39 Сейчас в теме
+23, или я не догнал, короче не важно, кто куда чего вставит:-)))
+ – Ответить
25. venger 2126 26.08.09 20:39 Сейчас в теме
+24, главное наперед предусмотреть все возможные действия пользователя - это и есть мастерство:-))
+ – Ответить
26. СССР 26.08.09 21:08 Сейчас в теме
Молодец ! А я пока "лузер"...до по следующей среды. Проект сдаю - времени нет на "игрушечки",хотя пару интересных идей есть в голове.Моего ПЕРЕВЕРТЫША осилил или несмотрел даже ?
+ – Ответить
27. venger 2126 26.08.09 21:49 Сейчас в теме
(26) > Проект сдаю - времени нет на "игрушечки"

Без проблем, понятно, что время не резиновое, да и помимо работы еще куча всего есть, так что тут без напрягов.

> хотя пару интересных идей есть в голове

Как-нибудь, как появится время, в фоновом режиме, и главное желание, то будет классно, если чего еще релизуете в удовольствие.

> Моего ПЕРЕВЕРТЫША осилил или несмотрел даже ?

У меня боролись два желания (тоже из-за ограниченности по времени) - погонять в Ваши или сваять свои, вот разрываюсь надвое:-)

Да и все-равно было приятно, а победила дружба, что самое главное!
+ – Ответить
28. Lexus 27.08.09 17:50 Сейчас в теме
я знаю другую версию, там нет разбивки по рядам и ограничения в количестве спичек.
в таком варианте чтобы выиграть надо всегда оставлять противнику количество спичек равное степени двойки за вычетом единицы, т.е. (2^2-1), (2^3-1), (2^4-1) и т.п.
+ – Ответить
34. venger 2126 28.08.09 11:35 Сейчас в теме
(28),(32) Можно усложнить, добавить еще ряд с 11-й спичками, т.е. 4 ряда - 3,5,7,11 и т.д. Простые числа в рядах должны быть, вроде как, т.е. 5-й ряд если добавлять, то 13 спичек и т.д. Можно поменять условие - побеждает тот, кто последний взял. В общем, как-нибудь, надо будет развить идею...
+ – Ответить
35. Shaman100M 1153 28.08.09 11:43 Сейчас в теме
(34) без разницы, сколько рядов, какое количество, главное, правильно выбрать, кому первым ходить.
+ – Ответить
29. Abadonna 3972 27.08.09 18:55 Сейчас в теме
ХЗ, как работает движок? Плюс, чтобв не пакостили
+ – Ответить
30. CheBurator 3230 28.08.09 01:49 Сейчас в теме
плохо.. выбор количества снимаемых спичек должен делаться выделением области мышью... низачот, короче...
+ – Ответить
31. CheBurator 3230 28.08.09 01:50 Сейчас в теме
а вот еще раньше без всяких компов, на спичечных коробках была самообучаемая машина по игре в крестики-нулики...
+ – Ответить
33. venger 2126 28.08.09 11:35 Сейчас в теме
(31) Ух-ты, где бы поподробнее об этом узнать? Про такую самообучаемую машину, да еще на спичечных коробках.....
+ – Ответить
32. Shaman100M 1153 28.08.09 11:01 Сейчас в теме
на пальцах можно выйграть если знать секрет
+ – Ответить
36. lilly 12.01.12 20:41 Сейчас в теме
Забавная игра))) Раньше такую не встречала)))
+ – Ответить
Оставьте свое сообщение