PT3 плеер для Вектора-06Ц

[ivagor]

Правильно ли я понял что этот плеер проигрывает только формат PT3 ?

Да

Как переделать формат PT3, чтобы вставить его в прекрасм ?

Два основных варианта:
1) Склеивать с бинарником, например как в pt3test.bat с использованием copy /b
2) Преобразовывать в исходный текст формата tasm. В идеале для этого нужна утилита, но можно воспользовать например IDA Pro.

Сильно ли он грузит процессор - например если я хочу в игре сделать музыку фоновую через этот плеер - потянет ?

Для R7 примерные цифры такие (это с учетом векторовского торможения, на корвете и специалисте будет быстрее): максимальные пики до 14500-15000 тактов/кадр, в среднем 9500 тактов/кадр. Для очень насыщенных дем и игрушек на грани возможного этот вариант вряд ли подойдет, там лучше играть упакованные дампы гигачадом svofski или вот этим.

[Advertiser]

[svofski]

В прекрасм или в .db, или в .db64

Простейший подножный bin2db.py

Скрытый текст

#!/usr/bin/env python3
import sys

# pad to this size
PADDING=0

def bin2db(input_file, varname="mydata", bytes_per_line=12):
    with open(input_file, "rb") as f:
        data = f.read()

    if PADDING > 0:
        data = bytearray(data)
        zeroes = bytearray([0] * (PADDING - len(data)))
        data = data + zeroes
        #data.append(bytearray((len(data) + PADDING) % PADDING))

    print(f"    ; padded {varname} size = {len(data)}");
    for i in range(0, len(data), bytes_per_line):
        chunk = data[i:i+bytes_per_line]
        hexes = ', '.join(f'${b:02X}' for b in chunk)
        print(f"    .db {hexes}")


if __name__ == "__main__":
    if len(sys.argv) < 2:
        print("Usage: bin2db.py <inputfile> [varname]")
        sys.exit(1)

    input_file = sys.argv[1]
    varname = sys.argv[2] if len(sys.argv) > 2 else "mydata"
    if len(sys.argv) > 3:
        PADDING = int(sys.argv[3])

    bin2db(input_file, varname)

[свернуть]

- - - Добавлено - - -

Запускаемый пример в прекрасме


Пришлось пару мест поправить. .db & 255 это понятно, но почему несколько других мест покраснели я не понял -- это ошибки в прекрасме, надо будеть починить. Но поправил ручками чтоб работало.

[ivagor]

Поковырял плеер и не стал мариновать, если что-то сломал, то надеюсь коллективный разум быстрее обнаружит.
R8 на 116 байт короче R7 и средняя скорость увеличилась до 8700 тактов/кадр.

[marinovsoft]

Если вынести машинно зависимый код (от LOUT: и до RET) из pt3ini.asm в pt3.asm то портирование на другие платформы будет проще

[ivagor]

По-хорошему для равномерности воспроизведения надо переставить ROUT в начало, чтобы он выдавал в порты посчитанные в прошлый кадр значения, а уже потом "рендерить" следующую порцию.
Если будет еще версия, то вынесу ROUT из pt3.asm и переставлю в начало.

- - - Добавлено - - -

Еще не откорректировал одну строку комментария.
Здесь поправил:
;START+13 pointer to current position value in PT3 module;
а здесь нет
;After INIT (START+11) points to Postion0-1 (optimization)
Понятно, что и там и там должно быть +13.

- - - Добавлено - - -

Добавил в первый пост R8+. Там поправлен комментарий, но главное - разделены "рендер" и собственно вывод звука (ROUT). Надеюсь из прилагаемого примера понятно, как пользоваться. На всякий случай R8 пока тоже оставил.

[CityAceE]

ivagor, а мелодии TurboSound можно проиграть как-то этим проигрывателем?

[ivagor]

Проще всего откомпилировать плеер 2 раза в раздельные области памяти и вызывать по очереди.

[svofski]

Проще всего откомпилировать плеер 2 раза в раздельные области памяти и вызывать по очереди.

Хорус 5мс опасность!

[ivagor]

"Вот вы смеетесь, а ..."
Про хорус не буду, т.к. если говорим про TS, то там вряд ли каналы дублируются и будет просто задержка.
А вобще (не обязательно про TS) чем медленнее проц, тем больше болтанка (если не разнести рендер и вывод). На векторе максимальный разброс до примерно 9000 тактов, т.е. 3 мс. В принципе это не так уж много, с другой стороны это 15% от 20 мс. А есть ведь компы с 8080 раза в полтора медленнее вектора.
С R8+ даже с TS можно сделать задержку между воспроизведением групп каналов в районе 1100 тактов, т.е. 0.36 мс, чем можно пренебречь. С TS скорее проблема в быстродействии, на векторе плееры под 2xYM могут в пике занимать до половины кадра, пригодность для игр и дем еще меньше, чем у одинарного.

[marinovsoft]

Вариант PT3R8plus_8080 - без использования прерываний?