Файл с игрой в excel - Word и Excel - помощь в работе с программами

У нас появилось свободное время.. значит можно поиграть! В этой рубрике мы будем выкладывать простенькие игры в Excel. Да, в Excel тоже можно писать игры, ведь в нем встроен язык программирования VBA. После того как вы скачаете игру (по ссылкам ниже), необходимо будет только включить макросы (как это сделать описано тут). Во многих Ирах в Excel (в макросах) есть много интересных находок. Кто знает, может игра в Excel поможет вам не только скоротать время, но и научиться чему-то новому. Играйте в Excel и пишите игры сами!

Игра в Excel «Морской бой»:

Battleships

Игра в Excel «Змейка»:

snaked

Игра в Excel «Вертолет»:

gmexcopter

Игра в Excel «Квадрат»

Squares

Игра в Excel «Лягушка»

frog_leap

Игра в Excel «Темница»

dungeon

Если у вас есть чем поделиться — присылайте!

Спасибо за внимание.

Источник

Время на прочтение
1 мин

Количество просмотров 190K

Бухгалтер из Торонто по имени Кэри Уолкин (Cary Walkin) никогда не занимался разработкой компьютерных игр, но в совершенстве освоил Excel. Этого оказалось достаточно для создания RPG-игры, которая работает на макросах VBA, встроенного языка программирования Excel.

Игру Arena.Xlsm версии 1.0 можно скачать здесь:

v1-0-arena.xlsm (работает в Excel 2007 и Excel 2010 под Windows)

Ключевые особенности:

Увлекательный сюжет с четырьмя различными концовками, в зависимости от прохождения игры
Более 2000 врагов с различным уровнем ИИ
39 модификаторов вещей означает более 1000 возможных комбинаций и свойств предметов
8 схваток с боссами, для победы над каждым из них нужна особая тактика
4 предварительно подготовленных игровых пространства
31 заклинание, есть много разных стратегий для успеха
15 уникальных артефактов
36 наград (достижений)
Вся игра от начала до конца проходит внутри рабочей книги Excel

Официальная wiki-страница для помощи по игре, там же информация о базовых стратегиях.

Так что если увидите бухгалтера в офисе, который целыми сутками сидит в программе Excel, присмотритесь к нему повнимательнее. Кто знает, какие заклинания он сейчас подбирает для босса на шестом уровне.

Теги:

Arena.Xlsm
Excel
RPG
рабочая книга Excel
макрос
VBA

Хабы:

Ненормальное программирование
Разработка игр
Visual Basic for Applications

Источник

Развлекая — поучай.
(Гораций)

Если вы уже имели какой-то опыт программирования в прошлой жизни (привет, Basic, Pascal и т.д.), то, скорее всего, уже прошли этап «игрописательства». Однако, тряхнуть стариной и размять мозги вполне можно. Если же вы никогда не программировали игр, то никогда не поздно начать этот весьма увлекательный процесс. Всё, что нам потребуется — это Excel (любой версии) и 15-20 минут времени для начала.

Тренироваться будем на известной в узких кругах программистов игре «Жизнь» (Life). Её придумал британский математик Джон Конвей еще в 1970 году на основе работ легендарного Джона фон Неймана — прадедушки всех современных компьютеров. Если вы не сталкивались с ней раньше — не проблема, правила можно объяснить за полминуты:

Игра идет на большом (иногда даже бесконечном) поле в клеточку («вселенной»). Как вы понимаете, Excel для такого подходит идеально
В один момент времени каждая клетка может быть в двух состояниях — живой (обозначим её каким-нибудь значком или просто единичкой) или же мертвой (пустой). Начальное состояние всех клеток в игре называют первым поколением.
Если брать блок клеток 3х3 с текущей клеткой в середине, то вокруг неё оказывается 8 клеток-соседей. Дальнейшая судьба клетки зависит от того, сколько именно живых клеток (N) окажется в этой окружающей области. Вариантов несколько:

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

Вот, собственно, и все правила. Можно даже сказать, что всё это неправильно называть игрой, т.к. здесь нет соперников в привычном понимании. Вы расставляете первое поколение, запускаете процесс и затем просто наблюдаете за развитием вашей «колонии» на протяжении нескольких поколений.

Однако, не стоит недооценивать обманчивую простоту этой логики — количество комбинаций, сценариев игры и многообразие фигур в такой игровой вселенной поражает своим разнообразием и поистине бесконечно. В математике подобные модели называют клеточными автоматами. А самое интересное, что реализовать подобную модель можно в любой версии Excel буквально на 20 строчках кода.

Поехали.

Шаг 1. Готовим игровое пространство

Создадим в новой книге три листа:

