Вид для печати
Может быть есть какие-то куски примеров кода как инициализировать графический режим АТМки 320x200x16, как установить палитру, как нарисовать точку или что-то вроде того (или исходники какие-нибудь)? И ещё софт (редактор, компилятор) если порекомендуете, был бы рад. Хоть TASiS, хоть TR-DOS, вообще не важно.
Вообще непонятно с чего начать. Курить книжку по АТМке пытался, там ни черта непонятно. Дизассемблировать прошу не отправлять)
Ну, давай начнем просто с включения режима 320х200 (остальное как-нибудь в следующий раз):Цитата:
Сообщение от norduk
Код:;включение графического режима 320х200 в ATM-turbo 2+ из обычной конфигурации TR-DOS:
LD A,%10101000 ;биты 4-7 обязательны именно в таком
;виде, бит 3=1 – турбо включено
;биты 0-2 код экрана - %000 – режим 320x200
;соответственно %10100000 тоже самое, но с
;выключенной турбой, а %10101011 – ZX-экран
LD BC,retadr ;адрес возврата из TR-DOS
PUSH BC ;на стек
LD BC, #2A53 ;адрес подпрограммы в TR-DOS с командой OUT (C),A:RET
PUSH BC ;на стек
LD BC, #FF77 ;скрытый системный порт ATM
JP # 3D2F ;переходим в TR-DOS для доступа к скрытому порту
retadr … ;здесь продолжается программа пользователя
;включение графического режима 320х200 в ATM-turbo 2+ из ОС TASiS:
XOR A ;задание режима системному вызову на получение
INC A ; в HL’ адрес спецблока системных переменных OS TASiS
LD C,#79 ;задаем номер системного вызова(рестарта) $PAL
RST #10 ;получаем их адрес
EXX
PUSH HL
POP IX ;перекидываем адрес блока в индексный регистр
LD A, %10101011 ;задаем экран 320х200 (значение байта точно как и выше)
LD (IX+55),A ;ставим номер экрана в «экранную» переменную
XOR A ;режим «восстановления» для следующего рестарта
LD BC,#007B ;рестарт #7B $set_pg (в регистре B один из режимов работы)
RST #10 ;меняем экран
… ;продолжение программы пользователя
P.S. В этом примере изменится экран только в программе пользователя, а при выходе из нее в систему
восстановится «системный» экран (сейчас по умолчанию текстовый). Чтобы поменять системный экран,
используйте (IX+54).
Так. Решил попробовать. Скачал SJAsm с редактором вот отсюда, взял где-то в ютубе пример простейшей программкиЦитата:
Сообщение от Максагор
Скрытый текст
device atmturbo512
org 30000
TVFL equ 5C3Ch
start:
xor a
ld(TVFL),a
ld a,'*'
rst 16
ret
rep:
jp rep
end
savesna "test.sna",start[свернуть]
, чтобы в принципе запустить хоть что-то, где я потом буду включать нужный мне 320 на 200.
(device atmturbo512 - это, как я понимаю, указание компилятору под какую адресацию генерировать .sna)
И вот с чем столкнулся. Если я указываю device zxspectrum48, то генерируемый .sna в эмуляторе, который прилагается в данном пакете запускается, а если выбираю нужный мне atmturbo512, то результат не работает (как, кстати и при указании zxspectrum128).
Я понимаю, что в АТМке (как и в 128 машине) адресация более сложная и, тем не менее, непонятно, почему простейшая программа не запускается в данном пакете.
Что я делаю не так?
И есть ли какой-нибудь настроенный пакет для кросс-разработки именно под АТМ? А-то, судя по всему, эмулятор Speccy, который запускает SJAsm из данного пакета режимы АТМки не понимает.
Ну и, вообще, было бы круто сделать сборку пакета для кросс-разработки и разместить на сайте. UnrealSpeccy умеет из командной строки цеплять бинарник и запускать сразу? Ищу, пока не вижу такой возможности...
1. зачем то юзаешь процедуры ПЗУ-шкиЦитата:
Сообщение от norduk
когда нормальные люди так обычно не делают
2. sna врятли поддерживает 512к АТМ-ки
да и вообще есть ли хоть какой то формат снапшотов поддерживающих больше 128?
3. ну и скорей всего проблема в не инициализированных системных переменных
(по моему в sjasm-е есть такоя)
и выходит она из пункта 1
4. после того ret-a произойдет возврат в бейсик или в некуда
до jp rep проц не дойдет
лучше для начала
попикай бипером
а потом лезь в экран
- - - Добавлено - - -
у себя нормально скомпилировал и запустил
- - - Добавлено - - -Код:device zxspectrum128
org 30000
TVFL equ 5C3Ch
start:
xor a
ld (TVFL),a
ld a,'*'
rst 16
ret
rep:
jp rep
; end
savesna "test.sna",start
сейчас я в основном пользуюсь z00m-овской веткой сджасма
https://github.com/z00m128/sjasmplus/releases
правда на нее усердно ругается антивирусник
- - - Добавлено - - -
бинарник не знаюЦитата:
Сообщение от norduk
а sna вполне запускает
например тем же батником что и компилить сорец
Код:sjasmplus test.asm
"Q:\SomeFolders\us\unreal.exe" test.sna
Результат пока такой: https://www.screencast.com/t/yFvZikJua
Анрил настроен как Турбо 2+. Какие системные переменные и как нужно инициализировать для того, чтобы эта же программа заработала на Турбе?
- - - Добавлено - - -
Задача инициализировать экран АТМ и в нём порисовать. Бипер не требуется.Цитата:
Сообщение от NEO SPECTRUMAN
Так.
1) SJAsm умеет генерить бинарник и класть в сразу в .trd, что значительно облегчило запуск программы в UnrealSpeccy
2) Включение режима АТМ 320x200 в эмуляторе отработало, появились характерные цветные полоски.
Скрытый текст
device atmturbo512
org 25000
start:
LD A,%10101000
LD BC, #2A53
PUSH BC
LD BC, #FF77
JP #3D2F
rep:
jp rep
end
emptytrd "test.trd"
savetrd "test.trd","1.C",25000,$1000;[свернуть]
Открытые вопросы:
1) Как очистить экран? Из каких кусков (страниц), вообще, состоит данный режим АТМ? И где они лежат и как к ним обращаться? (Максагор?)
2) Как автоматом создать .trd и закинуть туда бинарник я уже придумал, остаётся найти решение с каким-нибудь универсальным бутом, который появлялся бы внутри свежесозданного .trd и запускал программку, которую туда положил компилятор.
бинарник можно загрузить и через отладчик (находясь в нём alt+r)Цитата:
Сообщение от norduk
Ага, вижу, спасибо.Цитата:
Сообщение от goodboy
Только смысл в том, чтобы править в редакторе, жать на компайл, ран и получать запущенный эмулятор с программой. В крайнем случае, запускать батник Unreal Speccy руками. Чего я практически добился. Только непонятно в каком формате у UnrealSpeccy в сборке с сайта Максагора лежит boot6.$b. Это бут, который эмулятор автоматом подкладывает в .trd, если там бута нет. Вместо него хочу запихать свой басик-файл для запуска поделки, которая прилетает из SJAsm'а.
- - - Добавлено - - -
Кажется он в формате hobeta.
как вариант
" unreal.exe prog.$B prog.$C <- будут помещены на один диск"
и в настройках можно выбрать имя для программы которая будет boot`ом
"BOOT=name.$b"