Простая работа с AY

[Oleg N. Cher]

Требуется озвучить игру простыми звуками сопроцессора. В связи с этим вопрос к гуру: как вызвать из машинного кода оператор 128к-бейсика PLAY ? Вопрос посложнее: как сделать это на машине с сопроцессором, но без 128кб-ПЗУ? Второй вопрос - чистое пижонство или "очень хочется сделать чтобы работало на 48к-машинках с AY - правда, никогда не встречал таких машинок, даже не уверен, что где-то наберётся хоть пара штук". Так что первый вопрос всё-таки важнее. Но давайте и к нему отнесёмся критично. Может я чего-то недопонимаю. Первым помыслом было желание взять плеер из WHAM+AY. Вторым - некоторое исследование в области "а какие вообще плееры и (более или менее) стандартные форматы музыки для них используются?" Первым, что я нашёл, был плеер PT3x0A в журнале 3BIT. Его-то и думаю использовать, если не найду что-то поинтереснее (может даже покомпактнее).

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

MODULE TestPT3;
IMPORT Asm, B := Basic, PT3x0A;

VAR
  ace: PT3x0A.Melody;

BEGIN (*$MAIN*)
  B.Init;
  IF PT3x0A.TabAdr() MOD 256 # 0 THEN
    B.PRSTR("Start address of module must be aligned to ");
    B.PRINT(PT3x0A.TabAdr() MOD 256); B.PRSTR(" bytes"); B.PAUSE(0);
  END;

  (* Player & melodies are from http://zxpress.ru/article.php?id=9508 *)
  B.DEFDATA(ace, 2137); (* ace.m *)
  B.DATA(...); (* Данные мелодии поскипаны *)

  PT3x0A.Install(ace);

  Asm.Code("play_l$: LD   IY,#0x5C3A");
  Asm.Code("         EI             ");
  Asm.Code("         HALT           ");

  PT3x0A.Play;

  Asm.Code("         LD   A,#0x7F   ");
  Asm.Code("         IN   A,(-2)    ");
  Asm.Code("         RRA            ");
  Asm.Code("         JR   C,play_l$ ");

  PT3x0A.Stop;

  B.Quit;
END TestPT3.

Хочется работать со звуками где-то так:

Basic.PLAY("строка...");

Ну и чтобы сам плеер был как можно компактнее. И фиг с ним, пусть вызывается из ПЗУ 128.

Перерыл кучу материалов, но не нашёл как это сделать из машкода.

[Advertiser]

[drbars]

Олег, использовать подпрограммы 128 ПЗУ дурной тон. Есть специальный пакет от Shiru для работы с эффектами на ay.
http://shiru.untergrund.net/files/ayfxedit04.zip
Player на асме достаточно компактный.

[denpopov]

А что, дизассемблер процедур с комментариями отменили чтоли?

[Alex Rider]

Олег, использовать подпрограммы 128 ПЗУ дурной тон.

А что в нем дурного? Надо только следить, чтобы в переменной состояния 7ffd была правда всегда. Ну и да, все-таки включать ПЗУ 128 безопасно с точки зрения прерываний.
Кстати, а у кого-нить есть дизассемблер 128K? На WoS ссылка протухла.
Собсна, из дизассемблера можно вытащить проигрыватель и оформить как либу в ZXDev.

[Oleg N. Cher]

Есть специальный пакет от Shiru для работы с эффектами на ay.

Ну шо ж, плеер от Shiru так плеер от Shiru, принимаюсь за его исследование.

Собсна, из дизассемблера можно вытащить проигрыватель и оформить как либу в ZXDev.

Да, мысль хорошая. Можно даже сделать опцию - вызывать плеер из ПЗУ 128 или включать его в целевой код.

Дизассемблировать ПЗУ 128 или получить его готовый листинг, да ещё и с комментами - конечно заманчиво. Надо поискать, а если у кого есть - приаттачьте, плиз.

Спасибо за идеи.

[Barmaley_m]

А что в нем дурного?

Возможностей мало, сложно и тормозно.

В зависимости от сложности или простоты эффектов можно 1) работать с регистрами AY непосредственно. Там три-четыре записи в регистры - и AY уже звучит. 2) использовать проигрыватель от какого-нибудь треккера, в треккере создать нужные эффекты.

Способ 2) более универсальный и удобный, 1) годится только в случае совсем уж простых эффектов.

О плеере эффетов от Shiru не знал, но если такой существует - то конечно надо пользоваться. Shiru гений в области программирования звука на Спектруме, на бипере такие вещи вытворяет, что даже у меня челюсть отвисает.

[solegstar]

А что в нем дурного? Надо только следить, чтобы в переменной состояния 7ffd была правда всегда.

просто не у всех она (128 ПЗУ) есть в наличии, очень часто вместо неё прошивают какой-нить коммандер.

[drbars]

просто не у всех она (128 ПЗУ) есть в наличии, очень часто вместо неё прошивают какой-нить коммандер.

Всё верно. К тому же версий 128ой прошивки целая куча, Amstrad в пример. Да и самопала много, в виде зашитых командеров и утилит.

Player от Shiru вешается на прерывания, а управляется из общего цикла подачей в регистр номера эффекта. Редактор эффектов сделан под PC, а формат уже как стандарт в нашем скромном хобби

[Andrew771]

в книге "Как написать игру на Ассемблере" про программирование AY есть, припоминаю.

[denpopov]

К тому же версий 128ой прошивки целая куча, Amstrad в пример

а Амстрад тут причем?