game — это будет основной листы игры, где мы будем наблюдать за развитием нашей «колонии»
next — этот лист будет формировать следующее поколение, которое затем придет на смену текущему
start — на этом листе мы будем задавать начальную конфигурацию, т.е. первое поколение в нашей игре

На каждом листе (можно выделить их заранее, удерживая клавишу Shift или Ctrl, чтобы не повторять трижды одни и те же действия), разметим игровое поле размером, допустим, 30 на 30 ячеек. Впоследствии размер поля можно будет подправить в соответствии с вашими аппетитами и мощью вашего ПК:

На листе start разметим с помощью единичек первое поколение любым желаемым образом:

Шаг 2. Пишем макрос

Теперь пришла пора расчехлить наш VBA и написать макрос, который и будет делать всю работу, а именно:

Копировать первое поколение с листа start на лист game.
Проходить по ячейкам игрового поля на листе game и проверять окружающих соседей (блок 3х3) для каждой из них.
В зависимости от результатов проверки помечать на листе следующего поколения next ту же ячейку как живую (1) или мертвую (пусто).
Копировать получившееся новое поколение с листа next вместо текущего на листы игры game.
Повторять пункты 2-4 несколько раз, сменяя одно поколение другим и отображая на экране изменения в нашей «колонии».

Для начала откроем редактор Visual Basic на вкладке Разработчик (Developer). Если такой вкладки не видно, то её нужно будет сначала отобразить через Файл — Параметры — Настройка ленты (File — Options — Customize Ribbon), включив соответствующий флажок.

В открывшемся окне редактора создадим новый модуль с помощью команды меню Insert — Module, а затем скопируем и вставим туда код нашего макроса:

Sub Life()
    Dim cell As Range, n As Integer, i As Integer
    
    Set rGame = Worksheets("Game").Range("B2:AE31")
    Set rStart = Worksheets("Start").Range("B2:AE31")
    Set rNext = Worksheets("Next").Range("B2:AE31")
    Set wNext = Worksheets("Next")

    rStart.Copy Destination:=rGame
    
    For i = 1 To 50
        rNext.ClearContents
        For Each cell In rGame.Cells
            n = WorksheetFunction.CountA(cell.Offset(-1, -1).Resize(3, 3)) - cell.value
            If cell = "" And n = 3 Then wNext.Cells(cell.Row, cell.Column) = 1
            If cell = 1 And (n = 2 Or n = 3) Then wNext.Cells(cell.Row, cell.Column) = 1
            If cell = 1 And (n < 2 Or n > 3) Then wNext.Cells(cell.Row, cell.Column) = ""
        Next cell
        rNext.Copy Destination:=rGame
    Next i
End Sub

Теперь давайте разберем его построчно для понятности:

Поскольку в коде нам придется несколько раз ссылаться и много раз работать с диапазонами игрового пространства (B2:AE31) на каждом из трёх листов книги, то имеет смысл сразу оформить их как переменные. Это делается в блоке:

Set rGame = Worksheets("Game").Range("B2:AE31")
Set rStart = Worksheets("Start").Range("B2:AE31")
Set rNext = Worksheets("Next").Range("B2:AE31")

Заодно мы создаем ещё и переменную wNext, которая ссылается на весь лист next целиком — это нам тоже пригодится в будущем:

Set wNext = Worksheets("Next")

Затем, перед началом игры, мы должны перенести первое поколение с листа start на лист game. Это выполяется командой прямого копирования с использованием уже созданных переменных:

rStart.Copy Destination:=rGame

Поскольку мы хотим прокрутить в нашей игре не одно, а несколько (например, 50 для начала) поколений, то дальнейшие действия заключены в цикл:

For i = 1 to 50
...
Next i

А внутри этого цикла мы, во-первых, сначала очищаем рабочее пространство на листе next для формирования следующего поколения:

rNext.ClearContents

А, во-вторых, запускаем вложенный цикл прохода по всем ячейкам игровой вселенной на листе game, чтобы проверить каждую из них — это реализовано циклом прохода по коллекции:

For Each cell in rGame.Cells
...
Next cell

Ссылка на очередную проверяемую ячейку будет храниться в переменной cell. Для этой ячейки нам нужно сначала построить окрестность 3х3 с ней в середине. Это выполняется с помощью конструкции:

cell.Offset(-1, -1).Resize(3, 3)

Здесь метод Offset(-1,-1) виртуально сдвигает текущую проверяемую ячейку на одну строку вверх и на один столбец влево, а потом метод Resize(3,3) опять же виртуально растягивает эту одну ячейку до новых размеров 3 на 3:

Чтобы посчитать количество заполненных ячеек в полученной окрестности применяется функция рабочего листа СЧЁТЗ (COUNTA), которую в VBA можно вызвать с помощью объекта WorksheetFunction. Таким образом количество живых соседей в окружающей текущую ячейку области 3 на 3 мы получаем выражением (не забыв вычесть из полученного количества текущую ячейку):

