Ассемблер. Первые шаги.

[James DiGreze]

AND A                ;тут, вроде, флаг Z сбрасывается, 
JR NZ,NOSETM     ;след. условие NZ выполняется 
LD HL,MESS         ;и сюда мы не попадаем никогда. Или нет?

По AND A определяется нулевое значение А, т.е. if (A==0) Z=1 else Z=0

Можно и так. Еще у тебя есть ошибка- программу надо зациклить. Ну и добавить в цикле проверку на выход (клавишу там нажать надо или еще что).

И HALT перед входом в SCROLL иначе будет "рвать" строку

[jim]

Вопрос, назревавший в другом, не совсем подходящем для него разделе:
Как правильно рассчитывается количество задержек HALT для отрисовки на бордюре командой OUT(#FE),A фиксированной полосы определённог цвета.

одного HALT достаточно для синхронизации с обратным ходом луча. это и будет PAUSE 1

[Vitamin]

Вопрос, назревавший в другом, не совсем подходящем для него разделе:
Как правильно рассчитывается количество задержек HALT для отрисовки на бордюре командой OUT(#FE),A фиксированной полосы определённог цвета.

Вопрос поставлен несколько некорректно.
Команда HALT ждет прихода прерывания. Согласно структуре ULA спектрума, данное событие (приход прерывания) совпадает с началом отрисовки видеокадра. Так что, выполнив эту команду, всего лишь синхронизируешься с лучом- HALT применяется для организации задержек, кратных периоду кадра (50мс). Для более мелких задержек (с более высокой точностью) надо действовать иначе- например, просто организовать цикл или выполнение "ненужных" команд.
Вообще, сначала прочитай все на http://www.zxdn.narod.ru/ - большая часть вопросов отпадет сама.

[Jukov]

А вот аналогичная бегущая строчка, которую я хотел встроить в Бобика, но не успел. По адресу 40000 грузится русский фонт или любой другой. А можно и вообще использовать ПЗУшный, если вместо INCBIN "fontrus" вставить EQU 15616. Выход из процедуры по BREAK:

ORG 40000
FONT INCBIN "fontrus"

ORG 30000
R4 LD IX,TEXT
R3 LD A,(IX)
OR A
JR Z,R4
INC IX
ADD A,A
LD L,A
LD H,0
ADD HL,HL
ADD HL,HL
LD DE,FONT-256
ADD HL,DE
LD DE,BUFER
LD BC,8
LDIR
LD C,8
R2 HALT
LD DE,BUFER
LD H,#50
R0 LD B,32
LD L,#FF
LD A,(DE)
RLCA
LD (DE),A
INC DE
R1 RL (HL)
DEC L
DJNZ R1
INC H
BIT 3,H
JR Z,R0
CALL 8020
RET NC
DEC C
JR NZ,R2
JR R3
BUFER DEFS 8
TEXT
DEFB "HELLO WORLD!"
NOP

[SAM style]

Прикольно, но вот этот фрагмент кода мне не очень ясен:

BIT 3,H     ;Это я понял. Проверка на достижение восьмёрки.
JR Z,R0     ;это понятно
CALL 8020   ;что выполняет эта процедура? 8)
RET NC      ;ну это тоже понятно

Я вроде как начинающий, мне простительно

Если мне память не отшибло (редко пользуюсь процедуринами из ПЗУ), call 8020 - это тест на нажатие break (CS+Space). Возвращает CY=1 когда он не нажат, и CY=0 когда нажат.

[Jukov]

Если мне память не отшибло (редко пользуюсь процедуринами из ПЗУ), call 8020 - это тест на нажатие break (CS+Space). Возвращает CY=1 когда он не нажат, и CY=0 когда нажат.

Память тебе не изменяет. Ассемблер - это низкоуровневый язык, и очень удобно пользоваться уже готовыми процедурами, когда пишешь какие-нибудь тестовые процедуры. Это экономит время. В конечном же продукте процедуры ПЗУ лучше не использовать из соображений совместимости.

[Advertiser]

[Vitamin]

Может, кто-нибудь поможет разобраться?

Демку не видел, поэтому ориентируюсь по коду
Чувствуется давность кода В экранной области #5100-#5700 циклически скроллируются байтики. По два пиксела за раз. Если скроллируемый байт будет равен %01111110 (хранится в ячейке 51933), то в нижней трети увидем двигающиеся вправо квадратики размером 6х6 пикселов.
Как работать со стеком, смотрим в цикле статей от Alco на вышеуказанном сайте

[Vitamin]

Всё, ушёл штудировать ZXDN
[несмотря на всю мою нелюбовь к электронным изданиям; ничего не могу с собой поделать: книжкам (печатным) всегда отдавал и буду отдавать предпочтение]

Дык, распечатай! Там не такие уж и большие статьи

[TomCaT]

А, да-да. Много таких демок в Волгодонской коллекции, в играх. в нижней трети сроллируются квадратики, потом только успевать к ним атрибутами пририсовывать восьмикратно увеличенные символы.

[klondike]

Всегда использовал IX только в системных утилитах.
Например как ссылку на массив констант/переменных при отрисовке меню.
По принципу:

CALL drawcells
cell1: DB xx,yy,l,h,(etc)
cell2: DB xx,yy,l,h,(etc)

***

drawcells: POP IX