Ассемблер Радио-86РК

[norduk]

Я использовал Прекрасный ассемблер. Проверял в emu v1.01 (так он о себе сообщает) и в emu80 v4.0.266, в обоих случаях выбрав конфиг Радио-86РК. А так же на реальном Апогее (поправив адреса портов и подпрограмм).
Во вложении скриншоты с эмуляторов и сгенерированый .rk файл.
Вложение 63032

П.С. В прошлом сообщении перепутал - параметр offset_line должен быть сброшен в 0.

Сбросил, странлировал в "прекрасном" и вот что получил:

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

[свернуть]

Забегая вперёд, скажу, что изменения offset_line в моём случае ни на что не повлияли.

А вот так выглядит болдер на этих же эмуляторах:

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

[свернуть]

Что-то мы делаем не так) Вчера пытался дизасемблировать болдеровский режим, но то ли недостаточно времени уделил, то ли у меня руки из одного места, что я не тот кусок кода принял за установку видео режима, но пока безрезультатно.
На всякий случай прилагаю самого болдера который запускал (а-то их тут много бродит разных).

И, да, кстати, на живой РК86 это болдер работает (с блекджеком и так далее).

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

И вот ещё, вот, вдогонку, дизассемблированный кусок кода с установками болдера.
Кажется, тут всё.
Проверил по параметрам (не по значениям, а по тому, куда они отправляются), за некоторыми оговорками очень похоже на то, что в коде-примере.
И вот он не запускается почему-то.. Ну, т.е., сам код отрабатывает, но на выходе чёрный экран, хотя я туда пытаюсь что-то печатать..

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

prompt equ 0F86Ch
clr_scr equ 0FACEh
wait_any_key equ 0xF803 ; ожидание нажатия клавиши

screenlc equ 077D0h ; фиксируем левый верхний угол видеопамяти
screenh equ 25 ; высота видимой области
screenw equ 64 ; ширина видимой области

; параметры горизонтальной строки (в символах)
h_back equ 8 ; отступ слева
h_act equ 64 ; видимых символов в строке
h_front equ 6 ; отступ справа
h_sync equ 8 ; строчный синхроимпульс (2..32)
h_total equ h_back + h_act + h_front ; общее количество символов в строке без учёта синхроимпульса (1..80)


scr_addr: dw 0000h

org 0100h

InitDisplay:
xra a
sta 0xC001
mvi a,04DH
sta 0xC000
mvi a,022H ;в коде от SB - 25h
sta 0xC000
mvi a,077H ;в коде 97h
sta 0xC000
mvi a,053H
sta 0xC000

mvi a,027H
sta 0xC001

mvi a,080H
sta 0xC001
sta 0xC000
sta 0xC000
lda 0xC001
lda 0xC001


ani 020H

InidDma:
mvi a,080H
sta 0xE008

mvi a,000H
sta 0xE004
mvi a,060H
sta 0xE004
mvi a,0A9H
sta 0xE005
mvi a,04AH
sta 0xE005

mvi a,0A4H
sta 0xE008

mvi a,036H
sta 0xA003
mvi a,076H
sta 0xA003
mvi a,0B6H
sta 0xA003

mvi a, 0A4h
sta 0xE008

mvi A, 0Fh
lxi HL, 078B2h
repeat:
mvi M, 11h
inx H
dcr A
jnz repeat
;call repeat

jmp prompt

[свернуть]