n = WorksheetFunction.CountA(cell.Offset(-1, -1).Resize(3, 3)) - WorksheetFunction.CountA(cell)

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

If cell = "" And n = 3 Then wNext.Cells(cell.Row, cell.Column) = 1
If cell = 1 And (n = 2 Or n = 3) Then wNext.Cells(cell.Row, cell.Column) = 1
If cell = 1 And (n < 2 Or n > 3) Then wNext.Cells(cell.Row, cell.Column) = ""

Когда цикл прохода по ячейкам будет завершен, то сформированное следующее поколение с листа next нужно скопировать на место текущего на листе game — делаем это уже знакомой конструкцией:

rNext.Copy Destination:=rGame

Вот, собственно, и вся логика.

Осталось вернуться в Excel на лист game, запустить нашу игру через вкладку Разработчик — Макросы (Developer — Macro) и насладиться процессом развития нашей колонии:

Ссылки по теме

Что такое макросы и как их программировать в Microsoft Excel
Справочник по игре «Жизнь» — сайт LifeWiki

Источник

Итак, мы продолжаем играть 🙂 Напоминаем, что после того как вы скачаете игру в Excel (по ссылкам ниже), необходимо будет включить макросы (как это сделать описано тут).

Сегодня представляем вашему вниманию подборку простых игр в Excel из разряда ностальгия.

Играйте в игры в Excel и пишите игры сами!

Игра в Excel «Тетрис»:

tetris

Игра в Excel «Шашки»:

checkers

Игра в Excel «ПинПонг»:

Pinpong

Игра в Excel «Квадрат»:

rotation

Надеемся, что игры в Excel скрасят ваш досуг — немного отвлекут от формул, макросов и сводных таблиц.

Спасибо за внимание.

SirExcel.ru – Безграничные возможности Excel

Excel — мощная программа, в которой можно создавать другие программы, поменьше. Даже отдельные функции являют собой, по сути дела, особые программки. Не все они служат скучным целям. Игр, написанных специально для Excel, довольно много. Возможно, игры и не исчезли, а просто их упрятали поглубже. Если вам известно, как запустить в Microsoft Office какую-нибудь игрушку, напишите мне, пожалуйста. Иногда в творческом процессе так хочется кого-нибудь пристрелить или где-нибудь полетать…

Игры inside

В версиях Excel 95-2000 игрушки, придуманные авторами программы, «спрятаны». Например, в Excel 95 нужно проделать следующие шаманские действия.

Создать новую книгу.
Выделить строку gод номером 95.
Нажать клавишу табуляции.
Открыть меню Справка ► 0 программе.
Удерживая одновременно клавиши Ctr, Alt и Shift, щелкнуть на пункте Техническая поддержка.

И запускается «стрелялка», напоминающая комбатс и светлой памяти Doom, только попроще!

В Excel 97 действия для вызова игры такие.

Выполнить команду Сервис ► Параметры и в открывшемся окне на вкладке Общие снять флажок Стиль ссылок R1C1.
Создать таблицу.
Нажать F5 и ввести в появившемся окне кабалистическую надпись Х97:_97.
Нажать Enter.
Выделить строку с номером 97.
Нажать клавишу табуляции, а затем, удерживая Shift и Ctrl, щелкнуть на значке Мастера диаграмм и подождать, пока открывающееся окно не заполнит весь экран.

В результате вы сможете оценить достоинства авиасимулятора, придуманного и разработанного программистами Microsoft.

В Excel 2000 процедура запуска игры усложнена. Нужно выполнить такие действия.

Создать новую книгу.
Сохранить ее в формате веб-страницы (Сохранить как Web-страницу), установив флажки выделенное: Лист и Добавить интерактивность.
Открыть созданную страницу в Internet Explorer версии не ниже 5.0.
Выделить строку 2000.
Клавишей табуляции перевести выделение на ячейку WC 2000.
Одновременно нажать клавиши Ctrl, Alt и Shift, расположенные на клавиатуре слева, и щелкнуть в левом верхнем углу внедренного в веб-страницу листа Excel на эмблеме Office.

После этого у вас появляется возможность погонять по виртуальной трассе виртуальные же машинки.

После 2000 года руководство компании Microsoft, видимо, узнало, чем занимаются программисты вместо того, чтобы улучшать интерфейс и повышать надежность программных продуктов. Или еще что-то случилось. Во всяком случае, начиная с Office ХР «встроенные» игры из Excel исчезли. А заодно и из Word, где была, например, неплохая вариация на тему игры Pinball.

Игры-макросы

В Excel (и вообще в любой программе Microsoft Office) есть возможность написать мини-приложение на языке программирования VBA (Visual Basic for Applications). Обычно на нем пишут какие-нибудь полезные вещи — сложные расчеты, поиск объектов по определенному признаку, хитрое форматирование данных. Но никто не запрещает и игру написать.

