Каталог статей

Здрасти! Ну что, кто смотрел фильм матрица?  Короче сейчас будем делам матрицу в нашем любимом DOSе. Конечно, буквы так красиво падать не будут сверху как в оригинале. Но зеленый хаос на экране устроить можно.

Ну, давайте разберем первый пример. Сначала я как обычно отключил вывод команд @echo off потом разумеется поставил цвет букв светло зеленым (это все таки матрица, там все зеленое было) Если вы хотите сделать красную или голубую матрицу  то про команду color можно почитать ТУТ далее я поставил метку и назвал её по капитански :metka и команда вывода на экран текста echo я написал команду %random% с помощью неё мы будем случайно выводить на экран числа от 0 до 32767… Можно еще добавить побольше %random% чтобы на весь экранчик наш маленький бежали циферки. Ну и переходим опять к нашей капитанской метке goto metka  тем самым мы делаем зацикливание вывода на экран строки echo и получается у нас матрица. Можете любоваться или медитировать. Если долго и пристально смотреть то… то, нечего не будет, у вас просто глаза устанут 

Но чего-то не хватает… чего, чего же? Ага, в матрице помимо цифр еще и буквы летали по экрану. Как же это сделать? Запишем в переменную rрандомное число: set r=%random% а потом зададим небольшое правило. Когда в рандомном числе будет появляться 0 мы его заменим на букву R или давайте лучше на слово neo: set r=%r:0=neo% т.к. всего цифр у нас 10 (от 0 до 9) то каждой цифре можно присвоить свою букву или слово.

О какой хаос из буковок! Одна проблемка команда%random% создает число ну например 27767 и что же выведет наш батник на экран? А выведет он страшное слово:lohbatnikmorfiusneo+ как же нам сделать пробелы между словами? Надо просто создать диапазон рандомных чисел от 0 до 9. Сначала мы переменной ran присвоим рандомное число: set /a ran=%random% а потом переменнойran9 зададим некую формулу чтобы какое число не вылетело, оно обрезалось до 1 символа: set /a ran9=%ran%-(%ran%/9)*9

Ну, вот теперь слова вылетают через пробел. Осталось только между ними еще чисел написать чтобы цифры были смешаны вместе с буквами. Просто на выводе делаем примерно так:

Но что-то окошко у нас слишком маленькое давайте попробуем растянуть его навесь экран монитора чтобы наша матрица заполнила весь экран. Для этого есть команда mode con:

cols это ширина, а lines это высота (по умолчанию где то примерно 80 на 25)

Жаль только окно не совсем правильно растягивается на весь экран. Но это можно исправить с помощью другого батника прописав в нем запуск нашего батника с матрицей с параметром /max

Давайте я как обычно напишу код полностью для тех кто затрудняется сложить 2+2:

А можно чтобы уж совсем рябило в глазах менять цвет букв с зеленого на красный и наоборот. Поставьте color 0a (зеленые буквы) после :metka и color 0c (красные буквы) после вывода текста на экран. И запустите в глазах будет рябить от меняющихся красно зеленых букв.

Если хорошо подумать, то можно ведь сделать и растоманскую матрицу, чтобы она переливалась вся всеми цветами радуги. Возьмите переменную%ran9% (помните как мы её делали? В ней храниться случайное число от 0 до 9) и напишите color 0%ran9% ну или чтобы вообще рябило пусть меняется не цвет букв, а цвет фона %ran9%0