ZX Идеи
Для этой рубрики прислал материал:
КЕСЕР МЛАДЕН-ДАДО
Видеоклуб «TV BAJT», Баня-Лука
Сообщения из BASIC
Многие помещали в BASIC собственные сообщения!
Те, кто не знает машинный код, выводят сообщения обычными буквами СПЕКТРУМА. Обычно они думают, что в BASIC невозможно написать буквы в 5 раз крупнее обычных. Я докажу, что это не совсем так и что BASIC никогда не стоит недооценивать. Эта программа позволяет увеличить ваши сообщения в BASIC в 5 раз.
10 FOR f=72 TO 79:POKE 23681,f:LPRINT CRACKED by DADO :NEXT f
Буквы, которые вы указываете после команды LPRINT, не нужно вводить с пробелами. Сообщение может содержать 32 символа. Числа 72 и 79 можно заменить следующими парами, чтобы получить разные эффекты: 64 и 71, 80 и 87.
Следующий материал, присланный Младеном, рассказывает, как вывести программу на BASIC, машинный код — в десятичном виде и в коде CHR$, не получив ошибку INVALID COLOUR!? Следующая программа покажется вам простой, и некоторые спросят (когда введут её), почему сообщение об ошибке не выводится! Вот объяснение:
Команды CLEAR 25099 и POKE 23613,0 запрещают любой вывод из ПЗУ, поэтому программа продолжает работать, несмотря на ошибки.
ЗАПОМНИТЕ! До адреса 27500 вы сможете выводить программу в коде CHR$. Дальше упомянутые выше команды не помогут, потому что тогда ПЗУ снова возьмёт всё в свои руки. Следующую программу можно продолжить без проблем, если удалить строку 30. Только теперь вывод будет десятичным.
1 REM DECIMALNI I CHR$ LISTING
2 REM WRITTEN by DADO
3 REM VIDEO KLUB TV BAJT
5 CLEAR 25099:POKE 23613,0
10 FOR f=X TO X
20 PRINT f; ;PEEK f;
30 PRINT CHR$ PEEK f
40 NEXT f
X — это нужный вам адрес. Только следите, чтобы программа в машинном коде не располагалась ниже адреса 25100. А теперь — ещё одна процедура от Младена.
Введите строку 5 из предыдущей программы, затем перед ней, в строке 1, наберите инструкцию REM и добавьте после неё не менее 50 слов. Затем в строке 10 введите LOAD — и посмотрите, какой эффект получится, если после запуска программы нажать клавишу SPACE.
На этом у Младена всё для этого номера ZX Revije. В следующем номере он порадует вас программами на машинном коде!
Поделитесь вашим мнением о статье