А хоть бы и запрещали! В Интернете полно игр, написанных для Excel. Не буду даже советовать конкретные сайты. Достаточно зайти на поисковый сервер (например, или и в строке поиска написать Excel игра или, если хотя бы чуть-чуть читаете по-английски, Excel game. Увидите множество ресурсов, где есть подходящие игрушки. Правда, для их запуска нужно немного изменить настройки программы.

Давайте я вам расскажу, как установить какую-нибудь игру, а заодно и передохну на совершенно законном основании. Для тестирования я выбрал старый добрый «Тетрис». Ностальгия, знаете ли, замучила: молодость, лаборатория нелинейной спектроскопии, поляризация лазера на красителях, расчет эксперимента на ЭВМ «Мазовия», а в перерывах… М-да… Молодость ушла, а «Тетрис» жив и постоянно появляется в самых неожиданных формах: например в виде игрушки для Excel. Файл игры я скачал с одного популярного интернет-портала. Это обычный документ Excel под названием Tetris.xls. Открыл его… и туг же обнаружил многозначительное предупреждение.

Ни в коем случае не разрешайте выполнение неизвестных макросов, если не уверены в их безвредности! Я бы ни за что не стал этого делать, но надо же вас научить играть в «Тетрис»!

Это очень важное предупреждение. Давайте с ним разберемся, прежде чем пойти дальше. Как я уже писал, игры — это мини-программы (макросы), написанные на языке VBA. Это не очень «навороченный* язык, по всякого рода вредители навострились писать вирусы и на нем.

Поэтому в Excel 2007-2013 по умолчанию выполнение всех макросов запрещено. Как известно, воздержание — единственный надежный метод предохранения. Поэтому, увидев такое предупреждение в незнакомом файле, который вы получили неизвестно от кого, лучше сразу закройте его и займитесь чем-нибудь другим. В данном случае я трижды плюнул через левое плечо, помолился лицензионному антивирусу, который стережет мой компьютер, и не стал закрывать файл. Более того, я нажал кнопку Параметры и увидел окно настроек.

Тут я еще раз поплевал через плечо и установил переключатель в положение Включить это содержимое. И нажал ОК. С этой секунды все макросы, записанные в файле Tetris.xls, перешли в активное состояние. При внимательном рассмотрении файл с игрой «Тетрис» оказался очень простым. Кроме данных об авторе, на листе оказались две кнопки — Запуск и Выход, а также список уровней сложности, от первого до пятого. Я, естественно, начал с самого сложного, пятого, и погрузился в игру.

Выяснилось, что руки до сих пор помнят клавиши управления игрой: на цифровой клавиатуре стрелки ← и → сдвигают фигуру соответственно влево и вправо; стрелка ↑ поворачивает фигуру вокруг своей оси; стрелка ↓ ускоряет движение вниз. Мышечная память оказалась очень кстати, потому что в самом файле об управлении игрой — ни слова.

Hi there, this is a Tetris game I made in Excel two years back. To start or to pause, click the yellow “sun” icon in the upper right corner of the chart. You can adjust the game level on the top side of the chart and also change the landscape by clicking “Landscape” on the bottom right. The landscape will advance every time you score but the score will not change with speed. To my best recollection I give 100 points for one complete row, 200 for two, 600 for three and 1200 for four complete rows. If you pause you loose all the points (I did this because my son used to cheat by

freezing the game up and then boasting with a huge score), so better just slow it down to the speed of “1” and you can cheat as much as you want. In the right lower side of the chart there is a panel for controlling the game. Underneath the panel there is a “Reset” label to which is assigned a game initialization macro. The game is not fully polished and due to the large amount of graphics it used to be a bit slow on my old PC. The new one flies. I need to improve the speed. Oh, the bananas and pinaple are part of a scoring scheme I gave up but I left some on the screen to give the game a tropical flavor. Don’t forget this is an office game so it should give you the relaxation needed by any bureaucrat. Enjoy! George

Источник

Как в Excel поиграть в компьютерные игры

Игры inside

Создать новую книгу.
Выделить строку gод номером 95.
Нажать клавишу табуляции.
Открыть меню Справка ► 0 программе.
Удерживая одновременно клавиши Ctr, Alt и Shift, щелкнуть на пункте Техническая поддержка.

И запускается «стрелялка», напоминающая комбатс и светлой памяти Doom, только попроще!

В Excel 97 действия для вызова игры такие.

Выполнить команду Сервис ► Параметры и в открывшемся окне на вкладке Общие снять флажок Стиль ссылок R1C1.
Создать таблицу.
Нажать F5 и ввести в появившемся окне кабалистическую надпись Х97:_97.
Нажать Enter.
Выделить строку с номером 97.
Нажать клавишу табуляции, а затем, удерживая Shift и Ctrl, щелкнуть на значке Мастера диаграмм и подождать, пока открывающееся окно не заполнит весь экран.

В Excel 2000 процедура запуска игры усложнена. Нужно выполнить такие действия.

Создать новую книгу.
Сохранить ее в формате веб-страницы (Сохранить как Web-страницу), установив флажки выделенное: Лист и Добавить интерактивность.
Открыть созданную страницу в Internet Explorer версии не ниже 5.0.
Выделить строку 2000.
Клавишей табуляции перевести выделение на ячейку WC 2000.
Одновременно нажать клавиши Ctrl, Alt и Shift, расположенные на клавиатуре слева, и щелкнуть в левом верхнем углу внедренного в веб-страницу листа Excel на эмблеме Office.

После этого у вас появляется возможность погонять по виртуальной трассе виртуальные же машинки.

Игры-макросы

А хоть бы и запрещали! В Интернете полно игр, написанных для Excel. Не буду даже советовать конкретные сайты. Достаточно зайти на поисковый сервер (например, http://www.google.com или http://www.yandex.ru) и в строке поиска написать Excel игра или, если хотя бы чуть-чуть читаете по-английски, Excel game. Увидите множество ресурсов, где есть подходящие игрушки. Правда, для их запуска нужно немного изменить настройки программы.

Excel Games: обзор Эксель-игр

Разумеется, в некоторых случаях нужно включить макросы (если кто не знает, как это делается – пользуйте, как водится, поисковик). Выборка осуществлена из почти двух сотен означенных темой вещиц. Хотя определенные акценты и расставлены, намерения составить список лучших игр не было – автор предпочел представить ознакомительный срез.

Заслуженно популярная пару-тройку лет назад штучка все еще юного итальянского разработчика Габриэле Чирулли, полученная им, судя по всему, путем скрещения старого доброго советского тетриса и еще более старых и добрых американских пятнашек, оказывается, доступна не только в Android и iOS. Правила те же: для win’а нужно добиться равного названию игры результата. Сущее залипалово! Думаю, следующий шаг игроделов – скрестить такен со змейкой.

Angry Birds и Angry Birds Rio

Отчего люди не летают. Я говорю, отчего люди не летают так, как птицы? Мне иногда кажется, что я птица. Когда заряжен в рогатку, так тебя и тянет лететь: то соплеменников вызволять из клеток, то нелепую архитектуру зеленых поросят рушить, погребая тех под руинами. и все – ценой собственной жизни.

Apple Shooter

Следом вспоминается еще какой-нибудь легендарный герой: теперь из линейки Эйгиль – Геминг – Гейти – Токи – Вильгельм Телль и т. д. Нетрудно догадаться: задача яблочного шутера в том, чтобы раскрошить пущенной из лука стрелой яблоко на голове your friend, не выбив при этом последнему яблоко глазное, а равно – не погубив попаданием еще куда-нибудь. Благодаря карикатурно примитивной графике и разнообразию вариантов умирания стоящего под стрелой (в зависимости от того, куда последняя вонзается), игрушка не лишена обаяния, присущего мрачному юмору. Чего, на мой взгляд, не удалось достичь в деле метания ножей в прикованную к тренажеру для вестибулярного аппарата подружку (Knife Throw) или тупой пальбе по беззащитным бегающим человечкам в Bang Bang 2.

Двойка и тема массовых расстрелов рифмует последнюю игрушку с Ricochet Kills 2– название вполне говорящее: некий персонаж пуляет из пистолета черным курсором по человечкам в костюмчиках, курсор рикошетит относительно предсказуемым образом от причудливо расположенных конструкций и рамок кадра. Сожаление о том, что рикошетом невозможно убить стреляющего, немного компенсируется возможностью задавить его коробкой или бочкой, сваливающимися на всех подряд в результате попадания курсора в расположенный рядом с ними ящик со взрывчаткой. Гуманности игре добавляет и то, что, судя по реакции человечков в костюмчиках на ранения, они всего лишь куклы, наполненные красной краской: тир, да и только.

Defend Your Castle

Экшен с элементами стратегии! Безоружных человечков (вся цель существования которых – стучать по воротам и стенам замка, быстро и незаметно их разрушая) нужно хватать курсором за шкирку и шмякать об землю, зарабатывая тем самым валюту на укрепление обороноспособности крепости. Приходится поразмыслить, на что именно тратить скромные средства. В игре есть место переманиванию врагов на свою сторону с превращением их в лучников, обвешанным взрывчаткой защитникам, ремонтным бригадам и даже магии. Прорисовка всех элементов игры. доставляет. Доводилось читать, что DYC была одной из самых рейтинговых игр 2012 года. Чтобы не обкрадывать предполагаемого геймера в интенсивности визуальных наслаждений, здесь обойдусь без скриншота.

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

Drunk Driving

Смею предположить, что управлять автомобилем (да еще в пьяном виде) – занятие не из легких. Зато игра про это дело предельно простая. Клацаете spacebar, пытаясь не врезаться / не взорваться, ан ничего не выходит – мой «рекорд» на нижеследующем скриншоте. Попуститься, вместе с тем продолжив погружаться в автомобильную проблематику, можно попытками припарковать за минуту Фольксваген-жук в пределах очень тесной и почти под завязку забитой другими «жуками» парковки. Так и не достигнув успеха в Parking 2 Perfection, я предпочел отправиться на пешую прогулку, припоминая по пути основные положения «Общественной идеологии автомобилизации» Андре Горца.

Flight of the Hamsters

В сравнении с «рассерженными птицами» «Полет хомяков» известен широкой аудитории много меньше, хотя пушистые летчики, торжествующие по поводу любого результата – даже в ноль футов – моим глазам милее злобы в перьях. И в полет их отправляют подушкой, и газончик смягчающий постелили.

Да, это судоку в Excel’е – привычный для глаз многих убийц досуга по всему свету латинский квадрат девятого порядка. У меня нет точного ответа на вопрос, почему оно попало в обзор. Возможно, из-за давней симпатии к разным формам фитнеса для мозга. Если то действительно так, нельзя не упомянуть здесь же Easy Chess (чье название не обманывает) и трехмерные крестики-нолики – 3D tic tac toe.

Напоследок – две выдающиеся в некотором смысле вещи: Invisible и QEX . Когда в них попадаешь, нетрудно позабыть, что все это существует на базе MS Excel: окошко создания таблиц пропадает и появляется примерно то, что видно на скриншоте.

Invisible – вроде бы, типичный Arkanoid: платформа-ракетка отбивает шарик, который истребляет коробки. Но есть два приятных, многое меняющих нюанса: игра происходит в условно трехмерном пространстве, из-за чего не всегда видно, где там этот шарик, а прирост числа коробок происходит в более хаотичном сравнительно с классической версией порядке, да еще не только на плоскости пола, но и ввысь. QEX – разноцветное и шибко гибкое существо с парой патрульных – Спарксов; вместе они не желают делиться общим пространством, а желают истребить протагониста. У последнего единственное средство выжить – городить огороды, среди которых жадной троице становится тесно, и те в итоге издыхают. Шансы на победу обратно пропорциональны жадности самого взявшегося за передел территории. Неудивительно, что выдумал эти не лишенные изящества вещички японец – Коуйти Тани.

Мужчина делает игру в Microsoft Excel. Нет, это не шутка. Нет, он не сумасшедший

Один очень упорный геймер вместе с сыном делает игру своей мечты — 3D-шутер в таблице Microsoft Excel. Проект обещают показать в декабре, а пока команда разработчиков запустила краудфандинговую кампанию, где планируется собрать символические 5 тысяч долларов (327 тысяч рублей).

Пользователи уже не раз доказывали, что возможности программы Microsoft Excel, кажется, безграничны. На ней умудряются делать текстовые RPG, 2048, монополию, змейку и так далее. Но всё это 2D-игры. Кто-то пошёл дальше и даже сделал целый 3D-движок, который запускается в Excel, где можно бродить по лабиринту.

Впрочем, украинец Александр Шумаков решил показать, что возможности таблицы безграничны. С 2016 года вместе с сыном Никитой они делают игру под названием Dave vs Ziggy.

Сюжет разворачивается в 1979 году. Главный герой Дэйв должен сражаться с инопланетной расой Зигги, которую разбудили учёные после долгой спячки. Протагонисту доступны винтовой ключ, дробовик, квадроган, взрывчатка и плазменная пушка. Визуально игра напоминает шутеры от первого лица 90-х годов (Wolfenstein 3D или Doom). В ней есть кровавые перестрелки, небольшая разрушаемость объектов и даже встроены мини-игры (например, «Понг»).

Игру программируют на языке Visual Basic for Applications (упрощённом языке программирования Visual Basic, который встроен в линейку продуктов Microsoft Office), а музыку для Dave vs Ziggy пишет сам Александр. Правда, цветовая гамма ограничивается стандартной палитрой Excel (56 цветов).

Сейчас полностью завершены два уровня из семи, а также идёт тестирование проекта на разных системах и отлов багов. Для шутера открыли краудфандинговую кампанию, где за символические два доллара любой желающий может поддержать проект. По словам Александра, игра создаётся не ради денег, а ради популяризации и развития программирования на VBA.

Поддерживая этот проект, вы помогаете расширить пределы использования Microsoft Excel в качестве универсальной платформы, чтобы делать практически всё — от выполнения простых вычислений электронных таблиц до создания развлекательного программного обеспечения. Это просто поддержка нашей инди-ретро-пиксельной игры — это поддержка новой идеологии.

Пока что удалось собрать 4 доллара из необходимых 5 тысяч. Завершить игру планируют в декабре 2018 года.

То, что делает Александр, — по-настоящему безумный и удивительный проект. Но главное, чтобы он не работал сверх нормы. К примеру, разработчики из Rockstar Games трудились над новой игрой Red Dead Redemption 2 по 100 часов в неделю, и это очень сильно не понравилось геймерам.

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

Моя игра в Excel

Это самый блядский ебнутый рогалик. Просто охуенно. 10/10

Это самая крутая оценка)))))

