ZXPRESS
ruseng

ZX джойстик - POKE-коды для Stallone Cobra и Krakout и фрагмент кода для Academy

01 января 1990
ZX Revija #02

POKE-советы

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

PIYAMARAMA

Загрузите часть программы на BASIC, затем прервите выполнение.

Введите следующие три строки и запустите программу командой RUN 1000. Затем запустите загрузку с ленты — загрузите оставшуюся часть программы.

1000 FOR I=23886 TO 23893:READ A:POKE I,A:
NEXT I
1010 DATA 62,255,50,
1020 RANDOMIZE USR 23844

В другом месте строки DATA находится число жизней. Если это не сработает, попробуйте следующее:

Загрузите часть программы на BASIC и прервите выполнение.

Введите:

POKE 23828,201:
RANDOMIZE USR 23786

Нажмите ENTER и загрузите оставшуюся часть. Когда загрузка завершится и появится OK, введите:

POKE 43883,255:POKE 23828,195:RANDOMIZE USR 23828

Нажмите ENTER.

BATMAN

Перед RANDOMIZE USR введите:

POKE 36800,0
SABOTEUR II

Загрузите часть программы на BASIC и остановите магнитофон. Нажмите NEW и ENTER, чтобы удалить только что загруженную часть. Введите следующую короткую программу:

10 CLEAR 25099:LOAD CODE 16384:LOAD CODE:POKE 61340,201:POKE 37122,0:RANDOMIZE USR 25100

Запустите программу командой RUN и включите магнитофон. Время и энергия во время игры не будут уменьшаться.

BATMAN (версия Jansoft!)
10 FOR I=65000 TO 65038
20 READ A:POKE I,A:NEXT I
30 DATA 221,33,64,156,17,
40 RANDOMIZE USR 65000

Запустите программу командой RUN и нажмите ENTER. Оставшуюся часть программы загружайте после SCREEN$.

TARZAN (Martech)

Следующий способ ввода POKE для бессмертия подходит только для программы из шести частей длиной соответственно: 164, 6913, 20000, 20536, 6916, 1704 байта. Это можно проверить программой для копирования.

Загрузите BASIC с помощью MERGE и остановите магнитофон. Введите:

20 REM

За REM должны следовать четыре пробела; продолжайте ввод без номера строки:

POKE 23757,100

Затем введите:

20 RESTORE 30:FOR I=23841 TO 23857:READ A:POKE I,A:NEXT I
30 DATA 62,0,50,58,194,

Запустите программу командой RUN 20, затем введите:

CLEAR 24899:RANDOMIZE USR 23760

После этого загрузите оставшуюся часть программы.

В игре вы будете бессмертны.

STALLONE COBRA (Ocean)

Загрузите BASIC с MERGE, затем введите:

20 REM

(после REM — 14 пробелов). Затем введите POKE 23757,110 и нажмите ENTER. Теперь введите следующую программу:

20 RESTORE 30:FOR I=23841 TO 23867:READ A:POKE I,A:NEXT I
30 DATA 62,0,50,164,142,

Запустите её командой RUN 20, затем введите CLEAR 24899:RANDOMIZE USR 23760 и нажмите ENTER. Загрузите оставшуюся часть программы — после загрузки в игре у вас будет бессмертие.

KRAKOUT (Gremlin Graphic)

Эта команда POKE подходит для блоков длиной 164 и 6913 байт. Затем выполните следующее:

  • Загрузите BASIC с MERGE и остановите магнитофон.
  • Остановите программу клавишей BREAK, введите INK 7 и дважды нажмите ENTER.
  • Введите CLEAR и нажмите ENTER, затем введите 20 и нажмите ENTER. (Примечание: там, где указано ENTER, нужно нажать эту клавишу.)
  • Введите POKE 23757,96 и нажмите ENTER.
  • Затем наберите программу:
20 FOR I=23841 TO 23853:READ A:POKE I,A:NEXT I
30 DATA 62,0,50,229,181,

Запустите программу командой RUN 20. После появления сообщения OK можно удалить строки 20 и 30.

Теперь введите CLEAR 24600:RANDOMIZE USR 23760 и нажмите ENTER. Загрузите с ленты оставшуюся часть — и всё. Теперь можно спокойно играть сколько угодно.

ACADEMY

Подходит для блоков длиной:

548,6942,40168,538

Введите следующую программу:

10 CLEAR 24831:FOR I=23296 TO 23341:READ A:POKE I,A:NEXT I:RANDOMIZE USR 23296
20 DATA 221,33,0,97,17,

Запустите программу командой RUN, затем загрузите программу с ленты, начиная с SCREEN$, до конца. Боеприпасов будет сколько угодно — пока вам не надоест играть.

RANARAMA

Если в вашей версии длины блоков составляют 170, 35872, 1399 и 1968 байт, можно добиться бессмертия. Загрузите лоадер в BASIC и перезагрузите компьютер, затем введите следующую программу:

10 CLEAR 24791:LOAD CODE:LOAD CODE:RANDOMIZE USR 24830:LOAD CODE
20 POKE 57436,205:POKE 59836,205:POKE 57572,201:POKE 59821,0:POKE 57421,0:RANDOMIZE USR BETY

Загрузите лоадер и перезагрузите компьютер, затем наберите следующее:

10 CLEAR VAL:LOAD CODE:LOAD SCREEN$
20 LOAD CODE VAL:POKE 47864,0:RANDOMIZE USR 65335

Запустите эту программу и загрузите оставшуюся часть программы.

PAPER BOY

Программа состоит из следующих блоков:

169,6912,20000,20536,6916,1704

Загрузите лоадер с MERGE и наберите следующее:

30 FOR I=23862 TO 23869:READ A:POKE I,A:NEXT I
40 DATA 50,151,187,55,

