Исходный код игры X-Digital Field для Visual Basic 6.0

Игра "X-Digital Field" - игра на увеличение счета. На предоставленном игровом поле размещены ячейки по уровням |Levels|. Для начала игры нужно Click-нуть мышкой на ячейке красного цвета в нижнем правом углу игрового поля - взять игровой Маркер. Теперь взятый Маркер нужно установить в любой ячейке нижнего уровня, просто Click-нув на ней мышкой. Количество очков из занятой Маркером ячейки будет добавлено к Вашему счету. (Изначально Ваш счет не нулевой - Вам предоставляется кредит).

Теперь Вы можете перемещать Маркер вправо и влево от текущего положения в соседнюю ячейку (они выделены цветом). При этом Вам так же будут начисляться очки. Но Вы можете сделать только ТРИ таких перемещения подряд. Затем Вам нужно сделать ИГРОВОЙ ХОД - на поле кнопок "сотового телефона" нужно Click-нуть на ПРАВОЙ кнопке. При этом все уровни с ячейками сдвинутся на 1 уровень вниз, соответствующее значение добавится к Вашему счету и Вы снова можете трижды переместить Маркер вправо-влево по нижнему уровню.

При каждом ИГРОВОМ ХОДЕ часть верхних уровней ячеек закрывается, прячется, чтобы усложнить прогнозирование ходов. Игра не так проста как может показаться на первый взгляд. Вам нужно выработать стратегию игры, прогнозировать направление перемещений, чтобы не попасть в "клещи" проигрышных сочетаний ячеек, котрые обнулят Ваш счет или сделают его отрицательным.

Оформление игры, которое Вам предложено намеренно сделано максимально однотонным, чтобы не отвлекать программиста от совершенствования кода. У игры есть значительный потенциал развития - по оформлению (от цветных вариантов, до вариантов ячеек с галереей фотографий) и по алгоритму (динамический вариант, аналогичный Тетрису - Dynamic XDF Game; вариант с plug-in модулями, различными стратегиями накопления и т.д.). Интересным может быть вариант с показом банеров в процессе игры, различными призами - напимер, показом картинок, или сетевой вариант (например, в варианте Active-X).

Исходный код игры можно скачать здесь: Source Code

Автор - Valery Shmeleff