Идешь на сайт geektimes.ru и публикуешь историю создания игры. Тебя там на руках носить будут.
P.S. Почему эксель? Почему не ЯП+библиотека, например BearLibTerminal?

Да она сырая еще, куда на гик то) Долгая история, вкратце, больше ничего не было под рукой длительное время, вот и Excel. А так я С-шник, будет время сделаю на C++

Хорошо, не хватает сейчас отечественных рогаликов

Что верно, то верно.

Хм, посмотрел либу, BearLibTerminal, а неплохая идея, надо подумать) спасибо за совет!

Пожалуйста, сам пытался что-то запилить на ней на питоне, но немного заебался

для минусов Шредингера!

ишь ты, прокатило)

здесь только игра. сокобан пока не нашел, найду, выложу.

Сюда тоже маленько насыпьте.

Все, больше не надо сыпать)

ИГРА В ЕКСЕЛЕ, как такое можно выдумать.

А остался ещё собокан?

ПС просто не мог промолчать,хоть и спустя год)

Ну это уже перебор.

Есть вот такая охуенная тема 🙂

Released: Tuesday, May 14, 2013

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

Даааааа, арена
Сразу ее вспомнил как увидел пост

Только друзья, она очень сырая! Предупреждаю. Не судите строго)

Допиливай и выкладывай обновления.

