Ретро-ЯП Millfork для Atari, Apple II, ZX Spectrum, MSX, CP/M, NES, Game Boy и MS-DOS

[breeze]

Поковырял тут немного XDOS. Согласно документации, после загрузки программы, с адреса XLINE ($0880) находится вся строка (имя файла + аргументы) которые набрали.
Сделал небольшую процедурку, которая копирует эту шнягу в буфер и теперь можно загружать разные файлы, указав их как аргумент:





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

[Shiny]

Это только ATASCII? poke 82,0 решат заморочку с краями.

[goodboy]

Единственное что осталось это разобраться с размерами загружаемого файла.

возможно стоит посмотреть в

XFILE = $87D filename buffer

ещё про команду LOA пишут что
After executing the command, the Number of bytes actually loaded in $358/9
(and can be determined with the DUP command = 358)

[breeze]

Это только ATASCII?

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

poke 82,0 решат заморочку с краями.

Ну как вариант

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

возможно стоит посмотреть в

XFILE = $87D filename buffer

Честно там не совсем понятно что за данные.

ещё про команду LOA пишут что
After executing the command, the Number of bytes actually loaded in $358/9
(and can be determined with the DUP command = 358)

Ну надо подумать, вообще хотелось бы предварительно знать, сколько выделять памяти. Но это только в мечтах. Размер Array должен быть статический, тупо выделил 256б вот и радуйся)
Чисто гипотетически можно выделить 128б (по размеру сектора) и сделать счётчик загрузки

[breeze]

Короче, пошаманив немного, нашел идеальный вариант. Методом научного тыка (из дампа памяти) нашел интересный адрес $0028/29 а потом в описании памяти атари увидел, что здесь хранится количество переданных/принятых байт через SIO. Так что вопрос с точностью быстро решился.

Вариант с адресами $358/9 не проканал, поскольку это используется при команде 40 (если я правильно понял) загрузчика бинарных файлов (исполняемых). И там ничего нет при загрузке через команду 7.

Переименовал файл в XV.COM, так как задолбало набирать длинное название с расширением, а XEX XDOS не понимает

Ну и поправил некоторые ляпы с $9b (перенос строки) и на время отображения отключаю смещение (poke 82,0). Буфер сделал 1024 байта, если сделать меньше (например 255), то видно как частями грузится картинка

Так же встречается ESC код $1b (в картинке ATARI600) поправил, теперь всё збс!

Есть косяк с US2.ATA не могу понять почему на середине картинки позицию швыряет в начало экрана o_O

Ещё почему-то не зависимо от того нашелся ли файли или нет(заблокирован) из $0343 возвращается код 01 - ошибок нет. Надо копать.

Ну а так в целом минималистичный вьювер ATASCII готов

[breeze]

Решил тут ещё немного поколупаться с DOS, в результате чего родился плеер треков в формате MPT (Atari Music ProTracker) да да, всем так нравилось это слово, что протрекер есть везде



Сначала загружается сама программа, затем бинарь MPT-плеера (в будущем можно сделать детект и подгружать разные плееры).
В качестве аргумента указываем имя музыки.

На бордюре такты, по любой клавише выход.

Из интересного, в Millfork есть пример для этого плеера, но он немного некорректен. Во первых исходный XEX занимает аж 38кб, поскольку сама программа и плеер с музыкой «размазаны» по памяти, выгружается такой огромный брикет. А во вторых, пропускаются 6 байт при импорте файлов:

const array player @ ADDRPLA = file("data/mpt_player.obj", 6)

Почему их было не обрезать сразу при создании мне не ясно. В принципе я нашел плеер MPT в исходниках, так что можно подумать об оптимизации.
Кроме того походу пьесы автор не разобрался как управлять плеером, и вместо того что бы подать команду 2 (остановить) он глушит цифровые каналы (да-да плеер умеет в дигитал).

В сырках я перевёл команды плеера:

// commands, A:
// 0 - инициализация. в регистрах Y-младший и X-старший байт адреса музыкальных данных.
// 1 - воспроизвести инструмент, номер которого находится в битах 4-0 рег.X,
//     в битах 7-6 рег.X - номер канала, на котором должен быть сыгран этот инструмент,
//     а в рег.Y-номер ноты инструмента, с C-1 - $00, c#1 - $01.
// 2 - остановить воспроизведение музыки, без каких-либо параметров.
// 3 - воспроизвести паттрен, номер которого находится в битах 5-0 рег.X,
//     в битах 7-6 рег.X - номер канала, а рег.Y - транспозиция канала.
// 4 - начать воспроизведение музыки. В рег.X - номер позиции начала, а рег.Y - биты 0-3 какой из
//     каналов должен быть выключен (0 - 3й, 1 - 2й, 2 - 1й, 3 - 0й канал = 1 выключен)
// 5 - воспрозвести цифровой семпл, в регистрах Y-младший и X-старший байт адреса таблици, в которой
//     находится список адресов расположения семплов.
// 6 - воспроизведение цифровой музыки, в рег.X bit 0 = 1 - 15kHz, 0 - 8kHz
// 7 - воссоздаёт(?) цифровой семпл, номер которого в рег.Y(0-F), в рег.X bit0 - 15kHz, bit7-6 номер канала

[Advertiser]

[Shiny]

во вторых, пропускаются 6 байт при импорте файлов:

const array player @ ADDRPLA = file("data/mpt_player.obj", 6)

Почему их было не обрезать сразу при создании мне не ясно

Вангую, что стандартный заголовок - слово $FFFF, начальный адрес, конечный адрес.

[breeze]

Вангую, что стандартный заголовок - слово $FFFF, начальный адрес, конечный адрес.

Ну где-то так Это DOS-заголовок файлов?

[breeze]

Итак очередная версия моего плеера под XDOS.
На этот раз она по расширению файла понимает какой тип плеера нужен, и подгружает его.
Пока этот два варианта CMC - Chaos Music Composer и MPT - Atari Music ProTracker.
Выглядит это так:



К сожалению с MPT до конца разобраться не получилось и сменить адрес загрузки с наскока не вышло.
Однако это оказалось ещё не все проблемы, не знаю как с форматом MPT, но вот в CMC расположение «паттернов»(?)
в памяти привязывается при сохранении файла в редакторе.

Например, если у файла указано, что он загружается в область $8000, а потом его попытаться проиграть с $a000, то
мы в лучшем случае получим попёрдываение или завывание, а в худшем плеер почему-то тупо повиснет.

В результате чего пришлось питать ретранслятор адресов, который искал нужный и корректировал его под адрес
загрузки.



Честно говоря я немного в шоке от того, что это приходится делать в обратную сторону. Видимо спектрум разбаловал вменяемой логикой
Логично же, что первый раз плеер вызывает инициализацию и может табличку адресов подкорректировать. Но нет, всё жОска прибито.

Подозреваю что в MPT такая же фигня.

[Shiny]

С привязкой по адресам у плееров вообще беда. К счастью, утилиты были у Mad Assembler.Я так страдал с .RMT, а потом плюнул, и стал ориентироваться на занятые адреса $4000-сколько там.