Запустите программу командой RUN и загрузите программу до конца.

BARBARIAN

Подходит для версии со следующими блоками:

164,6912
  • Загрузите лоадер с MERGE.
  • Наберите следующее:
POKE 23800,62:POKE 23801,68:POKE 23802,50:POKE 23803,179:POKE 23804,153

Нажмите ENTER.

  • Запустите лоадер командой RUN и загрузите программу с ленты до конца.

THE GOONIES

Программа состоит из блоков такой же длины, как и предыдущая.

  • Загрузите лоадер с MERGE, затем введите 20 REM и нажмите ENTER.
  • Введите POKE 23757,96 и нажмите ENTER.
  • Затем наберите короткую программу на BASIC:
30 FOR I=23841 TO 23850:READ A:POKE I,A:NEXT I
40 DATA 175,50,129,130,

Запустите эту короткую программу командой RUN и загрузите игру.

KICK BOXING

  • Загрузите лоадер и перезагрузите компьютер.
  • Введите:
10 CLEAR 24999:LOAD CODE:POKE 55748,0:POKE 56741,0:RANDOMIZE USR

Затем введите RUN и нажмите ENTER, после чего загрузите оставшуюся часть программы.

EQUINOX

Чтобы получить бесконечное количество жизней, выполните следующее:

  • Найдите красный квадрат с надписью PETE, поднимите его и верните на старт.
  • Идите в верхний левый угол экрана и одновременно нажмите:
вверх + C

I'BALL

Программа состоит из блоков длиной BASIC и 6916 байт.

  • Загрузите лоадер с MERGE, затем наберите:
30 FOR I=23841 TO 23853:READ A:POKE I,A:NEXT I
40 DATA 175,32,75,193,32,

Запустите эту программу командой GO TO 30, затем запустите основную программу командой RUN и нажмите ENTER. Загрузите с ленты оставшуюся часть.

  • POKE подготовил:

Brada Jožef
Bajmočka 18
24220 Čantivar

Конкурс

Настал момент узнать имена победителей конкурса «ПЕРВАЯ ПЯТЁРКА 82-го» из первого номера. Три читателя получат годовую подписку на ZX REVIJU:

  1. Frimel Mirko, M. Tita 6/2, 44000 Sisak
  2. Stančević Miodrag, Sarajevska 31, 11000 Beograd
  3. Čanović Srđan, XII voj. ud. brigade 59, 25000 Sombor

А теперь посмотрим, как распределились места в «ПЕРВОЙ ПЯТЁРКЕ 82-го».

Первая пятёрка 82-го

  1. MS-PACMEN (NAMCO)
  2. SPACE RAIDERS (PSION)
  3. PENETRATOR (BEAM SOFTVARE)
  4. FOOTBALL MANAGER (K.J.TOMS)
  5. FLIGHT SIMULATION (PSION)

Предложения для первой пятёрки 83-го

  1. FROGI (DJL SOFTVARE)
  2. PINBALL (SAGITARIAN)
  3. RIVER RESCUE (THORN EMI)
  4. ARMAGEDDON (OCEAN)
  5. FIRBIRDS (FIRBIRDS)
  6. STOP THE ITA EXPRESS (HUDSON SOFT)
  7. KUNG FU (BUG-BYTE)
  8. APOLO 11 (MASTERTRONIC)
  9. MANIC MINER (BUG-BYTE)
  10. LUNA CRABS (MICROMEGA)

Голосуйте следующим образом:

  • за игру, занявшую первое место, — 10 баллов;
  • за игру на втором месте — 7 баллов;
  • за игру на третьем месте — 5 баллов;
  • за игру на четвёртом месте — 3 балла;
  • за игру на пятом месте — 1 балл.

Помимо предложенных игр, вы можете добавить в список «ПЕРВОЙ ПЯТЁРКИ 83-го» и собственное предложение.

Голосования принимаются до 25.05.1990.

Три победителя получат годовую подписку на ZX REVIJU.

Следующие три участника получат скидку 35% на годовую подписку на ZX REVIJU.

Уважаемые читатели!

Мы общаемся через ZX REVIJU лучше, чем ожидали. Число авторов выросло до удовлетворительного уровня, материалов у нас хватит на два номера — третий и четвёртый.

В первом номере журнала мы также обещали опубликовать несколько работ Aleksandra Terzića, однако он не выполнил обещанного. Если для третьего номера выяснится, что стоит добавить команду LPRINT, мы это сделаем. Пока же оставим команду COPY.

Одно предупреждение: вместо команды COPY может использоваться другая команда. Например, в принтерах EPSON с параллельным интерфейсом CENTRONICS от PLP-elektronika при покупке интерфейса вы получаете кассету с программой для связи компьютера с принтером. В этом случае команда COPY, включённая в журнал, не работает: вместо неё нужно ввести RANDOMIZE USR 23370.

Если у вас принтер, для которого через интерфейс вместо команды COPY используется другая команда, сообщите мне — я внесу исправление в программу, но только для вашего экземпляра.

Следующий номер выйдет до 1.06.1990.

Гонорары

(действуют с 1.04.1990)

  • ZX Железо — 12,00–15,00
  • ZX Софт — 10,00–12,00
  • ZX Учебная — 10,00–12,00
  • ZX Занимательности — 8,00–10,00
  • ZX Идеи — 8,00–10,00
  • ZX Интервью — 15,00–20,00
  • ZX Джойстик — 6,00–8,00

Гонорары отправляю почтовым переводом на ваш адрес. Материалы, не относящиеся к перечисленным рубрикам, будут оплачиваться в размере от 10,00 до 15,00 динаров.

Редакция

А теперь сбросьте компьютер и загрузите объявления командой LOAD.

Поделитесь вашим мнением о статье