Ну тут уж как получится, времени на нее немного) но как только, так сразу.

перезалей, интересно глянуть

да, перезалей плиз. и сокобан ;3

На 2016 Excel не работает.

Давай пили Stand Alone версию, чтоб без экселя гамать.

автор, я обожаю кодить на VBA, готов поучаствовать в оптимизации кода 🙂

и походу много придётся перелопатить ибо.

If Лист1.Cells(35, 9) = 0 Then

If Лист1.Cells(35, 9) = 2 Then

If Лист1.Cells(35, 9) = 6 Then

If Лист1.Cells(35, 9) = 8 Then

If Лист1.Cells(35, 9) = 3 Then

If Лист1.Cells(35, 9) = 7 Then

If Лист1.Cells(35, 9) = 5 Then

автор, ну, ё-моё, с листа «подземелья» куда всё слетело? ( я уже поправил кучу всего и тут (

всё, я понял, что там было — рандом от 1 до 10

Файл удален, можно свежую ссылку?

Ваши идеи и советы жду)

и домики,и чтоб набегала охрана замка

начнем с вопроса — как играть? у меня ни одна кнопка не реагирует

макросы включены? какой уровень безопасности макросов стоит? ставь средний и при каждом запуске файла нажимай не отключать макросы

уровень безопасности где ставить. XDDDD включены. первый раз файл в экселе открыл — он спросил, я не отключил их и все. висят листы и ничего не происходит. офис 13

В параметрах Excel есть в панелях галочка разработчик. Там все включается.

А как начать-то? Я тыкаю в кнопку «начать игру» как бешеный и ничего не происходит

в общем все сделал, походу и правда робит только в 10м офисе. в принципе при выполнении макроса ошибку выдает. беда печаль. жду на андроид х)

ну насчет работы в 13 офисе я вообще не знаю. Не тестил. Включаешь панель разработчика и там в настройках безопасности выставляешь средний уровень.

Просто на самом деле в 2003 офисе она тоже не работает. Создавал в 2010, так что фиг знает.

прошу подскажите как включить-то))

дело не в этом, а в том, что ты закосячил прогу перед тем, как её слить 🙂

Очень хороша игра, только с совместимостью нужно действительно поработать, вроде б у большинства, получается, 13-ый офис) Советую сделать ещё пост по самому процессу работы, все в школах «фу»-каются от этого экселя, а у тебя возможность заинтересовать будущее поколение, всё-таки это креативно сделано и идея хороша. Не будет успеха у обучающихся, зато офисы заполнятся людьми, хорошо знающими эксель 😀

Игра “Крестики-нолики” в среде Microsoft Excel

Кто сам пилит свои дрова,
тот согревается дважды 1 .

Кто сам программирует свои компьютерные игры, тот наслаждается дважды 2 .

Мы продолжаем (см. [1]) публикацию материалов, посвященных моделированию простейших игр средствами программы Microsoft Excel. В этой статье мы рассмотрим известную игру “Крестики-нолики”. Правила этой игры вы, конечно, знаете.

На рис. 1 представлен вид рабочего листа в начале новой игры (после щелчка на кнопке с надписью “Новая игра”).

Прежде всего надо оформить рабочее поле игры — диапазон ячеек А6:С8:

— размеры строк и столбцов сделать такими, чтобы каждая клетка поля имела форму квадрата;

— установить соответствующие размеры символов, которые будут записываться в каждую ячейку диапазона (это будут буквы Х и О); начертание символов предусмотреть полужирное;

— выравнивание текста в ячейках сделать по центру.

Разместите на листе три кнопки. О том, как это сделать и как разместить на кнопке соответствующую надпись, рассказано в статье [1]. Там же описано, как создаются и “привязываются” к кнопке макросы — программы, написанные на языке программирования VBA, которые выполняются по щелчку на той или иной кнопке.

Текст в ячейках А3 и А4 выводится по щелчку на кнопке с надписью “Новая игра”, а название игры в ячейку А1 следует ввести “вручную”. По щелчку на этой кнопке очищаются также 9 ячеек рабочего поля игры и ячейка E3.

Макрос, “привязанный” к кнопке с надписью “Новая игра”, можно назвать аналогичным именем:

Range(«A3»).Value = «Имя первого игрока:»

Range(«A4»).Value = «Имя второго игрока:»

‘Очищаем 9 ячеек рабочего поля

‘Готовимся принять имена играющих

‘активной ячейки на ячейку E3

1) запись Range(«E3»).Value (и подобные) означает значение, записанное в ячейке с адресом Е3. Это значение может использоваться в любом месте программы — в операторе присваивания (в его левой или правой части), в условном операторе и т.д.;

2) запись Range(«E3»).Activate соответствует установке указателя активной ячейки (его часто называют “курсором”) на ячейку Е3.

Вернемся к игре. В ходе нее после ввода имен играющих в ячейки E3 и E4 нужно щелкнуть на кнопке с надписью “Начало” — картина изменится на приведенную на рис. 2. В ней в ячейке будет отражаться имя игрока, делающего очередной ход.

Макрос, связанный с кнопкой с надписью “Начало”, имеет вид:

‘Очищаем ячейки А4 и Е4

‘Запоминаем имена участников игры

‘Выводим текст в ячейку А3

Range(«A3»).Value = «Очередной ход делает»

‘Определяем начинающего игру

‘и выводим его имя в ячейке Е3

If Int(Rnd * 2) + 1 = 1 Then

‘Начинает 1-й участник

‘Начинает 2-й участник

‘активной ячейки на ячейку D7

— где Имя1игрока и Имя2игрока — переменные величины, означающие имена участников (эти имена в ходе игры будут поочередно отражаться в ячейке Е3);

НомерИгрокаДелающегоХод — переменная величина — номер участника игры, делающего очередной ход.

Так как значения этих трех величин будут использоваться в макросе, связанном с кнопкой с надписью “Х/О”3, то они должны быть описаны не в процедуре Начало, а как глобальные — перед всеми макросами.

DIM Имя1игрока, Имя2игрока As String,

НомерИгрокаДелающегоХод As Integer

Теперь настало время рассказать, что для простановки того или иного знака следует установить (мышью или используя клавиатуру) указатель активной ячейки на нужную клетку рабочего поля, после чего щелкнуть на кнопке с надписью “Х/О”. Поскольку знаки должны чередоваться, макрос, связанный с этой кнопкой, нужно оформить следующим образом:

If НомерИгрокаДелающегоХод = 1 Then

‘Следующий ход будет делать другой игрок

‘Выводим его имя в ячейке Е3

‘Следующий ход будет делать другой игрок

‘Выводим его имя в ячейке Е3

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

ActiveCell.Address <> “$A$6” And ActiveCell.Address <> “$A$7” And ActiveCell.Address <> “$A$8” And ActiveCell.Address <> “$B$6” And ActiveCell.Address <> “$B$7” And ActiveCell.Address <> “$B$8” And ActiveCell.Address <> “$C$6” And ActiveCell.Address <> “$C$7” And ActiveCell.Address <> “$C$8”

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

С учетом сказанного процедура СтавимЗнак примет вид:

If ActiveCell.Address<>«$A$6» And ActiveCell.Address<>«$A$7» And … Then

MsgBox «Клетка вне рабочего поля!»

If ActiveCell.Value <> «» Then

MsgBox «В этой клетке уже стоит знак!»

Else ‘Можно ставить знак

If НомерИгрокаДелающегоХод = 1 Then

Источник